Extended KotD #22: _MOUSEHIDDEN

[SMcNeill]

As life has finally started to slow down here with us getting past the holiday season and all, I finally have some time to get around to adding in the KOTD for the latest commands in version 4.0.  My apologies for the delay, but Christmas and all gets rather busy and paying bills and making a living has to come before doing these little keyword snippets and explanations for everyone. 

So, to start us off with v4.0 new keywords, let's begin with the first one I see in the version notes:  _MOUSEHIDDEN

---

This new command is about as simple as any command can get.  It's a function...  Just call it by its name.   That's it!

Syntax:  result% = _MOUSEHIDDEN

• result% a boolean value reflecting the current mouse cursor state:
  • is true (-1), if the mouse cursor is currently hidden
    
  • is false (0), if the mouse cursor is currently visible
    

That's... about as overwhelming complicated as this command gets. 

Use it like any other Function, and it returns a value of (True or -1) if the mouse cursor is hidden, or a value of (False or 0) if it's visible.

Code: (Select All)

PRINT "Move the mouse over the program window too see the changes.": PRINT



'at program start the mouse cursor is visible

IF _MOUSEHIDDEN THEN PRINT "Mouse cursor hidden" ELSE PRINT "Mouse cursor visible"

PRINT "press any key...": SLEEP: PRINT



'now hide the mouse cursor

_MOUSEHIDE

IF _MOUSEHIDDEN THEN PRINT "Mouse cursor hidden" ELSE PRINT "Mouse cursor visible"

PRINT "press any key...": SLEEP: PRINT



'and now show it again

_MOUSESHOW

IF _MOUSEHIDDEN THEN PRINT "Mouse cursor hidden" ELSE PRINT "Mouse cursor visible"

PRINT "press any key..."



END

There's honestly nothing much to add here.  If all the new keywords are this simple to implement and understand, even @Pete might be able to use them!