fixed bug in ATAPI_5x_GET_PAR
This commit is contained in:
parent
a2022a4c6f
commit
624ba73ef4
@ -62,12 +62,16 @@ ATAPI_5x_GET_PAR:
|
|||||||
;
|
;
|
||||||
.DriveSelected: IN A,(SLOT3)
|
.DriveSelected: IN A,(SLOT3)
|
||||||
AND A
|
AND A
|
||||||
|
PUSH AF
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
;
|
;
|
||||||
; [ ] sector size. media changed
|
; [ ] sector size. media changed
|
||||||
CALL ATAPI_CHECK_MEDIA_CHANGED
|
CALL ATAPI_CHECK_MEDIA_CHANGED
|
||||||
|
EX AF,AF'
|
||||||
|
POP AF
|
||||||
|
EX AF,AF'
|
||||||
JR NC,.get_data
|
JR NC,.get_data
|
||||||
;
|
;
|
||||||
CP BIOS.Error.ATAPI.UnitAttention
|
CP BIOS.Error.ATAPI.UnitAttention
|
||||||
@ -76,6 +80,9 @@ ATAPI_5x_GET_PAR:
|
|||||||
;CP BIOS.Error.ATAPI.NotReady
|
;CP BIOS.Error.ATAPI.NotReady
|
||||||
;SCF
|
;SCF
|
||||||
;RET NZ
|
;RET NZ
|
||||||
|
EX AF,AF'
|
||||||
|
OUT (SLOT3),A
|
||||||
|
EX AF,AF
|
||||||
LD HL,#FFFF
|
LD HL,#FFFF
|
||||||
LD D,H
|
LD D,H
|
||||||
LD E,L
|
LD E,L
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user