1 rem slayer (rack-it)
2 rem infinite lives and/or invincibility by m pugh
3 rem cassette -v1- commodore format
4 for x=517 to 574:read y:c=c+y:poke x,y:next
5 if c<>5959 then print "data error":end
6 input "infinite lives y/n";a$: if a$="y" then poke 568,141
7 input "invincibility y/n"; b$: if b$="y" then poke 571,141
8 poke 157,128:sys 517
9 data 169,018,141,040,003,169,002,141
10 data 041,003,032,086,245,169,032,141
11 data 178,002,169,002,141,179,002,096
12 data 072,077,080,169,032,141,222,003
13 data 169,051,141,223,003,169,002,141
14 data 224,003,032,069,003,096,238,032
15 data 208,169,189,174,121,037,174,163
16 data 035,096
Download PRG...