1 rem menace
2 rem infinite everything by waz
3 rem disk -v1- commodore format
4 for x=320 to 400:read y:c=c+y:poke x,y:next
5 if c<>8518 then print "data error":end
6 print chr$(147);"insert disk & press a key"
7 poke 198,0:wait 198,1:sys 320
8 data 169,001,168,162,008,032,186,255
9 data 169,006,162,099,160,001,032,189
10 data 255,169,000,032,213,255,169,105
11 data 141,026,010,169,001,141,027,010
12 data 076,064,008,077,069,078,065,067
13 data 069,169,234,141,050,035,141,051
14 data 035,169,032,141,153,010,169,131
15 data 141,154,010,169,001,141,155,010
16 data 076,032,008,072,169,253,133,038
17 data 169,253,133,039,104,173,013,220
18 data 096
Download PRG...
