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

update patchers/ssprot with variant where checksum in 080F is 27

Browse Source
This commit is contained in:
4am 2017-12-26 18:28:56 -05:00
parent 5d9bc2243f
commit 1b9a1c847e
2 changed files with 29 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/modify.a
View File

@ -11,7 +11,8 @@
; stack set to return to ; stack set to return to
; code after string ; code after string
; all registers clobbered ; all registers clobbered
; all flags clobbered ; oVerflow bit clear
; all other flags clobbered
;------------------------------- ;-------------------------------
!zone { !zone {
modify modify
@ -70,5 +71,6 @@ modify
.exit .exit
inc gPatchCount inc gPatchCount
.exitnomod .exitnomod
clv
rts rts
} }

27
src/patchers/ssprot.a
View File

@ -12,6 +12,8 @@
; Spanish Grammar Review - Familiar and Formal Commands in the Affirmative and Negative (1984, Gessler) ; Spanish Grammar Review - Familiar and Formal Commands in the Affirmative and Negative (1984, Gessler)
; Spanish Grammar Review - Por vs. Para (1984, Gessler) ; Spanish Grammar Review - Por vs. Para (1984, Gessler)
; Water in the Air Quiz (1985, EME) ; Water in the Air Quiz (1985, EME)
; Comic Strip Maker (1986, Walt Disney)
; Wortgefecht (Word Attack German) (1984, Gessler)
;------------------------------- ;-------------------------------
!zone { !zone {
lda gIsF7F6 lda gIsF7F6
@ -37,14 +39,23 @@
!byte $F0,$03 ; BEQ +3 !byte $F0,$03 ; BEQ +3
!byte $4C,$16,$08 ; JMP $0816 !byte $4C,$16,$08 ; JMP $0816
bcs .nextsector bcs .nextsector
ldx #$76 ldx #$76
ldy #$03 ldy #$03
jsr compare jsr compare
!byte $23,$2A,$28 !byte $23,$2A,$28
bcs .nextsector bcc .variant1
ldy #$03
jsr compare
!byte $70,$79,$77
lda .sector+1 lda .sector+1
ldx #$20 ldx #$20
ldy #$03 ldy #$03
bcc .variant2
bcs .nextsector
.variant1
jsr modify jsr modify
!byte $EA ; NOP !byte $EA ; NOP
!byte $A9,$35 ; LDA #$35 !byte $A9,$35 ; LDA #$35
@ -53,6 +64,20 @@
ldy #$02 ldy #$02
jsr modify jsr modify
!byte $AA,$A2 ; new JMP entry point ($0900 when decrypted) !byte $AA,$A2 ; new JMP entry point ($0900 when decrypted)
bvc .nextsector ; always branches
.variant2
jsr modify
!byte $EA ; NOP
!byte $A9,$27 ; LDA #$27
lda .sector+1
ldx #$76
ldy #$02
jsr modify ; new JMP entry point ($0903 when decrypted)
!byte $FA,$F2
; note: execution falls through here
.nextsector .nextsector
dec .sector+1 dec .sector+1
bpl .sector bpl .sector