10 V=53248:POKEV+21,13:X=PEEK(V):Y=PEEK(V+1):FORT=YTO190STEP.5:POKEV+1,T:NEXTT
11 POKE40000,SS/10000:POKE40001,(SS-INT(SS/10000)*10000)/100
12 POKE53240,13:FORT=XTO24STEP-.5:POKEV,T:NEXTT
13 POKE40002,SS-INT(SS/100)*100
15 S=54272:POKES+24,15:POKES+4,0:POKES+5,15:POKES+1,2:POKES+4,129
20 FORT=168TO255STEP.5:POKEV+7,T:IFT<213THENPOKEV+5,T+42
30 POKEV+41,T:POKEV+42,T:NEXTT:POKES+4,0:POKES+5,9:POKES+4,129:POKES+1,3
40 POKEV+21,1:FORT=24TO232STEP.3:POKEV,T:NEXTT:POKEV+21,0
45 V=53248
50 POKEV+14,100:POKEV+15,123:POKEV+21,192:PRINT"[147]":POKEV+12,210:POKEV+13,122
51 PRINT:PRINT:PRINT:PRINT:PRINT:PRINT:PRINT"[155]       ^^^^^^^^^^^^^^^^^^^^^^^^^^^
52 [153]"       ^             ^           ^
53 PRINT"       ^             ^           ^
54 [153]"       ^      XLIST      ^      X LIST   ^
55 PRINT"       ^             ^           ^":POKE53246,255
56 PRINT"       ^             ^           ^":MM=MN:LL=PEEK(139)
57 PRINT"       ^^^^^^^^^^^^^^^^^^^^^^^^^^^":PRINT"[144]";SPC(16);MM:XY=.
58 PRINT"[144]";SPC(29);LL:XX=MM
60 FORT=XXTO0STEP-1:PRINT"[144]";SPC(16);(T):XY=XY+1:IFXY=4THENLL=LL+1:XY=.
61 PRINT"[144]";SPC(29);LL:IFT<10THENPOKE52642,32
62 RESTORE:FORR=0TO26:READX:POKEV+37,X:NEXTR,T:POKE139,LL:POKE40100,MM:FORT=0TO200:NEXTT
63 FORR=0TO300:NEXTR:PRINT"[147]LOAD"CHR$(34)"08"CHR$(34)",8":POKE53281,0:POKEV+21,0
70 DATA1,7,13,3,15,10,5,12,8,4,2,11,6,9,0,9,6,11,2,4,8,12,5,10,15,3,13,7
100 PRINT"RUN:":POKE 198,10:POKE631,19:POKE632,13:POKE633,13