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

 CURSOR() 

          While Clipper contains a CURSOR command, it can't match the
          flexibility of this one.  CURSOR provides the programmer with full
          cursor shape control as well as information regarding the current
          cursor state.

          To use the "pre-programmed" mode, simply tell CURSOR what type of
          cursor you want.  Choices are 'off', 'std', 'half' and 'full' size.
          CURSOR will automatically adjust to different monitors so there is
          no need to remember starting and ending scan lines.

          For those programmers wishing even more control, CURSOR will accept
          starting and ending scan lines to adjust the cursor shape
          accordingly.  This is an excellent way to get that "special" cursor
          for your application.

          The last function contained in CURSOR is revealed when no
          parameters are used.  No parameters informs CURSOR that you want
          the current cursor state, on or off.  If the cursor is currently
          shown on the screen, regardless of shape, a logical true (.T.) will
          be returned, otherwise a logical false (.F.) will be.


      Format: 

               cursor(['std' | 'off' | 'half' | 'full'] | [start,end])


      Parameters: 

               'std'.....Character string variable or constant, non case
                         sensitive, instructing the function to set the
                         cursor to the default for the current monitor type.

               'off'.....Character string variable or constant, non case
                         sensitive, instructing the function to set the
                         cursor off.  The cursor will not show on the current
                         monitor.

               'half'....Character string variable or constant, non case
                         sensitive, instructing the function to set the
                         cursor to one half of the total character size for
                         the current monitor type.

               'full'....Character string variable or constant, non case
                         sensitive, instructing the function to set the
                         cursor to cover the total character position for the
                         current monitor type.

               start.....Numeric variable or constant which will be used by
                         the function as the starting scan line.  Validity
                         determination is left up to the application program
                         in order to provide full flexibility.  Specifying
                         START assumes an END will be specified and is
                         mutually exclusive from the pre-programmed parameter
                         types.

               end.......Numeric variable or constant which will be used by
                         the function as the ending scan line.  Validity
                         determination is left up to the application program
                         in order to provide full flexibility.  Specifying
                         END assumes a START was specified and is mutually
                         exclusive from the pre-programmed parameter types.

               ()........If no parameters are given to the function, it will
                         return indicating whether the cursor is currently
                         displayed or not.


      Examples: 

               1.   Set the cursor to one half of the current size and then
                    turn it off for some other activity.

                    .
                    .
                    .
                    cursor('half')
                    .
                    .
                    .
                    cursor('off')
                    .
                    .
                    .

               2.   Change the cursor to a special shape.

                    .
                    .
                    .
                    cursor(2,7)
                    .
                    .
                    .

               3.   Determine if the cursor is currently displayed and turn
                    it off if it is.

                    .
                    .
                    .
                    if cursor()
                         cursor('off')
                    endif
                    .
                    .
                    .


      Returns: 

               .T.  .....If no parameters were specified a return of a
                         logical true indicates that the cursor is currently
                         shown on the display.

               .F.  .....If no parameters were specified a return of a
                         logical false indicates that the cursor is not
                         currently shown on the display.


      Cautions: 

               None.