SUBROUTINE IOWAIT(ITIME) C * THIS ROUTINE IS USED TO GENERATE DELAYS FOR REMOTE TERMINALS COMMON /TKTRNX/ TMINVX,TMINVY,TMAXVX,TMAXVY,TREALX,TREALY, 1 TIMAGX,TIMAGY,TRCOSF,TRSINF,TRSCAL,TRFACX,TRFACY, 2 TRPAR1,TRPAR2,TRPAR3,TRPAR4,TRPAR5,TRPAR6,KMOFLG(8),KPAD2, 3 KBAUDR,KGNFLG,KGRAFL,KHOMEY,KKMODE,KHORSZ,KVERSZ,KTBLSZ, 4 KSIZEF,KLMRGN,KRMRGN,KFACTR,KTERM,KLINE,KZAXIS,KBEAMX,KBEAMY, 5 KMOVEF,KPCHAR(5),KDASHT,KMINSX,KMINSY,KMAXSX,KMAXSY,KEYCON, 6 KINLFT,KOTLFT,KUNIT IF(KBAUDR.LE.0)GO TO 20 KOUNT=ITIME*KBAUDR/10 DO 10 J=1,KOUNT C * OUTPUT (SYN) TO INSURE AGAINST LOSS OF OUTPUT WHILE C * TERMINAL IS BUSY. (SYN) DOES NOT AFFECT THE TERMINAL. 10 CALL TOUTPT(22) 20 RETURN END