mirror of https://github.com/a2-4am/passport.git
29 lines
843 B
Plaintext
Executable File
29 lines
843 B
Plaintext
Executable File
;-------------------------------
|
|
; #JMPBECA2
|
|
; RWTS calls $BECA for funny business
|
|
; instead of checking data prologue
|
|
; (variation #2)
|
|
; e.g. Library Magic
|
|
; NOTE: must be run before RWTS
|
|
; patchers due to overlapping bytes
|
|
;-------------------------------
|
|
_jmpbeca2
|
|
lda gIsRWTS ; if DOS 3.3 RWTS
|
|
bne jmpbeca2_exit
|
|
lda #$02
|
|
ldx #$F4
|
|
ldy #$0D
|
|
jsr compare ; and T00,S02,$F4 ==
|
|
!byte $4C,$CA,$BE,$EA,$BD,$8C,$C0,$10
|
|
!byte $FB,$49,$AD,$D0,$DD
|
|
bcs jmpbeca2_exit
|
|
lda #s_jmpbeca
|
|
jsr PrintByID
|
|
lda #$02
|
|
ldx #$F4
|
|
ldy #$0D
|
|
jsr modify ; and set T00,S02,$F4 =
|
|
!byte $A0,$56,$BD,$8C,$C0,$10,$FB,$C9
|
|
!byte $AD,$D0,$E7,$A9,00
|
|
jmpbeca2_exit
|