2019-10-13 22:19:48 +00:00
|
|
|
;license:MIT
|
2024-05-08 22:09:21 +00:00
|
|
|
;(c) 2024 by qkumba
|
2019-10-13 22:19:48 +00:00
|
|
|
|
|
|
|
!cpu 6502
|
2021-10-16 01:34:39 +00:00
|
|
|
!to "build/PRELAUNCH.INDEXED/BERZAP",plain
|
2019-10-13 22:19:48 +00:00
|
|
|
*=$106
|
|
|
|
|
2024-05-25 23:18:49 +00:00
|
|
|
!source "src/macros.a"
|
2019-10-13 22:19:48 +00:00
|
|
|
|
|
|
|
+ENABLE_ACCEL
|
2020-02-28 23:33:10 +00:00
|
|
|
lda #<callback1
|
2024-05-08 22:09:21 +00:00
|
|
|
sta $879
|
2020-02-28 23:33:10 +00:00
|
|
|
lda #>callback1
|
2024-05-08 22:09:21 +00:00
|
|
|
sta $87a
|
2019-10-13 22:19:48 +00:00
|
|
|
jmp $800 ; decompress
|
|
|
|
|
2020-02-28 23:33:10 +00:00
|
|
|
callback1
|
2019-10-13 22:19:48 +00:00
|
|
|
lda #$4c
|
2024-05-30 01:17:24 +00:00
|
|
|
sta $C9 ; fix RNG issue
|
2020-05-12 02:07:36 +00:00
|
|
|
sta $b4d6
|
2020-02-28 23:33:10 +00:00
|
|
|
lda #<callback2
|
2020-05-12 02:07:36 +00:00
|
|
|
sta $b4d7
|
2020-02-28 23:33:10 +00:00
|
|
|
lda #>callback2
|
2020-05-12 02:07:36 +00:00
|
|
|
sta $b4d8
|
2019-10-13 22:19:48 +00:00
|
|
|
jmp $b000
|
|
|
|
|
2020-02-28 23:33:10 +00:00
|
|
|
callback2
|
|
|
|
lda #0
|
2020-05-12 02:07:36 +00:00
|
|
|
sta $b4d7
|
2020-02-28 23:33:10 +00:00
|
|
|
lda #2
|
2020-05-12 02:07:36 +00:00
|
|
|
sta $b4d8
|
2020-02-28 23:33:10 +00:00
|
|
|
+READ_RAM2_WRITE_RAM2
|
2020-11-11 19:40:34 +00:00
|
|
|
+LOAD_FILE_AT berzap_mb, $200
|
2020-02-28 23:33:10 +00:00
|
|
|
jsr DisableAccelerator
|
|
|
|
jmp $200
|
|
|
|
|
|
|
|
berzap_mb
|
2024-05-25 21:59:16 +00:00
|
|
|
+PSTRING "PRELAUNCH/BERZAP.MB"
|
2020-02-28 23:33:10 +00:00
|
|
|
|
|
|
|
!if * > $1C0 {
|
2019-12-13 05:51:54 +00:00
|
|
|
!error "code is too large, ends at ", *
|
|
|
|
}
|