Macrium Reflect 8 updated to include ReDeploy and accept a registration key.

Projects/PhoenixPE/Applications/Backup & Imaging/MacriumReflect8.script

@@ -29,14 +29,14 @@
 //////////////////////////////////////////////////////////////////////////////////////////////////////////
 
 [Main]
-Title=Macrium Reflect
+Title=Macrium Reflect 8
 Description=(v8.0.7783) Macrium Reflect is a complete backup solution for personal use. Protect documents, data and operating systems using advanced disk imaging technology.
 Author=Homes32
 Level=5
 Selected=False
 Mandatory=False
-Version=1.0.2.0
-Date=2024-02-11
+Version=1.1.0.0
+Date=2025-01-16
 
 [Variables]
 %ProgramFolder%="Macrium Reflect"
@@ -70,12 +70,26 @@ RegLoadHives
 // Note: Reflect is "PE-Aware" so most registry settings are ignored.
 
 // Dark Mode
-If,%cb_EnableDarkMode%,Equal,True,RegWrite,HKLM,0x4,"Tmp_Default\Software\Macrium\Common","DarkMode",1
-Else,RegWrite,HKLM,0x4,"Tmp_Default\Software\Macrium\Common","DarkMode",0
+If,%cb_EnableDarkMode%,Equal,True,RegWrite,HKLM,REG_DWORD,"Tmp_Default\Software\Macrium\Common","DarkMode",1
+Else,RegWrite,HKLM,REG_DWORD,"Tmp_Default\Software\Macrium\Common","DarkMode",0
 
 // File Assoc. - Reflect corrupts the shell menu entries on every run, but we try anyway...
 ForEach,%Ext%,%FileAssoc%,Associate,%Ext%,"%PEPrograms%\%ProgramFolder%\%ProgramExe%"
 
+// Product Registration
+If,%cmb_RegMethod%,Equal,"Trial License",RegWrite,HKLM,REG_SZ,"Tmp_Default\Software\Macrium\Reflect","License",""
+Else,If,%cmb_RegMethod%,Equal,"Import License From Host",Begin
+  If,ExistRegValue,HKLM,"Software\Macrium\Reflect","License",Begin
+    RegRead,HKLM,"Software\Macrium\Reflect","License",%Host_LicKey%
+    RegWrite,HKLM,REG_SZ,"Tmp_Default\Software\Macrium\Reflect","License",%Host_LicKey%
+  End
+  Else,Echo,"ERROR: Could not retrieve the license key from the host system. The software will run in Trial mode.",Warn
+End
+Else,Begin
+  If,%txt_LicKey%,Equal,"",Echo,"ERROR: A valid license key was not entered. The software will run in Trial mode.",Warn
+  Else,RegWrite,HKLM,REG_SZ,"Tmp_Default\Software\Macrium\Reflect","License",%txt_LicKey%
+End
+
 RegUnloadHives
 
 ///////////////////////////////////////////////////////////////////////////////////
@@ -101,7 +115,7 @@ If,%cb_PinToStartMenu%,Equal,True,PinShortcut,StartMenu,Auto,"%PEPrograms%\%Prog
 Echo,"Extracting files..."
 
 // Extract .cab files from setup
-7z,"e -y -r- #$q%ProgramsCache%\%ProgramFolder%\%SetupFile%#$q Reflect.cab LibFiles.cab -o#$q%ProjectTemp%\%ProgramFolder%\#$q"
+7z,"e -y -r- #$q%ProgramsCache%\%ProgramFolder%\%SetupFile%#$q Reflect.cab LibFiles.cab WaikFiles.cab -o#$q%ProjectTemp%\%ProgramFolder%\#$q"
 If,Not,#r,Equal,0,Halt,"Error: Failed to extract [%SetupFile%]."
 
 // Extract .cab files
@@ -113,9 +127,37 @@ Set,%IncludeFiles%,"ReflectBin.exe oledlg.dll"
 7z,"e -y -r- #$q%ProjectTemp%\%ProgramFolder%\Reflect.cab#$q %IncludeFiles% -o#$q%ProjectTemp%\%ProgramFolder%\files#$q"
 If,Not,#r,Equal,0,Halt,"Error: Failed to extract [Reflect.cab]."
 
