some fixes with "Current dir" logic

DSS/DRV-MAIN.ASM

@@ -141,7 +141,7 @@ A0038:                          ;
 ;         PUSH	IY              ;
 ;         CALL	KEYSCAN         ;
 ;         LD	C,#80           ;
-;         RST	#30             ;
+;         RST	ToDSS.Mouse     ;
 ;         POP	IY              ;
 ;         POP	IX              ;
 ;         POP	HL              ;

DSS/DSS-MAIN.ASM

@@ -153,7 +153,7 @@ INT_:	PUSH	AF              ;
         PUSH	IY              ;
         CALL	KEYSCAN         ;
         LD	C,#80           ;
-        RST	#30             ;
+        RST	ToDSS.Mouse     ;
         IFN    CLASSIC_CURSOR   ;
          CALL	cursor_interrupt; ¢¥ªâ®à ®¡á«ã¦. ªãàá®à  ;!!!!! VASIL
         ENDIF                   ;
@@ -286,11 +286,11 @@ F_START: DI
         RET     C                       ;R10
 	CALL	KINIT	
 	CALL	PRINT_INIT
-	LD	C,0			;!HARDCODE
-	RST	#30			;!HARDCODE
+	LD	C,Dss.Mouse.Init
+	RST	ToDSS.Mouse
 	LD	A,(VMODE)
-	LD	C,#81			;!HARDCODE
-	RST	#30			;!HARDCODE
+	LD	C,Dss.Mouse.SetVideoMode
+	RST	ToDSS.Mouse
 	;CALL	INITDVC	                ;R05
         ;R05
 	 LD	C,Dss.DRV.Init	

DSS/INTMOUSE.ASM

@@ -78,13 +78,13 @@ DMOUSE	EQU	#1A     ; !FIXIT
 ;---------------------------------------------
 ; COMMAND 0Dh (RESERVED)
 ;---------------------------------------------
-; COMMAND 0Eh (GET SENSETIVE)
-;  OUTPUT: H - VERTICAL	SENSETIVE
-;	   L - HORIZONTAL SENSETIVE
+; COMMAND 0Eh (GET SENSITIVE)
+;  OUTPUT: H - VERTICAL	SENSITIVE
+;	   L - HORIZONTAL SENSITIVE
 ;---------------------------------------------
-; COMMAND 0Fh (SET SENSETIVE)
-;   INPUT: H - VERTICAL	SENSETIVE
-;	   L - HORIZONTAL SENSETIVE
+; COMMAND 0Fh (SET SENSITIVE)
+;   INPUT: H - VERTICAL	SENSITIVE
+;	   L - HORIZONTAL SENSITIVE
 ;---------------------------------------------
 ; COMMAND 80h (MOUSE HARDWARE INTERRUPT)
 ;---------------------------------------------
@@ -358,8 +358,8 @@ MS_MASK
 	XOR	A
 	RET 
 
-; H - VERTICAL SENSETIVE
-; L - HORIZONTAL SENSETIVE
+; H - VERTICAL SENSITIVE
+; L - HORIZONTAL SENSITIVE
 
 MS_SENT
 	LD	(SENSEXY),HL

DSS/KEYINTER.ASM

@@ -357,7 +357,7 @@ K_CLEAR	LD	A,(HOST)
 	CP	B
         JR      C,.error
         LD      C,B
-        JP      #10       
+        JP      RST_10
 .error:	LD	A,DSS_Error.sys.INVALID_FUNCTION
 	SCF
 	RET

DSS/VIDEO.ASM

@@ -416,10 +416,10 @@ SETVMOD:;BIT	7,A
 	JR	Z,.NOMODE
 	DEC	A
         LD	HL,TAB_40x32
-	JP	Z,T_40_32
+	JR	Z,T_40_32
 	DEC	A
         LD	HL,TAB_80x32
-	JP	Z,T_80_32
+	JR	Z,T_80_32
 .NOMODE: POP	IX
         LD	A,DSS_Error.sys.INVALID_VIDEO_MODE
 	SCF 
@@ -460,8 +460,8 @@ GRAPH_NEXT:
 	AND	#01
 	OUT	(SCREEN_SWITCH),A
 	LD	A,(VMODE)
-	LD	C,#81
-	RST	#30
+	LD	C,Dss.Mouse.SetVideoMode
+	RST	ToDSS.Mouse
         SAFE_PORTY
 	XOR	A
 	RET 

DSS/build.txt

@@ -1 +1 @@
-503
+507

SHELL/SHELL_EXEC.ASM

@@ -151,12 +151,17 @@ RUN_EXT: ex	de,hl			;
 
 A839D:	ld	bc,0*256 + Dss.Exec	; § £à. ¨ ¢ë¯®«­¨âì ¯à®£à ¬¬ã
 	RST	ToDSS
-        ;R10
-        CALL    Restore_Screen
-        ;R10	
+
+	;[x] 01/11/23	;!TEST
+	 PUSH	AF
+	 CALL	RESTORE_ALL
+	 POP	AF
+	;
+
 	;[x] 25/10/23
 	 JP	NC,Ret_New_Line		; Ok
 	;
+
 	ld	hl,(D8374)
 	cp	DSS_Error.sys.FILE_NOT_FOUND
 	jr	nz,A83DD
@@ -197,10 +202,13 @@ A83B7:	ld	e,b
 ; hl=¨¬ï ä ©« 
 A83D7:	ld	bc,0*256 + Dss.Exec	; § £à㧨âì ¯à®£à ¬¬ã, ¢ë¯®«­¨âì ä ©«
 	RST	ToDSS
-        ;R10
-         CALL    Restore_Screen
-        ;R10
+	
+	;[x] 01/11/23	;!TEST
+	 PUSH	AF
+	 CALL	RESTORE_ALL
+	 POP	AF
 	;
+
 	;[x] 25/10/23
 	 JP	NC,Ret_New_Line	; Ok
 	;
@@ -215,4 +223,23 @@ Ret_New_Line:
 	XOR	A
 	OR	E
 	RET	Z
-	jp	newline
+	jp	newline
+
+RESTORE_ALL:
+	;[x] 01/11/23	;!TEST
+	 CALL	save_disk_path
+	 ;
+	 LD	A,(screen_path)
+	 SUB	'A'
+	 LD	C,Dss.ChDisk
+	 RST	ToDSS
+	 ;
+	 LD	HL,system_path
+	 LD	C,Dss.ChDir
+	 RST	ToDSS
+	;
+        ;R10
+         CALL	Restore_Screen
+        ;R10
+	;
+	RET

SHELL/build.txt

@@ -1 +1 @@
-88
+94