Click above to get retro games delivered to your door ever month!

 iscursor()          Determine cursor visibility
------------------------------------------------------------------------------
 Declaration
   screen.hdr

 Syntax
   func logical iscursor extern

 Arguments
   None.

 Return
   A logical indicating the visibility of the cursor.

 Description
   This function returns the current state of the cursor, i. e. if it is
   visible, or hidden. The function reads the internal cursor status flag
   which is controlled by the cursor() function. This means that changes
   of the cursor shape using the function cursortype() will not be recognized
   by this function.

 Example
   #define EXAMPLE_SCREEN
   #include example.hdr

   proc Test_iscursor
   ? iscursor()                   // .T.
   cursor( .f. )
   ? iscursor()                   // .F.
   cursor( .t. )
   ? iscursor()                   // .T.
   endproc

   proc main
   Test_iscursor()
   endproc