This commit is contained in:
Anatoliy Belyanskiy 2024-01-05 01:32:23 +10:00
parent 87f5fedbbe
commit d6ed41730c
6 changed files with 20 additions and 23 deletions

View File

@ -11,6 +11,7 @@
INCLUDE 'INC/SPRINT00.INC' INCLUDE 'INC/SPRINT00.INC'
INCLUDE 'inc/rom_routines.inc' INCLUDE 'inc/rom_routines.inc'
INCLUDE 'Shared_Includes/constants/zx_char_codes.inc' INCLUDE 'Shared_Includes/constants/zx_char_codes.inc'
INCLUDE 'Shared_Includes/constants/BIOS_equ.inc'
;*************************************** ;***************************************
;CNF_PORT EQU #74 ;CNF_PORT EQU #74
AUTO_4000 EQU 04000H AUTO_4000 EQU 04000H

@ -1 +1 @@
Subproject commit c135d9b6038fcabca6cef3234d876f93d5865dee Subproject commit d1ce63928bdbb44e48b311f9d4a0005c2f44fcd4

View File

@ -336,7 +336,7 @@ FAT_DE_to_HL:
PUSH HL PUSH HL
LD A,H LD A,H
AND 80H AND #80
LD C,A LD C,A
LD H,D LD H,D
LD L,E LD L,E
@ -412,18 +412,18 @@ FAT_HALF_L:
JR NZ,FAT_HALF_L JR NZ,FAT_HALF_L
FAT_HALF: FAT_HALF:
BIT 7,D BIT 7,D
LD A,0FFH LD A,#FF
JR NZ,FAT_16_L2 JR NZ,FAT_16_L2
LD A,0FH LD A,#0F
AND B AND B
LD B,A LD B,A
LD A,0FH LD A,#0F
FAT_16_L2: FAT_16_L2:
CP B CP B
JR NZ,NO_END_CLAST JR NZ,NO_END_CLAST
FAT_ALL: FAT_ALL:
LD A,C LD A,C
CP 0F0H CP #F0
JR C,NO_END_CLAST JR C,NO_END_CLAST
LD L,C LD L,C
LD H,B LD H,B
@ -548,7 +548,7 @@ GET_FL_L2:
;*************************************************************************** ;***************************************************************************
HDD_PROG: HDD_PROG:
LD C,0 LD C,BIOS.HDD_INIT and #BF
CALL HD_CMD CALL HD_CMD
JP C,HDD_PROG_E JP C,HDD_PROG_E
LD HL,HD_IDF_ADR+54 LD HL,HD_IDF_ADR+54
@ -576,7 +576,7 @@ HDD_PROG_L:
RST 10H RST 10H
POP BC POP BC
DJNZ HDD_PROG_L DJNZ HDD_PROG_L
LD C,1 LD C,BIOS.HDD_RECAL and #BF
CALL HD_CMD CALL HD_CMD
JP NC,AUTO_03E1 JP NC,AUTO_03E1

View File

@ -14,7 +14,6 @@
;* 4. Š®¬ ­¤  - C * ;* 4. Š®¬ ­¤  - C *
;* 5. ‘âà ­¨æ  އ“ - A * ;* 5. ‘âà ­¨æ  އ“ - A *
;************************************************ ;************************************************
HDD_REDIR: HDD_REDIR:
POP AF POP AF
CALL HD_CMD CALL HD_CMD
@ -429,7 +428,6 @@ READ_BPB:
JP ERROR_MSDOS JP ERROR_MSDOS
HDD_REDIR2: HDD_REDIR2:
CALL MAIN_BPB CALL MAIN_BPB
RET NC RET NC
@ -438,7 +436,7 @@ SPACIAL_BPB:
LD DE,63 LD DE,63
LD A,SYS_PAGE LD A,SYS_PAGE
LD HL,MS_BPB LD HL,MS_BPB
LD C,5 LD C,BIOS.HDD_READ and #BF
LD B,1 LD B,1
CALL MSD_R_W_UT CALL MSD_R_W_UT
CALL BPB_PARAMS CALL BPB_PARAMS
@ -446,12 +444,12 @@ SPACIAL_BPB:
JP ERROR_MSDOS JP ERROR_MSDOS
MAIN_BPB: MAIN_BPB:
LD IX,0 ;LD IX,0
LD DE,0 ;LD DE,0
LD A,SYS_PAGE LD A,SYS_PAGE
LD HL,MS_BPB LD HL,MS_BPB
LD C,4 LD C,BIOS.HDD_READ_BPB and #BF
LD B,1 ;LD B,1
CALL MSD_R_W_UT CALL MSD_R_W_UT
CALL BPB_PARAMS CALL BPB_PARAMS
RET RET
@ -478,7 +476,6 @@ MAIN_BPB:
; CALL HD_CMD ; CALL HD_CMD
BPB_PARAMS: BPB_PARAMS:
DI DI
IN A,(PAGE3) IN A,(PAGE3)
EX AF,AF' EX AF,AF'
@ -486,7 +483,7 @@ BPB_PARAMS:
OUT (PAGE3),A OUT (PAGE3),A
LD A,(MS_BPB+FORM_CODE) LD A,(MS_BPB+FORM_CODE)
CP 0F0H CP #F0
JP C,ERROR_BPB JP C,ERROR_BPB
LD HL,MS_BPB+FAT_ID LD HL,MS_BPB+FAT_ID
@ -507,13 +504,13 @@ R_BPB_L11:
DJNZ R_BPB_L1 DJNZ R_BPB_L1
LD A,(HL) LD A,(HL)
CP '6' CP '6'
LD HL,81FFH ; FAT16 ä« £ LD HL,#81FF ; FAT16 ä« £
JR Z,BPB_FAT JR Z,BPB_FAT
CP '2' CP '2'
JP NZ,ERROR_BPB JP NZ,ERROR_BPB
PC_DOS_BPB: PC_DOS_BPB:
LD HL,01FFH ; FAT12 ä« £ LD HL,#01FF ; FAT12 ä« £
BPB_FAT: BPB_FAT:
LD (FAT_FLAG),HL LD (FAT_FLAG),HL

View File

@ -3,7 +3,7 @@ DISK_REDIR:
PUSH BC PUSH BC
LD A,(OPER_DISK) LD A,(OPER_DISK)
AND 3 AND 3
LD C,#CF ;!HARDCODE BIOS.GET_DRV_ST LD C,BIOS.GET_DRV_ST
CALL EXP_FNS CALL EXP_FNS
EI EI
POP BC POP BC
@ -425,7 +425,7 @@ FDD_SET:
RET RET
HDD_SET: HDD_SET:
LD C,0 LD C,BIOS.HDD_INIT and #BF
CALL HD_CMD CALL HD_CMD
JP C,HDD_PROG_E JP C,HDD_PROG_E

View File

@ -17,8 +17,7 @@ HD_EXP_EXE:
CALL HD_CMD_X CALL HD_CMD_X
JP HD_EXP_RET JP HD_EXP_RET
HD_CMD: HD_CMD: POP AF
POP AF
CALL HD_CMD_X CALL HD_CMD_X
JP HD_DOS_RET JP HD_DOS_RET