Tolik-Trek/Sprinter-Core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

...

Browse Source
This commit is contained in:
Anatoliy Belyanskiy 2023-08-03 03:09:28 +10:00
parent 373bc29096
commit 0c22fe031e
2 changed files with 22 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Shared_Includes

@ -1 +1 @@
Subproject commit 1b0d3781b011955f7e2ffc428109dfa0db63d09e
Subproject commit b325c3281f76e83037cb0019450ae6e36689db65

31
src/bios/exp/EXTENDED/CD_DRIVER_0.asm
View File

@ -6,10 +6,11 @@
;---------------------------------------------------------------
;========================================================
SIZESEC EQU #0800
PKTSIZE EQU 12
RAM_ATAPI_PK EQU #FEE0
RAM_ATAPI_READ EQU #FEF0
PKTSIZE EQU 13
RAM_ATAPI_PK EQU SYS_PAGE.SHARED_BUFFER_32b
RAM_ATAPI_READ EQU SYS_PAGE.SHARED_BUFFER_32b+16
ASSERT ((PKTSIZE % 2) = 0), "PKTSIZE must be an even number"
;[]===========================================================[]
CD_5x.RESET:
LD B,50
@ -91,10 +92,17 @@ CD_READ:
LD BC,PKTSIZE
LDIR
EXX
LD A,H
LD (RAM_ATAPI_READ+SECREAD+0),A ;R01
LD A,L
LD (RAM_ATAPI_READ+SECREAD+1),A ;R01
;!TEST
;LD A,H
;LD (RAM_ATAPI_READ+SECREAD+0),A ;R01
;LD A,L
;LD (RAM_ATAPI_READ+SECREAD+1),A ;R01
LD A,H
LD H,L
LD L,A
LD (RAM_ATAPI_READ+SECREAD+0),HL
;
LD A,XH
LD (RAM_ATAPI_READ+SECREAD+2),A ;R01
LD A,XL
@ -200,17 +208,20 @@ AP_COM: AND #01
OUT (SLOT3),A
LD HL,RAM_ATAPI_PK
LD BC,IDE.Write.Data
LD A,PKTSIZE
SRL A
LD A,PKTSIZE/2
;SRL A
.OUTPKT:
OUTI
OUTI
DEC A
JR NZ,.OUTPKT
POP BC
OUT (C),B
LD B,#80
DJNZ $
.pause2: DJNZ .pause2
.AP_LOOP:
EXX
LD DE,#8000