fixed cmd /hdd in tr-dos rom
This commit is contained in:
parent
d80b79a832
commit
4a49ae559b
Binary file not shown.
@ -867,6 +867,7 @@ PrepareToZX: ;CALL init_zx_roms
|
||||
; find first good partition
|
||||
;
|
||||
|
||||
; ç¨á⪠¯¥à¥¬¥ëå ZX HDD
|
||||
IN A,(SLOT3)
|
||||
EX AF,AF
|
||||
LD A,SYS_PAGE
|
||||
@ -877,9 +878,15 @@ PrepareToZX: ;CALL init_zx_roms
|
||||
LD L,A
|
||||
LD (SYS_PAGE.CURRENT_DIR_SEC_L),HL
|
||||
LD (SYS_PAGE.CURRENT_DIR_SEC_H),HL
|
||||
DEC A
|
||||
LD (SYS_PAGE.CURRENT_HDD),A
|
||||
LD (SYS_PAGE.CURRENT_DIR_DRIVE),A
|
||||
LD (SYS_PAGE.CURRENT_DIR_DRIVE_COPY),A
|
||||
;
|
||||
EX AF,AF
|
||||
OUT (SLOT3),A
|
||||
EX AF,AF
|
||||
;
|
||||
|
||||
.loop: CALL FN_HDD_PART
|
||||
JR NC,.start_zx
|
||||
|
||||
@ -185,7 +185,7 @@ INIT_SYS_ALL:
|
||||
DI
|
||||
; LD HL,#8000
|
||||
; LD DE,#8001
|
||||
; LD (HL),0
|
||||
; LD (HL),#FF
|
||||
; LD BC,#3FFF
|
||||
; LDIR
|
||||
;
|
||||
@ -198,7 +198,16 @@ INIT_SYS_ALL:
|
||||
LD DE,SYS_PAGE.ID_FLAG - #4000
|
||||
LD BC,ID_SPRINTER.Record1_Size
|
||||
LDIR
|
||||
|
||||
; ç¨á⪠¯¥à¥¬¥ëå ZX HDD
|
||||
XOR A
|
||||
LD H,A
|
||||
LD L,A
|
||||
LD (SYS_PAGE.CURRENT_DIR_SEC_L - #4000),HL
|
||||
LD (SYS_PAGE.CURRENT_DIR_SEC_H - #4000),HL
|
||||
DEC A
|
||||
LD (SYS_PAGE.CURRENT_HDD - #4000),A
|
||||
LD (SYS_PAGE.CURRENT_DIR_DRIVE - #4000),A
|
||||
LD (SYS_PAGE.CURRENT_DIR_DRIVE_COPY - #4000),A
|
||||
; Disable user IM address in SYS_PAGE
|
||||
XOR A
|
||||
LD (SYS_PAGE.INT_ID - #4000),A
|
||||
|
||||
@ -131,7 +131,6 @@ GET_SCORP_RAM: IN A,(SLOT3)
|
||||
;°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°;
|
||||
|
||||
|
||||
|
||||
;-----------------------------------------------------------------------;
|
||||
;!TODO § ¤¥©á⢮¢ âì
|
||||
GOTO_SPEC: IN A,(SLOT3)
|
||||
|
||||
Loading…
Reference in New Issue
Block a user