Merge pull request #452 from paulscottrobson/cursorset

Ability to set cursor
paulscottrobson · Apr 13, 2024 · 255daef · 255daef
2 parents ec77677 + c06aa41
commit 255daef
Show file tree

Hide file tree

Showing 5 changed files with 2 additions and 4 deletions.
diff --git a/basic/sources/commands/hardware/mouse.asm b/basic/sources/commands/hardware/mouse.asm
@@ -58,7 +58,6 @@ _MOControl:
 		.DoSendMessage  					; set mouse visibility
 		.byte 	11,2
 		.DoWaitMessage
-
 		rts
 
 		;
@@ -84,7 +83,6 @@ _MOTo:
 		.DoSendMessage  					; set mouse position.
 		.byte 	11,1
 		.DoWaitMessage
-
 		rts
 
 		.send code

diff --git a/basic/test.bsc b/basic/test.bsc
@@ -2,7 +2,7 @@
 '	BASIC Mouse cursor manipulation
 '
 mouse show
-mouse cursor 1
+mouse cursor 2
 cls:line 0,0 ink 3 to 100,100
 mouse to 260,180
 repeat

diff --git a/documents/release/basic.odt b/documents/release/basic.odt
diff --git a/documents/release/basic.pdf b/documents/release/basic.pdf
diff --git a/firmware/common/config/miscellany/group11_mouse.inc b/firmware/common/config/miscellany/group11_mouse.inc
@@ -42,5 +42,5 @@ GROUP 11 Mouse
     FUNCTION 5 Select mouse Cursor
         *DERROR = CURSetCurrent(DPARAMS[0]);                
     DOCUMENTATION
-        Select a mouse cursor in \Param{0} ; returns error status.
+        Select a mouse cursor in \Param{0} ; returns error status if the cursor is not available.