10 FORI=54272TO54295:POKEI,0:NEXT
20 POKE54296,15
30 POKE54277,8
40 POKE54278,255
42 POKE54276,21
45 FORZ=1TO4
50 A=1:FORY=1TO10
60 B=10:C=4:X=3:POKE54273,A
70 FORI=1TO6
80 B=B*1:NEXT
90 A=A*1.5:C=C*1.9:NEXT
100 FORI=1TO50
105 POKE54287,B:POKE54287,C:POKE54273,X
110 A=A*2.2:B=B*1.05:C=C+2:X=X+2
200 NEXTI,Z
220 POKE54278,0