passport/src/patchers/rwtsswapmecc.a
2021-06-21 11:57:02 -04:00

61 lines
1.6 KiB
Plaintext
Executable File

;-------------------------------
; #RWTSSWAPMECC
; post-boot RWTS swappers in
; various MECC disks
;-------------------------------
!zone {
lda gPossibleMECCSwapper
beq +
ldy #$08
jsr SearchTrack
!byte $A9,$AA
!byte $2C
!byte $A9,$D5
!byte $8D,$7A,$BC
bcs + ; passport-test-suite/Word Wizards v1.0.woz [C=0] matches
jsr inx5
jsr modify1
!byte $60
+
lda gMECCFastloadType
beq .exit
ldy #$06
jsr SearchTrack
!byte $8A
!byte $F0,$02
!byte $A2,$06
!byte $BD
bcs + ; passport-test-suite/Zoyon Patrol v1.0.woz [C=0] matches
jsr inx4
jsr modify1
!byte $00
+
ldy #$08
jsr SearchTrack
!byte $A0,$02
!byte $AD,$88,$67
!byte $D0,$11
!byte $B9
bcs + ; passport-test-suite/MECC Dataquest Composer [C=0] matches
jsr inx5
jsr modify1
!byte $24
+
ldy #$11
jsr SearchTrack
!byte $0A
!byte $18
!byte $69,$FF
!byte $A8
!byte $8D,$8B,$C0
!byte $8D,$8B,$C0
!byte $B9,WILDCARD,WILDCARD
!byte $8D,$AC,$D5
bcs + ; passport-test-suite/MECC Dataquest - Europe and Soviet Union.woz [C=0] matches
jsr modify3
!byte $A9,$00
!byte $24
+
.exit
}