2019-09-14 05:30:01 +00:00
|
|
|
;license:MIT
|
|
|
|
;(c) 2019 by qkumba
|
|
|
|
|
|
|
|
!cpu 6502
|
2019-09-15 02:57:52 +00:00
|
|
|
!to "build/PRELAUNCH/DROL",plain
|
|
|
|
*=$106
|
|
|
|
|
|
|
|
!source "src/prelaunch/common.a"
|
2019-09-14 05:30:01 +00:00
|
|
|
|
|
|
|
ldy #(cheat_e-cheat_b)-1
|
|
|
|
- lda cheat_b,y
|
|
|
|
sta $bf70,y
|
|
|
|
dey
|
|
|
|
bpl -
|
2019-09-16 21:12:21 +00:00
|
|
|
lda #$4c
|
|
|
|
sta $4215
|
2019-09-14 05:30:01 +00:00
|
|
|
lda #$70
|
2019-09-16 21:12:21 +00:00
|
|
|
sta $4216
|
2019-09-14 05:30:01 +00:00
|
|
|
lda #$bf
|
2019-09-16 21:12:21 +00:00
|
|
|
sta $4217
|
|
|
|
jmp $4000
|
|
|
|
|
|
|
|
cheat_b !pseudopc $bf70 {
|
|
|
|
pla
|
|
|
|
sta jmp1+1
|
|
|
|
pla
|
|
|
|
sta jmp2+1
|
|
|
|
lda #>(patch-1)
|
|
|
|
pha
|
|
|
|
lda #<(patch-1)
|
|
|
|
pha
|
|
|
|
jmp ($8c00)
|
2019-09-14 05:30:01 +00:00
|
|
|
|
2019-09-16 21:12:21 +00:00
|
|
|
patch
|
2019-09-14 05:30:01 +00:00
|
|
|
lda #$24
|
2019-09-16 21:12:21 +00:00
|
|
|
ldy #$70
|
|
|
|
ldx $bf4a
|
|
|
|
beq store
|
|
|
|
ldy #$5e
|
|
|
|
dex
|
|
|
|
beq store
|
|
|
|
ldy #$00
|
|
|
|
dex
|
|
|
|
bne jmp2
|
|
|
|
|
|
|
|
store
|
|
|
|
sta $69b2,y
|
|
|
|
|
|
|
|
jmp2
|
|
|
|
lda #$d1
|
|
|
|
pha
|
|
|
|
|
|
|
|
jmp1
|
|
|
|
lda #$d1
|
|
|
|
pha
|
2019-09-14 05:30:01 +00:00
|
|
|
rts
|
2019-09-16 21:12:21 +00:00
|
|
|
}
|
2019-09-14 05:30:01 +00:00
|
|
|
cheat_e
|