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

 cursortype()        Modify the cursor shape
------------------------------------------------------------------------------
 Declaration
   screen.hdr

 Syntax
   proc cursortype extern
   param value uint uStartLine, ;
         value uint uEndline

 Arguments
   uStartLine is the starting scan line of the cursor.

   uEndLine is the ending scan line of the cursor.

 Return
   None.

 Description
   cursortype() allows the modification of the cursor shape. Depending upon
   the video adapter card, valid entries for uStartLine and uEndLine are:

   CGA, EGA, VGA: 0 to  7
   MDA:           0 to 13

 Example
   #define EXAMPLE_SCREEN
   #include example.hdr

   proc Test_cursortype
   cursortype( 0, 7 )    // define a block cursor for color adapters
   wait
   cursortype( 6, 7 )    // define a line cursor on a color adapter
   wait
   cursortype( 11, 12 )  // define a line cursor on a Hercules adtapter
   wait
   endproc

   proc main
   Test_cursortype()
   endproc