new ide detecting procedures

This commit is contained in:
Anatoliy Belyanskiy 2023-09-07 20:49:15 +10:00
parent de46473cc8
commit 3acb1a76ff

View File

@ -710,9 +710,8 @@ DETECTORS:
LD BC,IDE.Read.Counter ; LD BC,IDE.Read.Counter
IN A,(C)
CP .test_counter
RET Z
SCF
RET NZ
AND A
RET
;-------;
@ -725,11 +724,6 @@ DETECTORS:
DEC B ; LD BC, IDE.Read.Status
LD HL,PAUSES.HALT.SMALL
;
;!TEST DVD detect bug check
PAUSE_DJNZ 0
;
.loop: IN A,(C)
SCF
RET Z