1 rem tusker (system 3/kixx)
2 rem infinite lives by m pugh
3 rem cassette -v1- commodore format
4 for x=520 to 622:read y:c=c+y:poke x,y:next
5 for x=288 to 321:read y:c=c+y:poke x,y:next
6 if c<>17071 then print "data error":end
8 poke 157,128:sys 520
10 data 032,044,247,160,017,140,064,003
11 data 136,140,062,003,032,108,245,169
12 data 032,141,233,016,169,061,141,234
13 data 016,169,002,141,235,016,162,157
14 data 189,158,016,157,158,002,202,208
15 data 247,169,166,141,020,003,169,002
16 data 141,021,003,208,254,141,013,220
17 data 072,169,032,141,240,003,169,082
18 data 141,241,003,169,002,141,242,003
19 data 104,096,169,093,141,214,248,169
20 data 002,141,215,248,096,098,002,072
21 data 077,080,169,032,141,092,253,169
22 data 001,141,093,253,108,022,000,034
23 data 001,162,173,173,200,136,201,049
24 data 240,017,173,200,136,201,206,240
25 data 005,142,158,252,208,008,142,200
26 data 136,240,003,142,011,144,108,254
27 data 252
Download PRG...
