-bug: EXECOM - увеличена задержка ожидания ВГ93

This commit is contained in:
Tolik 2026-01-20 23:33:14 +10:00
parent e0c70519c3
commit fd285cae0f
3 changed files with 37 additions and 9 deletions

View File

@ -200,6 +200,7 @@ FDD_5x_LONG_READ:
EXX
PUSH BC
CALL SEEK
;!FIXIT ª®­âà®«ì ®è¨¡ª¨
POP BC
EXX
PUSH DE
@ -400,8 +401,10 @@ FDD_RW_SECTOR: LD D,5 ;RETRY COUNT
PUSH DE
PUSH HL
CALL RESWG ; RESET_WG
;!FIXIT ª®­âà®«ì ®è¨¡ª¨
LD A,XL
CALL SEEK ; !!!!! ¯®á¬®âà¥âì
;!FIXIT ª®­âà®«ì ®è¨¡ª¨
POP HL
POP DE
JR .RETRY
@ -434,9 +437,9 @@ FDD_RW_SECTOR: LD D,5 ;RETRY COUNT
JR Z,.SectorSizeError
;
OUTI
.wwait_data: IN A,(FDC_93.DrvCTRL)
.wait_data_w: IN A,(FDC_93.DrvCTRL)
AND %1100'0000 ;b6: DRQ (§ ¯à®á ¤ ­­ëå = 1). b7: INTRQ (¢ë¯®«­ï¥âáï ª®¬ ­¤  = 0).
JR Z,.wwait_data
JR Z,.wait_data_w
JP P,.write_loop
JP .rw_return
;
@ -683,22 +686,47 @@ P50ms: PUSH BC
RET
;
////////////////////////////////////////////////////////////////////////
;RESWG: LD A,8
; ;
;EXECOM: OUT (FDC_93.Command),A
; LD HL,#0000 ; áçñâ稪
;.WREST: DEC HL
; LD A,H
; OR L
; SCF
; RET Z
; ;
; IN A,(FDC_93.DrvCTRL)
; AND #80
; JR Z,.WREST
; RET
;
RESWG: LD A,8 ;!HARDCODE CMD Š<>1818ƒ93
;
EXECOM: OUT (FDC_93.Command),A
LD HL,#0000 ; áçñâ稪
PUSH BC
LD B,3 ; áçñâ稪
;
.WREST: DEC HL
LD A,H
OR L
SCF
RET Z
JR NZ,.get_state
;
IN A,(FDC_93.DrvCTRL)
DJNZ .WREST
;
POP BC
SCF
RET
;
.get_state: IN A,(FDC_93.DrvCTRL)
AND #80
JR Z,.WREST
POP BC
RET
;
////////////////////////////////////////////////////////////////////////
;
;-------------------------------

View File

@ -85,8 +85,8 @@ DRV_LIST:
; RET
; ;
INCLUDE 'EXTENDED/FDD_DRIVER_2.asm'
INCLUDE 'EXTENDED/RAM_DISK_DRIVER_1.asm'
INCLUDE 'EXTENDED/FDD_DRIVER.asm'
INCLUDE 'EXTENDED/RAM_DISK_DRIVER.asm'
INCLUDE 'EXTENDED/IDE/ATA_DRV.asm'
INCLUDE 'EXTENDED/IDE/ATAPI_DRV.asm'
INCLUDE 'EXTENDED/IDE/SHARED.asm'