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

 Check if application is running in a windows dos box.
------------------------------------------------------------------------------

 Syntax

        GT_WindMode() --> nWindMode

 Arguments:

      None

 Returns:

      A Numeric value. (0, 2 or 3)

 Description:

      GT_WindMode() can be used to see if your application is running
      under MS Windows 3.1 and in what mode.

 Examples:

      nWindMode := GT_WindMode
      DO CASE nWindMode
         CASE nWindMode == 0
              ? "Not running in a Windows DOS box"
         CASE nWindMode == 2
              ? "Running in a Windows DOS box (Standard mode)
         CASE nWindMode == 3
              ? "Running in a Windows DOS box (Enhanced mode)
      ENDCASE

 Source: GT_WINDM.ASM

 Author:  Lee Rothman