From 69e6c9bf71a01410e341221da1d699ca6a696e2a Mon Sep 17 00:00:00 2001
From: WindowsAddict <windowsaddict@protonmail.com>
Date: Mon, 26 Aug 2024 19:47:33 +0530
Subject: [PATCH] Add change Office edition script

---
 .../Change_Office_Edition.cmd                 | 1291 +++++++++++++++++
 1 file changed, 1291 insertions(+)
 create mode 100644 MAS/Separate-Files-Version/Change_Office_Edition.cmd

diff --git a/MAS/Separate-Files-Version/Change_Office_Edition.cmd b/MAS/Separate-Files-Version/Change_Office_Edition.cmd
new file mode 100644
index 0000000..133881b
--- /dev/null
+++ b/MAS/Separate-Files-Version/Change_Office_Edition.cmd
@@ -0,0 +1,1291 @@
+@set masver=2.6
+@echo off
+
+
+
+::============================================================================
+::
+::   Homepage: mass grave[.]dev
+::      Email: mas.help@outlook.com
+::
+::============================================================================
+
+
+
+::========================================================================================================================================
+
+::  Set environment variables, it helps if they are misconfigured in the system
+
+setlocal EnableExtensions
+setlocal DisableDelayedExpansion
+
+set "PathExt=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC"
+
+set "SysPath=%SystemRoot%\System32"
+set "Path=%SystemRoot%\System32;%SystemRoot%;%SystemRoot%\System32\Wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\"
+if exist "%SystemRoot%\Sysnative\reg.exe" (
+set "SysPath=%SystemRoot%\Sysnative"
+set "Path=%SystemRoot%\Sysnative;%SystemRoot%;%SystemRoot%\Sysnative\Wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%Path%"
+)
+
+set "ComSpec=%SysPath%\cmd.exe"
+set "PSModulePath=%ProgramFiles%\WindowsPowerShell\Modules;%SysPath%\WindowsPowerShell\v1.0\Modules"
+
+set "_cmdf=%~f0"
+for %%# in (%*) do (
+if /i "%%#"=="r1" set r1=1
+if /i "%%#"=="r2" set r2=1
+)
+
+:: Re-launch the script with x64 process if it was initiated by x86 process on x64 bit Windows
+:: or with ARM64 process if it was initiated by x86/ARM32 process on ARM64 Windows
+
+if exist %SystemRoot%\Sysnative\cmd.exe if not defined r1 (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %* r1"
+exit /b
+)
+
+:: Re-launch the script with ARM32 process if it was initiated by x64 process on ARM64 Windows
+
+if exist %SystemRoot%\SysArm32\cmd.exe if %PROCESSOR_ARCHITECTURE%==AMD64 if not defined r2 (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %* r2"
+exit /b
+)
+
+::========================================================================================================================================
+
+set "blank="
+set "mas=ht%blank%tps%blank%://mass%blank%grave.dev/"
+
+::  Check if Null service is working, it's important for the batch script
+
+sc query Null | find /i "RUNNING"
+if %errorlevel% NEQ 0 (
+echo:
+echo Null service is not running, script may crash...
+echo:
+echo:
+echo Help - %mas%troubleshoot
+echo:
+echo:
+ping 127.0.0.1 -n 20
+)
+cls
+
+::  Check LF line ending
+
+pushd "%~dp0"
+>nul findstr /v "$" "%~nx0" && (
+echo:
+echo Error - Script either has LF line ending issue or an empty line at the end of the script is missing.
+echo:
+echo:
+echo Help - %mas%troubleshoot
+echo:
+echo:
+ping 127.0.0.1 -n 20 >nul
+popd
+exit /b
+)
+popd
+
+::========================================================================================================================================
+
+cls
+color 07
+title  Change Office Edition %masver%
+
+set _args=
+set _elev=
+set _unattended=0
+
+set _args=%*
+if defined _args set _args=%_args:"=%
+if defined _args (
+for %%A in (%_args%) do (
+if /i "%%A"=="-el"                    set _elev=1
+)
+)
+
+set "nul1=1>nul"
+set "nul2=2>nul"
+set "nul6=2^>nul"
+set "nul=>nul 2>&1"
+
+call :dk_setvar
+set "line=echo ___________________________________________________________________________________________"
+
+::========================================================================================================================================
+
+if %winbuild% LSS 7600 (
+%nceline%
+echo Unsupported OS version detected [%winbuild%].
+echo Project is supported only for Windows 7/8/8.1/10/11 and their Server equivalents.
+goto dk_done
+)
+
+::========================================================================================================================================
+
+::  Fix special character limitations in path name
+
+set "_work=%~dp0"
+if "%_work:~-1%"=="\" set "_work=%_work:~0,-1%"
+
+set "_batf=%~f0"
+set "_batp=%_batf:'=''%"
+
+set _PSarg="""%~f0""" -el %_args%
+set _PSarg=%_PSarg:'=''%
+
+set "_ttemp=%userprofile%\AppData\Local\Temp"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" %nul1% && (
+if /i not "!_work!"=="!_ttemp!" (
+%eline%
+echo The script was launched from the temp folder.
+echo You are most likely running the script directly from the archive file.
+echo:
+echo Extract the archive file and launch the script from the extracted folder.
+goto dk_done
+)
+)
+
+::========================================================================================================================================
+
+::  Check PowerShell
+
+REM :PowerShellTest: $ExecutionContext.SessionState.LanguageMode :PowerShellTest:
+
+cmd /c "%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':PowerShellTest:\s*';iex ($f[1])"" | find /i "FullLanguage" %nul1% || (
+%eline%
+cmd /c "%psc% "$ExecutionContext.SessionState.LanguageMode""
+echo:
+cmd /c "%psc% "$ExecutionContext.SessionState.LanguageMode"" | find /i "FullLanguage" %nul1% && (
+echo Failed to run Powershell command but Powershell is working.
+call :dk_color %Blue% "Check if your antivirus is blocking the script."
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+) || (
+echo PowerShell is not working. Aborting...
+echo If you have applied restrictions on Powershell then undo those changes.
+echo:
+set fixes=%fixes% %mas%fix_powershell
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%fix_powershell"
+)
+goto dk_done
+)
+
+::========================================================================================================================================
+
+::  Elevate script as admin and pass arguments and preventing loop
+
+%nul1% fltmc || (
+if not defined _elev %psc% "start cmd.exe -arg '/c \"!_PSarg!\"' -verb runas" && exit /b
+%eline%
+echo This script needs admin rights.
+echo Right click on this script and select 'Run as administrator'.
+goto dk_done
+)
+
+::========================================================================================================================================
+
+::  Disable QuickEdit and launch from conhost.exe to avoid Terminal app
+
+if %winbuild% GEQ 17763 (
+set terminal=1
+) else (
+set terminal=
+)
+
+::  Check if script is running in Terminal app
+
+set r1=$TB = [AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1).DefineDynamicModule(2, $False).DefineType(0);
+set r2=%r1% [void]$TB.DefinePInvokeMethod('GetConsoleWindow', 'kernel32.dll', 22, 1, [IntPtr], @(), 1, 3).SetImplementationFlags(128);
+set r3=%r2% [void]$TB.DefinePInvokeMethod('SendMessageW', 'user32.dll', 22, 1, [IntPtr], @([IntPtr], [UInt32], [IntPtr], [IntPtr]), 1, 3).SetImplementationFlags(128);
+set d1=%r3% $hIcon = $TB.CreateType(); $hWnd = $hIcon::GetConsoleWindow();
+set d2=%d1% echo $($hIcon::SendMessageW($hWnd, 127, 0, 0) -ne [IntPtr]::Zero);
+
+if defined terminal (
+%psc% "%d2%" %nul2% | find /i "True" %nul1% && set terminal=
+)
+
+if %_unattended%==1 goto :skipQE
+for %%# in (%_args%) do (if /i "%%#"=="-qedit" goto :skipQE)
+
+if defined terminal (
+set "launchcmd=start conhost.exe %psc%"
+) else (
+set "launchcmd=%psc%"
+)
+
+::  Disable QuickEdit in current session
+
+set "d1=$t=[AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1).DefineDynamicModule(2, $False).DefineType(0);"
+set "d2=$t.DefinePInvokeMethod('GetStdHandle', 'kernel32.dll', 22, 1, [IntPtr], @([Int32]), 1, 3).SetImplementationFlags(128);"
+set "d3=$t.DefinePInvokeMethod('SetConsoleMode', 'kernel32.dll', 22, 1, [Boolean], @([IntPtr], [Int32]), 1, 3).SetImplementationFlags(128);"
+set "d4=$k=$t.CreateType(); $b=$k::SetConsoleMode($k::GetStdHandle(-10), 0x0080);"
+
+%launchcmd% "%d1% %d2% %d3% %d4% & cmd.exe '/c' '!_PSarg! -qedit'" && (exit /b) || (set terminal=1)
+:skipQE
+
+::========================================================================================================================================
+
+::  Check for updates
+
+set -=
+set old=
+
+for /f "delims=[] tokens=2" %%# in ('ping -4 -n 1 updatecheck.mass%-%grave.dev') do (
+if not "%%#"=="" (echo "%%#" | find "127.69" %nul1% && (echo "%%#" | find "127.69.%masver%" %nul1% || set old=1))
+)
+
+if defined old (
+echo ________________________________________________
+%eline%
+echo Your version of MAS [%masver%] is outdated.
+echo ________________________________________________
+echo:
+if not %_unattended%==1 (
+echo [1] Get Latest MAS
+echo [0] Continue Anyway
+echo:
+call :dk_color %_Green% "Choose a menu option using your keyboard [1,0] :"
+choice /C:10 /N
+if !errorlevel!==2 rem
+if !errorlevel!==1 (start ht%-%tps://github.com/mass%-%gravel/Microsoft-Acti%-%vation-Scripts & start %mas% & exit /b)
+)
+)
+
+::========================================================================================================================================
+
+cls
+if not defined terminal mode 98, 30
+title  Change Office Edition %masver%
+
+echo:
+echo Initializing...
+echo:
+
+if not exist %SysPath%\sppsvc.exe (
+%eline%
+echo [%SysPath%\sppsvc.exe] file is missing. Aborting...
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+goto dk_done
+)
+
+::========================================================================================================================================
+
+set spp=SoftwareLicensingProduct
+set sps=SoftwareLicensingService
+
+call :dk_reflection
+call :dk_ckeckwmic
+call :dk_sppissue
+
+for /f "tokens=6-7 delims=[]. " %%i in ('ver') do if not "%%j"=="" (
+set fullbuild=%%i.%%j
+) else (
+for /f "tokens=3" %%G in ('"reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v UBR" %nul6%') do if not errorlevel 1 set /a "UBR=%%G"
+for /f "skip=2 tokens=3,4 delims=. " %%G in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v BuildLabEx') do (
+if defined UBR (set "fullbuild=%%G.!UBR!") else (set "fullbuild=%%G.%%H")
+)
+)
+
+::========================================================================================================================================
+
+::  Check Windows Edition
+::  This is just to ensure that SPP/WMI are functional
+
+cls
+set osedition=0
+if %_wmic% EQU 1 set "chkedi=for /f "tokens=2 delims==" %%a in ('"wmic path %spp% where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' AND LicenseDependsOn is NULL AND PartialProductKey IS NOT NULL) get LicenseFamily /VALUE" %nul6%')"
+if %_wmic% EQU 0 set "chkedi=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT LicenseFamily FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND LicenseDependsOn is NULL AND PartialProductKey IS NOT NULL').Get()).LicenseFamily ^| %% {echo ('LicenseFamily='+$_)}" %nul6%')"
+%chkedi% do if not errorlevel 1 (call set "osedition=%%a")
+
+if %osedition%==0 (
+%eline%
+echo Failed to detect OS Edition. Aborting...
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+goto dk_done
+)
+
+::========================================================================================================================================
+
+::  Check installed Office 16.0 C2R
+
+set o16c2r=
+set _68=HKLM\SOFTWARE\Microsoft\Office
+set _86=HKLM\SOFTWARE\Wow6432Node\Microsoft\Office
+
+for /f "skip=2 tokens=2*" %%a in ('"reg query %_86%\ClickToRun /v InstallPath" %nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (set o16c2r=1&set o16c2r_reg=%_86%\ClickToRun)
+for /f "skip=2 tokens=2*" %%a in ('"reg query %_68%\ClickToRun /v InstallPath" %nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (set o16c2r=1&set o16c2r_reg=%_68%\ClickToRun)
+
+if not defined o16c2r_reg (
+echo:
+echo:
+echo Office C2R 2016 or later is not installed, which is required for this script.
+echo Download and install Office from below URL and try again.
+echo:
+set fixes=%fixes% %mas%genuine-installation-media
+call :dk_color %_Yellow% "%mas%genuine-installation-media"
+goto dk_done
+)
+
+call :ch_getinfo
+
+::========================================================================================================================================
+
+::  Check minimum required details
+
+if %verchk% LSS 9029 (
+%eline%
+echo Installed Office version is %_version%.
+echo Minimum required version is 16.0.9029.2167
+echo Aborting...
+echo:
+call :dk_color %Blue% "Download and install latest Office from below URL and try again."
+set fixes=%fixes% %mas%genuine-installation-media
+call :dk_color %_Yellow% "%mas%genuine-installation-media"
+goto dk_done
+)
+
+for %%A in (
+_oArch
+_updch
+_lang
+_clversion
+_version
+_oIds
+_c2rXml
+_c2rExe
+_c2rCexe
+_masterxml
+) do (
+if not defined %%A (
+%eline%
+echo Failed to find %%A. Aborting...
+echo:
+call :dk_color %Blue% "Download and install Office from below URL and try again."
+set fixes=%fixes% %mas%genuine-installation-media
+call :dk_color %_Yellow% "%mas%genuine-installation-media"
+goto dk_done
+)
+)
+
+if %winbuild% LSS 10240 if defined ltscfound (
+%eline%
+echo Installed Office appears to be from the Volume channel %ltsc19%%ltsc21%%ltsc24%,
+echo which is not officially supported on your Windows build version %winbuild%.
+echo Aborting...
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+goto dk_done
+)
+
+set unsupbuild=
+if %winbuild% LSS 10240 if %winbuild% GEQ 9200 if %verchk% GTR 16026 set unsupbuild=1
+if %winbuild% LSS 9200 if %verchk% GTR 12527 set unsupbuild=1
+
+if defined unsupbuild (
+%eline%
+echo Unsupported Office %verchk% is installed on your Windows build version %winbuild%.
+echo Aborting...
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:oemenu
+
+cls
+set fixes=
+if not defined terminal mode 76, 25
+title  Change Office Edition %masver%
+echo:
+echo:
+echo:
+echo:
+echo         ____________________________________________________________
+echo:
+echo                 [1] Change - Office Edition
+echo                 [2] Add    - Office Edition
+echo                 [3] Remove - Office Edition
+echo                 ____________________________________________
+echo:
+echo                 [4] Change Office Update Channel
+echo                 [0] %_exitmsg%
+echo         ____________________________________________________________
+echo: 
+call :dk_color2 %_White% "            " %_Green% "Choose a menu option using your keyboard [1,2,3,4,0]"
+choice /C:12340 /N
+set _el=!errorlevel!
+if !_el!==5  exit /b
+if !_el!==4  goto :oe_changeupdchnl
+if !_el!==3  goto :oe_removeedition
+if !_el!==2  set change=0& goto :oe_edition
+if !_el!==1  set change=1& goto :oe_edition
+goto :oemenu
+
+::========================================================================================================================================
+
+:oe_edition
+
+cls
+call :oe_chkinternet
+if not defined _int (
+goto :oe_goback
+)
+
+cls
+if not defined terminal mode 76, 25
+title  Change Office Edition %masver%
+echo:
+echo:
+echo:
+echo:
+echo                 O365/Mondo editions have the latest features.     
+echo         ____________________________________________________________
+echo:
+echo                 [1] Office Suites     - Retail
+echo                 [2] Office Suites     - Volume
+echo                 [3] Office SingleApps - Retail
+echo                 [4] Office SingleApps - Volume
+echo                 ____________________________________________
+echo:
+echo                 [0] Go Back
+echo         ____________________________________________________________
+echo: 
+call :dk_color2 %_White% "            " %_Green% "Choose a menu option using your keyboard [1,2,3,4,0]"
+choice /C:12340 /N
+set _el=!errorlevel!
+if !_el!==5  goto :oemenu
+if !_el!==4  set list=SingleApps_Volume&goto :oe_editionchangepre
+if !_el!==3  set list=SingleApps_Retail&goto :oe_editionchangepre
+if !_el!==2  set list=Suites_Volume&goto :oe_editionchangepre
+if !_el!==1  set list=Suites_Retail&goto :oe_editionchangepre
+goto :oe_edition
+
+::========================================================================================================================================
+
+:oe_editionchangepre
+
+cls
+call :ch_getinfo
+call :oe_tempcleanup
+%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':getlist\:.*';iex ($f[1])"
+
+:oe_editionchange
+
+cls
+if not defined terminal (
+mode 98, 45
+%psc% "&{$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=44;$B.Height=100;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}" %nul%
+)
+
+if not exist %SystemRoot%\Temp\%list%.txt (
+%eline%
+echo Failed to generate available editions list.
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+goto :oe_goback
+)
+
+set inpt=
+set counter=0
+set verified=0
+set targetedition=
+
+%line%
+echo:
+call :dk_color %Gray% "Installed Office editions: %_oIds%"
+call :dk_color %Gray% "You can select one of the following Office Editions."
+if %winbuild% LSS 10240 echo Unsupported products such as 2019/2021/2024 are excluded from this list.
+%line%
+echo:
+
+for /f "usebackq delims=" %%A in (%SystemRoot%\Temp\%list%.txt) do (
+set /a counter+=1
+if !counter! LSS 10 (
+echo [!counter!]  %%A
+) else (
+echo [!counter!] %%A
+)
+set targetedition!counter!=%%A
+)
+
+%line%
+echo:
+echo [0]  Go Back
+echo:
+call :dk_color %_Green% "Enter an option number using your keyboard and press Enter to confirm:"
+set /p inpt=
+if "%inpt%"=="" goto :oe_editionchange
+if "%inpt%"=="0" (call :oe_tempcleanup & goto :oe_edition)
+for /l %%i in (1,1,%counter%) do (if "%inpt%"=="%%i" set verified=1)
+set targetedition=!targetedition%inpt%!
+if %verified%==0 goto :oe_editionchange
+
+::========================================================================================================================================
+
+::  Set app exclusions
+
+cls
+set suites=
+echo %list% | find /i "Suites" %nul1% && (
+set suites=1
+%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':getappnames\:.*';iex ($f[1])"
+if not exist %SystemRoot%\Temp\getAppIds.txt (
+%eline%
+echo Failed to generate available apps list.
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+goto :oe_goback
+)
+)
+
+for %%# in (
+Access
+Excel
+Lync
+OneNote
+Outlook
+PowerPoint
+Project
+Publisher
+Visio
+Word
+) do (
+if defined suites (
+find /i "%%#" "%SystemRoot%\Temp\getAppIds.txt" %nul1% && (set %%#_st=On) || (set %%#_st=)
+) else (
+set %%#_st=
+)
+)
+
+if defined Lync_st set Lync_st=Off
+set OneDrive_st=Off
+if defined suites (set Teams_st=Off) else (set Teams_st=)
+
+:oe_excludeapps
+
+cls
+if not defined terminal mode 98, 32
+
+%line%
+echo:
+call :dk_color %Gray% "Target edition: %targetedition%"
+call :dk_color %Gray% "You can exclude the below apps from installation."
+%line%
+if defined suites echo:
+if defined Access_st     echo [A] Access           : %Access_st%
+if defined Excel_st      echo [E] Excel            : %Excel_st%
+if defined OneNote_st    echo [N] OneNote          : %OneNote_st%
+if defined Outlook_st    echo [O] Outlook          : %Outlook_st%
+if defined PowerPoint_st echo [P] PowerPoint       : %PowerPoint_st%
+if defined Project_st    echo [J] Project          : %Project_st%
+if defined Publisher_st  echo [R] Publisher        : %Publisher_st%
+if defined Visio_st      echo [V] Visio            : %Visio_st%
+if defined Word_st       echo [W] Word             : %Word_st%
+echo:
+if defined Lync_st       echo [L] SkypeForBusiness : %Lync_st%
+if defined OneDrive_st   echo [D] OneDrive         : %OneDrive_st%
+if defined Teams_st      echo [T] Teams            : %Teams_st%
+%line%
+echo:
+echo [1] Continue
+echo [0] Go Back
+%line%
+echo:
+call :dk_color %_Green% "Choose a menu option using your keyboard:"
+choice /C:AENOPJRVWLDT10 /N
+set _el=!errorlevel!
+if !_el!==14 goto :oe_editionchangepre
+if !_el!==13 call :excludelist & goto :oe_editionchangefinal
+if !_el!==12 if defined Teams_st      (if "%Teams_st%"=="Off"      (set Teams_st=ON)      else (set Teams_st=Off))
+if !_el!==11 if defined OneDrive_st   (if "%OneDrive_st%"=="Off"   (set OneDrive_st=ON)   else (set OneDrive_st=Off))
+if !_el!==10 if defined Lync_st       (if "%Lync_st%"=="Off"       (set Lync_st=ON)       else (set Lync_st=Off))
+if !_el!==9  if defined Word_st       (if "%Word_st%"=="Off"       (set Word_st=ON)       else (set Word_st=Off))
+if !_el!==8  if defined Visio_st      (if "%Visio_st%"=="Off"      (set Visio_st=ON)      else (set Visio_st=Off))
+if !_el!==7  if defined Publisher_st  (if "%Publisher_st%"=="Off"  (set Publisher_st=ON)  else (set Publisher_st=Off))
+if !_el!==6  if defined Project_st    (if "%Project_st%"=="Off"    (set Project_st=ON)    else (set Project_st=Off))
+if !_el!==5  if defined PowerPoint_st (if "%PowerPoint_st%"=="Off" (set PowerPoint_st=ON) else (set PowerPoint_st=Off))
+if !_el!==4  if defined Outlook_st    (if "%Outlook_st%"=="Off"    (set Outlook_st=ON)    else (set Outlook_st=Off))
+if !_el!==3  if defined OneNote_st    (if "%OneNote_st%"=="Off"    (set OneNote_st=ON)    else (set OneNote_st=Off))
+if !_el!==2  if defined Excel_st      (if "%Excel_st%"=="Off"      (set Excel_st=ON)      else (set Excel_st=Off))
+if !_el!==1  if defined Access_st     (if "%Access_st%"=="Off"     (set Access_st=ON)     else (set Access_st=Off))
+goto :oe_excludeapps
+
+:excludelist
+
+set excludelist=
+for %%# in (
+Access
+Excel
+OneNote
+Outlook
+PowerPoint
+Project
+Publisher
+Visio
+Word
+Lync
+OneDrive
+Teams
+) do (
+if /i "!%%#_st!"=="Off" if defined excludelist (set excludelist=!excludelist!,%%#) else (set excludelist=,%%#)
+)
+exit /b
+
+::========================================================================================================================================
+
+::  Final command to change/add edition
+
+:oe_editionchangefinal
+
+cls
+if not defined terminal mode 105, 32
+
+::  Thanks to May, aka Alex for suggesting this method
+::  OfficeClickToRun.exe with productstoadd method is used here to add editions
+::  It uses delta updates, meaning that since its using same installed build, it will consume very less Internet
+
+set "c2rcommand="%_c2rExe%" platform=%_oArch% culture=%_lang% productstoadd=%targetedition%.16_%_lang%_x-none cdnbaseurl.16=http://officecdn.microsoft.com/pr/%_updch% baseurl.16=http://officecdn.microsoft.com/pr/%_updch% version.16=%_version% mediatype.16=CDN sourcetype.16=CDN deliverymechanism=%_updch% %targetedition%.excludedapps.16=Groove%excludelist% flt.useteamsaddon=disabled flt.usebingaddononinstall=disabled flt.usebingaddononupdate=disabled"
+
+if %change%==1 (
+set "c2rcommand=!c2rcommand! productstoremove=AllProducts"
+)
+
+echo:
+echo Running the below command, please wait...
+echo:
+echo %c2rcommand%
+%c2rcommand%
+set errorcode=%errorlevel%
+timeout /t 10 %nul%
+
+echo:
+call :dk_color %Gray% "Now run the Office activation option from the main menu."
+
+if %errorcode% NEQ 0 (
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+)
+
+call :oe_tempcleanup
+goto :oe_goback
+
+::========================================================================================================================================
+
+::  Remove Office editions
+
+:oe_removeedition
+
+call :ch_getinfo
+
+cls
+if not defined terminal (
+mode 98, 35
+)
+
+set counter=0
+for %%A in (%_oIds%) do (set /a counter+=1)
+
+for %%A in (%_oIds%) do (
+if !counter! LEQ 1 (
+echo:
+echo Only "%%A" product is installed.
+echo This option is available only when multiple products are installed.
+goto :oe_goback
+)
+)
+
+::===============
+
+set inpt=
+set counter=0
+set verified=0
+set targetedition=
+
+%line%
+echo:
+call :dk_color %Gray% "You can uninstall one of the following Office editions."
+%line%
+echo:
+
+for %%A in (%_oIds%) do (
+set /a counter+=1
+echo [!counter!] %%A
+set targetedition!counter!=%%A
+)
+
+%line%
+echo:
+echo [0]  Go Back
+echo:
+call :dk_color %_Green% "Enter an option number using your keyboard and press Enter to confirm:"
+set /p inpt=
+if "%inpt%"=="" goto :oe_removeedition
+if "%inpt%"=="0" goto :oemenu
+for /l %%i in (1,1,%counter%) do (if "%inpt%"=="%%i" set verified=1)
+set targetedition=!targetedition%inpt%!
+if %verified%==0 goto :oe_removeedition
+
+::===============
+
+cls
+if not defined terminal mode 105, 32
+
+set _lang=
+echo "%o16c2r_reg%" | find /i "Wow6432Node" %nul1% && (set _tok=10) || (set _tok=9)
+for /f "tokens=%_tok% delims=\" %%a in ('reg query "%o16c2r_reg%\ProductReleaseIDs\%_actconfig%\%targetedition%.16" /f "-" /k ^| findstr /i ".*16\\.*-.*"') do (
+if defined _lang (set "_lang=!_lang!_%%a") else (set "_lang=_%%a")
+)
+
+set "c2rcommand="%_c2rExe%" platform=%_oArch% productstoremove=%targetedition%.16%_lang%"
+
+echo:
+echo Running the below command, please wait...
+echo:
+echo %c2rcommand%
+%c2rcommand%
+
+if %errorlevel% NEQ 0 (
+echo:
+set fixes=%fixes% %mas%troubleshoot
+call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
+)
+
+goto :oe_goback
+
+::========================================================================================================================================
+
+::  Change Office update channel
+
+:oe_changeupdchnl
+
+call :ch_getinfo
+
+cls
+if not defined terminal (
+mode 98, 33
+)
+
+call :oe_chkinternet
+if not defined _int (
+goto :oe_goback
+)
+
+if %winbuild% LSS 10240 (
+echo %_oIds% | findstr "2019 2021 2024" %nul% && (
+%eline%
+echo Installed Office editions: %_oIds%
+echo Unsupported Office edition is installed on your Windows build version %winbuild%.
+goto :oe_goback
+)
+)
+
+::===============
+
+set inpt=
+set counter=0
+set verified=0
+set targetFFN=
+set targetchannel=
+
+%line%
+echo:
+call :dk_color %Gray% "Installed update channel: %_AudienceData% - %_version% Client: %_clversion%"
+call :dk_color %Gray% "Unsupported update channels are excluded from this list."
+%line%
+echo:
+
+for %%# in (
+"5440FD1F-7ECB-4221-8110-145EFAA6372F_Insider Fast [Beta]  -    Insiders::DevMain"
+"64256AFE-F5D9-4F86-8936-8840A6A4F5BE_Monthly Preview      -    Insiders::CC"
+"492350F6-3A01-4F97-B9C0-C7C6DDF67D60_Monthly [Current]    -  Production::CC"
+"55336B82-A18D-4DD6-B5F6-9E5095C314A6_Monthly Enterprise   -  Production::MEC"
+"B8F9B850-328D-4355-9145-C59439A0C4CF_Semi Annual Preview  -    Insiders::FRDC"
+"7FFBC6BF-BC32-4F92-8982-F9DD17FD3114_Semi Annual          -  Production::DC"
+"EA4A4090-DE26-49D7-93C1-91BFF9E53FC3_DevMain Channel      -     Dogfood::DevMain"
+"B61285DD-D9F7-41F2-9757-8F61CBA4E9C8_Microsoft Elite      -   Microsoft::DevMain"
+"F2E724C1-748F-4B47-8FB8-8E0D210E9208_Perpetual2019 VL     -  Production::LTSC"
+"1D2D2EA6-1680-4C56-AC58-A441C8C24FF9_Microsoft2019 VL     -   Microsoft::LTSC"
+"5030841D-C919-4594-8D2D-84AE4F96E58E_Perpetual2021 VL     -  Production::LTSC2021"
+"86752282-5841-4120-AC80-DB03AE6B5FDB_Microsoft2021 VL     -   Microsoft::LTSC2021"
+"7983BAC0-E531-40CF-BE00-FD24FE66619C_Perpetual2024 VL     -  Production::LTSC2024"
+"C02D8FE6-5242-4DA8-972F-82EE55E00671_Microsoft2024 VL     -   Microsoft::LTSC2024"
+) do (
+for /f "tokens=1-2 delims=_" %%A in ("%%~#") do (
+set supported=
+if %winbuild% LSS 10240 (echo %%B | findstr /i "LTSC DevMain" %nul% || set supported=1) else (set supported=1)
+if %winbuild% GEQ 10240 (if defined ltsc19 echo %%B | findstr /i "LTSC\>" %nul% || set supported=)
+if %winbuild% GEQ 10240 (if defined ltsc21 echo %%B | findstr /i "LTSC2021\>" %nul% || set supported=)
+if %winbuild% GEQ 10240 (if defined ltsc24 echo %%B | findstr /i "LTSC2024\>" %nul% || set supported=)
+if %winbuild% GEQ 10240 (if not defined ltscfound echo %%B | findstr /i "LTSC" %nul% && set supported=)
+if defined supported (
+set /a counter+=1
+if !counter! LSS 10 (
+echo [!counter!]  %%B
+) else (
+echo [!counter!] %%B
+)
+set targetFFN!counter!=%%A
+set targetchannel!counter!=%%B
+)
+)
+)
+
+%line%
+echo:
+echo [R]  Learn about update channels
+echo [0]  Go back
+echo:
+call :dk_color %_Green% "Enter an option number using your keyboard and press Enter to confirm:"
+set /p inpt=
+if "%inpt%"=="" goto :oe_changeupdchnl
+if "%inpt%"=="0" goto :oemenu
+if /i "%inpt%"=="R" start https://learn.microsoft.com/microsoft-365-apps/updates/overview-update-channels & goto :oe_changeupdchnl
+for /l %%i in (1,1,%counter%) do (if "%inpt%"=="%%i" set verified=1)
+set targetFFN=!targetFFN%inpt%!
+set targetchannel=!targetchannel%inpt%!
+if %verified%==0 goto :oe_changeupdchnl
+
+::=======================
+
+cls
+if not defined terminal mode 105, 32
+
+::  Get build number for the target FFN, using build number with OfficeC2RClient.exe command to trigger updates provides accurate results
+
+set build=
+for /f "delims=" %%a in ('%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':getbuild\:.*';iex ($f[1])" %nul6%') do (set build=%%a)
+echo "%build%" | find /i "16." %nul% || set build=
+
+::  Cleanup Office update related registries, thanks to @abbodi1406
+::  https://techcommunity.microsoft.com/t5/office-365-blog/how-to-manage-office-365-proplus-channels-for-it-pros/ba-p/795813
+::  https://learn.microsoft.com/en-us/microsoft-365-apps/updates/change-update-channels#considerations-when-changing-channels
+
+echo:
+for /f "tokens=1 delims=-" %%A in ("%targetchannel%") do (echo Target update channel: %%A)
+echo:
+echo Cleaning Office update registry keys...
+echo Adding new update channel to registry keys...
+
+%nul% reg add %o16c2r_reg%\Configuration /v CDNBaseUrl /t REG_SZ /d "https://officecdn.microsoft.com/pr/%targetFFN%" /f
+%nul% reg add %o16c2r_reg%\Configuration /v UpdateChannel /t REG_SZ /d "https://officecdn.microsoft.com/pr/%targetFFN%" /f
+%nul% reg add %o16c2r_reg%\Configuration /v UpdateChannelChanged /t REG_SZ /d "True" /f
+%nul% reg delete %o16c2r_reg%\Configuration /v UnmanagedUpdateURL /f
+%nul% reg delete %o16c2r_reg%\Configuration /v UpdateUrl /f
+%nul% reg delete %o16c2r_reg%\Configuration /v UpdatePath /f
+%nul% reg delete %o16c2r_reg%\Configuration /v UpdateToVersion /f
+%nul% reg delete %o16c2r_reg%\Updates /v UpdateToVersion /f
+%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\office\16.0\common\officeupdate /f
+%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\office\16.0\common\officeupdate /f /reg:32
+%nul% reg delete HKCU\SOFTWARE\Policies\Microsoft\office\16.0\common\officeupdate /f
+%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\cloud\office\16.0\Common\officeupdate /f
+%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\cloud\office\16.0\Common\officeupdate /f /reg:32
+%nul% reg delete HKCU\Software\Policies\Microsoft\cloud\office\16.0\Common\officeupdate /f
+
+if not defined build (
+if %winbuild% GEQ 9200 call :dk_color %Gray% "Failed to detect build number for the target FFN."
+set "updcommand="%_c2rCexe%" /update user"
+) else (
+set "updcommand="%_c2rCexe%" /update user updatetoversion=%build%"
+)
+echo Running the below command to trigger updates...
+echo:
+echo %updcommand%
+%updcommand%
+echo:
+echo Help - %mas%troubleshoot
+goto :oe_goback
+
+::========================================================================================================================================
+
+:oe_goback
+
+call :oe_tempcleanup
+
+echo:
+if defined fixes (
+call :dk_color2 %Blue% "Press [1] To Open Troubleshoot Page " %Gray% " Press [0] To Ignore"
+choice /C:10 /N
+if !errorlevel!==1 (for %%# in (%fixes%) do (start %%#))
+)
+
+if defined terminal (
+call :dk_color %_Yellow% "Press [0] key to go back..."
+choice /c 0 /n
+) else (
+call :dk_color %_Yellow% "Press any key to go back..."
+pause %nul1%
+)
+goto :oemenu
+
+::========================================================================================================================================
+
+:oe_tempcleanup
+
+del /f /q %SystemRoot%\Temp\SingleApps_Volume.txt %nul%
+del /f /q %SystemRoot%\Temp\SingleApps_Retail.txt %nul%
+del /f /q %SystemRoot%\Temp\Suites_Volume.txt %nul%
+del /f /q %SystemRoot%\Temp\Suites_Retail.txt %nul%
+del /f /q %SystemRoot%\Temp\getAppIds.txt %nul%
+exit /b
+
+::========================================================================================================================================
+
+::  Fetch required info
+
+:ch_getinfo
+
+set _oRoot=
+set _oArch=
+set _updch=
+set _oIds=
+set _lang=
+set _cfolder=
+set _version=
+set _clversion=
+set _AudienceData=
+set _actconfig=
+set _c2rXml=
+set _c2rExe=
+set _c2rCexe=
+set _masterxml=
+
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg% /v InstallPath" %nul6%') do (set "_oRoot=%%b\root")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v Platform" %nul6%') do (set "_oArch=%%b")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v ClientFolder" %nul6%') do (set "_cfolder=%%b")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v AudienceId" %nul6%') do (set "_updch=%%b")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v ClientCulture" %nul6%') do (set "_lang=%%b")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v ClientVersionToReport" %nul6%') do (set "_clversion=%%b")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v VersionToReport" %nul6%') do (set "_version=%%b")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v AudienceData" %nul6%') do (set "_AudienceData=%%b")
+for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\ProductReleaseIDs /v ActiveConfiguration" %nul6%') do (set "_actconfig=%%b")
+
+echo "%o16c2r_reg%" | find /i "Wow6432Node" %nul1% && (set _tok=9) || (set _tok=8)
+for /f "tokens=%_tok% delims=\" %%a in ('reg query "%o16c2r_reg%\ProductReleaseIDs\%_actconfig%" /f ".16" /k %nul6% ^| findstr /i "Retail Volume"') do (
+if defined _oIds (set "_oIds=!_oIds! %%a") else (set "_oIds=%%a")
+)
+set _oIds=%_oIds:.16=%
+
+set verchk=0
+for /f "tokens=3 delims=." %%a in ("%_version%") do set "verchk=%%a"
+
+if exist "%_oRoot%\Licenses16\c2rpridslicensefiles_auto.xml" set "_c2rXml=%_oRoot%\Licenses16\c2rpridslicensefiles_auto.xml"
+
+if exist "%ProgramData%\Microsoft\ClickToRun\ProductReleases\%_actconfig%\x-none.16\MasterDescriptor.x-none.xml" (
+set "_masterxml=%ProgramData%\Microsoft\ClickToRun\ProductReleases\%_actconfig%\x-none.16\MasterDescriptor.x-none.xml"
+)
+
+if exist "%_cfolder%\OfficeClickToRun.exe" (
+set "_c2rExe=%_cfolder%\OfficeClickToRun.exe"
+)
+
+if exist "%_cfolder%\OfficeC2RClient.exe" (
+set "_c2rCexe=%_cfolder%\OfficeC2RClient.exe"
+)
+
+set ltsc19=
+echo %_AudienceData% | findstr /i "LTSC\>" %nul% && set ltsc19=LTSC
+echo %_clversion% %_version% | findstr "16.0.103 16.0.104 16.0.105" %nul% && set ltsc19=LTSC
+
+set ltsc21=
+echo %_AudienceData% | findstr /i "LTSC2021\>" %nul% && set ltsc21=LTSC2021
+echo %_clversion% %_version% | findstr "16.0.14332" %nul% && set ltsc21=LTSC2021
+
+set ltsc24=
+echo %_AudienceData% | findstr /i "LTSC2024\>" %nul% && set ltsc24=LTSC2024
+::  LTSC 2024 build is not fixed yet
+
+set ltscfound=
+if not "%ltsc19%%ltsc21%%ltsc24%"=="" set ltscfound=1
+
+exit /b
+
+::========================================================================================================================================
+
+::  Check Internet connection
+
+:oe_chkinternet
+
+set _int=
+for %%a in (l.root-servers.net resolver1.opendns.com download.windowsupdate.com google.com) do if not defined _int (
+for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do (if not "%%#"=="" set _int=1)
+)
+
+if not defined _int (
+%psc% "If([Activator]::CreateInstance([Type]::GetTypeFromCLSID([Guid]'{DCB00C01-570F-4A9B-8D69-199FDBA5723B}')).IsConnectedToInternet){Exit 0}Else{Exit 1}"
+if !errorlevel!==0 (set _int=1)
+)
+
+if not defined _int (
+%eline%
+call :dk_color %Red% "Internet is not connected."
+call :dk_color %Blue% "Internet is required for this operation."
+)
+exit /b
+
+::========================================================================================================================================
+
+::  Get available build number for a FFN
+
+:getbuild:
+$Tls12 = [Enum]::ToObject([System.Net.SecurityProtocolType], 3072)
+[System.Net.ServicePointManager]::SecurityProtocol = $Tls12
+
+$FFN = $env:targetFFN
+$windowsBuild = [System.Environment]::OSVersion.Version.Build
+
+$baseUrl = "https://mrodevicemgr.officeapps.live.com/mrodevicemgrsvc/api/v2/C2RReleaseData?audienceFFN=$FFN"
+$url = if ($windowsBuild -lt 9200) { "$baseUrl&osver=Client|6.1" } elseif ($windowsBuild -lt 10240) { "$baseUrl&osver=Client|6.3" } else { $baseUrl }
+
+$response = if ($windowsBuild -ge 9200) { irm -Uri $url -Method Get } else { (New-Object System.Net.WebClient).DownloadString($url) }
+
+if ($windowsBuild -lt 9200) {
+    if ($response -match '"AvailableBuild"\s*:\s*"([^"]+)"') { Write-Host $matches[1] }
+} else {
+    Write-Host $response.AvailableBuild
+}
+:getbuild:
+
+::========================================================================================================================================
+
+::  Get available edition list from c2rpridslicensefiles_auto.xml
+::  and filter the list using MasterDescriptor.x-none.xml
+::  and exclude unsupported products on Windows 7/8/8.1
+
+:getlist:
+$xmlPath1 = $env:_c2rXml
+$xmlPath2 = $env:_masterxml
+$outputDir = $env:SystemRoot + "\Temp\"
+$buildNumber = [System.Environment]::OSVersion.Version.Build
+$excludedKeywords = @("2019", "2021", "2024")
+$productReleaseIds = @()
+
+if (Test-Path $xmlPath1) {
+    $xml1 = New-Object -TypeName System.Xml.XmlDocument
+    $xml1.Load($xmlPath1)
+    foreach ($node in $xml1.SelectNodes("//ProductReleaseId")) {
+        $id = $node.GetAttribute("id")
+        $exclude = $false
+        if ($buildNumber -lt 10240) {
+            foreach ($keyword in $excludedKeywords) {
+                if ($id -match $keyword) { $exclude = $true; break }
+            }
+        }
+        if ($id -ne "CommonLicenseFiles" -and -not $exclude) { $productReleaseIds += $id }
+    }
+}
+
+$categories = @{
+    "Suites_Retail" = @(); "Suites_Volume" = @()
+    "SingleApps_Retail" = @(); "SingleApps_Volume" = @()
+}
+
+foreach ($id in $productReleaseIds) {
+    $category = if ($id -match "Retail") { "Retail" } else { "Volume" }
+    $categories["SingleApps_$category"] += $id
+}
+
+if (Test-Path $xmlPath2) {
+    $xml2 = New-Object -TypeName System.Xml.XmlDocument
+    $xml2.Load($xmlPath2)
+    foreach ($sku in $xml2.SelectNodes("//SKU")) {
+        $skuId = $sku.GetAttribute("ID")
+        if ($productReleaseIds -contains $skuId) {
+            $appIds = $sku.SelectNodes("Apps/App") | ForEach-Object { $_.GetAttribute("id") }
+            if ($appIds -contains "Excel" -and $appIds -contains "Word") {
+                $category = if ($skuId -match "Retail") { "Retail" } else { "Volume" }
+                $categories["Suites_$category"] += $skuId
+                $categories["SingleApps_$category"] = $categories["SingleApps_$category"] | Where-Object { $_ -ne $skuId }
+            }
+        }
+    }
+}
+
+foreach ($section in $categories.Keys) {
+    $filePath = Join-Path -Path $outputDir -ChildPath "$section.txt"
+    $ids = $categories[$section]
+    if ($ids.Count -gt 0) { $ids | Out-File -FilePath $filePath -Encoding ASCII }
+}
+:getlist:
+
+::========================================================================================================================================
+
+::  Get App list for a specific product ID using MasterDescriptor.x-none.xml
+
+:getappnames:
+$xmlPath = $env:_masterxml
+$targetSkuId = $env:targetedition
+$outputDir = $env:SystemRoot + "\Temp\"
+$outputFile = Join-Path -Path $outputDir -ChildPath "getAppIds.txt"
+$excludeIds = @("shared", "PowerPivot", "PowerView", "MondoOnly", "OSM", "OSMUX", "Groove", "DCF")
+
+$xml = New-Object -TypeName System.Xml.XmlDocument
+$xml.Load($xmlPath)
+
+$appIdsList = @()
+$skuNodes = $xml.SelectNodes("//SKU[@ID='$targetSkuId']")
+
+foreach ($skuNode in $skuNodes) {
+    foreach ($app in $skuNode.SelectNodes("Apps/App")) {
+        $appId = $app.GetAttribute("id")
+        if ($excludeIds -notcontains $appId) {
+            $appIdsList += $appId
+        }
+    }
+}
+
+if ($appIdsList.Count -gt 0) {
+    $appIdsList | Out-File -FilePath $outputFile -Encoding ASCII
+}
+:getappnames:
+
+::========================================================================================================================================
+
+::  Set variables
+
+:dk_setvar
+
+set psc=powershell.exe
+set winbuild=1
+for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G
+
+set _NCS=1
+if %winbuild% LSS 10586 set _NCS=0
+if %winbuild% GEQ 10586 reg query "HKCU\Console" /v ForceV2 %nul2% | find /i "0x0" %nul1% && (set _NCS=0)
+
+if %_NCS% EQU 1 (
+for /F %%a in ('echo prompt $E ^| cmd') do set "esc=%%a"
+set     "Red="41;97m""
+set    "Gray="100;97m""
+set   "Green="42;97m""
+set    "Blue="44;97m""
+set    "_Red="40;91m""
+set  "_White="40;37m""
+set  "_Green="40;92m""
+set "_Yellow="40;93m""
+) else (
+set     "Red="Red" "white""
+set    "Gray="Darkgray" "white""
+set   "Green="DarkGreen" "white""
+set    "Blue="Blue" "white""
+set    "_Red="Black" "Red""
+set  "_White="Black" "Gray""
+set  "_Green="Black" "Green""
+set "_Yellow="Black" "Yellow""
+)
+
+set "nceline=echo: &echo ==== ERROR ==== &echo:"
+set "eline=echo: &call :dk_color %Red% "==== ERROR ====" &echo:"
+if %~z0 GEQ 200000 (
+set "_exitmsg=Go back"
+set "_fixmsg=Go back to Main Menu, select Troubleshoot and run Fix Licensing option."
+) else (
+set "_exitmsg=Exit"
+set "_fixmsg=In MAS folder, run Troubleshoot script and select Fix Licensing option."
+)
+exit /b
+
+::========================================================================================================================================
+
+::  Check wmic.exe
+
+:dk_ckeckwmic
+
+set _wmic=0
+for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" (
+cmd /c "wmic path Win32_ComputerSystem get CreationClassName /value" %nul2% | find /i "computersystem" %nul1% && set _wmic=1
+)
+exit /b
+
+::  Show info for potential script stuck scenario
+
+:dk_sppissue
+
+sc start sppsvc %nul%
+set spperror=%errorlevel%
+
+if %spperror% NEQ 1056 if %spperror% NEQ 0 (
+%eline%
+echo sc start sppsvc [Error Code: %spperror%]
+)
+
+echo:
+%psc% "$job = Start-Job { (Get-WmiObject -Query 'SELECT * FROM %sps%').Version }; if (-not (Wait-Job $job -Timeout 20)) {write-host 'sppsvc is not working correctly. Help - %mas%troubleshoot'}"
+exit /b
+
+::  Common lines used in PowerShell reflection code
+
+:dk_reflection
+
+set ref=$AssemblyBuilder = [AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1);
+set ref=%ref% $ModuleBuilder = $AssemblyBuilder.DefineDynamicModule(2, $False);
+set ref=%ref% $TypeBuilder = $ModuleBuilder.DefineType(0);
+exit /b
+
+::========================================================================================================================================
+
+:dk_color
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[0m
+) else (
+%psc% write-host -back '%1' -fore '%2' '%3'
+)
+exit /b
+
+:dk_color2
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m
+) else (
+%psc% write-host -back '%1' -fore '%2' '%3' -NoNewline; write-host -back '%4' -fore '%5' '%6'
+)
+exit /b
+
+::========================================================================================================================================
+
+:dk_done
+
+echo:
+if %_unattended%==1 timeout /t 2 & exit /b
+
+if defined fixes (
+call :dk_color2 %Blue% "Press [1] To Open Troubleshoot Page " %Gray% " Press [0] To Ignore"
+choice /C:10 /N
+if !errorlevel!==1 (for %%# in (%fixes%) do (start %%#))
+)
+
+if defined terminal (
+call :dk_color %_Yellow% "Press [0] key to %_exitmsg%..."
+choice /c 0 /n
+) else (
+call :dk_color %_Yellow% "Press any key to %_exitmsg%..."
+pause %nul1%
+)
+
+exit /b
+
+::========================================================================================================================================
+:: Leave empty line below