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

 twM2Click( nClick, nButton, nWait, nRow, nCol, nStart )
 ----------------------------------------------------------------------------
     Double Click

       Arguments:

     nClick  - 'N' 0 - no check for the first press. Wait the
                       specified period for a single press.

                   NIL or not 0 - wait for two presses of the button.

                   The zero parameter is used when calling this
                   routine from one which has responded to a button
                   press.

     nButton - 'N' Button number.

     nWait   - 'N' Time to wait for the first click if requested and
                   the time to wait for the second.  One half second is
                   the default

     nRow    - 'N' Row for a double click. Defaults to the current row.

     nCol    - 'C' Column number a double click. Defaults to the
                   current column

     nStart  - 'N' Optional start time to wait for the first click ( of
                   either one or two requested ).  Defaults to the time
                   at entry.  This is used to check for double clicks
                   when called from another routine which has responded
                   to a click.

       Return:

     TRUE if a double click occurred.

       Example:

     IF twMFound( 10, 10, 11, 20 )  .AND. ;
             twM2Click( 0, 1,, twMGetXPress(), twMGetYPress())
           // do something
     ENDIF