#NoTrayIcon #RequireAdmin #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=icon.ico #AutoIt3Wrapper_Outfile=..\Autodesk Loader.exe #AutoIt3Wrapper_Compression=0 #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\3dsmax.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\autocad.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\combustion.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\composite.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\imagemodeler.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\matchmover.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\maya.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\mudbox.ico #AutoIt3Wrapper_Res_Icon_Add=P:\Autoit projects\Loaders\Autodesk Loader\Source\stitcher.ico #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** FileInstall ("instsrv.exe",@TempDir & "\instsrv.exe",1) #region ;Tray Opt("TrayOnEventMode",1) Opt("TrayMenuMode",1) $MainMenu = TrayCreateMenu ("Application Priority") $TrayMax = TrayCreateMenu ("3DSMax",$MainMenu) TrayCreateItem ("Normal",$TrayMax) TrayItemSetOnEvent(-1,"_MaxNormal") TrayCreateItem ("Lower",$TrayMax) TrayItemSetOnEvent(-1,"_MaxLower") TrayCreateItem ("Low",$TrayMax) TrayItemSetOnEvent(-1,"_Maxlow") $Trayacad = TrayCreateMenu ("AutoCad",$MainMenu) TrayCreateItem ("Normal",$Trayacad) TrayItemSetOnEvent(-1,"_acadNormal") TrayCreateItem ("Lower",$Trayacad) TrayItemSetOnEvent(-1,"_acadLower") TrayCreateItem ("Low",$Trayacad) TrayItemSetOnEvent(-1,"_acadlow") $Traycombustion = TrayCreateMenu ("Combustion",$MainMenu) TrayCreateItem ("Normal",$Traycombustion) TrayItemSetOnEvent(-1,"_combustionNormal") TrayCreateItem ("Lower",$Traycombustion) TrayItemSetOnEvent(-1,"_combustionLower") TrayCreateItem ("Low",$Traycombustion) TrayItemSetOnEvent(-1,"_combustionlow") $Traycomposite = TrayCreateMenu ("Composite",$MainMenu) TrayCreateItem ("Normal",$Traycomposite) TrayItemSetOnEvent(-1,"_compositeNormal") TrayCreateItem ("Lower",$Traycomposite) TrayItemSetOnEvent(-1,"_compositeLower") TrayCreateItem ("Low",$Traycomposite) TrayItemSetOnEvent(-1,"_compositelow") $TrayImageModeler = TrayCreateMenu ("Image Modeler",$MainMenu) TrayCreateItem ("Normal",$TrayImageModeler) TrayItemSetOnEvent(-1,"_ImageModelerNormal") TrayCreateItem ("Lower",$TrayImageModeler) TrayItemSetOnEvent(-1,"_ImageModelerLower") TrayCreateItem ("Low",$TrayImageModeler) TrayItemSetOnEvent(-1,"_ImageModelerlow") $TrayMatchMoverApp = TrayCreateMenu ("MatchMover",$MainMenu) TrayCreateItem ("Normal",$TrayMatchMoverApp) TrayItemSetOnEvent(-1,"_MatchMoverAppNormal") TrayCreateItem ("Lower",$TrayMatchMoverApp) TrayItemSetOnEvent(-1,"_MatchMoverAppLower") TrayCreateItem ("Low",$TrayMatchMoverApp) TrayItemSetOnEvent(-1,"_MatchMoverApplow") $Traymaya = TrayCreateMenu ("Maya",$MainMenu) TrayCreateItem ("Normal",$Traymaya) TrayItemSetOnEvent(-1,"_mayaNormal") TrayCreateItem ("Lower",$Traymaya) TrayItemSetOnEvent(-1,"_mayaLower") TrayCreateItem ("Low",$Traymaya) TrayItemSetOnEvent(-1,"_mayalow") $Traymudbox = TrayCreateMenu ("MudBox",$MainMenu) TrayCreateItem ("Normal",$Traymudbox) TrayItemSetOnEvent(-1,"_mudboxNormal") TrayCreateItem ("Lower",$Traymudbox) TrayItemSetOnEvent(-1,"_mudboxLower") TrayCreateItem ("Low",$Traymudbox) TrayItemSetOnEvent(-1,"_mudboxlow") $TrayStitcherUnlimited = TrayCreateMenu ("Stitcher Unlimited",$MainMenu) TrayCreateItem ("Normal",$TrayStitcherUnlimited) TrayItemSetOnEvent(-1,"_StitcherUnlimitedNormal") TrayCreateItem ("Lower",$TrayStitcherUnlimited) TrayItemSetOnEvent(-1,"_StitcherUnlimitedLower") TrayCreateItem ("Low",$TrayStitcherUnlimited) TrayItemSetOnEvent(-1,"_mayalow") TrayCreateItem("Exit") TrayItemSetOnEvent(-1,"_Exit") ;_Exit is the function name TraySetState() #endregion If FileExists (@ScriptDir & "\3dsmax.exe") = 1 Then Elseif FileExists (@ScriptDir & "\acad.exe") = 1 Then Elseif FileExists (@ScriptDir & "\combustion.exe") = 1 Then Elseif FileExists (@ScriptDir & "\composite.exe") = 1 Then Elseif FileExists (@ScriptDir & "\ImageModeler.exe") = 1 Then Elseif FileExists (@ScriptDir & "\MatchMoverApp.exe") = 1 Then Elseif FileExists (@ScriptDir & "\maya.exe") = 1 Then Elseif FileExists (@ScriptDir & "\mudbox.exe") = 1 Then Elseif FileExists (@ScriptDir & "\StitcherUnlimited.exe") = 1 Then Else MsgBox(16,"Error"," Loader did not find any Autodesk product executable." & @CRLF & "Place Loader next to program executable and try again.") exit EndIf Global $Saved = (StringLeft (@ScriptFullPath,3) & "Saved\Autodesk") Global $UserLocal = RegRead('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders', 'Local AppData') Global $UserRoaming = @AppDataDir Global $Documents = @MyDocumentsDir Global $AllUsersProgramData = @AppDataCommonDir Global $Run = FileRead ($Saved & "\LoaderStatus") If $Run = "Running" Then TrayTip ("Starting application","Please wait",3) ShellExecute (@ScriptDir & "\3dsmax.exe") ShellExecute (@ScriptDir & "\combustion.exe") ShellExecute (@ScriptDir & "\ImageModeler.exe") ShellExecute (@ScriptDir & "\mudbox.exe") ShellExecute (@ScriptDir & "\maya.exe") ShellExecute (@ScriptDir & "\StitcherUnlimited.exe") ShellExecute (@ScriptDir & "\acad.exe") ShellExecute (@ScriptDir & "\MatchMoverApp.exe") ShellExecute (@ScriptDir & "\composite.exe") EndIf Global $FirstRun = "0" If FileExists ($Saved & "\AutodeskLoaderTimeStamp") = 0 Then Assign ("FirstRun",1) FileWrite ($Saved & "\AutodeskLoaderTimeStamp",'') EndIf Global $LocalTime = StringTrimRight (FileGetTime (@UserProfileDir & "\AutodeskLoaderTimeStamp",0,1),2) Global $RemoteTime = StringTrimRight (FileGetTime ($Saved & "\AutodeskLoaderTimeStamp",0,1),2) If $LocalTime > $RemoteTime Then Assign ("FirstRun",1) If $FirstRun = "1" Then $AskToRestore = MsgBox(64+4,"Question","Looks like this loader runs for the first time." & @CRLF & "Would you like to restore now ?") If $AskToRestore = 6 Then FileDelete ($Saved & "\LoaderStatus") FileWrite ($Saved & "\LoaderStatus", "Running") _restore() _RegistryRestore() _RunApp() _backup() _registrybackup() exit Else MsgBox(16,"Information","Data was not restored. AutodeskLoaderTimeStamp will update on exit") EndIf EndIf FileDelete ($Saved & "\LoaderStatus") FileWrite ($Saved & "\LoaderStatus", "Running") _restore() _RegistryRestore() _RunApp() _backup() _registrybackup() ProcessClose ("FNPLicensingService64.exe") Exit #region ;Functions Func _restore() If FileExists ($Saved & '\Program Files\Autodesk') = 1 Then TrayTip ("Synchronizing Program Files Autodesk","Please wait",10) DirCreate (@HomeDrive & "\Program Files\Autodesk") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files\Autodesk' & '" "' & @HomeDrive & '\Program Files\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Program Files\Common Files\Autodesk') = 1 Then TrayTip ("Synchronizing Program Files Common Autodesk ","Please wait",10) DirCreate (@HomeDrive & "\Program Files\Common Files\Autodesk") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files\Common Files\Autodesk' & '" "' & @HomeDrive & '\Program Files\Common Files\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Program Files\Common Files\Autodesk Shared') = 1 Then TrayTip ("Synchronizing Program Files Common Autodesk Shared","Please wait",10) DirCreate (@HomeDrive & "\Program Files\Common Files\Autodesk Shared") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files\Common Files\Autodesk Shared' & '" "' & @HomeDrive & '\Program Files\Common Files\Autodesk Shared"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Program Files\Common Files\Macrovision Shared') = 1 Then TrayTip ("Synchronizing Program Files Common Macrovision Shared","Please wait",10) DirCreate (@HomeDrive & "\Program Files\Common Files\Macrovision Shared") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files\Common Files\Macrovision Shared' & '" "' & @HomeDrive & '\Program Files\Common Files\Macrovision Shared"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Program Files (X86)\Autodesk') = 1 Then TrayTip ("Synchronizing Program Files (X86) Autodesk","Please wait",10) DirCreate (@HomeDrive & "\Program Files (X86)\Autodesk") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files (X86)\Autodesk' & '" "' & @HomeDrive & '\Program Files (X86)\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Program Files (X86)\Common Files\Autodesk') = 1 Then TrayTip ("Synchronizing Program Files (X86) Common Autodesk","Please wait",10) DirCreate (@HomeDrive & "\Program Files (X86)\Common Files\Autodesk") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files (X86)\Common Files\Autodesk' & '" "' & @HomeDrive & '\Program Files (X86)\Common Files\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Program Files (X86)\Common Files\Autodesk Shared') = 1 Then TrayTip ("Synchronizing Program Files (X86) Common Autodesk shared","Please wait",10) DirCreate (@HomeDrive & "\Program Files (X86)\Common Files\Autodesk Shared") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files (X86)\Common Files\Autodesk Shared' & '" "' & @HomeDrive & '\Program Files (X86)\Common Files\Autodesk Shared"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Program Files (X86)\Common Files\Macrovision Shared') = 1 Then TrayTip ("Synchronizing Program Files (X86) Common macrovision shared","Please wait",10) DirCreate (@HomeDrive & "\Program Files (X86)\Common Files\Macrovision Shared") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Program Files (X86)\Common Files\Macrovision Shared' & '" "' & @HomeDrive & '\Program Files (X86)\Common Files\Macrovision Shared"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\UserLocal\Autodesk') = 1 Then TrayTip ("Synchronizing UserLocal Autodesk","Please wait",10) DirCreate ($UserLocal & "\Autodesk") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\UserLocal\Autodesk' & '" "' & $UserLocal & '\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\UserLocal\FLEXnet') = 1 Then TrayTip ("Synchronizing UserLocal FLEXnet","Please wait",10) DirCreate ($UserLocal & "\FLEXnet") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\UserLocal\FLEXnet' & '" "' & $UserLocal & '\FLEXnet"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\UserRoaming\Autodesk') = 1 Then TrayTip ("Synchronizing UserRoaming Autodesk","Please wait",10) DirCreate ($UserRoaming & "\Autodesk") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\UserRoaming\Autodesk' & '" "' & $UserRoaming & '\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\UserRoaming\FLEXnet') = 1 Then TrayTip ("Synchronizing UserRoaming FLEXnet","Please wait",10) DirCreate ($UserRoaming & "\FLEXnet") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\UserRoaming\FLEXnet' & '" "' & $UserRoaming & '\FLEXnet"',"",@SW_HIDE) EndIf If FileExists ($Saved & "\AllUsersProgramData\Autodesk") = 1 Then TrayTip ("Synchronizing AllUsersProgramData Autodesk","Please wait",10) DirCreate ($AllUsersProgramData & '\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\AllUsersProgramData\Autodesk' & '" "' & $AllUsersProgramData & '\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($Saved & "\AllUsersProgramData\FLEXnet") = 1 Then TrayTip ("Synchronizing AllUsersProgramData FLEXnet","Please wait",10) DirCreate ($AllUsersProgramData & '\FLEXnet') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\AllUsersProgramData\FLEXnet' & '" "' & $AllUsersProgramData & '\FLEXnet"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Documents\MudBox') = 1 Then TrayTip ("Synchronizing data","Please wait",10) DirCreate ($Documents & "\MudBox") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Documents\MudBox' & '" "' & $Documents & '\MudBox"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Documents\3dsmax') = 1 Then TrayTip ("Synchronizing data","Please wait",10) DirCreate ($Documents & "\3dsmax") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Documents\3dsmax' & '" "' & $Documents & '\3dsmax"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Documents\maya') = 1 Then TrayTip ("Synchronizing data","Please wait",10) DirCreate ($Documents & "\maya") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Documents\maya' & '" "' & $Documents & '\maya"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Documents\toxik') = 1 Then TrayTip ("Synchronizing toxik Documents","Please wait",10) DirCreate ($Documents & "\toxik") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Saved & '\Documents\toxik' & '" "' & $Documents & '\toxik"',"",@SW_HIDE) EndIf $ServiceFile = (@HomeDrive & "\Program Files\Common Files\Macrovision Shared\FLEXnet Publisher\FNPLicensingService.exe") $ServiceFile64 = (@HomeDrive & "\Program Files\Common Files\Macrovision Shared\FLEXnet Publisher\FNPLicensingService64.exe") if FileExists ($ServiceFile) = 1 And FileExists ($ServiceFile64) = 0 Then RunWait(@ComSpec & ' /c %TEMP%\instsrv.exe "FLEXnet Licensing Service" ' & '"' & $ServiceFile & '"') RunWait(@ComSpec & ' /c sc config "FLEXnet Licensing Service" start= demand') ElseIf FileExists ($ServiceFile) = 1 And FileExists ($ServiceFile64) = 1 Then RunWait(@ComSpec & ' /c %TEMP%\instsrv.exe "FLEXnet Licensing Service 64" ' & '"' & $ServiceFile64 & '"') RunWait(@ComSpec & ' /c sc config "FLEXnet Licensing Service 64" start= demand') ElseIf FileExists ($ServiceFile) = 0 And FileExists ($ServiceFile64) = 1 Then RunWait(@ComSpec & ' /c %TEMP%\instsrv.exe "FLEXnet Licensing Service 64" ' & '"' & $ServiceFile64 & '"') RunWait(@ComSpec & ' /c sc config "FLEXnet Licensing Service 64" start= demand') Endif EndFunc Func _RegistryRestore() TrayTip ("Synchronizing Current Autodesk registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Current Autodesk.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Current Macrovision registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Current Macrovision.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Local Autodesk registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Local Autodesk.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Local Macrovision registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Local Macrovision.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Local Discreet registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Local Discreet.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Local FLEXlm License Manager registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Local FLEXlm License Manager.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Local Wow6432Node Autodesk registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Local Wow6432Node Autodesk.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Local Wow6432Node Discreet registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Local Wow6432Node Discreet.reg"',"",@SW_HIDE) TrayTip ("Synchronizing Local Wow6432Node Macrovision registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /s "' & $Saved & '\Registry\Local Wow6432Node Macrovision.reg"',"",@SW_HIDE) EndFunc Func _RunApp() TrayTip ("Starting application","Please wait",3) If ProcessExists ("3dsmax.exe") = 0 Then RunWait (@ScriptDir & "\3dsmax.exe") If ProcessExists ("combustion.exe") = 0 Then RunWait (@ScriptDir & "\combustion.exe") If ProcessExists ("ImageModeler.exe") = 0 Then RunWait (@ScriptDir & "\ImageModeler.exe") If ProcessExists ("mudbox.exe") = 0 Then RunWait (@ScriptDir & "\mudbox.exe") If ProcessExists ("maya.exe") = 0 Then RunWait (@ScriptDir & "\maya.exe") If ProcessExists ("StitcherUnlimited.exe") = 0 Then RunWait (@ScriptDir & "\StitcherUnlimited.exe") If ProcessExists ("acad.exe") = 0 Then RunWait (@ScriptDir & "\acad.exe") If ProcessExists ("MatchMoverApp.exe") = 0 Then RunWait (@ScriptDir & "\MatchMoverApp.exe") If ProcessExists ("composite.exe") = 0 Then RunWait (@ScriptDir & "\composite.exe") FileDelete ($Saved & "\AutodeskLoaderTimeStamp") FileWrite ($Saved & "\AutodeskLoaderTimeStamp",'') FileDelete (@UserProfileDir & "\AutodeskLoaderTimeStamp") FileWrite (@UserProfileDir & "\AutodeskLoaderTimeStamp",'') FileWrite (@UserProfileDir & "\AutodeskLoaderTimeStamp",'') FileDelete ($Saved & "\LoaderStatus") EndFunc Func _backup() If FileExists (@HomeDrive & "\Program Files\Autodesk") = 1 Then TrayTip ("Synchronizing Program Files Autodesk","Please wait",10) DirCreate ($Saved & '\Program Files\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files\Autodesk' & '" "' & $Saved & '\Program Files\Autodesk"',"",@SW_HIDE) EndIf If FileExists (@HomeDrive & "\Program Files\Common Files\Autodesk") = 1 Then TrayTip ("Synchronizing Program Files Common Autodesk","Please wait",10) DirCreate ($Saved & '\Program Files\Common Files\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files\Common Files\Autodesk' & '" "' & $Saved & '\Program Files\Common Files\Autodesk"',"",@SW_HIDE) EndIf If FileExists (@HomeDrive & "\Program Files\Common Files\Autodesk Shared") = 1 Then TrayTip ("Synchronizing Program Files Common Autodesk shared","Please wait",10) DirCreate ($Saved & '\Program Files\Common Files\Autodesk Shared') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files\Common Files\Autodesk Shared' & '" "' & $Saved & '\Program Files\Common Files\Autodesk Shared"',"",@SW_HIDE) EndIf If FileExists (@HomeDrive & "\Program Files\Common Files\Macrovision Shared") = 1 Then TrayTip ("Synchronizing Program Files Common macrovision","Please wait",10) DirCreate ($Saved & '\Program Files\Common Files\Macrovision Shared') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files\Common Files\Macrovision Shared' & '" "' & $Saved & '\Program Files\Common Files\Macrovision Shared"',"",@SW_HIDE) EndIf If FileExists (@HomeDrive & "\Program Files (X86)\Autodesk") = 1 Then TrayTip ("Synchronizing Program Files (X86) Autodesk","Please wait",10) DirCreate ($Saved & '\Program Files (X86)\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files (X86)\Autodesk' & '" "' & $Saved & '\Program Files (X86)\Autodesk"',"",@SW_HIDE) EndIf If FileExists (@HomeDrive & "\Program Files (X86)\Common Files\Autodesk") = 1 Then TrayTip ("Synchronizing Program Files (X86) Common Autodesk","Please wait",10) DirCreate ($Saved & '\Program Files (X86)\Common Files\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files (X86)\Common Files\Autodesk' & '" "' & $Saved & '\Program Files (X86)\Common Files\Autodesk"',"",@SW_HIDE) EndIf If FileExists (@HomeDrive & "\Program Files (X86)\Common Files\Autodesk Shared") = 1 Then TrayTip ("Synchronizing Program Files (X86) Common Autodesk shared","Please wait",10) DirCreate ($Saved & '\Program Files (X86)\Common Files\Autodesk Shared') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files (X86)\Common Files\Autodesk Shared' & '" "' & $Saved & '\Program Files (X86)\Common Files\Autodesk Shared"',"",@SW_HIDE) EndIf If FileExists (@HomeDrive & "\Program Files (X86)\Common Files\Macrovision Shared") = 1 Then TrayTip ("Synchronizing Program Files (X86) Common Macrovision","Please wait",10) DirCreate ($Saved & '\Program Files (X86)\Common Files\Macrovision Shared') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & @HomeDrive & '\Program Files (X86)\Common Files\Macrovision Shared' & '" "' & $Saved & '\Program Files (X86)\Common Files\Macrovision Shared"',"",@SW_HIDE) EndIf If FileExists ($UserLocal & "\Autodesk") = 1 Then TrayTip ("Synchronizing UserLocal","Please wait",10) DirCreate ($Saved & '\UserLocal\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $UserLocal & '\Autodesk' & '" "' & $Saved & '\UserLocal\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($UserLocal & "\FLEXnet") = 1 Then TrayTip ("Synchronizing UserLocal","Please wait",10) DirCreate ($Saved & '\UserLocal\FLEXnet') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $UserLocal & '\FLEXnet' & '" "' & $Saved & '\UserLocal\FLEXnet"',"",@SW_HIDE) EndIf If FileExists ($UserRoaming & "\Autodesk") = 1 Then TrayTip ("Synchronizing UserRoaming","Please wait",10) DirCreate ($Saved & '\UserRoaming\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $UserRoaming & '\Autodesk' & '" "' & $Saved & '\UserRoaming\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($UserRoaming & "\FLEXnet") = 1 Then TrayTip ("Synchronizing UserRoaming","Please wait",10) DirCreate ($Saved & '\UserRoaming\FLEXnet') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $UserRoaming & '\FLEXnet' & '" "' & $Saved & '\UserRoaming\FLEXnet"',"",@SW_HIDE) EndIf If FileExists ($AllUsersProgramData & "\Autodesk") = 1 Then TrayTip ("Synchronizing programdata","Please wait",10) DirCreate ($Saved & '\AllUsersProgramData\Autodesk') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $AllUsersProgramData & '\Autodesk' & '" "' & $Saved & '\AllUsersProgramData\Autodesk"',"",@SW_HIDE) EndIf If FileExists ($AllUsersProgramData & "\FLEXnet") = 1 Then TrayTip ("Synchronizing programdata","Please wait",10) DirCreate ($Saved & '\AllUsersProgramData\FLEXnet') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $AllUsersProgramData & '\FLEXnet' & '" "' & $Saved & '\AllUsersProgramData\FLEXnet"',"",@SW_HIDE) EndIf If FileExists ($Documents & "\MudBox") = 1 Then TrayTip ("Synchronizing mudbox Documents","Please wait",10) DirCreate ($Saved & '\Documents\MudBox') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Documents & '\MudBox' & '" "' & $Saved & '\Documents\MudBox"',"",@SW_HIDE) EndIf If FileExists ($Documents & "\3dsmax") = 1 Then TrayTip ("Synchronizing 3dsmax Documents","Please wait",10) DirCreate ($Saved & '\Documents\3dsmax') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Documents & '\3dsmax' & '" "' & $Saved & '\Documents\3dsmax"',"",@SW_HIDE) EndIf If FileExists ($Documents & "\maya") = 1 Then TrayTip ("Synchronizing maya Documents","Please wait",10) DirCreate ($Saved & '\Documents\maya') RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Documents & '\maya' & '" "' & $Saved & '\Documents\maya"',"",@SW_HIDE) EndIf If FileExists ($Saved & '\Documents\toxik') = 1 Then TrayTip ("Synchronizing toxik Documents","Please wait",10) DirCreate ($Documents & "\toxik") RunWait (@ComSpec & ' /c xcopy /E/H/D/C/Y ' & '"' & $Documents & '\toxik' & '" "' & $Saved & '\Documents\toxik"',"",@SW_HIDE) EndIf EndFunc Func _registrybackup() DirCreate ($Saved & "\Registry") TrayTip ("Synchronizing registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Current Autodesk.reg" "HKEY_CURRENT_USER\SOFTWARE\Autodesk"') TrayTip ("Synchronizing registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Current Macrovision.reg" "HKEY_CURRENT_USER\SOFTWARE\Autodesk"') TrayTip ("Synchronizing registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Local Autodesk.reg" "HKEY_LOCAL_MACHINE\SOFTWARE\Autodesk"') TrayTip ("Synchronizing registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Local Macrovision.reg" "HKEY_LOCAL_MACHINE\SOFTWARE\Macrovision"') TrayTip ("Synchronizing Local Discreet registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Local Discreet.reg" "HKEY_LOCAL_MACHINE\SOFTWARE\Discreet"') TrayTip ("Synchronizing Local FLEXlm License Manager registry","Please wait",10) RunWait (@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Local FLEXlm License Manager.reg" "HKEY_LOCAL_MACHINE\SOFTWARE\FLEXlm License Manager"') TrayTip ("Synchronizing registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Local Wow6432Node Autodesk.reg" "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Autodesk"') TrayTip ("Synchronizing Local Wow6432Node Discreet registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Local Wow6432Node Discreet.reg" "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Discreet"') TrayTip ("Synchronizing registry","Please wait",10) RunWait(@WindowsDir & '\regedit.exe /e "' & $Saved & '\Registry\Local Wow6432Node Macrovision.reg" "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Macrovision"') Endfunc #EndRegion #region ;Tray Functions Func _MaxNormal() ProcessSetPriority ("3dsmax.exe",2) EndFunc Func _MaxLower() ProcessSetPriority ("3dsmax.exe",1) EndFunc Func _MaxLow() ProcessSetPriority ("3dsmax.exe",0) EndFunc Func _acadNormal() ProcessSetPriority ("acad.exe",2) EndFunc Func _acadLower() ProcessSetPriority ("acad.exe",1) EndFunc Func _acadLow() ProcessSetPriority ("acad.exe",0) EndFunc Func _combustionNormal() ProcessSetPriority ("combustion.exe",2) EndFunc Func _combustionLower() ProcessSetPriority ("combustion.exe",1) EndFunc Func _combustionLow() ProcessSetPriority ("combustion.exe",0) EndFunc Func _compositeNormal() ProcessSetPriority ("composite.exe",2) EndFunc Func _compositeLower() ProcessSetPriority ("composite.exe",1) EndFunc Func _compositeLow() ProcessSetPriority ("composite.exe",0) EndFunc Func _ImageModelerNormal() ProcessSetPriority ("ImageModeler.exe",2) EndFunc Func _ImageModelerLower() ProcessSetPriority ("ImageModeler.exe",1) EndFunc Func _ImageModelerLow() ProcessSetPriority ("ImageModeler.exe",0) EndFunc Func _MatchMoverAppNormal() ProcessSetPriority ("MatchMoverApp.exe",2) EndFunc Func _MatchMoverAppLower() ProcessSetPriority ("MatchMoverApp.exe",1) EndFunc Func _MatchMoverAppLow() ProcessSetPriority ("MatchMoverApp.exe",0) EndFunc Func _mayaNormal() ProcessSetPriority ("maya.exe",2) EndFunc Func _mayaLower() ProcessSetPriority ("maya.exe",1) EndFunc Func _mayaLow() ProcessSetPriority ("maya.exe",0) EndFunc Func _mudboxNormal() ProcessSetPriority ("mudbox.exe",2) EndFunc Func _mudboxLower() ProcessSetPriority ("mudbox.exe",1) EndFunc Func _mudboxLow() ProcessSetPriority ("mudbox.exe",0) EndFunc Func _StitcherUnlimitedNormal() ProcessSetPriority ("StitcherUnlimited.exe",2) EndFunc Func _StitcherUnlimitedLower() ProcessSetPriority ("StitcherUnlimited.exe",1) EndFunc Func _StitcherUnlimitedLow() ProcessSetPriority ("StitcherUnlimited.exe",0) EndFunc Func _Exit() FileDelete ($Saved & "\LoaderStatus") Exit EndFunc #EndRegion