mirror of https://github.com/a2-4am/passport.git
27 lines
806 B
Plaintext
Executable File
27 lines
806 B
Plaintext
Executable File
;-------------------------------
|
|
; #JMPB660
|
|
; RWTS jumps to $B660 instead of
|
|
; checking third data prologue
|
|
; e.g. Analogies Tutorial, Verb Viper
|
|
;-------------------------------
|
|
_jmpb660
|
|
lda gIsRWTS ; if DOS 3.3-shaped RWTS
|
|
bne jmpb660_exit
|
|
lda #$02
|
|
ldx #$DC
|
|
ldy #$1D
|
|
jsr compare ; and T00,S02,$DC ==
|
|
!byte $A0,$20,$88,$F0,$61,$BD,$8C,$C0
|
|
!byte $10,$FB,$49,$97,$D0,$F4,$EA,$BD
|
|
!byte $8C,$C0,$10,$FB,$C9,$97,$D0,$F2
|
|
!byte $A0,$56,$4C,$60,$B6
|
|
bcs jmpb660_exit
|
|
lda #s_jmpb660
|
|
jsr PrintByID
|
|
lda #$02
|
|
ldx #$F6
|
|
ldy #$03
|
|
jsr modify ; then set T00,S02,$F6 =
|
|
!byte $BD,$8C,$C0
|
|
jmpb660_exit
|