{//на столбик A
case 'A' : {getimage(getmaxx()/4*3+40-80,arr_C[n-1].y1,getmaxx()/4*3+40+51,arr_C[n-1].y2,ukaz);
setfillstyle(1,0);
bar(getmaxx()/4*3+40-80,arr_C[n-1].y1,getmaxx()/4*3+40+51,arr_C[n-1].y2);
setfillstyle(1,5);
bar(getmaxx()/4*3+40,arr_C[n-1].y1,getmaxx()/4*3+41,arr_C[n-1].y2);
for (i=1;i<=164;i=i+4) if (getpixel(getmaxx()/4-40,getmaxy()-55-i)==5)
{
arr_A[n-1].y1=getmaxy()-55-i-8;
arr_A[n-1].y2=getmaxy()-55-i;
setfillstyle(1,0);
bar(getmaxx()/4-40,arr_A[n-1].y1,getmaxx()/4-39,arr_A[n-1].y2);
putimage(getmaxx()/4-120,arr_A[n-1].y1,ukaz,1);
break;
}
} break;
//на столбик B
case 'B' : {getimage(getmaxx()/4*3+40-80,arr_C[n-1].y1,getmaxx()/4*3+40+51,arr_C[n-1].y2,ukaz);
setfillstyle(1,0);
bar(getmaxx()/4*3+40-80,arr_C[n-1].y1,getmaxx()/4*3+40+51,arr_C[n-1].y2);
setfillstyle(1,5);
bar(getmaxx()/4*3+40,arr_C[n-1].y1,getmaxx()/4*3+41,arr_C[n-1].y2);
for (i=1;i<=164;i=i+4) if (getpixel(getmaxx()/4*2,getmaxy()-55-i)==5)
{
arr_B[n-1].y1=getmaxy()-55-i-8;
arr_B[n-1].y2=getmaxy()-55-i;
setfillstyle(1,0);
bar(getmaxx()/4*2,arr_B[n-1].y1,getmaxx()/4*2+1,arr_B[n-1].y2);
putimage(getmaxx()/4*2-80,arr_B[n-1].y1,ukaz,1);
break;
}
} break;
} break;
}
return;//возврат из ф-ии
}
//*******************************************************
//ф-ия на нажатия 'n' и 'q'
int Klav_getch()//заголовок ф-ии
{
w=0;
while(1)//цикл анализа нажатой клавиши
{
ch=getch();//принять от клавиатуры символ
Switch(ch)
{
case 'q': i=1 ; break;//выход из цикла //производится,только если была
case 'n':{i=1;w=1;} break;//нажата 'n' или 'q'
default : i=0 ;
}
if (i==1) break;
}
if (w==0) //если нажата 'q', то
{
setfillstyle(1,0);
cleardevice();//залить экран
//выдать сообщение
outtextxy(getmaxx()/2-80,getmaxy()/2,"Press any key for quit");
getch();//задержка до нажатия
delay(1000);
closegraph(); //закрыть граф. режим
exit(1);//прервать выполнение программы
}
return 1;//если нажата 'n', то возвратить значение 1
}
-------------------------------------------------------------------------------------------------------