10 OPEN "I",#1,"CYCLE.FIL"
20 INPUT #1,C,TT
25 CLOSE
26 IF TT=0 THEN TT=9999
30 PRINT"***************************  TEST CYCLE #  ";C;"****************************"
35 PRINT:PRINT
40 IF TT<=INT(C*2.5/60) THEN PRINT:PRINT:PRINT:PRINT:PRINT "TEST CYCLE COMPLETE -> NO FAILURES ":PRINT:PRINT:PRINT:END:END
50 C=C+1
60 OPEN "O",#1,"CYCLE.FIL"
70 PRINT #1,C,TT
80 CLOSE
90 SYSTEM
PLETE -> NO FAILURES ":PRINT:PRINT:PRINT:END:END
50 C=C+1
60 OPEN "O",#1,"CYCLE.FIL"
70 PRINT #1,C,TT
80 CLOSE
90 SYSTEM