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

    rInkey()

         Does the same that Inkey() but takes care of mouse

    Syntax:

         rInkey() -> nKey

    Description:

         The same that inkey() but takes care of mouse.

    Return:

         Returns the same that inKey() or 1001 if the left button is
         pressed, 1002 if the right button is pressed or 1003 if the central
         button is pressed.

    Example:

         nKey := rInkey(0)
         If nKey > 1000
           Warning ( "Mouse button pressed" )
         ElseIf nKey != 0
           Warning ( "Key pressed" )
         Else
           Warning ( "Nothing" )
         EndIf