order (int x, int y, int dx, int dy)
{j; (x-1, y-1, x + dx, y + dy); (); (x-1, y-1, x + dx, y + dy +1 ); (j = 1; j <= dx; j + +) {(j +1,1); cprintf ("?"); gotoxy (j +1, dy +2); cprintf ("?" );
} (j = 1; j <= dy; j + +) {(1, j +1); cprintf ("?"); gotoxy (dx +2, j +1); cprintf ("?");
} menu (tmenu m, int save = 0)
{i, j, sel, cmd, buffer [2000]; (menu_bg_color); (menu_txt_color); (save) i
}
} (1,1,80,25); (BLUE); (save) puttext (mx-1, my-1, m.x + m.dx, m.y + m. dy, buffer); (cmd == 13) return (sel); return (-1);
} inputbox (char caption [], int x, int y, int dx, char s [], int maxlen = 12)
{str [100], buffer [4000]; (menu_bg_color); (menu_txt_color);
} inputboxnum (char caption [], int x, int y, int dx, long & l)
} while (i == -1); = i; (1,1,80,25); (x-1, y-1, x + dx, y +1, buffer) ;
} showmessage (int dx, int dy, char caption [], char text [], char type = 0, int save = 1)
{buffer [4000], ch; (save) gettext (39-dx/2,11-dy/2,41 + dx/2,13 + dy/2, buffer); (type == 0) {(menu_txt_color); (menu_bg_color);
} {(WHITE); (RED);
} answeryn (char answer [])
} selectfile ()
{* fp; s [13]; ok; = 0; ("Введіть ім'я файлу:", 20,11,40, s); = fopen (s, "r" ); (fp == NULL) {(answeryn ("Файл з таким ім'ям не знайдений, створити новий? (Y/N)")) {= fopen (s, "w"); (fp == NULL ) (30,4, "Помилка!", "Помилка створення файлу.!", 1); ok = 1;
}} ok = 1; (ok == 1) {(fp); [worktype] [0] = NULL; (filename [worktype], s); (30,3, " Поточний файл: ", filename [worktype]);
}
} viewfile ()
{buffer [4000], buffer2 [block_size +1]; s1; * fp; kol, lines; s [40] = "Перегляд файлу:", c;
if (filename [worktype] [0] == NULL) (30,3, "Помилка", "Робочий файл не заданий", 1); {= fopen (filename [worktype] , "rb"); (fp == NULL) (30,3, "Помилка", "Помилка відкриття файлу", 1); {(1,1,80,25, buffer); (s, filename [worktype]); (s);
showstatus ("Для продовження натисніть будь-яку клавішу ...");
textcolor (WHITE); (BLUE); (1,2,80,24); (); = 0;
switch (worktype) {
case 0: {
while (! feof (fp)) {= getc (fp); ("% c", c); (c == ' n') lines + +; ...
