4cade/src/prelaunch/zargs.a

33 lines
674 B
Plaintext
Raw Permalink Normal View History

2020-06-03 06:16:49 +00:00
;license:MIT
;(c) 2020, 2022 by qkumba/Frank M.
2020-06-03 06:16:49 +00:00
!cpu 6502
!to "build/PRELAUNCH.INDEXED/ZARGS",plain
2020-06-03 06:16:49 +00:00
*=$106
!source "src/macros.a"
2020-06-03 06:16:49 +00:00
+ENABLE_ACCEL
lda #>(callback-1)
sta $51BE
2020-06-05 04:49:56 +00:00
lda #<(callback-1)
sta $51C1
2020-06-03 06:16:49 +00:00
jmp $800 ; decompress
callback
lda #1
sta $60B0 ; reset vector fix
+READ_RAM2_NO_WRITE
lda MachineStatus
and #CHEATS_ENABLED
beq +
dec $9FA7 ; don't decrease lives
+
jsr DisableAccelerator
+READ_ROM_NO_WRITE
2020-06-03 06:16:49 +00:00
jmp $6000
!if * > $1C0 {
!error "code is too large, ends at ", *
}