Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2024-06-10 13:29:38 +00:00
Code Issues Projects Releases Wiki Activity

more PFS FBFF check variations [fixes PFS Write 1984-11-01]

Browse Source
This commit is contained in:
4am 2022-06-25 21:49:53 -04:00
parent 81a3352ac5
commit cafecddaa2
1 changed files with 15 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/patchers/pfs.pascal.a
View File

@ -17,13 +17,27 @@
!byte $AD,$EC,$C0; LDA $C0EC !byte $AD,$EC,$C0; LDA $C0EC
!byte $10,$FB ; BPL - !byte $10,$FB ; BPL -
!byte $C9,$93 ; CMP #$93 !byte $C9,$93 ; CMP #$93
bcs @writeCheck; passport-test-suite/PFS Graph.woz [C=0] matches bcs @variation2; passport-test-suite/PFS Graph.woz [C=0] matches
jsr PrintByID jsr PrintByID
!byte s_fbff !byte s_fbff
inx inx
jsr modify1 jsr modify1
!byte $25 ; unconditional jump to success path !byte $25 ; unconditional jump to success path
@variation2
ldy #$09
jsr SearchTrack
!byte $F0,$31 ; BEQ +
!byte $AD,$EC,$C0; LDA $C0EC
!byte $10,$FB ; BPL -
!byte $C9,$AD ; CMP #$AD
bcs @writeCheck; passport-test-suite/PFS Write 1984-11-01.woz [C=0] matches
jsr PrintByID
!byte s_fbff
inx
jsr modify1
!byte $2F ; unconditional jump to success path
@writeCheck @writeCheck
ldy #$09 ldy #$09
jsr SearchTrack jsr SearchTrack