10 FORL=54272TO54295:POKEL,0:NEXT:POKE54296,15
20 FORD=1TO500:NEXT
30 POKE54278,255
40 POKE54287,4
50 POKE54276,23
60 FORA=1TO130STEP.3
70 POKE54273,A
80 NEXT
90 POKE54278,0