Saved two bytes.
git-svn-id: svn://svn.cc65.org/cc65/trunk@4924 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -15,24 +15,22 @@ _drivecount:
|
|||||||
|
|
||||||
; Check for ProDOS 8
|
; Check for ProDOS 8
|
||||||
lda __dos_type
|
lda __dos_type
|
||||||
bne :+
|
beq :+
|
||||||
rts
|
|
||||||
|
|
||||||
; Number of on-line devices (minus 1)
|
; Number of on-line devices (minus 1)
|
||||||
: ldy DEVCNT
|
ldy DEVCNT
|
||||||
iny
|
iny
|
||||||
tya
|
tya
|
||||||
rts
|
: rts
|
||||||
|
|
||||||
_drivelist:
|
_drivelist:
|
||||||
ldx #$00
|
ldx #$00
|
||||||
|
|
||||||
; Check for ProDOS 8
|
; Check for ProDOS 8
|
||||||
lda __dos_type
|
lda __dos_type
|
||||||
bne :+
|
beq :+
|
||||||
rts
|
|
||||||
|
|
||||||
; Up to 14 units may be active
|
; Up to 14 units may be active
|
||||||
: lda #<DEVLST
|
lda #<DEVLST
|
||||||
ldx #>DEVLST
|
ldx #>DEVLST
|
||||||
rts
|
: rts
|
||||||
|
|||||||
Reference in New Issue
Block a user