This commit is contained in:
Tolik committed 2025-05-30 16:55:55 +10:00
1 parent 2d3dca1109
commit f8fe84be7e
4 files changed
+17 -15

No files matched your search

+7 -6
View File
@@ -176,7 +176,7 @@ ATAPI_5x_SET_PAR:
; HL:IX - Sector + Sector counter
; DE - Address + (Sector counter * Size sector)
;READ SECTOR(S)
ATAPI_5x_READ: PUSH IY
ATAPI_5x_READ: ;PUSH IY ; !FIXIT § ç¥¬?
LD C,0 ; ¯à¨§­ ª short
EX AF,AF'
IN A,(SLOT3)
@@ -196,7 +196,7 @@ ATAPI_5x_READ: PUSH IY
ATAPI_5x_LONG_READ:
;AND A
;
PUSH IY
;PUSH IY ; !FIXIT § ç¥¬?
LD C,1 ; ¯à¨§­ ª long
.main: SAFE_PORTY_2
PUSH BC
@@ -288,7 +288,7 @@ RW_ATAPI_SECTORs:
; HL:IX - Sector + Sector counter
; DE - Address + (Sector counter * Size sector)
;WRITE SECTOR(S)
ATAPI_5x_WRITE: PUSH IY
ATAPI_5x_WRITE: ;PUSH IY ; !FIXIT § ç¥¬?
LD C,0 ; ¯à¨§­ ª short
EX AF,AF'
IN A,(SLOT3)
@@ -308,7 +308,7 @@ ATAPI_5x_WRITE: PUSH IY
ATAPI_5x_LONG_WRITE:
;AND A
;
PUSH IY
;PUSH IY ; !FIXIT § ç¥¬?
LD C,1 ; ¯à¨§­ ª long
.main: SAFE_PORTY_2
PUSH BC
@@ -621,7 +621,7 @@ EXEC_PACKET_COMMAND:
JP C,.error;_APLOOP
RET Z
;====== IF DATA REQUEST ===============================================;
.data_request: IN A,(SLOT3)
IN A,(SLOT3)
EX AF,AF' ;>-----------> \
;
LD A,XH
@@ -1019,7 +1019,8 @@ ATAPI_CMD_PACKET:
DB #00,#01,#00,#00 ; counter dword
DB #00
;
.WRITE: DB #2E,#00
.WRITE: DB #2E,#00 ; write and verify
;DB #2A,#00 ; write
DB #00,#00,#00,#00 ; sector dword
DB #00
DB #00,#01,#00,#00 ; counter dword
+7 -7
View File
@@ -162,7 +162,7 @@ ATA_5x_SET_PAR:
; HL:IX - Sector + Sector counter
; DE - Address + (Sector counter * Size sector)
;READ SECTOR(S)
ATA_5x_READ: PUSH IY
ATA_5x_READ: ;PUSH IY ; !FIXIT § ç¥¬?
LD C,0 ; ¯à¨§­ ª short
EX AF,AF'
IN A,(SLOT3)
@@ -181,7 +181,7 @@ ATA_5x_READ: PUSH IY
; A' - Last mem page in RAM Block used for readed data
;LONG READ SECTOR(S)
ATA_5x_LONG_READ:
PUSH IY
;PUSH IY ; !FIXIT § ç¥¬?
LD C,1 ; ¯à¨§­ ª long
.main: SAFE_PORTY_2
PUSH BC
@@ -214,7 +214,7 @@ ATA_5x_LONG_READ:
CCF
;
.exit: RESTORE_PORTY
POP IY
;POP IY
RET
;
.error: LD B,A ; A - ­®¬¥à ®è¨¡ª¨
@@ -253,7 +253,7 @@ ATA_5x_LONG_READ:
; HL:IX - Sector + Sector counter
; DE - Address + (Sector counter * Size sector)
;WRITE SECTOR(S)
ATA_5x_WRITE: PUSH IY
ATA_5x_WRITE: ;PUSH IY ; !FIXIT § ç¥¬?
LD C,0 ; ¯à¨§­ ª short
EX AF,AF'
IN A,(SLOT3)
@@ -271,7 +271,7 @@ ATA_5x_WRITE: PUSH IY
; DE - Address + (Sector counter * Size sector)
;WRITE SECTOR(S)
ATA_5x_LONG_WRITE:
PUSH IY
;PUSH IY ; !FIXIT § ç¥¬?
LD C,1 ; ¯à¨§­ ª long
.main: SAFE_PORTY_2
PUSH BC
@@ -534,7 +534,7 @@ WRITE_ATA_SECTORs:
; B - Sector counter
;Return: CF - error
;VERIFY SECTOR(S)
ATA_5x_VERIFY: PUSH IY
ATA_5x_VERIFY: ;PUSH IY ; !FIXIT § ç¥¬?
SAFE_PORTY_2
PUSH IX
PUSH HL
@@ -542,7 +542,7 @@ ATA_5x_VERIFY: PUSH IY
POP HL
POP IX
RESTORE_PORTY
POP IY
;POP IY
RET
;VERIFY SECTOR(S)
.VERIFY: LD C,IDE.Device.HDD
+2 -1
View File
@@ -22,7 +22,8 @@ EMM.GetMemSize: IN A,(SLOT1)
;
.exit: LD HL,#100 ;!HARDCODE max mem pages
LD A,B
LD B,0
; L=0
LD B,L
OUT (SLOT1),A
RET