Freecommander XE

Script By Bela Bodon
Tested with opsi 4.0.1
Tested with opsi-winst 4.10.x - 4.11.1.6
Tested with Windows XP Professional and Windows 7 Ultimate x86/x64

Installation / Uninstallation Script for FreeCommander XE

This script uses the check_innosetup-exitcode script: https://forum.opsi.org/wiki/userspace:check_innosetup-exitcode

The installation file can be downloaded from: http://www.freecommander.com/fc_downl_en.htm

[Initial]
 
	Message = Please wait, product is installing...
	setLogLevel = 6
	ExitOnError = false
	ScriptErrorMessages = on
	TraceMode = off
	StayOnTop = false
 
[Actions]
 
	DefVar $OS$
		Set $OS$ = GetOS
	DefVar $NTVersion$
		Set $NTVersion$ = GetNTVersion
	DefVar $ExitCode$
	DefVar $ProductName$
		Set $ProductName$ = "FreeCommander XE"
	DefVar $ProductNameFull1$
		Set $ProductNameFull1$ = "FreeCommander XE"
	DefVar $ProductPicture$
		Set $ProductPicture$ = "freecommander.png"
	Message "Installing "+$ProductNameFull1$
	requiredWinstVersion >= "4.10"
 
	ShowBitmap /3 "%scriptpath%\" + $ProductPicture$ $ProductName$
 
	if not (HasMinimumSpace ("%SYSTEMDRIVE%", "20 MB"))
		LogError "Not enough space on %SYSTEMDRIVE%"
			isFatalError
	endif
 
	if ( $NTVersion$ = "Win2K" OR $NTVersion$ = "WinXP" OR $NTVersion$ = "Win NT 5.2" OR $NTVersion$ = "Windows Vista" )
		Winbatch_Install
			sub "%ScriptDrive%\install\check_exitcode\check_innosetup-exitcode.ins"
 
	else
		LogError "Incompatible system"
			isFatalError
	endif
 
 
[Winbatch_Install]
	%SCRIPTPATH%\FreeCommanderXE_setup.exe /VERYSILENT /SP- /NORESTART

[Initial]
 
	Message = Please wait, product is uninstalling...
	setLogLevel = 6
	ExitOnError = false
	ScriptErrorMessages = on
	TraceMode = off
	StayOnTop = false
 
[Actions]
 
	DefVar $ProductName$
		Set $ProductName$ = "FreeCommander XE"
 
	DefVar $ProductNameFull1$
		set $ProductNameFull1$ = "FreeCommander XE"
 
	DefVar $ProductPicture$
		Set $ProductPicture$ = "freecommander.png"
 
	DefVar $ExitCode$
 
	Message "Uninstalling "+$ProductNameFull1$
 
	ShowBitmap /3 "%scriptpath%\" + $ProductPicture$ $ProductName$
 
	DefVar $SystemType$
		Set $SystemType$ = GetSystemType
 
Winbatch_Uninstall
	sub "%ScriptDrive%\install\check_exitcode\check_innosetup-exitcode.ins"
 
[Winbatch_Uninstall]
 
	"%ProgramFilesSysnativeDir%\FreeCommander XE\unins000.exe" /VERYSILENT /NORESTART