Цитата(haker_fox @ Oct 25 2005, 11:19)
Трудно сказать, что мне надо, пажалуй все по этой теме. Как я уже писал мне просто хочется взглянуть на чужую работу. Графический интерфейс мне пока не нужен.
Совсем простой вариант - и по быстрому:
.
.
.
for (;;)
runfor
type_crlf (line);
outstr ("0. TEST RS-485\r\n", line);
outstr ("1. TEST R-29 INC\r\n", line);
outstr ("2. TEST R-29 FLOAT 1\r\n", line);
outstr ("ESC- EXIT\r\n", line);
outstr ("^C - MAIN MENU\r\n", line);
type_crlf (line);
for (j=0; j leq 0;)
run1
b =getbyte (line);
switch ( b )
runswitch
case space:
case cr:
j=1;
break;
case '0':
rs485_menu ();
j=1;
break;
case '1':
test_r29_inc ();
j=1;
break;
case '2':
test_r29_f (1);
j=1;
break;
case esc: return;
case ctlc:
ret_main_menu ();
endswitch
end1
endfor
.
.
.