Відображення мнемосхеми та технологічного процесу атомної елек-тричної станції з водяним реактором
// меню
setfillstyle(1,7);
setcolor(2);
bar3d(225,125 ,377,170,0,0);
outtextxy(230, 145, " Показ завдання");
bar3d(225,225 ,377,270,0,0);
outtextxy(226,245," Позначення чисел");
bar3d(225,325 ,377,370,0,0);
outtextxy(285, 349, "exit");
// перемищення в меню
do
{
putimage(X+240,y,saucer,XOR_PUT);
putimage(X,y,saucer,XOR_PUT);
c=getch();
putimage(X+240,y,saucer,XOR_PUT);
putimage(X,y,saucer,XOR_PUT);
switch(c)
{
case 80:y+=STEP;q++;if(y==410){y=110 ;q=1;}break;
case 72: y-=STEP;q--;if(y==10){y=310;q=3;}break;
case 13: if(q==2){help();goto poch;}
if(q==3)goto popa;if(q==1){
draw1(5,-2);
// пар ыде до генератору