10 POKE53280,.:POKE53281,.:PRINTCHR$(147)CHR$(8):S=54272:POKES+24,15
11 A=A+1:IFA=5THENPOKES+4,128:POKES+11,0 :FORT=1TO1000:NEXT:GOTO60
12 FORC=5TO7:POKE53265,80:POKES+4,17
15 PRINT"[147][154]<><><><><><><><><><><><><><><><><><><><>";:POKES+5,9:POKES+6,138
16 POKE646,C/2:POKE53282,C:POKE53283,C+1:POKES+1,C:POKES+22,7
20 PRINT"----------------------------------------[146]";:POKE646,C:POKE53283,C+C
25 PRINT"    [160][160][160][160][160][160] [160][160][160]  [160] [160][160][160][160][160]  [160][160][160][160][160][160] [160][160][160][160]    ";:POKES+7,202:POKES+22,128
30 PRINT"    [160][160][160]    [160][160][160][160] [160] [160][160][160]  [160] [160][160][160]    [160][160][160][160]    ";:POKES+8,6+ABS(191+11)/C
35 PRINT"    [160][160][160][160][160]  [160][160][160] [160][160] [160][160][160]  [160] [160][160][160][160][160]  [160][160][160][160]    ";:POKES+13,205:POKES+11,24
40 PRINT"    [160][160][160]    [160][160][160]  [160] [160][160][160]  [160] [160][160][160]            ";
45 PRINT"    [160][160][160][160][160][160] [160][160][160]  [160] [160][160][160][160][160]  [160][160][160][160][160][160]  [160][160]     ";:POKE646,C/2
50 PRINT"----------------------------------------[146]";:POKE646,14
55 PRINT"<><><><><><><><><><><><><><><><><><><><>[146]";:
56 FORF=16TO16*RND(.)+C       :POKE53284,F:POKE646,F:POKE53282,F+1:POKE53283,F+2
57 NEXT:NEXT:POKES+4,16:POKES+11,21
58 GOTO11:
60 FORC=.TO8:POKE646,C:PRINT"[147][160][204][213][203][201][193][206][160]":POKE53284,C:NEXT:FORT=1TO350:NEXT:SYS2048
65475 (null)FOR
C
0