Tolik-Trek/ZX-SP-ROMs
1
0
Fork 0
mirror of https://github.com/Tolik-Trek/ZX-SP-ROMs.git synced 2026-06-16 01:41:14 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

SetHDD --> HDD

Browse Source
This commit is contained in:
Anatoliy Belyanskiy 2024-01-29 00:19:10 +10:00
parent 2a869d746e
commit ac2ca08a88
5 changed files with 114 additions and 82 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
SP_TRDOS.ASM
View File

@ -1155,6 +1155,7 @@ WG93_EXE_:
JP WG93_EXE
;**************************************
DISPLAY "2k"
;INCLUDE 'trdos/tr_msd_4.asz'
BLOCK #0840-$,255
INCLUDE 'trdos/tr_msd_3.asz'
@ -1215,6 +1216,7 @@ ZG_RUS:
;
;**************************************
;**************************************
INCLUDE 'trdos/tr_msd_4.asz'
BLOCK #1000 - $,255
;**************************************

2
TRDOS/TR_MSD_2.ASZ
View File

@ -249,7 +249,7 @@ LOOP_FIND:
LD A,(DE)
CP 13
JR Z,CMD_EXE1
CP 20H
CP ' '
JR Z,CMD_EXE
JR NEXT_WORD2
CMD_EXE:

11
TRDOS/TR_MSD_3.ASZ
View File

@ -275,7 +275,7 @@ SKEEP_XX1:
;*****************************************
MADE_next_blk:
PUSH BC
LD C,#95 ;!HARDCODE BIOS.GetMemPageNext (#C7)
LD C,BIOS.GetMemPageNext
CALL EXP_FNS
POP BC
INC L ; SET ZF, if END BLK !!!
@ -441,9 +441,15 @@ FAT_ALL:
POP AF
SCF
RET
;-----------------------------------------------------------------------
;INCLUDE 'trdos/tr_msd_4.asz'
;-----------------------------------------------------------------------
BLOCK #09FF-$, #FF
BLOCK #0A01-$, #FF
;牀え<E78980><E38188>瓷┤ ▲<><E296B2> <20>ム襤<E383A0>⑧<EFBFBD>
DW #FFFF
;-----------------------------------------------------------------------
NO_END_CLAST:
; PUSH AF
@ -605,6 +611,7 @@ HDD_ERROR:
HDD_PROG_E:
LD HL,HD_TX2
JP AUTO_03E4
;
;***************************************************************************

101
TRDOS/TR_MSD_4.ASZ Normal file
View File

@ -0,0 +1,101 @@
HDD_SET:;!TEST
.loop: LD A,(DE)
INC DE
CP ' '
JR Z,.loop
CP #0D
JR Z,.init
;
DEC DE
DEC DE
JP CHOOSE_HDD
;
.init: ;!TEST 06/01/2024 㡨ࠥ¬ «¨è­¨¥ ⥫®¤¢¨¦¥­¨ï
;LD C,BIOS.HDD_INIT and #BF
;CALL HD_CMD
LD C,BIOS.HDD_INIT
CALL EXP_FNS
;
JP C,HDD_PROG_E
LD A,(ZX_VARS.OPER_DISK)
LD B,A
XOR A
LD C,BIOS.HDD_TO_DRV
;!TEST 06/01/2024 á®å࠭塞 á®áâ®ï­¨¥ ¯à¥à뢠­¨© § ç¥¬-â®
JP EXP_FNS
;CALL EXP_FNS
;EI
;RET
;
;[ ] 07/01/2024
;¢ë室: A: bit1 - Primary/Secondary, bit0 - master/slave, bit2..3: ¨á¯®«ì§ãî騩áï à §¤¥« ¢ MBR
CHOOSE_HDD:
PUSH DE
LD A,(ZX_VARS.OPER_DISK)
LD C,BIOS.GET_DRV_ST
CALL EXP_FNS
POP DE
JR C,.error
AND #40 ;!HARDCODE HDD
CALL Z,.setUp_HDD
;
.loop: LD A,(DE)
INC DE
CP ' '
JR Z,.loop
LD A,(DE)
CP #0D
JR Z,.error
.cont: ; ­®¬¥à à §¤¥« 
;INC DE
LD A,(DE)
CP "4"
JR NC,.error
CP "0"
JR C,.error
SUB "0"
RLA
RLA
LD C,A
; ; master/slave
; DEC DE
; LD A,(DE)
; CP "2"
; JR NC,.error
; CP "0"
; JR C,.error
; SUB "0"
; RLA
; OR C
; LD C,A
; Primary/Secondary, master/slave
DEC DE
LD A,(DE)
CP "4"
JR NC,.error
CP "0"
JR C,.error
SUB "0"
OR C
;
LD C,BIOS.HDD_PART
CALL EXP_FNS
RET NC
;
.error: LD HL,MSG_3
JP ERR_EXIT
;
.setUp_HDD:
LD A,(ZX_VARS.OPER_DISK)
LD B,A
XOR A
LD C,BIOS.HDD_TO_DRV
PUSH DE
CALL EXP_FNS
POP DE
RET
;

78
TRDOS/TR_RMD_S.ASZ
View File

@ -439,25 +439,6 @@ FDD_SET:
;RET
;
HDD_SET:;!TEST 06/01/2024 㡨ࠥ¬ «¨è­¨¥ ⥫®¤¢¨¦¥­¨ï
;LD C,BIOS.HDD_INIT and #BF
;CALL HD_CMD
LD C,BIOS.HDD_INIT
CALL EXP_FNS
;
JP C,HDD_PROG_E
LD A,(ZX_VARS.OPER_DISK)
LD B,A
XOR A
LD C,BIOS.HDD_TO_DRV
;!TEST 06/01/2024 á®å࠭塞 á®áâ®ï­¨¥ ¯à¥à뢠­¨© § ç¥¬-â®
JP EXP_FNS
;CALL EXP_FNS
;EI
;RET
;
RAMD_SET:
CALL RAMD_SYM
RET C
@ -500,63 +481,4 @@ RAMD_SYM:
RAMD_SYM_OK:
POP AF
RET
;[ ] 07/01/2024
CHOOSE_HDD:
PUSH DE
LD A,(ZX_VARS.OPER_DISK)
LD C,BIOS.GET_DRV_ST
CALL EXP_FNS
POP DE
JR C,.error
AND #40 ;!HARDCODE HDD
JR Z,.error
;
.loop: LD A,(DE)
INC DE
CP ' '
JR Z,.loop
LD A,(DE)
CP #0D
JR Z,.error
; ­®¬¥à à §¤¥« 
;INC DE
LD A,(DE)
CP "4"
JR NC,.error
CP "0"
JR C,.error
SUB "0"
RLA
RLA
LD C,A
; ; master/slave
; DEC DE
; LD A,(DE)
; CP "2"
; JR NC,.error
; CP "0"
; JR C,.error
; SUB "0"
; RLA
; OR C
; LD C,A
; Primary/Secondary, master/slave
DEC DE
LD A,(DE)
CP "4"
JR NC,.error
CP "0"
JR C,.error
SUB "0"
OR C
;
LD C,BIOS.HDD_PART
CALL EXP_FNS
RET NC
;
.error: LD HL,MSG_3
JP ERR_EXIT
;bit0: Primary/Secondary, bit1 - master/slave, bit2..3: ¨á¯®«ì§ãî騩áï à §¤¥« ¢ MBR