0 POKE53280,0:POKE53281,0:PRINTCHR$(142),CHR$(8)"[147]                   ."
1 PRINT"       ."
2 PRINT"                            ."
3 PRINT"                                      ."
4 PRINT" .         .   [170][165]                 ."
5 PRINT"              .[167][180]     .    .  ."
6 PRINT"      .        [167][165]                   ."
7 PRINT"   .           [207][208] . [209]          ."
8 PRINT"              [207][183][183][208]     .  [207][208]"
9 PRINT"       .  .   [180][190][188][170]  .[167][165]   [207][208]"
10 PRINT"              [180][190][188][170] [206][180][167][165] . [207][208] [176][174]      [207][208]"
11 PRINT" [207][208]           [180][190][188][170] [180][180][178][178]   [207][208] [171][179].[207][180] . [207][208]"
12 PRINT" [207][208] [176][174][176][174] . [172][187] [180][190][188][170] [180][180][177][177] [180] [207][208] [171][179] [207][180]   [207][208]"
13 PRINT" [207][208].[171][179][171][179]   [207][208] [180][190][188][170] [180][180][182][181] [165] [207][208] [171][179] [207][180].  [207][208]"
14 PRINT" [207][208] [171][179][171][179][213][201] [180][170].[180][190][188][170] [180][180][182][181][207][208] [207][208].[171][179] [207][180][213][201] [207][208]"
15 PRINT" [207][208] [171][179][171][179][194][194] [180][170] [180][190][188][170] [180][180][182][181][207][208] [207][208] [171][179] [207][180][194][194] [207][208]"
16 PRINT"[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][145][145][145][145][145][145][145][145][145]"
70 GOSUB1000
80 GOTO2000
90 FORX=1TO24:POKE54272+X,0:NEXT
1000 S=54272
1020 S=54272
1030 POKES+24,7
1040 POKES+5,12*16+0
1050 POKES+6,15*16+10
1060 FORX=255TO100STEP-1
1070 POKES+1,X
1080 POKES+4,17
1090 FORD=1TO10:NEXTD
1100 NEXTX
1110 POKES+24,15
1120 POKES+1,15
1130 POKES+4,128
1140 RETURN
2000 POKE53280,11:POKE53281,11:FORX=1TO500:NEXTX
2001 POKE53280,12:POKE53281,12:FORX=1TO500:NEXTX
2002 POKE53280,15:POKE53281,15:FORX=1TO500:NEXTX
2003 POKE53280,1:POKE53281,1:PRINT"[147]":FORX=1TO500:NEXTX
2004 POKE53280,15:POKE53281,15:FORX=1TO500:NEXTX
2005 POKE53280,12:POKE53281,12:FORX=1TO500:NEXTX
2006 POKE53280,11:POKE53281,11:FORX=1TO500:NEXTX
2007 POKE53280,0:POKE53281,0:FORX=1TO500:NEXTX
3001 PRINT"****************************************[145]"
3002 FORX=1TO125:NEXTX:PRINT"[145][145][145] **************************************":FORX=1TO125:NEXTX
3003 PRINT"[145][145]         **********************":FORX=1TO125:NEXTX
3004 PRINT"[145][145]             **************":FORX=1TO125:NEXTX
3005 PRINT"[145][145]                  ****":FORX=1TO125:NEXTX
3006 PRINT"[145][145]                  ****":FORX=1TO125:NEXTX
3007 PRINT"[145][145]                  ****":FORX=1TO125:NEXTX
3008 PRINT"[145][145]                  ****":FORX=1TO125:NEXTX
3009 PRINT"[145][145]                 ******":FORX=1TO125:NEXTX
3010 PRINT"[145][145]                ********":FORX=1TO125:NEXTX
3011 PRINT"[145][145]               **********":FORX=1TO125:NEXTX
3012 PRINT"[145][145]             **************":FORX=1TO125:NEXTX
3013 PRINT"[145][145]      ***  ******************  ***":FORX=1TO125:NEXTX
3014 PRINT"[145][145]     ******************************":FORX=1TO125:NEXTX
3015 PRINT"[145][145]    ********************************":FORX=1TO125:NEXTX
3016 PRINT"[145][145]   **********************************":FORX=1TO125:NEXTX
3017 PRINT"[145][145]    ********************************":FORX=1TO125:NEXTX
3018 PRINT"[145][145]     ******************************":FORX=1TO125:NEXTX
3019 PRINT"[145][145]      ****************************":FORX=1TO125:NEXTX
3020 PRINT"[145][145]       **************************":FORX=1TO125:NEXTX
3021 PRINT"[145][145]         **********************":FORX=1TO125:NEXTX
3022 PRINT"[145][145]           ******************":FORX=1TO125:NEXTX
3023 GOTO62000
60000 PRINT"[147]          ******************
60001 [153]"         **********************
60002 PRINT"       **************************
60003 [153]"      ****************************
60005 PRINT"     ******************************
60006 [153]"    ********************************
60007 PRINT"   **********************************
60008 [153]"    ********************************
60009 PRINT"     ******************************
60010 [153]"      ***  ******************  ***
60011 PRINT"             **************
60012 [153]"               **********
60013 PRINT"                ********
60014 [153]"                 ******
60015 PRINT"                  ****
60016 [153]"                  ****
60017 PRINT"                  ****
60018 [153]"                  ****
60019 PRINT"             **************
60020 [153]"         **********************
60021 PRINT" **************************************
60022 [153]"****************************************ONONONONONONONON"
60023 [161]A$:[139]A$[178]""[167]60023
62000 [129]X[178]1[164]2000:[130]X
62003 [153]"LOAD(null)IE ERLEBTEN SOEBEN DIE (null)ERSTOERUNG"
62004 [153]"(null)EW (null)ORKS BEI (null)ACHT, VERURSACHT DURCH"
62005 [153]"EINE JAPANISCHE ATNTOMBOMBE IM MID$AHRE 2011."
62006 [153]"(null)(null)RIGHT$(null)(null)VAL(null)CLOSEPEEK(null)CLOSEMID$ATNLEN(null)CLOSE(null)LEFT$VALCLOSE(null)ATN(null)(null)VAL(null) 1992":[129]X[178]1[164]5000:[130]X
62007 [153]"LOAD"[199](142):[162]
63000 [143] WRITTEN BY JACK THE RAPPER 1992