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

 FT_MVERSION()
 Get the mouse driver version
------------------------------------------------------------------------------

 Syntax

     FT_MVERSION( <@nMinor>, <@nType>, <@nIRQ>  ) -> <nMajor>

 Arguments

    <nMinor>  is the Minor version number. PASSED BY REFERENCE.
    <nType>   is the Mouse type. PASSED BY REFERENCE.
                  1 = Bus Mouse
                  2 = Serial Mouse
                  3 = InPort Mouse
                  4 = PS/2 Mouse
                  5 = HP Mouse
    <nIRQ>    is the IRQ number used for the mouse. PASSED BY REFERENCE.
                  0 = PS/2
                  2,3,4,5 or 7 = IRQ number

 Returns

    <nMajor> which is the major version number of the mouse driver.

 Description

    This function returns the current values of the mouse driver version
    number and type. The major version would be 6 and the minor version
    would be 10 if the driver were version 6.10. The mouse type and IRQ
    numbers are also returned.

    NOTE: It appears that the values reported when one starts the mouse
    driver actually have the minor version in hexadecimal! Thus on bootup
    my screen showed 6.24 but this routine returned 30 for the minor version
    number!

 Examples

    nMajor=FT_MVERSION( @nMinor )
    IF (nMajor+nMinor/100)<7.2
         ? "Sorry mouse driver version too old"
         RETURN
    ENDIF

 Source: MOUSE1.PRG

 Author: Leo Letendre