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

This commit is contained in:
Tolik committed 2026-01-20 23:33:18 +10:00
1 parent e0c70519c3
commit fd285cae0f
3 files changed
+37 -9

No files matched your search

@@ -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
RET
;
POP BC
RET
////////////////////////////////////////////////////////////////////////
;
;-------------------------------
+2 -2
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'