8-Bit Software Online Conversion
Krakout cheat - Listing
10MODE7
20PRINT"Krakout cheat. By C.J.Richard
son"
30PRINT"Infinate lives"
40INPUT"Start level?"?&70:?&70=?&70-2
50PRINT"Insert game disc and press a
key"
60REPEATUNTILGET
70DEFFNS="KrakCht"
80FORI%=0TO2STEP2
90P%=&C00
100[:OPTI%:LDA#0:STA&2300
110LDA#inter MOD256:STA&220
120LDA#inter DIV256:STA&221
130LDA#14:LDX#4:JSR&FFF4
140RTS
150.inter:PHP:PHA:TXA:PHA:TXA:PHA:LDA&
2300:CMP#0:BEQ out
160LDA#7:JSR&FFEE
170LDA#&EA:STA&22FF:STA&230½ INFINATE
LIVES
180LDA&70:STA&2022 ½ LEVEL
190LDA#13:LDX#4:JSR&FFF4
200.out:PLA:TAY:PLA:TAX:PLA:PLP:RTS
210]:NEXT:CALL&C00
220CHAIN"KRAKOUT"