rIsMouse()

         Indicates if the system has a mouse

    Syntax:

         rIsMouse() -> lMouse

    Description:

         Determines if the system has a mouse and the mouse driver has been
         loaded.

    Return:

         A logic value indicating if system has a mouse.

    Example:

         If rIsMouse()
           Warning ( "Yes" )
         EndIf