1 rem trans-atlantic balloon challenge (virgin)
2 rem select cheats by martin pugh
3 rem cassette -v1- zzap64 no.40
4 for x=320 to 349:read y:c=c+y:poke x,y:next
5 if c<>3607 then print "data error":end
6 print:print "-------------------------------------"
7 input "do you require infinite birds for the virgin balloon? y/n ";v$
8 if v$="y" then poke 338,173
9 print
10 input "do you require infinite birds for the rival balloon ? y/n ";r$
11 if r$="y" then poke 343,173
12 poke 157,128:sys 320
13 data 32,86,245,238,98,3,169,76,141,97,3,96,81,1,72,77
14 data 80,169,206,141,217,77,169,206,141,248,77,108,253,0
Download PRG...