Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2025-01-02 17:30:53 +00:00
Code Issues Projects Releases Wiki Activity

correct tamper location reporting

Browse Source
This commit is contained in:
Peter Ferrie 2019-06-09 21:18:42 -07:00
parent 55a64729ca
commit 0d5c345b63
2 changed files with 84 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

60
src/patchers/ea.a
View File

@ -107,6 +107,9 @@
!byte $07,$01 ;SUB #$4d
!byte $0F,$F5,$70 ;BNE $a9f6
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
@ -116,6 +119,9 @@
adc #4
sta .patch3 + 1
pla
ldy gSector
sta gSector
tya
pha
ldy #1
jsr modify
@ -137,6 +143,9 @@
!byte $D0,$7C ;BNE +$7C
!byte $60 ;RTS
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
@ -144,6 +153,9 @@
adc #11
tax
pla
ldy gSector
sta gSector
tya
ldy #1
jsr modify
!byte $00 ;disable branch
@ -157,6 +169,9 @@
!byte $07,$1C ;SUB #$50
!byte $0F,$78,$60 ;BNE $B97B
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
@ -164,6 +179,9 @@
adc #11
tax
pla
ldy gSector
sta gSector
tya
ldy #1
jsr modify
!byte $4C ;new checksum value for sub
@ -177,10 +195,16 @@
!byte $20,$67,$67 ;JSR $6767
!byte $20,$AA,$BF ;JSR $BFAA
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
inx
inx
@ -197,10 +221,16 @@
!byte $C9,$52 ;CMP #$52
!byte $F0,$03 ;BEQ +$03
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
inx
inx
@ -217,10 +247,16 @@
!byte $C9,$52 ;CMP #$52
!byte $D0,$DB ;BNE -$DB
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
inx
inx
@ -364,10 +400,16 @@
!byte $E9,$00 ;SBC #$00
!byte $48 ;PHA
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
ldy #1
jsr modify
@ -383,6 +425,9 @@
!byte $C9,$A0 ;CMP #$A0
!byte $F0 ;BEQ *+xx
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
@ -390,6 +435,9 @@
adc #12
tax
pla
ldy gSector
sta gSector
tya
ldy #1
jsr modify
!byte $A1 ;new checksum value for eor
@ -406,6 +454,9 @@
!byte $04,$F1,$70 ;LDA $a9f2
!byte $07 ;CMP #$xx
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
@ -413,6 +464,9 @@
adc #24
tax
pla
ldy gSector
sta gSector
tya
ldy #1
jsr compare
!byte $AB
@ -480,10 +534,16 @@
!byte $5E,$00
!byte $5E,$0D
bcs .exit
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
inx
ldy #1

24
src/patchers/sierra.a
View File

@ -86,10 +86,16 @@
!byte $C9,$1D ;CMP #$1D
!byte $B0 ;BCS *+xx
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
inx
inx
@ -325,6 +331,9 @@
!byte $AA ;TAX
!byte $95,$00 ;STA $00,X
bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
@ -332,6 +341,9 @@
adc #9
tax
pla
ldy gSector
sta gSector
tya
ldy #$01
jsr modify
!byte $DD ;checksum
@ -345,10 +357,16 @@
!byte $AA ;TAX
!byte $95,$00 ;STA $00,X
+ bcs +
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
inx
inx
@ -370,10 +388,16 @@
!byte $AA ;TAX
!byte $9D,$00,$01 ;STA $0100,X
bcs .jmpexit
ldy gSector
sta gSector
tya
pha
lda #s_tamper
jsr PrintByID
pla
ldy gSector
sta gSector
tya
inx
inx
inx