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

29 lines
666 B
Plaintext

;-------------------------------
; #DATASOFT2
; protection check at $9B00
; e.g. Canyon Climber, Fathom's 40
;-------------------------------
!zone {
; gTrack = 0
; Caller found DOS 3.3 RWTS
lda #$0A
ldx #$3A
ldy #$06
jsr compare
!byte $AD,$E9,$C0
!byte $AD,$EE,$C0
bcs .exit
lda #$01
ldx #$48
jsr compare2
!byte $00,$9B
bcs .exit ; passport-test-suite/Fathoms 40.woz [C=0] matches
jsr PrintByID
!byte s_datasoft
jsr modify2
!byte $76,$9C
.exit
}