4cade/src/prelaunch/microwave.a

43 lines
892 B
Plaintext
Raw Normal View History

2020-05-16 05:22:33 +00:00
;license:MIT
2020-07-05 17:39:51 +00:00
;(c) 2020 by qkumba/Frank M.
2020-05-16 05:22:33 +00:00
!cpu 6502
!to "build/PRELAUNCH.INDEXED/MICROWAVE",plain
2020-05-16 05:22:33 +00:00
*=$106
2020-05-28 03:20:24 +00:00
jmp ++
2020-05-16 05:22:33 +00:00
callback
2020-05-28 03:20:24 +00:00
bit $C080
lda MachineStatus
!source "src/constants.a" ; no code in these
2020-05-16 05:22:33 +00:00
and #CHEATS_ENABLED
beq +
lda #$ad
sta $8EB ; patch - don't increase lives
sta $C41 ; patch - don't decrease lives
+
2020-07-05 17:39:51 +00:00
lda $7FE ; screen hole
pha
2020-05-28 03:20:24 +00:00
jsr DisableAccelerator
2020-07-05 17:39:51 +00:00
pla
sta $7FE ; fix on Mac //e Card
2020-05-28 03:20:24 +00:00
bit $C082
2020-05-16 05:22:33 +00:00
lda #0
jmp $8974
2020-05-28 03:20:24 +00:00
++
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #<callback
sta $40A3
lda #>callback
sta $40A4
jmp $4000 ; decompress
2020-05-16 05:22:33 +00:00
!if * > $1C0 {
!error "code is too large, ends at ", *
}