mirror of
https://github.com/a2-4am/passport.git
synced 2024-09-29 15:54:59 +00:00
33 lines
909 B
Plaintext
33 lines
909 B
Plaintext
;-------------------------------
|
|
; #ZOOMGRAFIX
|
|
; secondary protection expects
|
|
; disk volume number 0
|
|
;
|
|
; tested on
|
|
; - Zoom Grafix (Phoenix Software) multiple versions
|
|
;-------------------------------
|
|
!zone {
|
|
lda gIsPhoenix ; only if we found Phoenix boot sector earlier
|
|
bne .exit
|
|
ldy #$0C
|
|
jsr SearchTrack
|
|
!byte $4C,$4D,$D0,$E2,$28,$4B,$42,$C9 ; 'LM = PEEK(KB - 2058)' in BASIC
|
|
!byte $32,$30,$35,$38
|
|
bcs .exit ; passport-test-suite/Zoom Grafix 26-JAN-82.woz [C=0] matches
|
|
sta gDisplayBytes
|
|
pha
|
|
lda #$00
|
|
sta gDisplayBytes+1
|
|
lda #s_diskvol0x
|
|
jsr PrintByID
|
|
txa
|
|
clc
|
|
adc #$0B
|
|
tax
|
|
pla
|
|
ldy #$01
|
|
jsr modify
|
|
!byte $35 ; 'LM = PEEK(KB - 2055)' instead
|
|
.exit
|
|
}
|