Реферат: Программа исследования функций
if (vp>=m.onum) vp=0;
}
} while ((c!=72)&&(c!=80)&&(c!=13)&&(c!=27));
} while ((c==72)||(c==80));
// Возврат выбраннго пункта
if (c==13) return vp;
// Возврат -1 при ESC
return -1;
}
// Процедура обработки горизонтального меню
int use_menu(menu_ m) {
int n; // Счетчик
int vp=0; // Выбранный пункт
char c; // Символ
// Очистка места под меню
setfillstyle(1,0);
settextjustify(1,1);
bar(0,0,639,25);
do {
// Выводпунктовменю
for (n=0;n<m.num;n++) {
// Выделение цветом
if (n==vp) {
setfillstyle(1,4);
setcolor(15);
} else {
if (n>(m.onum-1)) {
setfillstyle(1,8);
setcolor(10);