mirror of
https://github.com/a2-4am/passport.git
synced 2024-05-28 21:41:27 +00:00
32 lines
727 B
Plaintext
32 lines
727 B
Plaintext
;-------------------------------
|
|
; #ARTSCI
|
|
; loader on T00,S0A changes epilogue
|
|
;
|
|
; tested on
|
|
; - AceCalc (ArtSci)
|
|
; - Magicalc (ArtSci)
|
|
; - Magic Words
|
|
; - Photar
|
|
;-------------------------------
|
|
T00_ARTSCI
|
|
; gTrack = 0
|
|
; Caller found DOS 3.3 RWTS
|
|
|
|
lda #$0A
|
|
ldx #$FE
|
|
jsr compare2
|
|
!byte $DE,$D5
|
|
bcs +
|
|
|
|
ldy #$05
|
|
jsr SearchTrack
|
|
!byte $A0,$35 ; LDY #$35
|
|
!byte $8A ; TXA
|
|
!byte $91,$3C ; STA ($3C),Y
|
|
bcs + ; passport-test-suite/Photar.woz [C=0] matches
|
|
jsr PrintByID
|
|
!byte s_bytrack
|
|
jsr modify1
|
|
!byte $60
|
|
+
|