add support for another Scott, Foresman and Company nibble count

This commit is contained in:
4am 2022-11-29 13:31:03 -05:00
parent 8733220f7c
commit c07ce2713e
2 changed files with 31 additions and 0 deletions

View File

@ -73,6 +73,7 @@ AnalyzeT00
!source "../patchers/t00_sunburst.a"
!source "../patchers/t00_sve.a"
!source "../patchers/t00_swordthrust.a"
!source "../patchers/t00_scottforesman_dos33.a"
; ----- add new DOS 3.3 patchers above this line -----
!source "../patchers/t00_nibtable.a" ; clobbers $2000..$2095 (AnalyzeT00 is decompressed into $2000)
!source "../patchers/t00_rwts.a" ; must run after all other patchers that might modify RWTS code

View File

@ -0,0 +1,30 @@
;-------------------------------
; #T00SCOTTFORESMANDOS33
; nibble count during early boot
;
; tested on
; - Addition and Subtraction 3 (Scott, Foresman and Company)
; - Decimals 2 (Scott, Foresman and Company)
; - Fractions 1 (Scott, Foresman and Company)
; - Fractions 2 (Scott, Foresman and Company)
; - Multiplication 2 (Scott, Foresman and Company)
; - Percent 1 (Scott, Foresman and Company)
;-------------------------------
; gTrack = 0
lda #$0B
ldx #$15
ldy #$06
jsr compare ; if T00,S0B,$15 ==
!byte $EE,$F3,$03
!byte $20,$00,$87
bcs +
jsr PrintByID
!byte s_sfc
inx
inx
inx
jsr modify1 ; then set T00,S0B,$18 ==
!byte $2C
+