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

  Name:     _isbutton() - check if a mouse button has been pressed
  Usage:    <logical> = _isbutton(<button>)
  Params:   integer <button> : 0=left, 1=right, (2=middle PC mouse)
  Returns:  .T. if button pressed, .F. if not

 ---------------------------------- Example ---------------------------------

                 if .not. _isbutton(1)
                      loop
                 else
                      mvar = m_row()
                 endif

  Note:     _isbutton() acts like isbutton() except that it does not clear
            lastkey(), does not return a key value, and is not a wait state.