start tok64 d64-Ka5Ho4
1 FORi=49152TO49333:READx:c=c+x:POKEi,x:NEXT
2 IFc-16143THENSTOP
3 DATA120,169,39,162,192,141,20,3,142,21,3,169,127,141,13,220,169,,141
4 DATA18,208,173,17,208,41,127,141,17,208,169,1,141,26,208,141,25,208,88
5 DATA96,169,1,141,25,208,165,251,41,31,201,,208,2,169,1,133,251,165,252
6 DATA41,31,201,,208,2,169,1,133,252,173,119,192,201,,208,22,238,119,192
7 DATA166,251,189,119,192,141,32,208,166,252,189,119,192,141,33,208,76
8 DATA49,234,206,119,192,166,251,189,150,192,141,32,208,166,252,189,150
9 DATA192,141,33,208,76,49,234,,,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,2,3
10 DATA4,5,6,6,7,12,,2,2,5,9,10,10,,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15
11 DATA11,15,8,10,9,11,13,14,6,4,6,14,11,12,14
12 PRINT"sys49152 to start
13 PRINT"poke251,border{space*2}poke252,background
stop tok64
(bastext 1.0)