mirror of
https://github.com/Tolik-Trek/Sprinter-BIOS.git
synced 2026-06-15 01:11:47 +03:00
test. если не заработает, то откат на предыдущий коммит
This commit is contained in:
parent
b3a47ce2b5
commit
648c089108
@ -347,7 +347,6 @@ FDD_5x_LONG_WRITE:
|
|||||||
;-------------------------------
|
;-------------------------------
|
||||||
;WRITE SECTOR
|
;WRITE SECTOR
|
||||||
;-------------------------------
|
;-------------------------------
|
||||||
FDD_COUNTERS.RW_Retries
|
|
||||||
FDD_RW_SECTOR: LD D,FDD_COUNTERS.RW_Retries
|
FDD_RW_SECTOR: LD D,FDD_COUNTERS.RW_Retries
|
||||||
.RETRY: ;DI
|
.RETRY: ;DI
|
||||||
PUSH HL
|
PUSH HL
|
||||||
@ -363,6 +362,17 @@ FDD_RW_SECTOR: LD D,FDD_COUNTERS.RW_Retries
|
|||||||
EXX
|
EXX
|
||||||
OUT (FDC_93.Command),A
|
OUT (FDC_93.Command),A
|
||||||
;
|
;
|
||||||
|
; [ ] 15/04/25 à §¬¥à ᥪâ®à ¡®«ìè¥, 祬 ãáâ ®¢«¥® ¢ SYS_PAGE.FDD_TABLE.BytesPerSector ¢ë§®¢¥â ®è¨¡ªã
|
||||||
|
LD A,SYS_PAGE
|
||||||
|
OUT (SLOT3),A
|
||||||
|
EXX
|
||||||
|
LD E,(IY + FDD_TABLE_s.BytesPerSector)
|
||||||
|
LD D,(IY + FDD_TABLE_s.BytesPerSector + 1)
|
||||||
|
INC DE
|
||||||
|
EXX
|
||||||
|
LD A,XH
|
||||||
|
OUT (SLOT3),A
|
||||||
|
;
|
||||||
.wait_loop: IN A,(FDC_93.DrvCTRL) ;WAIT INTRQ or DRQ
|
.wait_loop: IN A,(FDC_93.DrvCTRL) ;WAIT INTRQ or DRQ
|
||||||
AND %1100'0000 ;b6: DRQ (§ ¯à®á ¤ ëå = 1). b7: INTRQ (¢ë¯®«ï¥âáï ª®¬ ¤ = 0).
|
AND %1100'0000 ;b6: DRQ (§ ¯à®á ¤ ëå = 1). b7: INTRQ (¢ë¯®«ï¥âáï ª®¬ ¤ = 0).
|
||||||
JR NZ,.RW_PROC
|
JR NZ,.RW_PROC
|
||||||
@ -380,21 +390,23 @@ FDD_RW_SECTOR: LD D,FDD_COUNTERS.RW_Retries
|
|||||||
.RW_PROC: IN A,(SLOT3)
|
.RW_PROC: IN A,(SLOT3)
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
; [ ] 15/04/25 à §¬¥à ᥪâ®à ¡®«ìè¥, 祬 ãáâ ®¢«¥® ¢ SYS_PAGE.FDD_TABLE.BytesPerSector ¢ë§®¢¥â ®è¨¡ªã
|
; [ ] 15/04/25 à §¬¥à ᥪâ®à ¡®«ìè¥, 祬 ãáâ ®¢«¥® ¢ SYS_PAGE.FDD_TABLE.BytesPerSector ¢ë§®¢¥â ®è¨¡ªã
|
||||||
LD A,SYS_PAGE
|
; LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
; OUT (SLOT3),A
|
||||||
LD E,(IY + FDD_TABLE_s.BytesPerSector)
|
; LD E,(IY + FDD_TABLE_s.BytesPerSector)
|
||||||
LD D,(IY + FDD_TABLE_s.BytesPerSector + 1)
|
; LD D,(IY + FDD_TABLE_s.BytesPerSector + 1)
|
||||||
LD A,XH
|
; LD A,XH
|
||||||
OUT (SLOT3),A
|
; OUT (SLOT3),A
|
||||||
INC DE
|
; INC DE
|
||||||
EXX
|
EXX
|
||||||
BIT 5,B
|
BIT 5,B
|
||||||
EXX
|
EXX
|
||||||
JR NZ,.write_loop ; १ã«ìâ â BIT 5,B
|
JR NZ,.write_loop ; १ã«ìâ â BIT 5,B
|
||||||
;READ BYTE
|
;READ BYTE
|
||||||
.read_loop: DEC DE
|
.read_loop: EXX
|
||||||
LD A,D
|
DEC DE
|
||||||
OR E
|
LD A,D
|
||||||
|
OR E
|
||||||
|
EXX
|
||||||
JR Z,.SectorSizeError
|
JR Z,.SectorSizeError
|
||||||
;
|
;
|
||||||
INI
|
INI
|
||||||
@ -463,9 +475,11 @@ FDD_RW_SECTOR: LD D,FDD_COUNTERS.RW_Retries
|
|||||||
RET
|
RET
|
||||||
;
|
;
|
||||||
;WRITE BYTE
|
;WRITE BYTE
|
||||||
.write_loop: DEC DE
|
.write_loop: EXX
|
||||||
LD A,D
|
DEC DE
|
||||||
OR E
|
LD A,D
|
||||||
|
OR E
|
||||||
|
EXX
|
||||||
JR Z,.SectorSizeError
|
JR Z,.SectorSizeError
|
||||||
;
|
;
|
||||||
OUTI
|
OUTI
|
||||||
|
|||||||
Binary file not shown.
Loading…
Reference in New Issue
Block a user