add support for ArtSci RWTS swapper on T00S0A

This commit is contained in:
4am 2019-02-07 17:33:09 -05:00
parent 831441425d
commit 02780b53ab
3 changed files with 42 additions and 1 deletions

View File

@ -113,6 +113,7 @@ AnalyzeT00
!source "../patchers/swordthrust.a"
!source "../patchers/dakin5.a"
!source "../patchers/muserwts.a"
!source "../patchers/artsci.a"
;add only above this line
rts

40
src/patchers/artsci.a Normal file
View File

@ -0,0 +1,40 @@
;-------------------------------
; #ARTSCI
; loader on T00,S0A changes epilogue
;
; tested on
; - AceCalc (ArtSci)
; - Magicalc (ArtSci)
; - Photar
;-------------------------------
!zone {
bit gMode ; nothing to do here in verify-only mode
bpl .exit
lda gIsRWTS
bne .exit
lda #$0A
ldx #$FE
ldy #$02
jsr compare
!byte $DE,$D5
bcs .exit
ldy #(@searchend-@searchstart)
jsr SearchTrack
@searchstart
LDY #$35
TXA
STA ($3C),Y
@searchend
bcs .exit
sta gDisplayBytes
pha
lda #s_bytrack
jsr PrintByID
pla
ldy #$01
jsr modify
!byte $60
.exit
}

View File

@ -152,7 +152,7 @@ StringTable
; can be set directly before calling PrintByID.
;
.header
!text "Passport by 4am 2019-02-04",$00
!text "Passport by 4am 2019-02-07",$00
.mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " "