support SVE DOS

This commit is contained in:
Peter Ferrie 2021-05-01 15:42:36 -07:00
parent 691e6f8777
commit 0a21d6c020
5 changed files with 58 additions and 1 deletions

View File

@ -40,6 +40,13 @@ ADStyle
sta $BE5B
lda #$B6
sta $BE5C
lda $B6CE
cmp #$A9
bne +
lda #$DA
sta $B6CD
lda #$B6
sta $B6CE
+
jsr xRPS
bcs +

View File

@ -117,6 +117,7 @@ AnalyzeT00
!source "../patchers/mastery.a"
!source "../patchers/jsrb6cc.a"
!source "../patchers/earthware.a"
!source "../patchers/sve.a"
;add only above this line

View File

@ -53,6 +53,8 @@ _nibtable
.fixread
lda #$6A
sta .loopcheck+1
lda #.nibcheck-.noskip
sta .nibskip+1 ; enable wildcard
lda #$96
ldx #<(gNIBTableBase+$16)
ldy #>(gNIBTableBase+$16)
@ -70,6 +72,7 @@ _nibtable
sta .loopcheck+1
lda #$29
ldx #$00
stx .nibskip+1 ; disable wildcard
ldy #$20
.common
@ -88,6 +91,9 @@ _nibtable
.nibload1
lda $D1D1,y
.nibskip
bmi .noskip
.noskip
cmp (BASEPAGE*256)+$400,x
beq .nibcheck

43
src/patchers/sve.a Normal file
View File

@ -0,0 +1,43 @@
;-------------------------------
; #SVE
; track 1 identifies itself as #$FF
;
; tested on
; - Decimals & Percent
; - The Fourth R - Reasoning
;-------------------------------
!zone {
lda gIsRWTS ; if DOS 3.3 RWTS
bne .exit
lda #$06
ldx #$56
ldy #$07
jsr compare
!byte $38 ; SEC
!byte $BD,$8D,$C0 ; LDA $C08D,X
!byte $BD,$8E,$C0 ; LDA $C08E,X
bcs .exit
lda (BASEPAGE*256)+$655
bpl .noconfig
and #$7f
sta .config
lda #$06
ldx #$55
ldy #$01
jsr modify
.config
!byte $64
.noconfig
lda #$08
ldx #$5A
ldy #$03
jsr compare
!byte $4C,$71,$A9 ; JMP $A971
bcs .exit
lda #$08
ldx #$5A
ldy #$03
jsr modify
!byte $48,$A0,$01
.exit
}

View File

@ -344,7 +344,7 @@ StringTableHigh
.passport
!text "Passport ",$00
.header
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2021-04-29",$00
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2021-05-01",$00
.bar9
!text "_________",$00
.bar18