mirror of
https://github.com/a2-4am/passport.git
synced 2024-05-28 06:41:28 +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 $D0,$13
|
||||||
!byte WILDCARD,WILDCARD
|
!byte WILDCARD,WILDCARD
|
||||||
!byte $9D,$8D,$C0
|
!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
|
lda #$BD
|
||||||
sta $B8F6
|
sta $B8F6
|
||||||
|
lda $B8F7
|
||||||
|
sta EarthwareSwapperLo+1
|
||||||
lda #$8C
|
lda #$8C
|
||||||
sta $B8F7
|
sta $B8F7
|
||||||
lda #$C0
|
lda #$C0
|
||||||
|
|
|
@ -10,14 +10,16 @@
|
||||||
;
|
;
|
||||||
; tested on
|
; tested on
|
||||||
; - Black Belt (Earthware Computer Services)
|
; - Black Belt (Earthware Computer Services)
|
||||||
|
; - Black Belt rev. 2 (Earthware Computer Services)
|
||||||
; - Zoo Master (Earthware Computer Services)
|
; - Zoo Master (Earthware Computer Services)
|
||||||
|
; - Zoo Master rev. 2 (Earthware Computer Services)
|
||||||
; - Star Search (Earthware Computer Services)
|
; - Star Search (Earthware Computer Services)
|
||||||
;-------------------------------
|
;-------------------------------
|
||||||
EARTHWARE
|
EARTHWARE
|
||||||
lda #$02
|
lda #$02
|
||||||
ldx #$F6
|
ldx #$F6
|
||||||
jsr compare3
|
jsr compare3
|
||||||
!byte $4C,$89,$B6
|
!byte $4C,WILDCARD,$B6
|
||||||
bcs @exit ; passport-test-suite/Zoo Master.woz [C=0] here
|
bcs @exit ; passport-test-suite/Zoo Master.woz [C=0] here
|
||||||
jsr PrintByID
|
jsr PrintByID
|
||||||
!byte s_bytrack
|
!byte s_bytrack
|
||||||
|
|
|
@ -113,6 +113,7 @@ PreReadSector
|
||||||
@earthware
|
@earthware
|
||||||
ldx #$4C
|
ldx #$4C
|
||||||
stx $B8F6
|
stx $B8F6
|
||||||
|
EarthwareSwapperLo
|
||||||
ldx #$89
|
ldx #$89
|
||||||
stx $B8F7
|
stx $B8F7
|
||||||
ldx #$B6
|
ldx #$B6
|
||||||
|
|
|
@ -385,7 +385,7 @@ StringTableHigh ; must be kept in sync with constants in enid.a
|
||||||
.passport
|
.passport
|
||||||
!text "Passport ",$00
|
!text "Passport ",$00
|
||||||
.header
|
.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
|
.bar9
|
||||||
!text "_________",$00
|
!text "_________",$00
|
||||||
.bar18
|
.bar18
|
||||||
|
|
Loading…
Reference in New Issue
Block a user