4cade/src/prelaunch/mr.do.a
2020-01-26 10:04:08 -08:00

63 lines
1.0 KiB
Plaintext
Executable File

;license:MIT
;(c) 2019 by qkumba/Frank M.
!cpu 6502
!to "build/PRELAUNCH/MR.DO",plain
*=$106
!source "src/prelaunch/common.a"
+USES_TEXT_PAGE_2
inc $3F4 ; reboot on reset
clc
bcc cheat3
cheat2
jsr $20d
cheat64
lda #$a5
sta $1da7
sta $9bf
rts
cheat1
ldy #<cheat2
sty $209
ldy #>cheat2
sty $20a
bne $19e
cheat3
+GET_MACHINE_STATUS
and #CHEATS_ENABLED
beq +
lda #$60
sta $83f
+ jsr $800
lda $847
beq cheat48
lda #$60
sta $d15
jsr $ce8
lda #<cheat4
sta $d137
lda #>cheat4
sta $d138
jmp $d100
cheat4
jsr $d13b
jmp cheat64
cheat48
lda #<cheat1
sta $1040
lda #>cheat1
sta $1041
jmp $1000
!if * > $1C0 {
!error "code is too large, ends at ", *
}