CONST MINIMUM_DISK_SPACE = 2048 ' For Minimum install
' Procs
CONST PROC_HELP = "FHelpDlgProc"
DECLARE FUNCTION ExitWindowsExec LIB "USER.EXE" (szEXE$, szParams$) AS INTEGER
DECLARE FUNCTION GetActiveWindow lib "User" () as integer
DECLARE FUNCTION SetWindowPos lib "User" (hwnd as integer, hwnd as integer, i as integer, i as integer, i as integer, i as integer, w as integer) as integer
DECLARE FUNCTION Ctl3dRegister LIB "CTL3D.DLL" (hInst%) AS INTEGER
DECLARE FUNCTION Ctl3dUnregister LIB "CTL3D.DLL" (hInst%) AS INTEGER
DECLARE FUNCTION Ctl3dAutoSubClass LIB "CTL3D.DLL" (hInst%) AS INTEGER
DECLARE FUNCTION OnWin3x LIB "setuphlp.DLL" AS INTEGER
DECLARE FUNCTION VflatdPresent LIB "setuphlp.DLL" AS INTEGER
DECLARE FUNCTION GetRealSystemDir LIB "setuphlp.DLL" (szDir$,cbBuf%) AS INTEGER
DECLARE FUNCTION RestartWindows LIB "setuphlp.DLL" AS INTEGER
DECLARE FUNCTION IsWin32FileNewer LIB "setuphlp.DLL" (szOrig$,szNew$) AS INTEGER
DECLARE SUB RenameFilePlease LIB "setuphlp.DLL" (szOrig$,szNew$)
DECLARE FUNCTION FIsVGA LIB "mscuistf.dll" AS INTEGER
DECLARE FUNCTION FIs256Colour LIB "mscuistf.dll" AS INTEGER
DECLARE FUNCTION Welcome() AS INTEGER
DECLARE FUNCTION TestSystem() AS INTEGER
DECLARE FUNCTION GetDiskSpaceNeeded(drive%) AS LONG
DECLARE SUB Initialise(prodName$, defInstallPath$, msgCaption$)
DECLARE SUB DeInitialise()
DECLARE SUB AskQuit()
DECLARE SUB BadPath()
DECLARE SUB NetworkDrive()
DECLARE SUB UpdateIndeoAVIDrivers()
DECLARE SUB UpdateWinGDrivers()
'DECLARE SUB UpdateProgramManager(prodName$, appExeFile$, appPengeFile$, readmeFile$, readmeStr$, onCDROM%)
'DECLARE SUB UpdateProgramManagerAlt(prodName$, readmeName$, appExeFile$, appPengeFile$, readmeFile$, readmeStr$, onCDROM%)
DECLARE FUNCTION MakePath (szDir$, szFile$) AS STRING
DECLARE FUNCTION GetRealWindowsSysDir AS STRING
DECLARE SUB UpdateWinG32 (szOrig$)
DECLARE SUB InitCommonInstall()
DECLARE FUNCTION LicenseAgreement() AS INTEGER
DECLARE FUNCTION Win32sRequiredDLG() AS INTEGER
DECLARE FUNCTION UpdateADPCMDrivers() AS INTEGER
DECLARE FUNCTION EndCommonInstall( AppReadmeFile$, InRoot%, szEditorExe$ ) AS INTEGER
DECLARE FUNCTION HandleRestart() AS INTEGER
DECLARE FUNCTION InstallQTW() As Integer
' SetWindowPos() flags
const SWP_NOSIZE = &H0001
const SWP_NOMOVE = &H0002
const SWP_NOACTIVATE = &H0010
const SWP_SHOWWINDOW = &H0040
const SWP_HIDEWINDOW = &H0080
const HWND_TOP = (0)
const HWND_BOTTOM = (1)
const HWND_TOPMOST = (-1)
const HWND_NOTOPMOST = (-2)
'Dialog Box ID's
CONST DLG_ABORT =100
CONST DLG_ADDSYSTEMSOFT =101
CONST DLG_ADPCMHELP =102
CONST DLG_AWFULMACHINE =103
CONST DLG_BADEXIT =110
CONST DLG_BADVGA =111
CONST DLG_BADPATH =112
CONST DLG_BILLBOARD =113
CONST DLG_CUSTOM =120
CONST DLG_CUSTOMHELP =121
CONST DLG_DESTPATH =130
CONST DLG_DONEVIDEO =131
CONST DLG_DONENOVIDEO =132
CONST DLG_EXITFAILNOTENH =140
CONST DLG_EXITFAILNOTINTEL =141
CONST DLG_EXITFAILNOTWIN31 =142
CONST DLG_EXITFAILRUNAPP =143
CONST DLG_FREECELLINST =150
CONST DLG_INSTALLQTW =180
CONST DLG_LICENSE =210
CONST DLG_MAILMAN =220
CONST DLG_NOSPACE =230
CONST DLG_NEEDS31 =231
CONST DLG_NOMOUSE =232
CONST DLG_NOT256 =233
CONST DLG_NOSYSSOFT =234
CONST DLG_NODISKSPACE =235
CONST DLG_NEEDSWIN32S =236
CONST DLG_NETWORKDRIVE =237
CONST DLG_PATHHELP =240
CONST DLG_POORMACHINE =241
CONST DLG_PROGMANGROUP =242
CONST DLG_PROGMANGRP =243
CONST DLG_QUIT =250
CONST DLG_SPEED =270
CONST DLG_SUCCESS =271
CONST DLG_URKADPCM =290
CONST DLG_WELCOME =310
CONST DLG_WELHELP =311
CONST DLG_WRONGADPCM =312
CONST DLG_WHIZZHELP =313
'Bitmap ID
CONST IDB_BITMAP =1000
' Error messages
CONST ERR_OK = 100
CONST ERR_EXITFAIL = 101
CONST ERR_WINVERFAIL = 102
CONST ERR_NODISKSPACE = 103
' Navigation messages
CONST NAV_FORWARD = 0
CONST NAV_BACK = 1
CONST NAV_EXIT = 2
CONST NAV_RUN = 3
GLOBAL szWinPath As String
GLOBAL szWinSysPath As String
GLOBAL szWinDrive As String
GLOBAL szSrcSetupPath As String
GLOBAL szSrcBinPath As String
GLOBAL szDestPath As String
GLOBAL szOldDestPath As String
GLOBAL szPengePath As String
GLOBAL szINFPath As String
GLOBAL szAppINIPath As String
GLOBAL szMsgCaption As String
GLOBAL szButton As String
GLOBAL szMinimalInstall As String
GLOBAL szAddPMItem As String
GLOBAL szExpressCustomChoice As String
GLOBAL szMMappPath As String
GLOBAL szInstExePath As String
GLOBAL szInstExeDate As String
GLOBAL szCdExePath As String
GLOBAL szCdExeDate As String
GLOBAL szCopyright As String
GLOBAL szFullSampPath As String
GLOBAL szSampINIPath As String
GLOBAL szSampData As String
GLOBAL szSampVersion As String
GLOBAL szMsacmPriority1 As String
GLOBAL szMsacmPriority2 As String
GLOBAL szMsacmPriority3 As String
GLOBAL bInstalledWin32s As Integer
GLOBAL APPLICATION_INI_FILE As String
GLOBAL APPLICATION_EXE_FILE As String
GLOBAL APPLICATION_PENGE_FILE As String
GLOBAL szDKRegIni As String ' MMAPP.INI
GLOBAL fPreviousMode As Integer
GLOBAL fWillNotFit As Integer
GLOBAL fSystemUpdated As Integer
GLOBAL hDlg As Integer
GLOBAL dButton As Integer
GLOBAL dWinDrive As Integer
GLOBAL dDestDrive As Integer
GLOBAL dCursor As Integer
GLOBAL hwndSetup As Integer
GLOBAL OS_Windows95 As Integer
' This file needs the above globals etc for it's functions
'$INCLUDE 'product.inc' 'Defines which change for every product
