4cade/src/prelaunch/run.for.it.a

53 lines
993 B
Plaintext
Raw Normal View History

2020-05-15 19:44:13 +00:00
;license:MIT
2021-07-19 20:53:47 +00:00
;(c) 2020-2021 by qkumba/xot
2020-05-15 19:44:13 +00:00
!cpu 6502
!to "build/PRELAUNCH.INDEXED/RUN.FOR.IT",plain
2020-05-15 19:44:13 +00:00
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #$60
sta $9DC
jsr $800 ; load DOS
lda #$60
sta $B727
jsr $B700 ; load game
+GET_MACHINE_STATUS
and #CHEATS_ENABLED
beq +
lda #$a5
sta $906
sta $1286
+
2021-07-19 20:53:47 +00:00
lda #$fb ; fix unpause
sta $e29
2020-05-16 00:02:52 +00:00
lda #<callback
sta $15C8
lda #>callback
sta $15C9
2020-05-15 19:44:13 +00:00
+DISABLE_ACCEL
2020-05-26 21:52:16 +00:00
lda #<callback2
sta $88E
lda #>callback2
sta $88F
2020-05-15 19:44:13 +00:00
jmp $800
2020-05-16 00:02:52 +00:00
callback
lda #1
sta $A393
jmp $A19A
2020-05-26 21:52:16 +00:00
callback2
ldx #0
stx $A1C2
inx
stx $A1C7
jmp $A190
2020-05-15 19:44:13 +00:00
!if * > $1C0 {
!error "code is too large, ends at ", *
}