mirror of
https://github.com/Tolik-Trek/UserMenu.git
synced 2026-11-07 09:29:53 +03:00
...
This commit is contained in:
1 parent
c54d5d0eb8
commit
8b43cc426b
1 file changed
+13
-9
@@ -71,6 +71,18 @@ M_ALLOK
|
||||
LD (HL),0
|
||||
LDIR
|
||||
|
||||
|
||||
LD C,Dss.CurDisk
|
||||
RST ToDSS
|
||||
ADD A,'A'
|
||||
LD (WorkDir),A
|
||||
LD A,':'
|
||||
LD (WorkDir+1),A
|
||||
LD C,Dss.CurDir
|
||||
LD HL,WorkDir+2
|
||||
RST ToDSS
|
||||
|
||||
|
||||
POP HL
|
||||
CALL EX_COMMAND_LINE
|
||||
|
||||
@@ -275,15 +287,7 @@ INIT: XOR A
|
||||
; XOR A
|
||||
; LD (HL),A
|
||||
;
|
||||
LD C,Dss.CurDisk
|
||||
RST ToDSS
|
||||
ADD A,'A'
|
||||
LD (WorkDir),A
|
||||
LD A,':'
|
||||
LD (WorkDir+1),A
|
||||
LD C,Dss.CurDir
|
||||
LD HL,WorkDir+2
|
||||
JP ToDSS
|
||||
RET
|
||||
;
|
||||
|
||||
HNDMEM DB 0
|
||||
|
||||
Reference in new issue
Block a user