+7z,"e -y -r- #$q%ProjectTemp%\%ProgramFolder%\WaikFiles.cab#$q WaikFiles.exe -o#$q%ProjectTemp%\%ProgramFolder%\#$q"
+If,Not,#r,Equal,0,Halt,"Error: Failed to extract [WaikFiles.cab]."
+
+; Extract Redeploy
+If,%SourceArch%,Equal,x64,Begin,
+  GetBinaryResource,"%ProjectTemp%\%ProgramFolder%\WAIKFiles.exe","DAT","##153","%ProjectTemp%\%ProgramFolder%\TaskBar.exe"
+  GetBinaryResource,"%ProjectTemp%\%ProgramFolder%\TaskBar.exe","EXE","##148","%ProjectTemp%\%ProgramFolder%\files\ReDeploy.exe"
+End
+Else,Begin
+  GetBinaryResource,"%ProjectTemp%\%ProgramFolder%\WAIKFiles.exe","DAT","##137","%ProjectTemp%\%ProgramFolder%\TaskBar.exe"
+  GetBinaryResource,"%ProjectTemp%\%ProgramFolder%\TaskBar.exe","EXE","##147","%ProjectTemp%\%ProgramFolder%\files\ReDeploy.exe" 
+End
+
 FileRename,"%ProjectTemp%\%ProgramFolder%\files\ReflectBin.exe","%ProjectTemp%\%ProgramFolder%\files\Reflect.exe"
 FileCopy,"%ProjectTemp%\%ProgramFolder%\files\*.*",#1
 
+[#ToggleRegKey#]
+// ===============================================================================================================================
+// Name...........: ToggleRegKey
+// Description....: Toggle the visibility of the registration key textbox.
+// Syntax.........: Run,%ScriptFile%,ToggleRegKey
+// Parameters.....: 
+// Return values..: 
+// Author.........: Homes32
+// Remarks........:
+// Related........: cmb_RegMethod
+// ===============================================================================================================================
+[ToggleRegKey]
+If,%cmb_RegMethod%,Equal,"Enter License Key",WriteInterface,Visible,%ScriptFile%,Interface,txt_LicKey,True
+Else,WriteInterface,Visible,%ScriptFile%,Interface,txt_LicKey,False
+
 [#DownloadProgram#]
 // ===============================================================================================================================
 // Name...........: DownloadProgram
@@ -188,6 +230,9 @@ WriteInterface,Value,%ScriptFile%,Interface,cb_PinToStartMenu,False
 WriteInterface,Value,%ScriptFile%,Interface,txt_StartMenuFolder,"Backup & Imaging"
 WriteInterface,Value,%ScriptFile%,Interface,txt_ShortcutName,"Macrium Reflect"
 WriteInterface,Value,%ScriptFile%,Interface,cb_EnableDarkMode,False
+WriteInterface,Value,%ScriptFile%,Interface,cmb_RegMethod,"Trial User"
+WriteInterface,Value,%ScriptFile%,Interface,txt_LicKey,""
+Run,%ScriptFile%,ToggleRegKey
 System,Cursor,Normal
 
 [#ToggleAdvancedOptions#]
@@ -216,7 +261,7 @@ Message,"There are no advanced options available for this script."
 // Related........: btn_ScriptInfo
 // ===============================================================================================================================
 [ShowScriptInfo]
-Message,"Macrium Reflect is a complete backup solution for personal use.#$x#$xOn first run this script will download the setup file ~180 MB) and cache it for future builds."
+Message,"Macrium Reflect is a complete backup solution for personal use.#$x#$xIf you enjoy this software please support the authors and purchase a license.#$x#$xOn first run this script will download the setup file ~180 MB) and cache it for future builds."
 
 [#Interface#]
 // ===============================================================================================================================
@@ -230,7 +275,7 @@ Message,"Macrium Reflect is a complete backup solution for personal use.#$x#$xOn
 // Related........:
 // ===============================================================================================================================
 [Interface]
-btn_LaunchProgram="Launch Reflect",1,8,5,5,132,25,LaunchProgram,play-hot.png,False
+btn_LaunchProgram="Launch Program",1,8,5,5,132,25,LaunchProgram,play-hot.png,False
 bvl_Homepage=bvl_Homepage,1,12,367,5,72,25
 web_Homepage=Homepage,1,10,377,9,60,18,https://www.macrium.com/products/home
 btn_DownloadProgram=,1,8,448,5,25,25,DownloadProgram,VistalcoDownload_16.png,False,"__Download the program."
@@ -249,6 +294,9 @@ txt_StartMenuFolder="Start Menu Folder:",1,0,12,201,119,21,"Backup & Imaging"
 txt_ShortcutName="Shortcut Name:",1,0,12,243,119,21,"Macrium Reflect"
 bvl_Options=Options,1,12,150,90,197,184,8,Bold
 cb_EnableDarkMode="Dark Mode",1,3,160,104,174,18,False
+lbl_RegMethod="Software Registration",1,1,160,185,153,16,8,Normal
+cmb_RegMethod="Trial User",1,4,160,200,174,21,"Trial User","Import License From Host","Enter License Key",_ToggleRegKey_,True
+txt_LicKey="License Key",0,0,160,243,174,21,,"__Enter your license key including dashes. (ex. XXXXXX-XXXX-X-XX)"
 
 [InterfaceEncoded]
 play-hot.png=841,1220