Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2024-05-28 21:41:27 +00:00
Code Issues Projects Releases Wiki Activity

shave some bytes

Browse Source
This commit is contained in:
4am 2021-06-20 19:58:42 -04:00
parent 4b35d87e00
commit 6dc5dfee34
2 changed files with 8 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mods/t00only.a
View File

@ -47,7 +47,7 @@ AnalyzeT00
!source "../patchers/t00_bademu.a" ; in Y=05; out none
!source "../patchers/t00_border.a" ; in A=08,X=5A,Y=0A; out A=08,X=5A,Y=0A
!source "../patchers/t00_dakin5.a" ; in A=00,X=B3,Y=0C; out A=03,X=9A,Y=03
!source "../patchers/t00_datasoft2.a"
!source "../patchers/t00_datasoft2.a" ; in A=0A,X=3A,Y=06; out A=01,X=48,Y=02
!source "../patchers/t00_earthware.a"
!source "../patchers/t00_jmpb500.a"
!source "../patchers/t00_jmpb660.a"

17
src/patchers/t00_datasoft2.a
View File

@ -7,25 +7,22 @@
; gTrack = 0
; Caller found DOS 3.3 RWTS
lda #$01
ldx #$48
ldy #$02
jsr compare
!byte $00,$9B
bcs .exit
lda #$0A
ldx #$3A
ldy #$06
jsr compare
!byte $AD,$E9,$C0
!byte $AD,$EE,$C0
bcs .exit ; passport-test-suite/Fathoms 40.woz [C=0] matches
jsr PrintByID
!byte s_datasoft
bcs .exit
lda #$01
ldx #$48
ldy #$02
jsr compare
!byte $00,$9B
bcs .exit ; passport-test-suite/Fathoms 40.woz [C=0] matches
jsr PrintByID
!byte s_datasoft
jsr modify
!byte $76,$9C
.exit