mirror of
https://github.com/a2-4am/passport.git
synced 2024-06-09 22:29:30 +00:00
30 lines
805 B
Plaintext
30 lines
805 B
Plaintext
;-------------------------------
|
|
; #RWTSSWAPPENGUIN
|
|
; routine in DOS to change epilogues when swapping between program disk
|
|
; and user disk for saved games
|
|
;
|
|
; Tested on
|
|
; - Arcade Boot Camp
|
|
; - Transylvania 48K (1982 release)
|
|
; - Transylvania 128K (1982 release)
|
|
; - Xyphus
|
|
;-------------------------------
|
|
!zone {
|
|
ldx gTrack ; if track = 1
|
|
dex
|
|
bne .exit
|
|
lda #$04
|
|
ldx #$52
|
|
ldy #$0B
|
|
jsr compare ; and T01,S04,$52 ==
|
|
!byte $A9,$DA
|
|
!byte $8D,$91,$B9
|
|
!byte $8D,$35,$B9
|
|
!byte $8D,$9E,$B8
|
|
bcs .exit ; passport-test-suite/Arcade Boot Camp.woz [C=0] matches
|
|
inx
|
|
jsr modify1 ; then set T01,S04,$53 =
|
|
!byte $DE
|
|
.exit
|
|
}
|