... @input_cycle // проверка за съобщение в опашката msg jmf @msg_dispatch_command,if_message_received // проверка за пристигнали TCP данни от терминала mov i,ic_receivetcp inp 0 jmf @work_tcp_line,if_tcp_received mov i,ic_getinputstate inp 0 cmp i,1 jmf @input_cycle,if_equal cmp i,2 jmf @end_program,if_differ sys v1sq_set_netwait_state jmp @input_cycle @work_tcp_line //пристигнали са данни по TCP mov i,ic_gettcprecvstr inp 0 ... //тук има разпознаване, обработка и препращане mov i,ic_shiftlefttcprecvbuf inp 0 //край на обработката-данните са прочетени jmp @input_cycle ... @msg_dispatch_command //пристигнало е съобщение ... jmp @input_cycle