mirror of
https://github.com/a2-4am/passport.git
synced 2024-06-04 20:29:33 +00:00
add support for another Scott, Foresman and Company nibble count
This commit is contained in:
parent
8733220f7c
commit
c07ce2713e
|
@ -73,6 +73,7 @@ AnalyzeT00
|
||||||
!source "../patchers/t00_sunburst.a"
|
!source "../patchers/t00_sunburst.a"
|
||||||
!source "../patchers/t00_sve.a"
|
!source "../patchers/t00_sve.a"
|
||||||
!source "../patchers/t00_swordthrust.a"
|
!source "../patchers/t00_swordthrust.a"
|
||||||
|
!source "../patchers/t00_scottforesman_dos33.a"
|
||||||
; ----- add new DOS 3.3 patchers above this line -----
|
; ----- 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_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
|
!source "../patchers/t00_rwts.a" ; must run after all other patchers that might modify RWTS code
|
||||||
|
|
30
src/patchers/t00_scottforesman_dos33.a
Normal file
30
src/patchers/t00_scottforesman_dos33.a
Normal 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
|
||||||
|
+
|
Loading…
Reference in New Issue
Block a user