mirror of
https://github.com/A2osX/A2osX.git
synced 2025-04-02 20:30:24 +00:00
Kernel 0.93++
This commit is contained in:
parent
bf0aa5955c
commit
e115340e9a
Binary file not shown.
@ -600,13 +600,30 @@ LDR.AddExtraDevs
|
||||
sta LDR.SlotIdx
|
||||
|
||||
.1 ldx LDR.SlotIdx
|
||||
ldy LDR.SlotDevType-1,x
|
||||
bne .8
|
||||
lda LDR.SlotDevType-1,x
|
||||
beq .8
|
||||
|
||||
lda LDR.SlotDevCnt-1,x
|
||||
cmp #3
|
||||
bcc .8
|
||||
|
||||
* pha
|
||||
|
||||
* lsr
|
||||
* lsr
|
||||
* lsr
|
||||
* lsr
|
||||
* ora #$30
|
||||
* jsr LDR.PrintA
|
||||
* pla
|
||||
* pha
|
||||
|
||||
* and #$0F
|
||||
* ora #$30
|
||||
* jsr LDR.PrintA
|
||||
* >DEBUG
|
||||
|
||||
* pla
|
||||
jsr LDR.AddExtraSPDevs
|
||||
|
||||
.8 dec LDR.SlotIdx
|
||||
@ -665,31 +682,31 @@ LDR.AddSPDevs jsr LDR.SetDevID setup the devid byte from attributes
|
||||
lda LDR.SPStatus.Buf
|
||||
beq LDR.AddExtraDevs.RTS no devices, so done.
|
||||
|
||||
sta LDR.DevCnt
|
||||
|
||||
* sta LDR.DevCnt
|
||||
ldx LDR.SlotIdx
|
||||
inc LDR.SlotDevType-1,x set as smartport
|
||||
|
||||
.3 inc LDR.SPStatus.U
|
||||
*.3 inc LDR.SPStatus.U
|
||||
|
||||
jsr spvect call to get the device status
|
||||
.HS 00 this is a status call
|
||||
.DA LDR.SPStatus.P
|
||||
bcs .7
|
||||
* jsr spvect call to get the device status
|
||||
* .HS 00 this is a status call
|
||||
* .DA LDR.SPStatus.P
|
||||
* bcs .7
|
||||
|
||||
* lda LDR.SPStatus.Buf
|
||||
* bpl .7 not a block device
|
||||
|
||||
ldx LDR.SlotIdx
|
||||
inc LDR.SlotDevCnt-1,x
|
||||
* ldx LDR.SlotIdx
|
||||
* inc LDR.SlotDevCnt-1,x
|
||||
|
||||
.7 dec LDR.DevCnt
|
||||
bne .3
|
||||
*.7 dec LDR.DevCnt
|
||||
* bne .3
|
||||
|
||||
ldx LDR.SlotIdx
|
||||
lda LDR.SlotDevCnt-1,x
|
||||
beq LDR.AddBlkDevs.RTS
|
||||
* ldx LDR.SlotIdx
|
||||
* lda LDR.SlotDevCnt-1,x
|
||||
* beq LDR.AddBlkDevs.RTS
|
||||
|
||||
sta LDR.SlotDevCnt-1,x
|
||||
cmp #2 CC/CS, add 1 or 2 devs
|
||||
*--------------------------------------
|
||||
LDR.AddBlkDevs php how many drives (carry).
|
||||
@ -762,8 +779,8 @@ LDR.AddExtraSPDevs
|
||||
.1 jsr spvect do status call
|
||||
.HS 00
|
||||
.DA LDR.SPStatus.P
|
||||
* lda LDR.SPStatus.Buf is this a block device?
|
||||
* bpl .2
|
||||
lda LDR.SPStatus.Buf is this a block device?
|
||||
bpl .2
|
||||
|
||||
jsr LDR.MountSPDevs
|
||||
bcs .8
|
||||
|
Loading…
x
Reference in New Issue
Block a user