mirror of
https://github.com/a2-4am/passport.git
synced 2024-06-08 16:29:33 +00:00
28 lines
725 B
Plaintext
28 lines
725 B
Plaintext
;-------------------------------
|
|
; #T11DISKVOL
|
|
; capture disk volume number after reading T11,S00
|
|
;-------------------------------
|
|
!zone {
|
|
lda gTrack
|
|
cmp #$11
|
|
bne .exit
|
|
lda gTriedUniv
|
|
beq .exit
|
|
lda gIsPanglosDOS
|
|
beq .yes
|
|
lda jCallRWTS+2; #$3D or #$BD
|
|
sec
|
|
sbc #$04 ; #$39 or #$B9
|
|
ldx #$80
|
|
ldy #$03
|
|
jsr CompareMemory
|
|
!byte $99,$2C,$00; STA $002C,Y
|
|
bcs .exit
|
|
.yes
|
|
lda $2F ; disk volume number of last sector read
|
|
sta gDiskVolumeNumber
|
|
lda #TRUE
|
|
sta gCapturedDiskVolumeNumber
|
|
.exit
|
|
}
|