Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2024-09-01 15:29:05 +00:00
Code Issues Projects Releases Wiki Activity

add support for low-mem BEB1 and BECA variants at 3EB1 and 3ECA

Browse Source
This commit is contained in:
4am 2017-06-10 22:17:06 -04:00
parent 6f496a747d
commit 81caf5b722
3 changed files with 13 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/patchers/jmpbeb1.a
View File

@ -1,6 +1,6 @@
;-------------------------------
; #JMPBEB1
; RWTS calls $BEB1 after writing
; RWTS calls $3EB1 or $BEB1 after writing
; data prologue
; e.g. Terrapin Logo 1.2, Starting with Phonics
; NOTE: must be run before RWTS
@ -17,10 +17,10 @@ _jmpbeb1
!byte $A0,$03
!byte $48
!byte $68
!byte $20,$B9,$B8
!byte $20,$B9,WILDCARD
!byte $88
!byte $D0,$F8
!byte $4C,$B1,$BE
!byte $4C,$B1,WILDCARD
!byte $EA
!byte $EA
!byte $A9
@ -28,23 +28,26 @@ _jmpbeb1
ldx #$59
ldy #$04
jsr compare ; and T00,S02,$59 ==
!byte $20,$B8,$B8
!byte $20,$B8,WILDCARD
!byte $A9
bcs .exit
ldx #$5E
ldy #$03
jsr compare ; and T00,S02,$5E ==
!byte $20,$BB,$B8
!byte $20,$BB,WILDCARD
bcs .exit
ldx #$49
ldy #$01
jsr modify ; then set T00,S02,$49 =
!byte $04
lda $124E
sta _jsr+2
lda #$02
ldx #$52
ldy #$05
jsr modify ; and set T00,S02,$52 =
!byte $A9,$D5,$20,$B8,$B8
!byte $A9,$D5
_jsr !byte $20,$B8,$d1; final byte set at runtime
lda #$02
ldx #$5F
ldy #$01

6
src/patchers/jmpbeca.a
View File

@ -1,6 +1,6 @@
;-------------------------------
; #JMPBECA
; RWTS calls $BECA after reading
; RWTS calls $3ECA or $BECA after reading
; data prologue to burn cycles
; e.g. Terrapin Logo 1.2, Starting with Phonics
; NOTE: must be run before RWTS
@ -18,14 +18,14 @@
!byte $10,$FB
!byte $C9,$AD
!byte $D0,$E8
!byte $4C,$CA,$BE
!byte $4C,$CA,WILDCARD
bcc .yes
;
; variant seen in Library Magic
;
ldy #$0D
jsr compare ; or T00,S02,$F4 ==
!byte $4C,$CA,$BE
!byte $4C,$CA,WILDCARD
!byte $EA
!byte $BD,$8C,$C0
!byte $10,$FB

2
src/strings/en.a
View File

@ -212,7 +212,7 @@ StringTable
; can be set directly before calling PrintByID.
;
.header
!text "Passport by 4am 2017-06-05",00
!text "Passport by 4am 2017-06-10",00
.mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " "