Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2024-10-01 12:57:17 +00:00
Code Issues Projects Releases Wiki Activity

expand fbffpascal patcher to support Widespread, The Typewriter

Browse Source
This commit is contained in:
4am 2018-09-25 09:36:24 -04:00
parent 8af8e3c4a2
commit 51f62dcc99
2 changed files with 16 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
src/patchers/fbffpascal.a
View File

@ -4,10 +4,12 @@
; linked as an Apple Pascal module
; (soft switches are hard-coded to slot 6)
;
; tested on several 'Courses By Computers' disks:
; tested on
; Geometry: Simple Closed Curves (1985)
; Multiplication: Advanced Level (1985)
; Basic Fraction Concepts (1985)
; Widespread
; Power Up! The Typewriter
;-------------------------------
!zone {
bit gMode ; nothing to do here in verify-only mode
@ -17,13 +19,13 @@
ldy #$26
jsr SearchTrack
!byte $AD,$E9,$C0; LDA $C0E9
!byte $A9,$A0 ; LDA #$A0
!byte $A9,WILDCARD; LDA ...
!byte $85,$03 ; STA $03
!byte $A9,$08 ; LDA #$08
!byte $C6,$02 ; DEC $02
!byte $D0,$04 ; BNE +
!byte $C6,$03 ; DEC $03
!byte $F0,$55 ; BEQ +55
!byte $F0,WILDCARD; BEQ ... (this branch offset will be used later to build the patch)
!byte $AC,$EC,$C0; LDY $C0EC
!byte $10,$FB ; BPL -
!byte $C0,$FB ; CPY #$FB
@ -36,15 +38,22 @@
!byte $2A ; ROL
!byte $B0,$0B ; BCS +
bcs .exit
stx .a+1
sta gDisplayBytes
pha
adc #BASEPAGE ; carry is guaranteed to be clear here
sta .a+2
ldy #$10 ; get the branch offset from the WILDCARD above
.a lda $FDFD,y ; set at runtime
adc #$0A ; calculate new branch offset (note: carry still guaranteed to be clear here)
sta .branch ; store offset in patch bytes below
lda #s_fbff
jsr PrintByID
pla
lda gDisplayBytes
ldy #$03
jsr modify
; unconditional jump to success path
!byte $18 ; CLC
!byte $90,$5F ; BCC +
!byte $90 ; BCC +
.branch !byte $FD ; set at runtime
.exit
}

2
src/strings/en.a
View File

@ -144,7 +144,7 @@ StringTable
; can be set directly before calling PrintByID.
;
.header
!text "Passport by 4am 2018-09-23",$00
!text "Passport by 4am 2018-09-25",$00
.mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " "