mirror of
https://github.com/Tolik-Trek/ZX-SP-ROMs.git
synced 2026-06-15 17:31:45 +03:00
...
This commit is contained in:
parent
b757fbf8ec
commit
433f4b32a9
@ -7074,13 +7074,8 @@ HD_CMD: PUSH AF
|
||||
;
|
||||
;----[ From TR-DOS to API #80..#FF]-----
|
||||
_mInfoBLOCK #3FF8-$, #FF
|
||||
EXP_FNS:;!TEST 06/01/2024 á®åà 塞 á®áâ®ï¨¥ ¯à¥àë¢ ¨© § 祬-â®
|
||||
;PUSH AF
|
||||
;DI ;!TODO ¯®¤ã¬ âì, ª ª á®åà ïâì á®áâ®ï¨¥ ¯à¥àë¢ ¨© ¨ ¨ç¥£® ¥ á«®¬ âì
|
||||
;XOR A ; SYS_PORT.BIOS
|
||||
JP EXP_FNS_PREPARE
|
||||
EXP_FNS: JP EXP_FNS_PREPARE
|
||||
EXP_FNS_PREPARE_RET:
|
||||
;
|
||||
OUT (SYS_PORT.ROM),A
|
||||
POP AF
|
||||
RET
|
||||
|
||||
@ -1 +1 @@
|
||||
Subproject commit 7e812bc0267db168c5a5b17780e567a7a01cd927
|
||||
Subproject commit 17997278e4aea455a68532547beb561fd216ad19
|
||||
@ -160,11 +160,11 @@ CHOOSE_HDD:
|
||||
OUT (SLOT3),A
|
||||
;
|
||||
;
|
||||
XOR A
|
||||
LD C,A ; ®¡ã«¨âì C
|
||||
;XOR A
|
||||
LD C,0 ; ®¡ã«¨âì C
|
||||
LD A,B
|
||||
;OR #40
|
||||
LD B,A
|
||||
;LD B,A
|
||||
;
|
||||
; PUSH AF
|
||||
; LD A,(ZX_VARS.OPER_DISK)
|
||||
|
||||
@ -323,11 +323,23 @@ END_TAB:
|
||||
LD (ZX_VARS.CONT_DISK),A
|
||||
LD B,A
|
||||
LD A,(ZX_VARS.PDOS_COPY)
|
||||
AND 7CH
|
||||
AND #7C
|
||||
OR B
|
||||
LD (ZX_VARS.PDOS_COPY),A
|
||||
OUT (FDC_93.DrvCTRL),A
|
||||
JP AUTO_03E1
|
||||
; [ ] 19/07/2024 ª ¦¤ë© ¤¨áª âमá ᢮© à §¤¥« hdd ¬®¦® § ¬ ¯¨âì
|
||||
LD C,BIOS.GET_DISK_REDIR
|
||||
CALL EXP_FNS
|
||||
CP #40
|
||||
JR C,.exit
|
||||
;
|
||||
AND #0F
|
||||
LD C,BIOS.HDD_PART
|
||||
CALL EXP_FNS
|
||||
;LD HL,MSG_3
|
||||
;CALL C,AUTO_03C3
|
||||
;
|
||||
.exit: JP AUTO_03E1
|
||||
|
||||
END_TAB2:
|
||||
SUB 4
|
||||
@ -626,7 +638,7 @@ SPR_1: LD A,(DE)
|
||||
RET NZ
|
||||
LD C,BIOS.RST_CONF.SP97_2
|
||||
SP_1: LD A,(DE)
|
||||
CP #21
|
||||
CP " "+1
|
||||
CCF
|
||||
RET C
|
||||
CALL EXP_FNS
|
||||
|
||||
Loading…
Reference in New Issue
Block a user