1 PRINT"TIME-LOOP":FORX=0TO5000:NEXTX 2 FORX=0TO32:PRINT:NEXTX 9 GOTO400 10 A=48 15 B=48 16 C=48 20 FORX=48TO57 25 IFX=48THENGOTO80 30 POKE53776,X 35 FORZ=0TO100:NEXTZ 40 NEXTX 70 GOTO20 80 POKE53775,A 85 IFA=48THENGOTO200 90 A=A+1 95 IFA=58THENA=48 100 GOTO30 200 POKE53774,B 203 IFPEEK(53774)=58THENGOSUB400 205 IFB=48THENGOTO300 210 B=B+1 220 IFB=58THENB=48 230 GOTO90 300 POKE53773,C 310 C=C+1 320 IFC=58THENC=48 330 GOTO210 400 FORX=53741TO53744:POKEX,131:NEXTX 410 FORX=53805TO53808:POKEX,132:NEXTX 415 POKE53740,204 416 POKE53745,205 420 POKE53777,139:POKE53772,140 430 POKE53804,203:POKE53809,206 440 GOTO10 OK