mirror of
https://github.com/a2-4am/passport.git
synced 2024-12-22 04:29:59 +00:00
add support for Earthware variant [fixes Black Belt rev. 2]
This commit is contained in:
parent
8bd1523939
commit
11f2ef57d6
@ -429,9 +429,21 @@ TraceDOS33c ; 2nd-level trace callback is here
|
||||
!byte $D0,$13
|
||||
!byte WILDCARD,WILDCARD
|
||||
!byte $9D,$8D,$C0
|
||||
bcs .notEarthware ; passport-test-suite/Zoo Master.woz [C=0] matches
|
||||
bcc .yesEarthware ; passport-test-suite/Zoo Master.woz [C=0] matches
|
||||
ldx #$8C
|
||||
jsr CompareMemory
|
||||
!byte $BD,$8C,$C0
|
||||
!byte $10,$FB
|
||||
!byte $C9,$AD
|
||||
!byte $D0,$F4
|
||||
!byte $A9,$F8
|
||||
!byte $3D,$8C,$C0
|
||||
bcs .notEarthware ; passport-test-suite/Zoo Master rev. 2.woz [C=0] matches
|
||||
.yesEarthware
|
||||
lda #$BD
|
||||
sta $B8F6
|
||||
lda $B8F7
|
||||
sta EarthwareSwapperLo+1
|
||||
lda #$8C
|
||||
sta $B8F7
|
||||
lda #$C0
|
||||
|
@ -10,14 +10,16 @@
|
||||
;
|
||||
; tested on
|
||||
; - Black Belt (Earthware Computer Services)
|
||||
; - Black Belt rev. 2 (Earthware Computer Services)
|
||||
; - Zoo Master (Earthware Computer Services)
|
||||
; - Zoo Master rev. 2 (Earthware Computer Services)
|
||||
; - Star Search (Earthware Computer Services)
|
||||
;-------------------------------
|
||||
EARTHWARE
|
||||
lda #$02
|
||||
ldx #$F6
|
||||
jsr compare3
|
||||
!byte $4C,$89,$B6
|
||||
!byte $4C,WILDCARD,$B6
|
||||
bcs @exit ; passport-test-suite/Zoo Master.woz [C=0] here
|
||||
jsr PrintByID
|
||||
!byte s_bytrack
|
||||
|
@ -113,6 +113,7 @@ PreReadSector
|
||||
@earthware
|
||||
ldx #$4C
|
||||
stx $B8F6
|
||||
EarthwareSwapperLo
|
||||
ldx #$89
|
||||
stx $B8F7
|
||||
ldx #$B6
|
||||
|
@ -385,7 +385,7 @@ StringTableHigh ; must be kept in sync with constants in enid.a
|
||||
.passport
|
||||
!text "Passport ",$00
|
||||
.header
|
||||
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2023-07-28",$00
|
||||
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2023-09-03",$00
|
||||
.bar9
|
||||
!text "_________",$00
|
||||
.bar18
|
||||
|
Loading…
Reference in New Issue
Block a user