4cade/src/prelaunch/juggler.a

43 lines
819 B
Plaintext
Raw Permalink Normal View History

2019-12-20 02:19:28 +00:00
;license:MIT
2022-05-12 19:06:41 +00:00
;(c) 2019, 2022 by Frank M., qkumba
2019-12-20 02:19:28 +00:00
!cpu 6502
!to "build/PRELAUNCH.INDEXED/JUGGLER",plain
2019-12-20 02:19:28 +00:00
*=$106
!source "src/macros.a"
2019-12-20 02:19:28 +00:00
2022-05-12 19:06:41 +00:00
+ENABLE_ACCEL
2019-12-20 02:19:28 +00:00
ldy #6
- lda $100-1,y
sta $180-1,y ; move hook to $180
dey
bne -
lda #$80
sta $3F2 ; reset vector patch
lda #$60
sta $7D1F
jsr $3FF5 ; unpack
2022-05-12 19:06:41 +00:00
lda #$60
sta $BA21
jsr $BA00
+READ_RAM2_NO_WRITE
lda MachineStatus
and #CHEATS_ENABLED
beq +
lda #$a5
sta $9475 ; patch - don't decrease lives
+
jsr DisableAccelerator
+READ_ROM_NO_WRITE
jmp $6000
2019-12-20 02:19:28 +00:00
!if * > $1C0 {
!error "code is too large, ends at ", *
}