+ K_SETUP: две новые подфункции для вкл/выкл курсора

DSS/KEYINTER.ASM

@@ -110,7 +110,7 @@ UNCODE		DW	0	;
 
 
 
-WAITKEY	LD	HL,HOST
+WAITKEY:	LD	HL,HOST
 		LD	A,(HEAD)
 		CP	(HL)
 		JR	Z,WAITKEY
@@ -118,8 +118,9 @@ WAITKEY	LD	HL,HOST
 		LD	A,E
 		AND	A
 		RET
+;
 
-SCANKEY	LD	HL,HOST
+SCANKEY:	LD	HL,HOST
 		LD	A,(HEAD)
 		CP	(HL)
 		RET	Z
@@ -209,6 +210,7 @@ ECHOKEY:        CALL	Cursor_On	                ;
                 LD	A,E
                 AND	A
                 RET
+;
 
 Cursor:		;!TODO «®£¨ç­¥¥ ªãàá®à®¬ ¬®à£ âì ¨ èà¨äâë ¬¥­ïâì ¨§ ¡¨®á  ¦¥?
 .Flag+1:	LD A,0                                  ; ä« £ ªãàá®à  00-­¥â/01-¥áâì
@@ -1011,12 +1013,31 @@ K_SND_R:	DJNZ	K_SND_W
 		AND	A
 		RET
 		;					subfunc 2
-K_SND_W:	;DJNZ	K_RESET_BUFFER	;. [ ] 31/03/2024		subfunc 3 ­ã¦­  «¨?
+K_SND_W:	;DJNZ	K_RESET_BUFFER	; [ ] 31/03/2024		subfunc 3 ­ã¦­  «¨?
-		DJNZ	K_SETUP.ERROR
+		DJNZ	K_CURSOR_ON	; [ ] 26/04/2025 ã¯à ¢«¥­¨¥ ¢¨¤¨¬®áâìî ªãàá®à 
 		;
 		LD	(SOUND_K),A
 		AND	A
 		RET
+;
+
+		; [ ] 26/04/2025 ã¯à ¢«¥­¨¥ ¢¨¤¨¬®áâìî ªãàá®à 
+K_CURSOR_ON:	DJNZ	K_CURSOR_OFF
+		LD	A,(VMODE)
+		RLA
+		JP	NC,Cursor_On
+		RET
+;
+
+		; [ ] 26/04/2025 ã¯à ¢«¥­¨¥ ¢¨¤¨¬®áâìî ªãàá®à 
+K_CURSOR_OFF:	DJNZ	K_SETUP.ERROR
+		LD	A,(VMODE)
+		RLA
+		JP	NC,Cursor_Off
+		RET
+;
+
+
 		;
 ; 		;. [ ] 31/03/2024			subfunc 3 ­ã¦­  «¨?
 ; K_RESET_BUFFER:	DJNZ	K_SETUP.ERROR

DSS/build.txt

@@ -1 +1 @@
-35
+36

Shared_Includes

@@ -1 +1 @@
-Subproject commit e0dd54cb5615a23ea55bd217578aab57481fcf77
+Subproject commit a6c50f572424e88f6199d639fa8109d53b71142c