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

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

View File

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

View File

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

View File

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