diff options
| author | DESKTOP-RBH716R\Admin | 2022-07-25 17:08:12 +0000 |
|---|---|---|
| committer | DESKTOP-RBH716R\Admin | 2022-07-25 17:08:12 +0000 |
| commit | d62eeb9355accab60dd9cacabbb6ef79773adc24 (patch) | |
| tree | ca24a8cf2184caf00fa81432d873c78537267dac /MAS/Separate-Files-Version | |
| parent | f22b577af8455c8f7c3799168b8c172726d408b9 (diff) | |
| download | Microsoft-Activation-Scripts-d62eeb9355accab60dd9cacabbb6ef79773adc24.zip | |
Revert "1.6"
This reverts commit f22b577af8455c8f7c3799168b8c172726d408b9.
Diffstat (limited to 'MAS/Separate-Files-Version')
29 files changed, 10174 insertions, 10270 deletions
diff --git a/MAS/Separate-Files-Version/Activation_Troubleshoot.cmd b/MAS/Separate-Files-Version/Activation_Troubleshoot.cmd deleted file mode 100644 index 0b6a574..0000000 --- a/MAS/Separate-Files-Version/Activation_Troubleshoot.cmd +++ /dev/null @@ -1,886 +0,0 @@ -@setlocal DisableDelayedExpansion -@echo off - - - -::============================================================================ -:: -:: This script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::============================================================================ - - - - -::======================================================================================================================================== - -:: 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 - -set "_cmdf=%~f0" -for %%# in (%*) do ( -if /i "%%#"=="r1" set r1=1 -if /i "%%#"=="r2" set r2=1 -) - -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 Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -::======================================================================================================================================== - -cls -color 07 -title Activation Troubleshoot - -set _elev= -if /i "%~1"=="-el" set _elev=1 - -set winbuild=1 -set "nul=>nul 2>&1" -set psc=powershell.exe -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 2>nul | find /i "0x0" 1>nul && (set _NCS=0) - -call :_colorprep - -set cbs_log=%SystemRoot%\logs\cbs\cbs.log -set "nceline=echo: &echo ==== ERROR ==== &echo:" -set "eline=echo: &call :_color %Red% "==== ERROR ====" &echo:" -set "line=_________________________________________________________________________________________________" - -::======================================================================================================================================== - -if %winbuild% LSS 7600 ( -%nceline% -echo Unsupported OS version detected. -echo Project is supported only for Windows 7/8/8.1/10/11 and their Server equivalent. -goto at_done -) - -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find powershell.exe in the system. -goto at_done -) - -::======================================================================================================================================== - -:: Fix for the special characters limitation 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 "_ttemp=%temp%" - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -echo "!_batf!" | find /i "!_ttemp!" 1>nul && ( -if /i not "!_work!"=="!_ttemp!" ( -%nceline% -echo Script is launched from the temp folder, -echo Most likely you are running the script directly from the archive file. -echo: -echo Extract the archive file and launch the script from the extracted folder. -goto at_done -) -) - -::======================================================================================================================================== - -:: Elevate script as admin and pass arguments and preventing loop - -%nul% reg query HKU\S-1-5-19 || ( -if not defined _elev %nul% %psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b -%nceline% -echo This script require administrator privileges. -echo To do so, right click on this script and select 'Run as administrator'. -goto at_done -) - -::======================================================================================================================================== - -setlocal DisableDelayedExpansion - -:: Check desktop location - -set desktop= -for /f "skip=2 tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v Desktop') do call set "desktop=%%b" -if not defined desktop for /f "delims=" %%a in ('%psc% "& {write-host $([Environment]::GetFolderPath('Desktop'))}"') do call set "desktop=%%a" - -if not defined desktop ( -%eline% -echo Desktop location was not detected, aborting... -goto at_done -) - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -:at_menu - -cls -color 07 -title Activation Troubleshoot -mode con cols=77 lines=30 - -echo: -echo: -echo: -echo: -echo: _______________________________________________________________ -echo: -echo: [1] ReadMe -echo: ___________________________________________________ -echo: -echo: [2] Dism RestoreHealth -echo: [3] SFC Scannow -echo: -echo: [4] Rebuild Licensing Tokens -echo: [5] Clear Office vNext License -echo: ___________________________________________________ -echo: -echo: [6] Solution: Office is not genuine banner -echo: [0] Exit -echo: _______________________________________________________________ -echo: -call :_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard :" -choice /C:1234560 /N -set _erl=%errorlevel% - -if %_erl%==7 exit /b -if %_erl%==6 start https://massgrave.dev/office-license-is-not-genuine &goto at_menu -if %_erl%==5 goto:clearvnext -if %_erl%==4 goto:retokens -if %_erl%==3 goto:sfcscan -if %_erl%==2 goto:dism_rest -if %_erl%==1 start https://massgrave.dev/troubleshoot.html &goto at_menu -goto :at_menu - -::======================================================================================================================================== - -:dism_rest - -cls -mode 98, 30 -title Dism /Online /Cleanup-Image /RestoreHealth - -if %winbuild% LSS 9200 ( -%eline% -echo Unsupported OS version Detected. -echo This command is supported only for Windows 8/8.1/10/11 and their Server equivalent. -goto :at_back -) - -set _int= -for %%a in (dns.msftncsi.com) do ( -if not defined _int (for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do if not [%%#]==[] set _int=1)) - -echo: -if defined _int ( -echo Checking Internet Connection [Connected] -) else ( -call :_color2 %_White% " " %Red% "Checking Internet Connection [Not connected]" -) - -echo %line% -echo: -echo Dism uses Windows Update to provide the files required to fix corruption. -echo This will take 5-15 minutes or more.. -echo %line% -echo: -echo Notes: -echo: -call :_color2 %_White% " - " %Gray% "Make sure the Internet is connected." -call :_color2 %_White% " - " %Gray% "Make sure the Windows update is properly working." -echo: -echo %line% -echo: -choice /C:29 /N /M "> [9] Continue [2] Go back : " -if %errorlevel%==1 goto at_menu - -cls -mode 110, 30 -echo: - -call :_stopservice TrustedInstaller -del /s /f /q "%SystemRoot%\logs\cbs\*.*" - -set _time= -for /f %%a in ('%psc% "Get-Date -format HH_mm_ss"') do set _time=%%a -echo: -echo Applying the command, -echo dism /online /cleanup-image /restorehealth /Logpath:"%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" /loglevel:4 -echo: -dism /online /cleanup-image /restorehealth /Logpath:"%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" /loglevel:4 - -if not exist "!desktop!\" ( -echo: -call :_color %Red% "Desktop location is not detected. Failed to copy logs on the dekstop." -goto :at_back -) - -if not exist "!desktop!\AT_Logs\" md "!desktop!\AT_Logs\" %nul% -copy /y /b "%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" "!desktop!\AT_Logs\RHealth_DISM_%_time%.txt" %nul% -copy /y /b "%cbs_log%" "!desktop!\AT_Logs\RHealth_CBS_%_time%.txt" %nul% -del /f /q "%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" %nul% - -echo: -call :_color %Gray% "CBS and DISM logs are copied to the AT_Logs folder on the dekstop." -goto :at_back - -::======================================================================================================================================== - -:sfcscan - -cls -mode 98, 30 -title sfc /scannow - -echo: -echo %line% -echo: -echo System File Checker will repair missing or corrupted system files. -echo This will take 10-15 minutes or more.. -echo: -echo If SFC could not fix something, then run the command again to see if it may be able -echo to the next time. Sometimes it may take running the sfc /scannow command 3 times -echo restarting the PC after each time to completely fix everything that it's able to. -echo: -echo %line% -echo: -choice /C:29 /N /M "> [9] Continue [2] Go back : " -if %errorlevel%==1 goto at_menu - -cls -echo: - -call :_stopservice TrustedInstaller -del /s /f /q "%SystemRoot%\logs\cbs\*.*" - -set _time= -for /f %%a in ('%psc% "Get-Date -format HH_mm_ss"') do set _time=%%a -echo: -echo Applying the command, -echo sfc /scannow -echo: -sfc /scannow - -if not exist "!desktop!\" ( -echo: -call :_color %Red% "Desktop location is not detected. Failed to copy logs on the dekstop." -goto :at_back -) - -if not exist "!desktop!\AT_Logs\" md "!desktop!\AT_Logs\" %nul% - -copy /y /b "%cbs_log%" "!desktop!\AT_Logs\SFC_CBS_%_time%.txt" %nul% -findstr /i /c:"[SR]" %cbs_log% | findstr /i /v /c:verify >"!desktop!\AT_Logs\SFC_Main_%_time%.txt" - -echo: -call :_color %Gray% "CBS and main extracted logs are copied to the AT_Logs folder on the dekstop." -goto :at_back - -::======================================================================================================================================== - -:clearvnext - -cls -mode 98, 30 -title Clear Office vNext License - -echo: -echo %line% -echo: -echo This options will clear Office vNext ^(subscription^) license -echo: -echo You need to use this option when, -echo - KMS option is not activating office due to existing subscription license -echo - KMS option activated Office but Office activation page is not showing activated -echo: -echo %line% -echo: -choice /C:29 /N /M "> [9] Continue [2] Go back : " -if %errorlevel%==1 goto at_menu - -cls -mode con cols=115 lines=32 -%nul% %psc% "&{$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=31;$B.Height=200;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}" - - - -echo: -echo %line% -echo: -call :_color %Magenta% "Clearing Office vNext License" -echo: - -setlocal DisableDelayedExpansion -set "_locl=%LocalAppData%\Microsoft\Office\Licenses" -setlocal EnableDelayedExpansion -call :cleanfolder -set "_locl=%ProgramData%\Microsoft\Office\Licenses" -call :cleanfolder - -echo: -for %%# in ( -HKCU\Software\Microsoft\Office\16.0\Common\Licensing -HKCU\Software\Microsoft\Office\16.0\Common\Identity -) do ( -reg query %%# %nul% && ( -reg delete %%# /f %nul% && ( -echo Deleted Registry - %%# -) || ( -echo Failed to Delete - %%# -) -) || ( -echo Already Clean - %%# -) -) - -goto :at_back - -:cleanfolder - -2>nul dir /b /a "!_locl!\*" | %nul% findstr "^" && ( -pushd "!_locl!\" && ( -del /S /F /Q "!_locl!\*" -for /F "delims=" %%i in ('dir /b') do ( -RD /S /Q "%%i" %nul% -if not exist "!_locl!\%%i\" ( -echo Deleted Folder - !_locl!\%%i -) else ( -echo Failed To Delete - !_locl!\%%i -) -) -popd -) -) || ( -echo Already Clean - !_locl!\ -) -exit /b - -::======================================================================================================================================== - -:retokens - -cls -mode con cols=115 lines=32 -%nul% %psc% "&{$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=31;$B.Height=200;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}" -title Rebuild Licensing Tokens ^(SPP ^+ OSPP) - -echo: -echo %line% -echo: -echo Notes: -echo: -echo - It helps in troubleshooting activation issues. -echo: -call :_color2 %_White% " - " %Magenta% "This option will," -call :_color2 %_White% " " %Magenta% "- Deactivate Windows and Office, you will need to reactivate" -call :_color2 %_White% " " %Magenta% "- Uninstall Office licenses and keys" -call :_color2 %_White% " " %Magenta% "- Clear SPP-OSPP data.dat, tokens.dat, cache.dat" -call :_color2 %_White% " " %Magenta% "- Trigger the repair option for Office" -echo: -call :_color2 %_White% " - " %Red% "Apply it only when it is necessary." -echo: -echo %line% -echo: -choice /C:29 /N /M "> [9] Continue [2] Go back : " -if %errorlevel%==1 goto at_menu - - -cls -echo: -echo %line% -echo: -call :_color %Magenta% "Rebuilding SPP Licensing Tokens" -echo: - -call :scandat check - -if not defined token ( -call :_color %Red% "tokens.dat file not found." -) else ( -echo tokens.dat file: [%token%] -) - -echo: -echo Stopping sppsvc service... -call :_stopservice sppsvc - -echo: -call :scandat delete -call :scandat check - -if defined token ( -echo: -call :_color %Red% "Failed to delete .dat files." -echo: -) - -echo: -echo Reinstalling System Licenses [slmgr /rilc]... -cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -if %errorlevel% NEQ 0 cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -if %errorlevel% EQU 0 ( -echo [Successful] -) else ( -call :_color %Red% "[Failed]" -) - -call :scandat check - -echo: -if not defined token ( -call :_color %Red% "Failed to rebuilt tokens.dat file." -) else ( -call :_color %Green% "tokens.dat file was rebuilt successfully." -) - -::======================================================================================================================================== - -:: Rebuild OSPP Tokens - -echo: -echo %line% -echo: - -sc qc osppsvc %nul% || ( -echo: -call :_color %Magenta% "OSPP based Office is not installed" -call :_color %Magenta% "Skipping rebuilding OSPP tokens" -goto :cleanclipsvc -) - -call :_color %Magenta% "Rebuilding OSPP Licensing Tokens" -echo: - -call :scandatospp check - -if not defined token ( -call :_color %Red% "tokens.dat file not found." -) else ( -echo tokens.dat file: [%token%] -) - -echo: -echo Stopping osppsvc service... -call :_stopservice osppsvc - -echo: -call :scandatospp delete -call :scandatospp check - -if defined token ( -echo: -call :_color %Red% "Failed to delete .dat files." -echo: -) - -echo: -echo Starting osppsvc service to generate tokens.dat -call :_startservice osppsvc -call :scandatospp check -if not defined token ( -call :_stopservice osppsvc -call :_startservice osppsvc -timeout /t 3 %nul% -) - -call :scandatospp check - -echo: -if not defined token ( -call :_color %Red% "Failed to rebuilt tokens.dat file." -) else ( -call :_color %Green% "tokens.dat file was rebuilt successfully." -) - -::======================================================================================================================================== - -:cleanclipsvc - -:: This section is removed - -::======================================================================================================================================== - -:repairoffice - -echo: -echo %line% -echo: -call :_color %Magenta% "Repairing Office Licenses" -echo: - -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b - -if /i "%arch%"=="ARM64" ( -echo: -echo ARM64 Windows Found. -echo You need to use repair option in Windows settings for Office. -echo: -start ms-settings:appsfeatures -goto :repairend -) - -if /i "%arch%"=="x86" ( -set arch=X86 -) else ( -set arch=X64 -) - -for %%# in (68 86) do ( -for %%A in (msi14 msi15 msi16 c2r14 c2r15 c2r16) do (set %%A_%%#=&set %%Arepair%%#=) -) - -set _68=HKLM\SOFTWARE\Microsoft\Office -set _86=HKLM\SOFTWARE\Wow6432Node\Microsoft\Office - -%nul% reg query %_68%\14.0\Common\InstallRoot /v Path && (set "msi14_68=Office 14.0 MSI x86/x64" & set "msi14repair68=%systemdrive%\Program Files\Common Files\microsoft shared\OFFICE14\Office Setup Controller\Setup.exe") -%nul% reg query %_86%\14.0\Common\InstallRoot /v Path && (set "msi14_86=Office 14.0 MSI x86" & set "msi14repair86=%systemdrive%\Program Files (x86)\Common Files\Microsoft Shared\OFFICE14\Office Setup Controller\Setup.exe") -%nul% reg query %_68%\15.0\Common\InstallRoot /v Path && (set "msi15_68=Office 15.0 MSI x86/x64" & set "msi15repair68=%systemdrive%\Program Files\Common Files\microsoft shared\OFFICE15\Office Setup Controller\Setup.exe") -%nul% reg query %_86%\15.0\Common\InstallRoot /v Path && (set "msi15_86=Office 15.0 MSI x86" & set "msi15repair86=%systemdrive%\Program Files (x86)\Common Files\Microsoft Shared\OFFICE15\Office Setup Controller\Setup.exe") -%nul% reg query %_68%\16.0\Common\InstallRoot /v Path && (set "msi16_68=Office 16.0 MSI x86/x64" & set "msi16repair68=%systemdrive%\Program Files\Common Files\Microsoft Shared\OFFICE16\Office Setup Controller\Setup.exe") -%nul% reg query %_86%\16.0\Common\InstallRoot /v Path && (set "msi16_86=Office 16.0 MSI x86" & set "msi16repair86=%systemdrive%\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\Office Setup Controller\Setup.exe") -%nul% reg query %_68%\14.0\CVH /f Click2run /k && (set "c2r14_68=Office 14.0 C2R x86/x64" & set "c2r14repair68=") -%nul% reg query %_86%\14.0\CVH /f Click2run /k && (set "c2r14_86=Office 14.0 C2R x86" & set "c2r14repair86=") -%nul% reg query %_68%\15.0\ClickToRun /v InstallPath && (set "c2r15_68=Office 15.0 C2R x86/x64" & set "c2r15repair68=%systemdrive%\Program Files\Microsoft Office 15\Client%arch%\integratedoffice.exe") -%nul% reg query %_86%\15.0\ClickToRun /v InstallPath && (set "c2r15_86=Office 15.0 C2R x86" & set "c2r15repair86=%systemdrive%\Program Files\Microsoft Office 15\Client%arch%\integratedoffice.exe") -%nul% reg query %_68%\ClickToRun /v InstallPath && (set "c2r16_68=Office 16.0 C2R x86/x64" & set "c2r16repair68=%systemdrive%\Program Files\Microsoft Office 15\Client%arch%\OfficeClickToRun.exe") -%nul% reg query %_86%\ClickToRun /v InstallPath && (set "c2r16_86=Office 16.0 C2R x86" & set "c2r16repair86=%systemdrive%\Program Files\Microsoft Office 15\Client%arch%\OfficeClickToRun.exe") - -set uwp16= -if %winbuild% GEQ 10240 reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msoxmled.exe" %nul% && ( -dir /b "%ProgramFiles%\WindowsApps\Microsoft.Office.Desktop*" %nul% && set uwp16=Office 16.0 UWP -dir /b "%ProgramW6432%\WindowsApps\Microsoft.Office.Desktop*" %nul% && set uwp16=Office 16.0 UWP -dir /b "%ProgramFiles(x86)%\WindowsApps\Microsoft.Office.Desktop*" %nul% && set uwp16=Office 16.0 UWP -) - -set /a counter=0 -echo Checking installed Office versions... -echo: - -for %%# in ( -"%msi14_68%" -"%msi14_86%" -"%msi15_68%" -"%msi15_86%" -"%msi16_68%" -"%msi16_86%" -"%c2r14_68%" -"%c2r14_86%" -"%c2r15_68%" -"%c2r15_86%" -"%c2r16_68%" -"%c2r16_86%" -"%uwp16%" -) do ( -if not "%%#"=="""" ( -set insoff=%%# -set insoff=!insoff:"=! -echo [!insoff!] -set /a counter+=1 -) -) - -if %counter% GTR 1 ( -%eline% -echo Multiple office versions found. -echo It's recommended to install only one version of office. -echo ________________________________________________________________ -echo: -) - -if %counter% EQU 0 ( -echo: -echo Installed Office is not found. -goto :repairend -echo: -) else ( -echo: -call :_color %_Yellow% "A Window will popup, in that Window you need to select Repair Option..." -call :_color %_Yellow% "Press any key to continue..." -echo: -pause >nul -) - -if defined uwp16 ( -echo: -echo Note: Skipping repair for Office 16.0 UWP. -echo You need to use reset option in Windows settings for it. -echo ________________________________________________________________ -echo: -start ms-settings:appsfeatures -) - -set c2r14= -if defined c2r14_68 set c2r14=1 -if defined c2r14_86 set c2r14=1 - -if defined c2r14 ( -echo: -echo Note: Skipping repair for Office 14.0 C2R -echo You need to use Repair option in Windows settings for it. -echo ________________________________________________________________ -echo: -start appwiz.cpl -) - -if defined msi14_68 if exist "%msi14repair68%" echo Running - "%msi14repair68%" & "%msi14repair68%" -if defined msi14_86 if exist "%msi14repair86%" echo Running - "%msi14repair86%" & "%msi14repair86%" -if defined msi15_68 if exist "%msi15repair68%" echo Running - "%msi15repair68%" & "%msi15repair68%" -if defined msi15_86 if exist "%msi15repair86%" echo Running - "%msi15repair86%" & "%msi15repair86%" -if defined msi16_68 if exist "%msi16repair68%" echo Running - "%msi16repair68%" & "%msi16repair68%" -if defined msi16_86 if exist "%msi16repair86%" echo Running - "%msi16repair86%" & "%msi16repair86%" -if defined c2r15_68 if exist "%c2r15repair68%" echo Running - "%c2r15repair68%" REPAIRUI RERUNMODE & "%c2r15repair68%" REPAIRUI RERUNMODE -if defined c2r15_86 if exist "%c2r15repair86%" echo Running - "%c2r15repair86%" REPAIRUI RERUNMODE & "%c2r15repair86%" REPAIRUI RERUNMODE -if defined c2r16_68 if exist "%c2r16repair68%" echo Running - "%c2r16repair68%" scenario=Repair & "%c2r16repair68%" scenario=Repair -if defined c2r16_86 if exist "%c2r16repair86%" echo Running - "%c2r16repair86%" scenario=Repair & "%c2r16repair86%" scenario=Repair - -:repairend - -echo: -echo %line% -echo: -echo: -call :_color %Green% "Finished" - -::======================================================================================================================================== - -:at_back - -echo: -echo %line% -echo: -call :_color %_Yellow% "Press any key to go back..." -pause >nul -goto :at_menu - -::======================================================================================================================================== - -:at_done - -echo: -echo Press any key to exit... -pause >nul -exit /b - -::======================================================================================================================================== - -:_stopservice - -for %%# in (%1) do ( -sc query %%# | find /i "STOPPED" %nul% || net stop %%# /y %nul% -sc query %%# | find /i "STOPPED" %nul% || sc stop %%# %nul% -) -exit /b - -:_startservice - -for %%# in (%1) do ( -sc query %%# | find /i "RUNNING" %nul% || net start %%# /y %nul% -sc query %%# | find /i "RUNNING" %nul% || sc start %%# %nul% -) -exit /b - -::======================================================================================================================================== - -:scandat - -set token= -for %%# in ( -%Systemdrive%\Windows\System32\spp\store_test\2.0\ -%Systemdrive%\Windows\System32\spp\store\ -%Systemdrive%\Windows\System32\spp\store\2.0\ -%Systemdrive%\Windows\ServiceProfiles\NetworkService\AppData\Roaming\Microsoft\SoftwareProtectionPlatform\ -) do ( - -if %1==check ( -if exist %%#tokens.dat set token=%%#tokens.dat -) - -if %1==delete ( -if exist %%# ( -%nul% dir /a-d /s "%%#*.dat" && ( -attrib -r -s -h "%%#*.dat" /S -del /S /F /Q "%%#*.dat" -) -) -) -) -exit /b - -:scandatospp - -set token= -for %%# in ( -%ProgramData%\Microsoft\OfficeSoftwareProtectionPlatform\ -) do ( - -if %1==check ( -if exist %%#tokens.dat set token=%%#tokens.dat -) - -if %1==delete ( -if exist %%# ( -%nul% dir /a-d /s "%%#*.dat" && ( -attrib -r -s -h "%%#*.dat" /S -del /S /F /Q "%%#*.dat" -) -) -) -) -exit /b - -::========================================================================================================================================\ - -:_color - -if %_NCS% EQU 1 ( -echo %esc%[%~1%~2%esc%[0m -) else ( -call :batcol %~1 "%~2" -) -exit /b - -:_color2 - -if %_NCS% EQU 1 ( -echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m -) else ( -call :batcol %~1 "%~2" %~3 "%~4" -) -exit /b - -::======================================= - -:: Colored text with pure batch method -:: Thanks to @dbenham and @jeb -:: stackoverflow.com/a/10407642 - -:batcol - -pushd %_coltemp% -if not exist "'" (<nul >"'" set /p "=.") -setlocal -set "s=%~2" -set "t=%~4" -call :_batcol %1 s %3 t -del /f /q "'" -del /f /q "`.txt" -popd -exit /b - -:_batcol - -setlocal EnableDelayedExpansion -set "s=!%~2!" -set "t=!%~4!" -for /f delims^=^ eol^= %%i in ("!s!") do ( - if "!" equ "" setlocal DisableDelayedExpansion - >`.txt (echo %%i\..\') - findstr /a:%~1 /f:`.txt "." - <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%" -) -if "%~4"=="" echo(&exit /b -setlocal EnableDelayedExpansion -for /f delims^=^ eol^= %%i in ("!t!") do ( - if "!" equ "" setlocal DisableDelayedExpansion - >`.txt (echo %%i\..\') - findstr /a:%~3 /f:`.txt "." - <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%" -) -echo( -exit /b - -::======================================= - -:_colorprep - -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 "Black="30m"" -set "Green="42;97m"" -set "Blue="44;97m"" -set "Yellow="43;97m"" -set "Magenta="45;97m"" - -set "_Red="40;91m"" -set "_Green="40;92m"" -set "_Blue="40;94m"" -set "_White="40;37m"" -set "_Yellow="40;93m"" - -exit /b -) - -for /f %%A in ('"prompt $H&for %%B in (1) do rem"') do set "_BS=%%A %%A" -set "_coltemp=%SystemRoot%\Temp" - -set "Red="CF"" -set "Gray="8F"" -set "Black="00"" -set "Green="2F"" -set "Blue="1F"" -set "Yellow="6F"" -set "Magenta="5F"" - -set "_Red="0C"" -set "_Green="0A"" -set "_Blue="09"" -set "_White="07"" -set "_Yellow="0E"" - -exit /b - -::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Activators/Activations_Summary.html b/MAS/Separate-Files-Version/Activators/Activations_Summary.html new file mode 100644 index 0000000..3b3d7fe --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/Activations_Summary.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-activations-summary.html">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Check-Activation-Status-vbs.cmd b/MAS/Separate-Files-Version/Activators/Check-Activation-Status-vbs.cmd index b0bb506..b2afd24 100644 --- a/MAS/Separate-Files-Version/Check-Activation-Status-vbs.cmd +++ b/MAS/Separate-Files-Version/Activators/Check-Activation-Status-vbs.cmd @@ -1,234 +1,209 @@ -@setlocal DisableDelayedExpansion -@echo off -@cls - - - -:: Check-Activation-Status-vbs.cmd -:: Written by @abbodi1406 -:: forums.mydigitallife.net/posts/838808 - - - -set _args= -set _args=%* -for %%A in (%_args%) do ( -if /i "%%A"=="-wow" set _rel1=1 -if /i "%%A"=="-arm" set _rel2=1 -) -set "_cmdf=%~f0" -if exist "%SystemRoot%\Sysnative\cmd.exe" if not defined _rel1 ( -setlocal EnableDelayedExpansion -start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" -wow" -exit /b -) -if exist "%SystemRoot%\SysArm32\cmd.exe" if /i %PROCESSOR_ARCHITECTURE%==AMD64 if not defined _rel2 ( -setlocal EnableDelayedExpansion -start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" -arm" -exit /b -) -color 07 -title Check Activation Status [vbs] -set "SysPath=%SystemRoot%\System32" -set "Path=%SystemRoot%\System32;%SystemRoot%\System32\Wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "SysPath=%SystemRoot%\Sysnative" -set "Path=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\Wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%Path%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -set "_bit=64" -set "_wow=1" -if /i "%PROCESSOR_ARCHITECTURE%"=="x86" if "%PROCESSOR_ARCHITEW6432%"=="" set "_wow=0"&set "_bit=32" -set "_utemp=%TEMP%" -set "line2=************************************************************" -set "line3=____________________________________________________________" -set _sO16vbs=0 -set _sO15vbs=0 -if exist "%ProgramFiles%\Microsoft Office\Office15\ospp.vbs" ( - set _sO15vbs=1 -) else if exist "%ProgramW6432%\Microsoft Office\Office15\ospp.vbs" ( - set _sO15vbs=1 -) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\ospp.vbs" ( - set _sO15vbs=1 -) -setlocal EnableDelayedExpansion -echo %line2% -echo *** Windows Status *** -echo %line2% -pushd "!_utemp!" -copy /y %SystemRoot%\System32\slmgr.vbs . >nul 2>&1 -net start sppsvc /y >nul 2>&1 -cscript //nologo slmgr.vbs /dli || (echo Error executing slmgr.vbs&del /f /q slmgr.vbs&popd&goto :casVend) -cscript //nologo slmgr.vbs /xpr -del /f /q slmgr.vbs >nul 2>&1 -popd -echo %line3% - -:casVo16 -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b") -if exist "!office!\ospp.vbs" ( -set _sO16vbs=1 -echo. -echo %line2% -if %_sO15vbs% EQU 0 ( -echo *** Office 2016 %_bit%-bit Status *** -) else ( -echo *** Office 2013/2016 Status *** -) -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) -if %_wow%==0 goto :casVo13 -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b") -if exist "!office!\ospp.vbs" ( -set _sO16vbs=1 -echo. -echo %line2% -if %_sO15vbs% EQU 0 ( -echo *** Office 2016 32-bit Status *** -) else ( -echo *** Office 2013/2016 Status *** -) -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) - -:casVo13 -if %_sO16vbs% EQU 1 goto :casVo10 -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b") -if exist "!office!\ospp.vbs" ( -echo. -echo %line2% -echo *** Office 2013 %_bit%-bit Status *** -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) -if %_wow%==0 goto :casVo10 -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\15.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b") -if exist "!office!\ospp.vbs" ( -echo. -echo %line2% -echo *** Office 2013 32-bit Status *** -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) - -:casVo10 -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b") -if exist "!office!\ospp.vbs" ( -echo. -echo %line2% -echo *** Office 2010 %_bit%-bit Status *** -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) -if %_wow%==0 goto :casVc16 -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b") -if exist "!office!\ospp.vbs" ( -echo. -echo %line2% -echo *** Office 2010 32-bit Status *** -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) - -:casVc16 -reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath >nul 2>&1 || ( -reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath >nul 2>&1 || goto :casVc13 -) -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do (set "office=%%b\Office16") -if exist "!office!\ospp.vbs" ( -set _sO16vbs=1 -echo. -echo %line2% -if %_sO15vbs% EQU 0 ( -echo *** Office 2016-2021 C2R Status *** -) else ( -echo *** Office 2013-2021 Status *** -) -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) -if %_wow%==0 goto :casVc13 -set office= -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do (set "office=%%b\Office16") -if exist "!office!\ospp.vbs" ( -set _sO16vbs=1 -echo. -echo %line2% -if %_sO15vbs% EQU 0 ( -echo *** Office 2016-2021 C2R Status *** -) else ( -echo *** Office 2013-2021 Status *** -) -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) - -:casVc13 -if %_sO16vbs% EQU 1 goto :casVc10 -reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath >nul 2>&1 || ( -reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath >nul 2>&1 || goto :casVc10 -) -set office= -if exist "%ProgramFiles%\Microsoft Office\Office15\ospp.vbs" ( - set "office=%ProgramFiles%\Microsoft Office\Office15" -) else if exist "%ProgramW6432%\Microsoft Office\Office15\ospp.vbs" ( - set "office=%ProgramW6432%\Microsoft Office\Office15" -) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\ospp.vbs" ( - set "office=%ProgramFiles(x86)%\Microsoft Office\Office15" -) -if exist "!office!\ospp.vbs" ( -echo. -echo %line2% -echo *** Office 2013 C2R Status *** -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) - -:casVc10 -if %_wow%==0 reg query HKLM\SOFTWARE\Microsoft\Office\14.0\CVH /f Click2run /k >nul 2>&1 || goto :casVend -if %_wow%==1 reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\CVH /f Click2run /k >nul 2>&1 || goto :casVend -set office= -if exist "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs" ( - set "office=%ProgramFiles%\Microsoft Office\Office14" -) else if exist "%ProgramW6432%\Microsoft Office\Office14\ospp.vbs" ( - set "office=%ProgramW6432%\Microsoft Office\Office14" -) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office14\ospp.vbs" ( - set "office=%ProgramFiles(x86)%\Microsoft Office\Office14" -) -if exist "!office!\ospp.vbs" ( -echo. -echo %line2% -echo *** Office 2010 C2R Status *** -echo %line2% -cscript //nologo "!office!\ospp.vbs" /dstatus -) - -:casVend -echo. -echo Press any key to exit. -pause >nul +@setlocal DisableDelayedExpansion
+@echo off
+@cls
+
+
+
+:: Check-Activation-Status-vbs.cmd
+:: Written by @abbodi1406
+:: forums.mydigitallife.net/posts/838808
+
+
+
+set "_cmdf=%~f0"
+if exist "%SystemRoot%\Sysnative\cmd.exe" (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" "
+exit /b
+)
+if exist "%SystemRoot%\SysArm32\cmd.exe" if /i %PROCESSOR_ARCHITECTURE%==AMD64 (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" "
+exit /b
+)
+color 07
+title Check Activation Status [vbs]
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+set "_bit=64"
+set "_wow=1"
+if /i "%PROCESSOR_ARCHITECTURE%"=="x86" if "%PROCESSOR_ARCHITEW6432%"=="" set "_wow=0"&set "_bit=32"
+set "_utemp=%TEMP%"
+set "line2=************************************************************"
+set "line3=____________________________________________________________"
+set _sO16vbs=0
+set _sO15vbs=0
+if exist "%ProgramFiles%\Microsoft Office\Office15\ospp.vbs" (
+ set _sO15vbs=1
+) else if exist "%ProgramW6432%\Microsoft Office\Office15\ospp.vbs" (
+ set _sO15vbs=1
+) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\ospp.vbs" (
+ set _sO15vbs=1
+)
+setlocal EnableDelayedExpansion
+echo %line2%
+echo *** Windows Status ***
+echo %line2%
+pushd "!_utemp!"
+copy /y %SystemRoot%\System32\slmgr.vbs . >nul 2>&1
+net start sppsvc /y >nul 2>&1
+cscript //nologo slmgr.vbs /dli || (echo Error executing slmgr.vbs&del /f /q slmgr.vbs&popd&goto :casVend)
+cscript //nologo slmgr.vbs /xpr
+del /f /q slmgr.vbs >nul 2>&1
+popd
+echo %line3%
+
+:casVo16
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016 %_bit%-bit Status ***
+) else (
+echo *** Office 2013/2016 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVo13
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016 32-bit Status ***
+) else (
+echo *** Office 2013/2016 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVo13
+if %_sO16vbs% EQU 1 goto :casVo10
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2013 %_bit%-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVo10
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\15.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2013 32-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVo10
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2010 %_bit%-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVc16
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2010 32-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVc16
+reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath >nul 2>&1 || (
+reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath >nul 2>&1 || goto :casVc13
+)
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do (set "office=%%b\Office16")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016-2021 C2R Status ***
+) else (
+echo *** Office 2013-2021 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVc13
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do (set "office=%%b\Office16")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016-2021 C2R Status ***
+) else (
+echo *** Office 2013-2021 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVc13
+if %_sO16vbs% EQU 1 goto :casVc10
+reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath >nul 2>&1 || (
+reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath >nul 2>&1 || goto :casVc10
+)
+set office=
+if exist "%ProgramFiles%\Microsoft Office\Office15\ospp.vbs" (
+ set "office=%ProgramFiles%\Microsoft Office\Office15"
+) else if exist "%ProgramW6432%\Microsoft Office\Office15\ospp.vbs" (
+ set "office=%ProgramW6432%\Microsoft Office\Office15"
+) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\ospp.vbs" (
+ set "office=%ProgramFiles(x86)%\Microsoft Office\Office15"
+)
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2013 C2R Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVc10
+if %_wow%==0 reg query HKLM\SOFTWARE\Microsoft\Office\14.0\CVH /f Click2run /k >nul 2>&1 || goto :casVend
+if %_wow%==1 reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\CVH /f Click2run /k >nul 2>&1 || goto :casVend
+set office=
+if exist "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs" (
+ set "office=%ProgramFiles%\Microsoft Office\Office14"
+) else if exist "%ProgramW6432%\Microsoft Office\Office14\ospp.vbs" (
+ set "office=%ProgramW6432%\Microsoft Office\Office14"
+) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office14\ospp.vbs" (
+ set "office=%ProgramFiles(x86)%\Microsoft Office\Office14"
+)
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2010 C2R Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVend
+echo.
+echo Press any key to exit.
+pause >nul
exit /b
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Check-Activation-Status-wmi.cmd b/MAS/Separate-Files-Version/Activators/Check-Activation-Status-wmi.cmd index 495b1e8..9238d2f 100644 --- a/MAS/Separate-Files-Version/Check-Activation-Status-wmi.cmd +++ b/MAS/Separate-Files-Version/Activators/Check-Activation-Status-wmi.cmd @@ -1,533 +1,553 @@ -<!-- : Begin batch script -@setlocal DisableDelayedExpansion -@echo off - - - -:: Check-Activation-Status-wmi.cmd -:: Written by @abbodi1406 -:: forums.mydigitallife.net/posts/838808 - - - - -set WMI_VBS=0 -@cls -set _args= -set _args=%* -for %%A in (%_args%) do ( -if /i "%%A"=="-wow" set _rel1=1 -if /i "%%A"=="-arm" set _rel2=1 -) -set "_cmdf=%~f0" -if exist "%SystemRoot%\Sysnative\cmd.exe" if not defined _rel1 ( -setlocal EnableDelayedExpansion -start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" -wow" -exit /b -) -if exist "%SystemRoot%\SysArm32\cmd.exe" if /i %PROCESSOR_ARCHITECTURE%==AMD64 if not defined _rel2 ( -setlocal EnableDelayedExpansion -start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" -arm" -exit /b -) -color 07 -title Check Activation Status [wmi] -set wspp=SoftwareLicensingProduct -set wsps=SoftwareLicensingService -set ospp=OfficeSoftwareProtectionProduct -set osps=OfficeSoftwareProtectionService -set winApp=55c92734-d682-4d71-983e-d6ec3f16059f -set o14App=59a52881-a989-479d-af46-f275c6370663 -set o15App=0ff1ce15-a989-479d-af46-f275c6370663 -for %%# in (spp_get,ospp_get,cW1nd0ws,sppw,c0ff1ce15,sppo,osppsvc,ospp14,ospp15) do set "%%#=" -for /f "tokens=6 delims=[]. " %%# in ('ver') do set winbuild=%%# -set "spp_get=Description, DiscoveredKeyManagementServiceMachineName, DiscoveredKeyManagementServiceMachinePort, EvaluationEndDate, GracePeriodRemaining, ID, KeyManagementServiceMachine, KeyManagementServicePort, KeyManagementServiceProductKeyID, LicenseStatus, LicenseStatusReason, Name, PartialProductKey, ProductKeyID, VLActivationInterval, VLRenewalInterval" -set "ospp_get=%spp_get%" -if %winbuild% GEQ 9200 set "spp_get=%spp_get%, KeyManagementServiceLookupDomain, VLActivationTypeEnabled" -if %winbuild% GEQ 9600 set "spp_get=%spp_get%, DiscoveredKeyManagementServiceMachineIpAddress, ProductKeyChannel" -set "_work=%~dp0" -set "_batf=%~f0" -set "_batp=%_batf:'=''%" -set "_Local=%LocalAppData%" -set _Identity=0 -setlocal EnableDelayedExpansion -dir /b /s /a:-d "!_Local!\Microsoft\Office\Licenses\*1*" 1>nul 2>nul && set _Identity=1 -dir /b /s /a:-d "!ProgramData!\Microsoft\Office\Licenses\*1*" 1>nul 2>nul && set _Identity=1 -pushd "!_work!" -setlocal DisableDelayedExpansion -if %winbuild% LSS 9200 if not exist "%SystemRoot%\servicing\Packages\Microsoft-Windows-PowerShell-WTR-Package~*.mum" set _Identity=0 - -set "SysPath=%SystemRoot%\System32" -set "Path=%SystemRoot%\System32;%SystemRoot%\System32\Wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "SysPath=%SystemRoot%\Sysnative" -set "Path=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\Wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%Path%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -set _cwmi=0 -for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" ( -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "ComputerSystem" 1>nul && set _cwmi=1 -) - -if %_cwmi% EQU 0 ( -echo: -echo Error: wmic.exe is not responding in the system. -echo: -echo Press any key to exit... -pause >nul -exit /b -) - -set "line2=************************************************************" -set "line3=____________________________________________________________" -set "_psc=powershell" - -set _prsh=1 -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" set _prsh=0 -set "_csg=cscript.exe //NoLogo //Job:WmiMulti "%~nx0?.wsf"" -set "_csq=cscript.exe //NoLogo //Job:WmiQuery "%~nx0?.wsf"" -set "_csx=cscript.exe //NoLogo //Job:XPDT "%~nx0?.wsf"" -if %_cwmi% EQU 0 set WMI_VBS=1 -if %WMI_VBS% EQU 0 ( -set "_zz1=wmic path" -set "_zz2=where" -set "_zz3=get" -set "_zz4=/value" -set "_zz5=(" -set "_zz6=)" -set "_zz7="wmic path" -set "_zz8=/value"" -) else ( -set "_zz1=%_csq%" -set "_zz2=" -set "_zz3=" -set "_zz4=" -set "_zz5="" -set "_zz6="" -set "_zz7=%_csq%" -set "_zz8=" -) -set _WSH=0 -set OsppHook=1 -sc query osppsvc >nul 2>&1 -if %errorlevel% EQU 1060 set OsppHook=0 - -net start sppsvc /y >nul 2>&1 -call :casWpkey %wspp% %winApp% cW1nd0ws sppw -if %winbuild% GEQ 9200 call :casWpkey %wspp% %o15App% c0ff1ce15 sppo -if %OsppHook% NEQ 0 ( -net start osppsvc /y >nul 2>&1 -call :casWpkey %ospp% %o14App% osppsvc ospp14 -if %winbuild% LSS 9200 call :casWpkey %ospp% %o15App% osppsvc ospp15 -) - -echo %line2% -echo *** Windows Status *** -echo %line2% -if not defined cW1nd0ws ( -echo. -echo Error: product key not found. -goto :casWcon -) -set winID=1 -set "_qr=%_zz7% %wspp% %_zz2% %_zz5%ApplicationID='%winApp%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%" -for /f "tokens=2 delims==" %%# in ('%_qr%') do ( - set "chkID=%%#" - call :casWdet "%wspp%" "%wsps%" "%spp_get%" - call :casWout - echo %line3% - echo. -) - -:casWcon -set winID=0 -set verbose=1 -if not defined c0ff1ce15 ( -if defined osppsvc goto :casWospp -goto :casWend -) -echo %line2% -echo *** Office Status *** -echo %line2% -set "_qr=%_zz7% %wspp% %_zz2% %_zz5%ApplicationID='%o15App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%" -for /f "tokens=2 delims==" %%# in ('%_qr%') do ( - set "chkID=%%#" - call :casWdet "%wspp%" "%wsps%" "%spp_get%" - call :casWout - echo %line3% - echo. -) -set verbose=0 -if defined osppsvc goto :casWospp -goto :casWend - -:casWospp -if %verbose% EQU 1 ( -echo %line2% -echo *** Office Status *** -echo %line2% -) -set "_qr=%_zz7% %ospp% %_zz2% %_zz5%ApplicationID='%o15App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%" -if defined ospp15 for /f "tokens=2 delims==" %%# in ('%_qr%') do ( - set "chkID=%%#" - call :casWdet "%ospp%" "%osps%" "%ospp_get%" - call :casWout - echo %line3% - echo. -) -set "_qr=%_zz7% %ospp% %_zz2% %_zz5%ApplicationID='%o14App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%" -if defined ospp14 for /f "tokens=2 delims==" %%# in ('%_qr%') do ( - set "chkID=%%#" - call :casWdet "%ospp%" "%osps%" "%ospp_get%" - call :casWout - echo %line3% - echo. -) -goto :casWend - -:casWpkey -set "_qr=%_zz1% %1 %_zz2% %_zz5%ApplicationID='%2' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz4%" -%_qr% 2>nul | findstr /i ID 1>nul && (set %3=1&set %4=1) -exit /b - -:casWdet -for %%# in (%~3) do set "%%#=" -if /i %~1==%ospp% for %%# in (DiscoveredKeyManagementServiceMachineIpAddress, KeyManagementServiceLookupDomain, ProductKeyChannel, VLActivationTypeEnabled) do set "%%#=" -set "cKmsClient=" -set "cTblClient=" -set "cAvmClient=" -set "ExpireMsg=" -set "_xpr=" -set "_qr="wmic path %~1 where ID='%chkID%' get %~3 /value" ^| findstr ^=" -if %WMI_VBS% NEQ 0 set "_qr=%_csg% %~1 "ID='%chkID%'" "%~3"" -for /f "tokens=* delims=" %%# in ('%_qr%') do set "%%#" - -set /a _gpr=(GracePeriodRemaining+1440-1)/1440 -echo %Description%| findstr /i VOLUME_KMSCLIENT 1>nul && (set cKmsClient=1&set _mTag=Volume) -echo %Description%| findstr /i TIMEBASED_ 1>nul && (set cTblClient=1&set _mTag=Timebased) -echo %Description%| findstr /i VIRTUAL_MACHINE_ACTIVATION 1>nul && (set cAvmClient=1&set _mTag=Automatic VM) -cmd /c exit /b %LicenseStatusReason% -set "LicenseReason=%=ExitCode%" -set "LicenseMsg=Time remaining: %GracePeriodRemaining% minute(s) (%_gpr% day(s))" -if %_gpr% GEQ 1 if %_WSH% EQU 1 ( -for /f "tokens=* delims=" %%# in ('%_csx% %GracePeriodRemaining%') do set "_xpr=%%#" -) -if %_gpr% GEQ 1 if %_prsh% EQU 1 if not defined _xpr ( -for /f "tokens=* delims=" %%# in ('%_psc% "$([DateTime]::Now.addMinutes(%GracePeriodRemaining%)).ToString('yyyy-MM-dd HH:mm:ss')" 2^>nul') do set "_xpr=%%#" -title Check Activation Status [wmi] -) - -if %LicenseStatus% EQU 0 ( -set "License=Unlicensed" -set "LicenseMsg=" -) -if %LicenseStatus% EQU 1 ( -set "License=Licensed" -set "LicenseMsg=" -if %GracePeriodRemaining% EQU 0 ( - if %winID% EQU 1 (set "ExpireMsg=The machine is permanently activated.") else (set "ExpireMsg=The product is permanently activated.") - ) else ( - set "LicenseMsg=%_mTag% activation expiration: %GracePeriodRemaining% minute(s) (%_gpr% day(s))" - if defined _xpr set "ExpireMsg=%_mTag% activation will expire %_xpr%" - ) -) -if %LicenseStatus% EQU 2 ( -set "License=Initial grace period" -if defined _xpr set "ExpireMsg=Initial grace period ends %_xpr%" -) -if %LicenseStatus% EQU 3 ( -set "License=Additional grace period (KMS license expired or hardware out of tolerance)" -if defined _xpr set "ExpireMsg=Additional grace period ends %_xpr%" -) -if %LicenseStatus% EQU 4 ( -set "License=Non-genuine grace period." -if defined _xpr set "ExpireMsg=Non-genuine grace period ends %_xpr%" -) -if %LicenseStatus% EQU 6 ( -set "License=Extended grace period" -if defined _xpr set "ExpireMsg=Extended grace period ends %_xpr%" -) -if %LicenseStatus% EQU 5 ( -set "License=Notification" - if "%LicenseReason%"=="C004F200" (set "LicenseMsg=Notification Reason: 0xC004F200 (non-genuine)." - ) else if "%LicenseReason%"=="C004F009" (set "LicenseMsg=Notification Reason: 0xC004F009 (grace time expired)." - ) else (set "LicenseMsg=Notification Reason: 0x%LicenseReason%" - ) -) -if %LicenseStatus% GTR 6 ( -set "License=Unknown" -set "LicenseMsg=" -) -if not defined cKmsClient exit /b - -if %KeyManagementServicePort%==0 set KeyManagementServicePort=1688 -set "KmsReg=Registered KMS machine name: %KeyManagementServiceMachine%:%KeyManagementServicePort%" -if "%KeyManagementServiceMachine%"=="" set "KmsReg=Registered KMS machine name: KMS name not available" - -if %DiscoveredKeyManagementServiceMachinePort%==0 set DiscoveredKeyManagementServiceMachinePort=1688 -set "KmsDns=KMS machine name from DNS: %DiscoveredKeyManagementServiceMachineName%:%DiscoveredKeyManagementServiceMachinePort%" -if "%DiscoveredKeyManagementServiceMachineName%"=="" set "KmsDns=DNS auto-discovery: KMS name not available" - -set "_qr="wmic path %~2 get ClientMachineID, KeyManagementServiceHostCaching /value" ^| findstr ^=" -if %WMI_VBS% NEQ 0 set "_qr=%_csg% %~2 "ClientMachineID, KeyManagementServiceHostCaching"" -for /f "tokens=* delims=" %%# in ('%_qr%') do set "%%#" -if /i %KeyManagementServiceHostCaching%==True (set KeyManagementServiceHostCaching=Enabled) else (set KeyManagementServiceHostCaching=Disabled) - -if %winbuild% LSS 9200 exit /b -if /i %~1==%ospp% exit /b - -if "%KeyManagementServiceLookupDomain%"=="" set "KeyManagementServiceLookupDomain=" - -if %VLActivationTypeEnabled% EQU 3 ( -set VLActivationType=Token -) else if %VLActivationTypeEnabled% EQU 2 ( -set VLActivationType=KMS -) else if %VLActivationTypeEnabled% EQU 1 ( -set VLActivationType=AD -) else ( -set VLActivationType=All -) - -if %winbuild% LSS 9600 exit /b -if "%DiscoveredKeyManagementServiceMachineIpAddress%"=="" set "DiscoveredKeyManagementServiceMachineIpAddress=not available" -exit /b - -:casWout -echo. -echo Name: %Name% -echo Description: %Description% -echo Activation ID: %ID% -echo Extended PID: %ProductKeyID% -if defined ProductKeyChannel echo Product Key Channel: %ProductKeyChannel% -echo Partial Product Key: %PartialProductKey% -echo License Status: %License% -if defined LicenseMsg echo %LicenseMsg% -if not %LicenseStatus%==0 if not %EvaluationEndDate:~0,8%==16010101 echo Evaluation End Date: %EvaluationEndDate:~0,4%-%EvaluationEndDate:~4,2%-%EvaluationEndDate:~6,2% %EvaluationEndDate:~8,2%:%EvaluationEndDate:~10,2% UTC -if not defined cKmsClient ( -if defined ExpireMsg echo.&echo. %ExpireMsg% -exit /b -) -if defined VLActivationTypeEnabled echo Configured Activation Type: %VLActivationType% -echo. -if not %LicenseStatus%==1 ( -echo Please activate the product in order to update KMS client information values. -exit /b -) -echo Most recent activation information: -echo Key Management Service client information -echo. Client Machine ID (CMID): %ClientMachineID% -echo. %KmsDns% -echo. %KmsReg% -if defined DiscoveredKeyManagementServiceMachineIpAddress echo. KMS machine IP address: %DiscoveredKeyManagementServiceMachineIpAddress% -echo. KMS machine extended PID: %KeyManagementServiceProductKeyID% -echo. Activation interval: %VLActivationInterval% minutes -echo. Renewal interval: %VLRenewalInterval% minutes -echo. KMS host caching: %KeyManagementServiceHostCaching% -if defined KeyManagementServiceLookupDomain echo. KMS SRV record lookup domain: %KeyManagementServiceLookupDomain% -if defined ExpireMsg echo.&echo. %ExpireMsg% -exit /b - -:casWend -if %_Identity% EQU 1 if %_prsh% EQU 1 ( -echo %line2% -echo *** Office vNext Status *** -echo %line2% -setlocal EnableDelayedExpansion -%_psc% "$f=[IO.File]::ReadAllText('!_batp!') -split ':vNextDiag\:.*';iex ($f[1])" -title Check Activation Status [wmi] -echo %line3% -echo. -) -echo. -echo Press any key to exit. -pause >nul -exit /b - -:vNextDiag: -function PrintModePerPridFromRegistry -{ - $vNextRegkey = "HKCU:\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext" - $vNextPrids = Get-Item -Path $vNextRegkey -ErrorAction Ignore | Select-Object -ExpandProperty 'property' | Where-Object -FilterScript {$_ -Ne 'InstalledGraceKey' -And $_ -Ne 'MigrationToV5Done' -And $_ -Ne 'test' -And $_ -Ne 'unknown'} - If ($vNextPrids -Eq $null) - { - Write-Host "No registry keys found." - Return - } - $vNextPrids | ForEach ` - { - $mode = (Get-ItemProperty -Path $vNextRegkey -Name $_).$_ - Switch ($mode) - { - 2 { $mode = "vNext"; Break } - 3 { $mode = "Device"; Break } - Default { $mode = "Legacy"; Break } - } - Write-Host $_ = $mode - } -} -function PrintSharedComputerLicensing -{ - $scaRegKey = "HKLM:\SOFTWARE\Microsoft\Office\ClickToRun\Configuration" - $scaValue = Get-ItemProperty -Path $scaRegKey -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore - $scaRegKey2 = "HKLM:\SOFTWARE\Microsoft\Office\16.0\Common\Licensing" - $scaValue2 = Get-ItemProperty -Path $scaRegKey2 -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore - $scaPolicyKey = "HKLM:\SOFTWARE\Policies\Microsoft\Office\16.0\Common\Licensing" - $scaPolicyValue = Get-ItemProperty -Path $scaPolicyKey -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore - If ($scaValue -Eq $null -And $scaValue2 -Eq $null -And $scaPolicyValue -Eq $null) - { - Write-Host "No registry keys found." - Return - } - $scaModeValue = $scaValue -Or $scaValue2 -Or $scaPolicyValue - If ($scaModeValue -Eq 0) - { - $scaMode = "Disabled" - } - If ($scaModeValue -Eq 1) - { - $scaMode = "Enabled" - } - Write-Host "SharedComputerLicensing" = $scaMode - Write-Host - $tokenFiles = $null - $tokenPath = "${env:LOCALAPPDATA}\Microsoft\Office\16.0\Licensing" - If (Test-Path $tokenPath) - { - $tokenFiles = Get-ChildItem -Path $tokenPath -Recurse -File -Filter "*authString*" - } - If ($tokenFiles.length -Eq 0) - { - Write-Host "No tokens found." - Return - } - $tokenFiles | ForEach ` - { - $tokenParts = (Get-Content -Encoding Unicode -Path $_.FullName).Split('_') - $output = [PSCustomObject] ` - @{ - ACID = $tokenParts[0]; - User = $tokenParts[3] - NotBefore = $tokenParts[4]; - NotAfter = $tokenParts[5]; - } | ConvertTo-Json - Write-Host $output - } -} -function PrintLicensesInformation -{ - Param( - [ValidateSet("NUL", "Device")] - [String]$mode - ) - If ($mode -Eq "NUL") - { - $licensePath = "${env:LOCALAPPDATA}\Microsoft\Office\Licenses" - } - ElseIf ($mode -Eq "Device") - { - $licensePath = "${env:PROGRAMDATA}\Microsoft\Office\Licenses" - } - $licenseFiles = $null - If (Test-Path $licensePath) - { - $licenseFiles = Get-ChildItem -Path $licensePath -Recurse -File - } - If ($licenseFiles.length -Eq 0) - { - Write-Host "No licenses found." - Return - } - $licenseFiles | ForEach ` - { - $license = (Get-Content -Encoding Unicode $_.FullName | ConvertFrom-Json).License - $decodedLicense = [System.Text.Encoding]::UTF8.GetString([System.Convert]::FromBase64String($license)) | ConvertFrom-Json - $licenseType = $decodedLicense.LicenseType - $userId = $decodedLicense.Metadata.UserId - $identitiesRegkey = Get-ItemProperty -Path "HKCU:\SOFTWARE\Microsoft\Office\16.0\Common\Identity\Identities\${userId}*" -ErrorAction Ignore - $licenseState = $null - If ((Get-Date) -Gt (Get-Date $decodedLicense.MetaData.NotAfter)) - { - $licenseState = "RFM" - } - ElseIf (($decodedLicense.ExpiresOn -Eq $null) -Or - ((Get-Date) -Lt (Get-Date $decodedLicense.ExpiresOn))) - { - $licenseState = "Licensed" - } - Else - { - $licenseState = "Grace" - } - if ($mode -Eq "NUL") - { - $output = [PSCustomObject] ` - @{ - Version = $_.Directory.Name - Type = "User|${licenseType}"; - Product = $decodedLicense.ProductReleaseId; - Acid = $decodedLicense.Acid; - LicenseState = $licenseState; - EntitlementStatus = $decodedLicense.Status; - ReasonCode = $decodedLicense.ReasonCode; - NotBefore = $decodedLicense.Metadata.NotBefore; - NotAfter = $decodedLicense.Metadata.NotAfter; - NextRenewal = $decodedLicense.Metadata.RenewAfter; - Expiration = $decodedLicense.ExpiresOn; - TenantId = $decodedLicense.Metadata.TenantId; - } | ConvertTo-Json - } - ElseIf ($mode -Eq "Device") - { - $output = [PSCustomObject] ` - @{ - Version = $_.Directory.Name - Type = "Device|${licenseType}"; - Product = $decodedLicense.ProductReleaseId; - Acid = $decodedLicense.Acid; - DeviceId = $decodedLicense.Metadata.DeviceId; - LicenseState = $licenseState; - EntitlementStatus = $decodedLicense.Status; - ReasonCode = $decodedLicense.ReasonCode; - NotBefore = $decodedLicense.Metadata.NotBefore; - NotAfter = $decodedLicense.Metadata.NotAfter; - NextRenewal = $decodedLicense.Metadata.RenewAfter; - Expiration = $decodedLicense.ExpiresOn; - TenantId = $decodedLicense.Metadata.TenantId; - } | ConvertTo-Json - } - Write-Output $output - } -} - Write-Host - Write-Host "========== Mode per ProductReleaseId ==========" - Write-Host -PrintModePerPridFromRegistry - Write-Host - Write-Host "========== Shared Computer Licensing ==========" - Write-Host -PrintSharedComputerLicensing - Write-Host - Write-Host "========== vNext licenses ==========" - Write-Host -PrintLicensesInformation -Mode "NUL" - Write-Host - Write-Host "========== Device licenses ==========" - Write-Host -PrintLicensesInformation -Mode "Device" -:vNextDiag: -::===================================================
\ No newline at end of file +<!-- : Begin batch script
+@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+:: Check-Activation-Status-wmi.cmd
+:: Written by @abbodi1406
+:: forums.mydigitallife.net/posts/838808
+
+
+
+:: change to 1 to use VBScript instead wmic.exe to access WMI
+:: this option is automatically enabled for Windows 11 build 22483 and later
+set WMI_VBS=0
+
+@cls
+set "_cmdf=%~f0"
+if exist "%SystemRoot%\Sysnative\cmd.exe" (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" "
+exit /b
+)
+if exist "%SystemRoot%\SysArm32\cmd.exe" if /i %PROCESSOR_ARCHITECTURE%==AMD64 (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" "
+exit /b
+)
+color 07
+title Check Activation Status [wmi]
+set wspp=SoftwareLicensingProduct
+set wsps=SoftwareLicensingService
+set ospp=OfficeSoftwareProtectionProduct
+set osps=OfficeSoftwareProtectionService
+set winApp=55c92734-d682-4d71-983e-d6ec3f16059f
+set o14App=59a52881-a989-479d-af46-f275c6370663
+set o15App=0ff1ce15-a989-479d-af46-f275c6370663
+for %%# in (spp_get,ospp_get,cW1nd0ws,sppw,c0ff1ce15,sppo,osppsvc,ospp14,ospp15) do set "%%#="
+for /f "tokens=6 delims=[]. " %%# in ('ver') do set winbuild=%%#
+set "spp_get=Description, DiscoveredKeyManagementServiceMachineName, DiscoveredKeyManagementServiceMachinePort, EvaluationEndDate, GracePeriodRemaining, ID, KeyManagementServiceMachine, KeyManagementServicePort, KeyManagementServiceProductKeyID, LicenseStatus, LicenseStatusReason, Name, PartialProductKey, ProductKeyID, VLActivationInterval, VLRenewalInterval"
+set "ospp_get=%spp_get%"
+if %winbuild% GEQ 9200 set "spp_get=%spp_get%, KeyManagementServiceLookupDomain, VLActivationTypeEnabled"
+if %winbuild% GEQ 9600 set "spp_get=%spp_get%, DiscoveredKeyManagementServiceMachineIpAddress, ProductKeyChannel"
+set "_work=%~dp0"
+set "_batf=%~f0"
+set "_batp=%_batf:'=''%"
+set "_Local=%LocalAppData%"
+set _Identity=0
+setlocal EnableDelayedExpansion
+dir /b /s /a:-d "!_Local!\Microsoft\Office\Licenses\*1*" 1>nul 2>nul && set _Identity=1
+dir /b /s /a:-d "!ProgramData!\Microsoft\Office\Licenses\*1*" 1>nul 2>nul && set _Identity=1
+pushd "!_work!"
+setlocal DisableDelayedExpansion
+if %winbuild% LSS 9200 if not exist "%SystemRoot%\servicing\Packages\Microsoft-Windows-PowerShell-WTR-Package~*.mum" set _Identity=0
+set _pwrsh=1
+if not exist "%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe" set _pwrsh=0
+set "_csg=cscript.exe //NoLogo //Job:WmiMulti "%~nx0?.wsf""
+set "_csq=cscript.exe //NoLogo //Job:WmiQuery "%~nx0?.wsf""
+set "_csx=cscript.exe //NoLogo //Job:XPDT "%~nx0?.wsf""
+if %winbuild% GEQ 22483 set WMI_VBS=1
+if %WMI_VBS% EQU 0 (
+set "_zz1=wmic path"
+set "_zz2=where"
+set "_zz3=get"
+set "_zz4=/value"
+set "_zz5=("
+set "_zz6=)"
+set "_zz7="wmic path"
+set "_zz8=/value""
+) else (
+set "_zz1=%_csq%"
+set "_zz2="
+set "_zz3="
+set "_zz4="
+set "_zz5=""
+set "_zz6=""
+set "_zz7=%_csq%"
+set "_zz8="
+)
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+set "line2=************************************************************"
+set "line3=____________________________________________________________"
+
+set _WSH=1
+reg query "HKCU\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0)
+reg query HKU\S-1-5-19 1>nul 2>nul && (
+reg query "HKLM\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0)
+)
+if %_WSH% EQU 0 if %WMI_VBS% NEQ 0 goto :E_VBS
+
+set OsppHook=1
+sc query osppsvc >nul 2>&1
+if %errorlevel% EQU 1060 set OsppHook=0
+
+net start sppsvc /y >nul 2>&1
+call :casWpkey %wspp% %winApp% cW1nd0ws sppw
+if %winbuild% GEQ 9200 call :casWpkey %wspp% %o15App% c0ff1ce15 sppo
+if %OsppHook% NEQ 0 (
+net start osppsvc /y >nul 2>&1
+call :casWpkey %ospp% %o14App% osppsvc ospp14
+if %winbuild% LSS 9200 call :casWpkey %ospp% %o15App% osppsvc ospp15
+)
+
+echo %line2%
+echo *** Windows Status ***
+echo %line2%
+if not defined cW1nd0ws (
+echo.
+echo Error: product key not found.
+goto :casWcon
+)
+set winID=1
+set "_qr=%_zz7% %wspp% %_zz2% %_zz5%ApplicationID='%winApp%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%wspp%" "%wsps%" "%spp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+
+:casWcon
+set winID=0
+set verbose=1
+if not defined c0ff1ce15 (
+if defined osppsvc goto :casWospp
+goto :casWend
+)
+echo %line2%
+echo *** Office Status ***
+echo %line2%
+set "_qr=%_zz7% %wspp% %_zz2% %_zz5%ApplicationID='%o15App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%wspp%" "%wsps%" "%spp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+set verbose=0
+if defined osppsvc goto :casWospp
+goto :casWend
+
+:casWospp
+if %verbose% EQU 1 (
+echo %line2%
+echo *** Office Status ***
+echo %line2%
+)
+set "_qr=%_zz7% %ospp% %_zz2% %_zz5%ApplicationID='%o15App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+if defined ospp15 for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%ospp%" "%osps%" "%ospp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+set "_qr=%_zz7% %ospp% %_zz2% %_zz5%ApplicationID='%o14App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+if defined ospp14 for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%ospp%" "%osps%" "%ospp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+goto :casWend
+
+:casWpkey
+set "_qr=%_zz1% %1 %_zz2% %_zz5%ApplicationID='%2' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz4%"
+%_qr% 2>nul | findstr /i ID 1>nul && (set %3=1&set %4=1)
+exit /b
+
+:casWdet
+for %%# in (%~3) do set "%%#="
+if /i %~1==%ospp% for %%# in (DiscoveredKeyManagementServiceMachineIpAddress, KeyManagementServiceLookupDomain, ProductKeyChannel, VLActivationTypeEnabled) do set "%%#="
+set "cKmsClient="
+set "cTblClient="
+set "cAvmClient="
+set "ExpireMsg="
+set "_xpr="
+set "_qr="wmic path %~1 where ID='%chkID%' get %~3 /value" ^| findstr ^="
+if %WMI_VBS% NEQ 0 set "_qr=%_csg% %~1 "ID='%chkID%'" "%~3""
+for /f "tokens=* delims=" %%# in ('%_qr%') do set "%%#"
+
+set /a _gpr=(GracePeriodRemaining+1440-1)/1440
+echo %Description%| findstr /i VOLUME_KMSCLIENT 1>nul && (set cKmsClient=1&set _mTag=Volume)
+echo %Description%| findstr /i TIMEBASED_ 1>nul && (set cTblClient=1&set _mTag=Timebased)
+echo %Description%| findstr /i VIRTUAL_MACHINE_ACTIVATION 1>nul && (set cAvmClient=1&set _mTag=Automatic VM)
+cmd /c exit /b %LicenseStatusReason%
+set "LicenseReason=%=ExitCode%"
+set "LicenseMsg=Time remaining: %GracePeriodRemaining% minute(s) (%_gpr% day(s))"
+if %_gpr% GEQ 1 if %_WSH% EQU 1 (
+for /f "tokens=* delims=" %%# in ('%_csx% %GracePeriodRemaining%') do set "_xpr=%%#"
+)
+if %_gpr% GEQ 1 if %_pwrsh% EQU 1 if not defined _xpr (
+for /f "tokens=* delims=" %%# in ('powershell "$([DateTime]::Now.addMinutes(%GracePeriodRemaining%)).ToString('yyyy-MM-dd HH:mm:ss')" 2^>nul') do set "_xpr=%%#"
+title Check Activation Status [wmi]
+)
+
+if %LicenseStatus% EQU 0 (
+set "License=Unlicensed"
+set "LicenseMsg="
+)
+if %LicenseStatus% EQU 1 (
+set "License=Licensed"
+set "LicenseMsg="
+if %GracePeriodRemaining% EQU 0 (
+ if %winID% EQU 1 (set "ExpireMsg=The machine is permanently activated.") else (set "ExpireMsg=The product is permanently activated.")
+ ) else (
+ set "LicenseMsg=%_mTag% activation expiration: %GracePeriodRemaining% minute(s) (%_gpr% day(s))"
+ if defined _xpr set "ExpireMsg=%_mTag% activation will expire %_xpr%"
+ )
+)
+if %LicenseStatus% EQU 2 (
+set "License=Initial grace period"
+if defined _xpr set "ExpireMsg=Initial grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 3 (
+set "License=Additional grace period (KMS license expired or hardware out of tolerance)"
+if defined _xpr set "ExpireMsg=Additional grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 4 (
+set "License=Non-genuine grace period."
+if defined _xpr set "ExpireMsg=Non-genuine grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 6 (
+set "License=Extended grace period"
+if defined _xpr set "ExpireMsg=Extended grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 5 (
+set "License=Notification"
+ if "%LicenseReason%"=="C004F200" (set "LicenseMsg=Notification Reason: 0xC004F200 (non-genuine)."
+ ) else if "%LicenseReason%"=="C004F009" (set "LicenseMsg=Notification Reason: 0xC004F009 (grace time expired)."
+ ) else (set "LicenseMsg=Notification Reason: 0x%LicenseReason%"
+ )
+)
+if %LicenseStatus% GTR 6 (
+set "License=Unknown"
+set "LicenseMsg="
+)
+if not defined cKmsClient exit /b
+
+if %KeyManagementServicePort%==0 set KeyManagementServicePort=1688
+set "KmsReg=Registered KMS machine name: %KeyManagementServiceMachine%:%KeyManagementServicePort%"
+if "%KeyManagementServiceMachine%"=="" set "KmsReg=Registered KMS machine name: KMS name not available"
+
+if %DiscoveredKeyManagementServiceMachinePort%==0 set DiscoveredKeyManagementServiceMachinePort=1688
+set "KmsDns=KMS machine name from DNS: %DiscoveredKeyManagementServiceMachineName%:%DiscoveredKeyManagementServiceMachinePort%"
+if "%DiscoveredKeyManagementServiceMachineName%"=="" set "KmsDns=DNS auto-discovery: KMS name not available"
+
+set "_qr="wmic path %~2 get ClientMachineID, KeyManagementServiceHostCaching /value" ^| findstr ^="
+if %WMI_VBS% NEQ 0 set "_qr=%_csg% %~2 "ClientMachineID, KeyManagementServiceHostCaching""
+for /f "tokens=* delims=" %%# in ('%_qr%') do set "%%#"
+if /i %KeyManagementServiceHostCaching%==True (set KeyManagementServiceHostCaching=Enabled) else (set KeyManagementServiceHostCaching=Disabled)
+
+if %winbuild% LSS 9200 exit /b
+if /i %~1==%ospp% exit /b
+
+if "%KeyManagementServiceLookupDomain%"=="" set "KeyManagementServiceLookupDomain="
+
+if %VLActivationTypeEnabled% EQU 3 (
+set VLActivationType=Token
+) else if %VLActivationTypeEnabled% EQU 2 (
+set VLActivationType=KMS
+) else if %VLActivationTypeEnabled% EQU 1 (
+set VLActivationType=AD
+) else (
+set VLActivationType=All
+)
+
+if %winbuild% LSS 9600 exit /b
+if "%DiscoveredKeyManagementServiceMachineIpAddress%"=="" set "DiscoveredKeyManagementServiceMachineIpAddress=not available"
+exit /b
+
+:casWout
+echo.
+echo Name: %Name%
+echo Description: %Description%
+echo Activation ID: %ID%
+echo Extended PID: %ProductKeyID%
+if defined ProductKeyChannel echo Product Key Channel: %ProductKeyChannel%
+echo Partial Product Key: %PartialProductKey%
+echo License Status: %License%
+if defined LicenseMsg echo %LicenseMsg%
+if not %LicenseStatus%==0 if not %EvaluationEndDate:~0,8%==16010101 echo Evaluation End Date: %EvaluationEndDate:~0,4%-%EvaluationEndDate:~4,2%-%EvaluationEndDate:~6,2% %EvaluationEndDate:~8,2%:%EvaluationEndDate:~10,2% UTC
+if not defined cKmsClient (
+if defined ExpireMsg echo.&echo. %ExpireMsg%
+exit /b
+)
+if defined VLActivationTypeEnabled echo Configured Activation Type: %VLActivationType%
+echo.
+if not %LicenseStatus%==1 (
+echo Please activate the product in order to update KMS client information values.
+exit /b
+)
+echo Most recent activation information:
+echo Key Management Service client information
+echo. Client Machine ID (CMID): %ClientMachineID%
+echo. %KmsDns%
+echo. %KmsReg%
+if defined DiscoveredKeyManagementServiceMachineIpAddress echo. KMS machine IP address: %DiscoveredKeyManagementServiceMachineIpAddress%
+echo. KMS machine extended PID: %KeyManagementServiceProductKeyID%
+echo. Activation interval: %VLActivationInterval% minutes
+echo. Renewal interval: %VLRenewalInterval% minutes
+echo. KMS host caching: %KeyManagementServiceHostCaching%
+if defined KeyManagementServiceLookupDomain echo. KMS SRV record lookup domain: %KeyManagementServiceLookupDomain%
+if defined ExpireMsg echo.&echo. %ExpireMsg%
+exit /b
+
+:casWend
+if %_Identity% EQU 1 if %_pwrsh% EQU 1 (
+echo %line2%
+echo *** Office vNext Status ***
+echo %line2%
+setlocal EnableDelayedExpansion
+powershell "$f=[IO.File]::ReadAllText('!_batp!') -split ':vNextDiag\:.*';iex ($f[1])"
+title Check Activation Status [wmi]
+echo %line3%
+echo.
+)
+echo.
+echo Press any key to exit.
+pause >nul
+exit /b
+
+:E_VBS
+echo ==== ERROR ====
+echo Windows Script Host is disabled.
+echo It is required for this script to work.
+echo.
+echo Press any key to exit.
+pause >nul
+exit /b
+
+:vNextDiag:
+function PrintModePerPridFromRegistry
+{
+ $vNextRegkey = "HKCU:\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext"
+ $vNextPrids = Get-Item -Path $vNextRegkey -ErrorAction Ignore | Select-Object -ExpandProperty 'property' | Where-Object -FilterScript {$_ -Ne 'InstalledGraceKey' -And $_ -Ne 'MigrationToV5Done' -And $_ -Ne 'test' -And $_ -Ne 'unknown'}
+ If ($vNextPrids -Eq $null)
+ {
+ Write-Host "No registry keys found."
+ Return
+ }
+ $vNextPrids | ForEach `
+ {
+ $mode = (Get-ItemProperty -Path $vNextRegkey -Name $_).$_
+ Switch ($mode)
+ {
+ 2 { $mode = "vNext"; Break }
+ 3 { $mode = "Device"; Break }
+ Default { $mode = "Legacy"; Break }
+ }
+ Write-Host $_ = $mode
+ }
+}
+function PrintSharedComputerLicensing
+{
+ $scaRegKey = "HKLM:\SOFTWARE\Microsoft\Office\ClickToRun\Configuration"
+ $scaValue = Get-ItemProperty -Path $scaRegKey -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore
+ $scaRegKey2 = "HKLM:\SOFTWARE\Microsoft\Office\16.0\Common\Licensing"
+ $scaValue2 = Get-ItemProperty -Path $scaRegKey2 -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore
+ $scaPolicyKey = "HKLM:\SOFTWARE\Policies\Microsoft\Office\16.0\Common\Licensing"
+ $scaPolicyValue = Get-ItemProperty -Path $scaPolicyKey -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore
+ If ($scaValue -Eq $null -And $scaValue2 -Eq $null -And $scaPolicyValue -Eq $null)
+ {
+ Write-Host "No registry keys found."
+ Return
+ }
+ $scaModeValue = $scaValue -Or $scaValue2 -Or $scaPolicyValue
+ If ($scaModeValue -Eq 0)
+ {
+ $scaMode = "Disabled"
+ }
+ If ($scaModeValue -Eq 1)
+ {
+ $scaMode = "Enabled"
+ }
+ Write-Host "SharedComputerLicensing" = $scaMode
+ Write-Host
+ $tokenFiles = $null
+ $tokenPath = "${env:LOCALAPPDATA}\Microsoft\Office\16.0\Licensing"
+ If (Test-Path $tokenPath)
+ {
+ $tokenFiles = Get-ChildItem -Path $tokenPath -Recurse -File -Filter "*authString*"
+ }
+ If ($tokenFiles.length -Eq 0)
+ {
+ Write-Host "No tokens found."
+ Return
+ }
+ $tokenFiles | ForEach `
+ {
+ $tokenParts = (Get-Content -Encoding Unicode -Path $_.FullName).Split('_')
+ $output = [PSCustomObject] `
+ @{
+ ACID = $tokenParts[0];
+ User = $tokenParts[3]
+ NotBefore = $tokenParts[4];
+ NotAfter = $tokenParts[5];
+ } | ConvertTo-Json
+ Write-Host $output
+ }
+}
+function PrintLicensesInformation
+{
+ Param(
+ [ValidateSet("NUL", "Device")]
+ [String]$mode
+ )
+ If ($mode -Eq "NUL")
+ {
+ $licensePath = "${env:LOCALAPPDATA}\Microsoft\Office\Licenses"
+ }
+ ElseIf ($mode -Eq "Device")
+ {
+ $licensePath = "${env:PROGRAMDATA}\Microsoft\Office\Licenses"
+ }
+ $licenseFiles = $null
+ If (Test-Path $licensePath)
+ {
+ $licenseFiles = Get-ChildItem -Path $licensePath -Recurse -File
+ }
+ If ($licenseFiles.length -Eq 0)
+ {
+ Write-Host "No licenses found."
+ Return
+ }
+ $licenseFiles | ForEach `
+ {
+ $license = (Get-Content -Encoding Unicode $_.FullName | ConvertFrom-Json).License
+ $decodedLicense = [System.Text.Encoding]::UTF8.GetString([System.Convert]::FromBase64String($license)) | ConvertFrom-Json
+ $licenseType = $decodedLicense.LicenseType
+ $userId = $decodedLicense.Metadata.UserId
+ $identitiesRegkey = Get-ItemProperty -Path "HKCU:\SOFTWARE\Microsoft\Office\16.0\Common\Identity\Identities\${userId}*" -ErrorAction Ignore
+ $licenseState = $null
+ If ((Get-Date) -Gt (Get-Date $decodedLicense.MetaData.NotAfter))
+ {
+ $licenseState = "RFM"
+ }
+ ElseIf (($decodedLicense.ExpiresOn -Eq $null) -Or
+ ((Get-Date) -Lt (Get-Date $decodedLicense.ExpiresOn)))
+ {
+ $licenseState = "Licensed"
+ }
+ Else
+ {
+ $licenseState = "Grace"
+ }
+ if ($mode -Eq "NUL")
+ {
+ $output = [PSCustomObject] `
+ @{
+ Version = $_.Directory.Name
+ Type = "User|${licenseType}";
+ Product = $decodedLicense.ProductReleaseId;
+ Acid = $decodedLicense.Acid;
+ LicenseState = $licenseState;
+ EntitlementStatus = $decodedLicense.Status;
+ ReasonCode = $decodedLicense.ReasonCode;
+ NotBefore = $decodedLicense.Metadata.NotBefore;
+ NotAfter = $decodedLicense.Metadata.NotAfter;
+ NextRenewal = $decodedLicense.Metadata.RenewAfter;
+ Expiration = $decodedLicense.ExpiresOn;
+ TenantId = $decodedLicense.Metadata.TenantId;
+ } | ConvertTo-Json
+ }
+ ElseIf ($mode -Eq "Device")
+ {
+ $output = [PSCustomObject] `
+ @{
+ Version = $_.Directory.Name
+ Type = "Device|${licenseType}";
+ Product = $decodedLicense.ProductReleaseId;
+ Acid = $decodedLicense.Acid;
+ DeviceId = $decodedLicense.Metadata.DeviceId;
+ LicenseState = $licenseState;
+ EntitlementStatus = $decodedLicense.Status;
+ ReasonCode = $decodedLicense.ReasonCode;
+ NotBefore = $decodedLicense.Metadata.NotBefore;
+ NotAfter = $decodedLicense.Metadata.NotAfter;
+ NextRenewal = $decodedLicense.Metadata.RenewAfter;
+ Expiration = $decodedLicense.ExpiresOn;
+ TenantId = $decodedLicense.Metadata.TenantId;
+ } | ConvertTo-Json
+ }
+ Write-Output $output
+ }
+}
+ Write-Host
+ Write-Host "========== Mode per ProductReleaseId =========="
+ Write-Host
+PrintModePerPridFromRegistry
+ Write-Host
+ Write-Host "========== Shared Computer Licensing =========="
+ Write-Host
+PrintSharedComputerLicensing
+ Write-Host
+ Write-Host "========== vNext licenses =========="
+ Write-Host
+PrintLicensesInformation -Mode "NUL"
+ Write-Host
+ Write-Host "========== Device licenses =========="
+ Write-Host
+PrintLicensesInformation -Mode "Device"
+:vNextDiag:
+
+----- Begin wsf script --->
+<package>
+ <job id="WmiQuery">
+ <script language="VBScript">
+ If WScript.Arguments.Count = 3 Then
+ wExc = "Select " & WScript.Arguments.Item(2) & " from " & WScript.Arguments.Item(0) & " where " & WScript.Arguments.Item(1)
+ wGet = WScript.Arguments.Item(2)
+ Else
+ wExc = "Select " & WScript.Arguments.Item(1) & " from " & WScript.Arguments.Item(0)
+ wGet = WScript.Arguments.Item(1)
+ End If
+ Set objCol = GetObject("winmgmts:\\.\root\CIMV2").ExecQuery(wExc,,48)
+ For Each objItm in objCol
+ For each Prop in objItm.Properties_
+ If LCase(Prop.Name) = LCase(wGet) Then
+ WScript.Echo Prop.Name & "=" & Prop.Value
+ Exit For
+ End If
+ Next
+ Next
+ </script>
+ </job>
+ <job id="WmiMulti">
+ <script language="VBScript">
+ If WScript.Arguments.Count = 3 Then
+ wExc = "Select " & WScript.Arguments.Item(2) & " from " & WScript.Arguments.Item(0) & " where " & WScript.Arguments.Item(1)
+ Else
+ wExc = "Select " & WScript.Arguments.Item(1) & " from " & WScript.Arguments.Item(0)
+ End If
+ Set objCol = GetObject("winmgmts:\\.\root\CIMV2").ExecQuery(wExc,,48)
+ For Each objItm in objCol
+ For each Prop in objItm.Properties_
+ WScript.Echo Prop.Name & "=" & Prop.Value
+ Next
+ Next
+ </script>
+ </job>
+ <job id="XPDT">
+ <script language="VBScript">
+ WScript.Echo DateAdd("n", WScript.Arguments.Item(0), Now)
+ </script>
+ </job>
+</package>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/HWID-KMS38_Activation/BIN/ClipUp.exe b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/ClipUp.exe Binary files differindex b3b2cff..b3b2cff 100644 --- a/MAS/Separate-Files-Version/HWID-KMS38_Activation/BIN/ClipUp.exe +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/ClipUp.exe diff --git a/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/_Info.html b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/_Info.html new file mode 100644 index 0000000..09595e1 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/_Info.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-hwid-kms38-files.html">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/arm64_gatherosstate.exe b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/arm64_gatherosstate.exe Binary files differnew file mode 100644 index 0000000..35657e7 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/arm64_gatherosstate.exe diff --git a/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/arm64_slc.dll b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/arm64_slc.dll Binary files differnew file mode 100644 index 0000000..5a373a9 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/arm64_slc.dll diff --git a/MAS/Separate-Files-Version/HWID-KMS38_Activation/BIN/gatherosstate.exe b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/gatherosstate.exe Binary files differindex 4dba73a..4dba73a 100644 --- a/MAS/Separate-Files-Version/HWID-KMS38_Activation/BIN/gatherosstate.exe +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/gatherosstate.exe diff --git a/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/slc.dll b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/slc.dll Binary files differnew file mode 100644 index 0000000..ce865e2 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/BIN/slc.dll diff --git a/MAS/Separate-Files-Version/HWID-KMS38_Activation/HWID_Activation.cmd b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/HWID_Activation.cmd index a63f1a3..2e3c73e 100644 --- a/MAS/Separate-Files-Version/HWID-KMS38_Activation/HWID_Activation.cmd +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/HWID_Activation.cmd @@ -1,1331 +1,1047 @@ -@setlocal DisableDelayedExpansion -@echo off - - - -::============================================================================ -:: -:: This script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::============================================================================ - - - -:: To activate with Downlevel method (default), run the script with /a parameter or change 0 to 1 in below line -set _acti=0 - -:: To only generate GenuineTicket.xml with Downlevel method (default), run the script with /g parameter or change 0 to 1 in below line -set _gent=0 - -:: To enable LockBox method, run the script with /k parameter or change 0 to 1 in below line -:: You need to use this option with either activation or ticket generation. -:: Example, -:: HWID_Activation.cmd /a /k -:: HWID_Activation.cmd /g /k -set _lock=0 - -:: Note about Lockbox method: It's working method is not very clean. We don't suggest to run it on a production system. - -:: If value is changed in ABOVE lines or any ABOVE parameter is used then script will run in unattended mode -:: Incase if more than one options are used then only one option will be applied - - -:: To disable changing edition if current edition doesn't support HWID activation, change the value to 0 from 1 or run the script with /c parameter -set _chan=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 - -set "_cmdf=%~f0" -for %%# in (%*) do ( -if /i "%%#"=="r1" set r1=1 -if /i "%%#"=="r2" set r2=1 -) - -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 Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -::======================================================================================================================================== - -cls -color 07 -title HWID Activation - -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"=="/a" set _acti=1 -if /i "%%A"=="/g" set _gent=1 -if /i "%%A"=="/k" set _lock=1 -if /i "%%A"=="/c" set _chan=0 -if /i "%%A"=="-el" set _elev=1 -) -) - -for %%A in (%_acti% %_gent% %_lock%) do (if "%%A"=="1" set _unattended=1) - -::======================================================================================================================================== - -set winbuild=1 -set "nul=>nul 2>&1" -set psc=powershell.exe -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 2>nul | find /i "0x0" 1>nul && (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 "Magenta="45;97m"" -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 "Magenta="Darkmagenta" "white"" -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 500000 (set "_exitmsg=Go back") else (set "_exitmsg=Exit") - -::======================================================================================================================================== - -if %winbuild% LSS 10240 ( -%eline% -echo Unsupported OS version detected. -echo Project is supported for Windows 10/11. -goto dk_done -) - -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find powershell.exe in the system. -goto dk_done -) - -::======================================================================================================================================== - -:: Fix for the special characters limitation 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 "_ttemp=%temp%" - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -echo "!_batf!" | find /i "!_ttemp!" 1>nul && ( -if /i not "!_work!"=="!_ttemp!" ( -%eline% -echo Script is launched from the temp folder, -echo Most likely you are 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 -) -) - -::======================================================================================================================================== - -:: Elevate script as admin and pass arguments and preventing loop - -%nul% reg query HKU\S-1-5-19 || ( -if not defined _elev %nul% %psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b -%eline% -echo This script require administrator privileges. -echo To do so, right click on this script and select 'Run as administrator'. -goto dk_done -) - -::======================================================================================================================================== - -:dl_menu - -:: Lockbox method is not shown in menu because it's working method is not very clean. We don't suggest to run it on a production system. -:: Will enable it back when we have a better method for it. Till then, if you want to use Lockbox, you can use parameters, check at the top. - -REM if %_unattended%==0 ( -REM cls -REM mode 76, 25 -REM title HWID Activation - -REM echo: -REM echo: -REM echo: -REM echo: -REM echo ____________________________________________________________ -REM echo: -REM if !_lock!==0 ( -REM echo [1] HWID Activation -REM ) else ( -REM call :dk_color2 %_White% " [1] HWID Activation " %_Yellow% " [LockBox Method]" -REM ) -REM echo ____________________________________________ -REM echo: -REM if !_lock!==0 ( -REM echo [G] Generate Ticket -REM ) else ( -REM call :dk_color2 %_White% " [G] Generate Ticket " %_Yellow% " [LockBox Method]" -REM ) -REM echo ____________________________________________ -REM echo: -REM echo [C] Change Method -REM echo: -REM echo [0] %_exitmsg% -REM echo ____________________________________________________________ -REM echo: -REM call :dk_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard:" -REM choice /C:1GC0 /N -REM set _el=!errorlevel! -REM if !_el!==4 exit /b -REM if !_el!==3 ( -REM if !_lock!==0 ( -REM set _lock=1 -REM ) else ( -REM set _lock=0 -REM ) -REM cls -REM echo: -REM call :dk_color %_Green% " Downlevel Method:" -REM echo It creates downlevelGTkey ticket for activation with simplest process. -REM echo: -REM call :dk_color %_Yellow% " LockBox Method:" -REM echo It creates clientLockboxKey ticket which better mimics genuine activation, -REM echo But requires more steps such as, -REM echo - Cleaning ClipSVC licences -REM echo - Deleting a volatile and protected registry key by taking ownership -REM echo - System may need a restart for succesful activation -REM echo - Microsoft Account and Store Apps may need relogin-restart in the system -REM echo: -REM call :dk_color2 %_White% " " %Green% "Note:" -REM echo Microsoft accepts both types of tickets and that's unlikely to change. -REM call :dk_color2 %_White% " " %Green% "On a production system we suggest to use Downlevel [default] Method only." -REM echo: -REM call :dk_color %_Yellow% " Press any key to go back..." -REM pause >nul -REM goto :dl_menu -REM ) -REM if !_el!==2 set _gent=1&goto :dl_menu2 -REM if !_el!==1 goto :dl_menu2 -REM goto :dl_menu -REM ) - -:dl_menu2 - -cls -mode 102, 34 -if %_gent%==1 (set _title=title Generate HWID GenuineTicket.xml) else (set _title=title HWID Activation) -if %_lock%==0 (%_title%) else (%_title% [Lockbox Method]) - -::======================================================================================================================================== - -if %_gent%==1 if exist %Systemdrive%\GenuineTicket.xml ( -set _gent=0 -%eline% -echo File '%Systemdrive%\GenuineTicket.xml' already exist. -if %_unattended%==0 ( -echo: -call :dk_color %_Yellow% "Press any key to go back..." -pause >nul -goto dl_menu -) else ( -goto dk_done -) -) - -::======================================================================================================================================== - -call :dk_initial - -:: Check if system is permanently activated or not - -cls -call :dk_product -call :dk_checkperm -if defined _perm if not %_gent%==1 ( -echo ___________________________________________________________________________________________ -echo: -call :dk_color2 %_White% " " %Green% "Checking: %winos% is Permanently Activated." -call :dk_color2 %_White% " " %Gray% "Activation is not required." -echo ___________________________________________________________________________________________ -if %_unattended%==1 goto dk_done -echo: -choice /C:12 /N /M "> [1] Activate [2] %_exitmsg% : " -if errorlevel 2 exit /b -) -cls - -::======================================================================================================================================== - -:: Check Evaluation version - -set _eval= -set _evalserv= - -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1 -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set _evalserv=1 -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1 & set _evalserv=1 - -if defined _eval ( -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionID 2>nul | find /i "Eval" 1>nul && ( -%eline% -echo [%winos% ^| %winbuild%] -if defined _evalserv ( -echo Server Evaluation cannot be activated. Convert it to full Server OS. -echo: -echo Check 'Change Edition Option' in Extras section in MAS. -) else ( -echo Evaluation Editions cannot be activated. Download ^& Install full version of Windows OS. -echo: -echo https://massgrave.dev/ -) -goto dk_done -) -) - -::======================================================================================================================================== - -:: Check SKU value / Check in multiple places to find Edition change corruption - -set osSKU= -set regSKU= -set wmiSKU= - -for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "regSKU=%%a" -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic Path Win32_OperatingSystem Get OperatingSystemSKU /format:LIST" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" -if %_wmic% EQU 0 for /f "tokens=1" %%a in ('%psc% "([WMI]'Win32_OperatingSystem=@').OperatingSystemSKU" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" - -set osSKU=%wmiSKU% -if not defined osSKU set osSKU=%regSKU% - -if not defined osSKU ( -%eline% -echo SKU value was not detected properly. Aborting... -goto dk_done -) - -::======================================================================================================================================== - -:: Check if HWID key (Retail,OEM,MAK) is already installed or not - -set _hwidk= -call :dk_channel -for %%A in (Retail OEM:SLP OEM:NONSLP OEM:DM Volume:MAK) do (if /i "%%A"=="%_channel%" set _hwidk=1) - -::======================================================================================================================================== - -:: Detect Key - -set app= -set key= -set pkey= -set altkey= -set changekey= -set curedition= -set altedition= -set notworking= - -if defined applist call :hwiddata attempt1 -if not defined key call :hwiddata attempt2 -if defined notworking call :hwidfallback - -if defined altkey (set key=%altkey%&set changekey=1&set notworking=) - -set pkey= -if not defined key call :dk_hwidkey %nul% - -::======================================================================================================================================== - -if not defined key if not defined _hwidk ( -%eline% -%psc% $ExecutionContext.SessionState.LanguageMode 2>nul | find /i "Full" 1>nul || ( -echo PowerShell is not responding properly. Aborting... -goto dk_done -) -echo [%winos% ^| %winbuild% ^| SKU:%osSKU%] -echo Unable to find this product in the supported product list. -echo Make sure you are using updated version of the script. -echo: -if not "%regSKU%"=="%wmiSKU%" ( -echo Difference Found In SKU Value- WMI:%wmiSKU% Reg:%regSKU% -echo Restart the system and try again. -goto dk_done -) -goto dk_done -) - -::======================================================================================================================================== - -:: Check files - -if not exist "!_work!\BIN\gatherosstate.exe" ( -%eline% -echo 'gatherosstate.exe' file is missing in 'BIN' folder. Aborting... -goto dk_done -) - -:: Verify gatherosstate.exe file - -set _hash= -for /f "skip=1 tokens=* delims=" %%# in ('certutil -hashfile "!_work!\BIN\gatherosstate.exe" SHA1^|findstr /i /v CertUtil') do set "_hash=%%#" -set "_hash=%_hash: =%" - -if /i not "%_hash%"=="FABB5A0FC1E6A372219711152291339AF36ED0B5" ( -if /i not "%_hash%"=="3FCCB9C359EDB9527C9F5688683F8B3C5910E75D" ( -%eline% -echo gatherosstate.exe SHA1 hash mismatch found. -echo: -echo Detected: %_hash% -goto dk_done -) -) - -::======================================================================================================================================== - -set error= -set activ= - -:: Check Internet connection - -cls -echo: -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b -echo Checking OS Info [%winos% ^| %winbuild% ^| %arch%] - -set _intcon= -if not %_gent%==1 ( -for /f "delims=[] tokens=2" %%# in ('ping -n 1 licensing.mp.microsoft.com') do if not [%%#]==[] set _intcon=1 -if defined _intcon ( -echo Checking Internet Connection [Connected] -) else ( -set error=1 -call :dk_color %Red% "Checking Internet Connection [Failed To Connect licensing.mp.microsoft.com]" -) -) - -::======================================================================================================================================== - -set "_serv=ClipSVC wlidsvc sppsvc LicenseManager Winmgmt wuauserv" - -:: Client License Service (ClipSVC) -:: Microsoft Account Sign-in Assistant -:: Software Protection -:: Windows License Manager Service -:: Windows Management Instrumentation -:: Windows Update - -:: Check disabled services - -set serv_ste= -for %%# in (%_serv%) do ( -set serv_dis= -reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start %nul% || set serv_dis=1 -for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start 2^>nul') do if /i %%b equ 0x4 set serv_dis=1 -if defined serv_dis (if defined serv_ste (set "serv_ste=!serv_ste! %%#") else (set "serv_ste=%%#")) -) - -:: Change disabled services startup type to default - -set serv_csts= -set serv_cste= - -if defined serv_ste ( -for %%# in (%serv_ste%) do ( -if /i %%#==ClipSVC sc config %%# start= demand %nul% -if /i %%#==wlidsvc sc config %%# start= demand %nul% -if /i %%#==sppsvc sc config %%# start= delayed-auto %nul% -if /i %%#==LicenseManager sc config %%# start= demand %nul% -if /i %%#==Winmgmt sc config %%# start= auto %nul% -if /i %%#==wuauserv sc config %%# start= demand %nul% -if !errorlevel!==0 ( -if defined serv_csts (set "serv_csts=!serv_csts! %%#") else (set "serv_csts=%%#") -) else ( -set error=1 -if defined serv_cste (set "serv_cste=!serv_cste! %%#") else (set "serv_cste=%%#") -) -) -) - -if defined serv_csts echo Enabling Disabled Services [Successful] [%serv_csts%] -if defined serv_cste call :dk_color %Red% "Enabling Disabled Services [Failed] [%serv_cste%]" - -if not "%regSKU%"=="%wmiSKU%" ( -set error=1 -call :dk_color %Red% "Checking WMI/REG SKU [Difference Found - WMI:%wmiSKU% Reg:%regSKU%] [Restart System]" -) - -::======================================================================================================================================== - -:: Install key - -echo: -if defined changekey ( -call :dk_color %Magenta% "[%altedition%] Edition product key will be used to enable HWID activation." -echo: -) - -set _partial= -if not defined key ( -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null" Get PartialProductKey /value 2^>nul') do set "_partial=%%#" -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT PartialProductKey FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL').Get()).PartialProductKey | %% {echo ('PartialProductKey='+$_)}" 2^>nul') do set "_partial=%%#" -call echo Checking Installed Product Key [Partial Key - %%_partial%%] [%_channel%] -) - -set _channel= -set error_code= -if defined key ( -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call InstallProductKey ProductKey="%key%" %nul% -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT Version FROM SoftwareLicensingService').Get()).InstallProductKey('%key%')" %nul% -if not !errorlevel!==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul% -set error_code=!errorlevel! -cmd /c exit /b !error_code! -if !error_code! NEQ 0 set "error_code=[0x!=ExitCode!]" - -if !error_code! EQU 0 ( -call :dk_refresh -call :dk_channel -call echo Installing Generic Product Key [%key%] [%%_channel%%] [Successful] -) else ( -call :dk_color %Red% "Installing Generic Product Key [%key%] [Failed] !error_code!" -) -) - -::======================================================================================================================================== - -:: Files are copied to temp to generate ticket to avoid possible issues in case the path contains special character or non English names - -echo: -set "temp_=%SystemRoot%\Temp\_Temp" -if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul% -md "%temp_%\" %nul% - -pushd "!_work!\BIN\" -copy /y /b "gatherosstate.exe" "%temp_%\gatherosstate.exe" %nul% -popd - -if not exist "%temp_%\gatherosstate.exe" ( -call :dk_color %Red% "Copying Required Files to Temp [%temp_%] [Failed]" -goto :dl_final -) else ( -echo Copying Required Files to Temp [%temp_%] [Successful] -) - -::======================================================================================================================================== - -if /i "%_hash%"=="3FCCB9C359EDB9527C9F5688683F8B3C5910E75D" ( -echo Checking gatherosstate.exe [Already Modified] -%nul% ren "%temp_%\gatherosstate.exe" "gatherosstatemodified.exe" -goto :dlskipmod -) - -:: Modify gatherosstate.exe - -pushd "%temp_%\" -%nul% %psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':hex\:.*';iex ($f[1]);" -popd - -if not exist "%temp_%\gatherosstatemodified.exe" ( -call :dk_color %Red% "Creating Modified Gatherosstate [Failed] Aborting..." -goto :dl_final -) - -set _hash= -for /f "skip=1 tokens=* delims=" %%# in ('certutil -hashfile "%temp_%\gatherosstatemodified.exe" SHA1^|findstr /i /v CertUtil') do set "_hash=%%#" -set "_hash=%_hash: =%" - -if /i not "%_hash%"=="3FCCB9C359EDB9527C9F5688683F8B3C5910E75D" ( -call :dk_color %Red% "Creating Modified Gatherosstate [Failed] [Hash Not Matched] Aborting..." -goto :dl_final -) else ( -echo Creating Modified Gatherosstate [Successful] -) - -:dlskipmod - -::======================================================================================================================================== - -:: Clean ClipSVC Licences -:: This code runs only if Lockbox method to generate ticket is manually set by the user in this script. - -if %_lock%==1 ( -for %%# in (ClipSVC) do ( -sc query %%# | find /i "STOPPED" %nul% || net stop %%# /y %nul% -sc query %%# | find /i "STOPPED" %nul% || sc stop %%# %nul% -) - -rundll32 clipc.dll,ClipCleanUpState - -if exist "%ProgramData%\Microsoft\Windows\ClipSVC\*.dat" del /f /q "%ProgramData%\Microsoft\Windows\ClipSVC\*.dat" %nul% - -if exist "%ProgramData%\Microsoft\Windows\ClipSVC\tokens.dat" ( -call :dk_color %Red% "Cleaning ClipSVC Licences [Failed]" -) else ( -echo Cleaning ClipSVC Licences [Successful] -) -) - -::======================================================================================================================================== - -:: Below registry key (Volatile & Protected) gets created after the ClipSVC License cleanup command, and gets automatically deleted after -:: system restart. It needs to be deleted to activate the system without restart. - -:: This code runs only if Lockbox method to generate ticket is manually set by the user in this script. - -set "RegKey=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState" -set "_ident=HKU\S-1-5-19\SOFTWARE\Microsoft\IdentityCRL" - -if %_lock%==1 ( -%nul% call :regown "%RegKey%" -reg delete "%RegKey%" /f %nul% - -reg query "%RegKey%" %nul% && ( -call :dk_color %Red% "Deleting a Volatile Registry [Failed]" -call :dk_color %Magenta% "Restart the system, that will delete this registry key automatically" -) || ( -echo Deleting a Volatile Registry [Successful] -) - -REM Clear HWID token related registry to fix activation incase if there is any corruption - -reg delete "%_ident%" /f %nul% -reg query "%_ident%" %nul% && ( -call :dk_color %Red% "Deleting a Registry [Failed] [%_ident%]" -) || ( -echo Deleting a Registry [Successful] [%_ident%] -) -) - -::======================================================================================================================================== - -:: Multiple attempts to generate the ticket because in some cases, one attempt is not enough. - -echo: -set "_noxml=if not exist "%temp_%\GenuineTicket.xml"" - -set pfn= -for /f "skip=2 tokens=3*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "pfn=%%a" - -"%temp_%/gatherosstatemodified.exe" Pfn=%pfn%;DownlevelGenuineState=1 -%_noxml% timeout /t 3 %nul% -%_noxml% net stop sppsvc /y %nul% -%_noxml% call "%temp_%/gatherosstatemodified.exe" Pfn=%pfn%;DownlevelGenuineState=1 -%_noxml% timeout /t 3 %nul% - -:: Refresh ClipSVC (required after cleanup) with below command, not related to generating tickets - -if %_lock%==1 ( -for %%# in (wlidsvc LicenseManager sppsvc) do (net stop %%# /y %nul% & net start %%# /y %nul%) -call :dk_refresh -) - -%_noxml% ( -call :dk_color %Red% "Generating GenuineTicket.xml [Failed] [%pfn%]" -goto :dl_final -) - -if %_lock%==1 ( -find /i "clientLockboxKey" "%temp_%\GenuineTicket.xml" >nul && ( -echo Generating GenuineTicket.xml [Successful] [%pfn%] -) || ( -call :dk_color %Red% "Generating GenuineTicket.xml [Failed] [%pfn%]" -call :dk_color %Red% "downlevelGTkey Ticket created. Aborting..." -goto :dl_final -) -) else ( -echo Generating GenuineTicket.xml [Successful] [%pfn%] -) - -::======================================================================================================================================== - -:: Copy GenuineTicket.xml to the root of C drive and exit if ticket generation option was used in script - -if %_gent%==1 ( -echo: -copy /y /b "%temp_%\GenuineTicket.xml" "%Systemdrive%\GenuineTicket.xml" %nul% -if not exist "%Systemdrive%\GenuineTicket.xml" ( -call :dk_color %Red% "Copying GenuineTicket.xml to %Systemdrive%\ [Failed]" -) else ( -call :dk_color %Green% "Copying GenuineTicket.xml to %Systemdrive%\ [Successful]" -) -goto :dl_final -) - -::======================================================================================================================================== - -:: clipup -v -o -altto <path> & clipup -v -o both methods may fail if the username have spaces/special characters/non English names -:: Most correct way to apply a ticket is by restarting ClipSVC service but we can not check the log details in this way -:: To get the log details and also to correctly apply ticket, script will install tickets two times (service restart + clipup -v -o -altto <path>) - -set "tdir=%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket" -if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul% -if not exist "%tdir%\" md "%tdir%\" %nul% -copy /y /b "%temp_%\GenuineTicket.xml" "%tdir%\GenuineTicket.xml" %nul% - -if not exist "%tdir%\GenuineTicket.xml" ( -call :dk_color %Red% "Copying Ticket to ClipSVC Location [Failed]" -) - -set "_xmlexist=if exist "%tdir%\GenuineTicket.xml"" - -%_xmlexist% ( -net stop ClipSVC /y %nul% -net start ClipSVC /y %nul% -%_xmlexist% timeout /t 2 %nul% -%_xmlexist% timeout /t 2 %nul% - -%_xmlexist% ( -if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul% -call :dk_color %Red% "Installing GenuineTicket.xml [Failed With ClipSVC Service Restart Method]" -) -) - -clipup -v -o -altto %temp_%\ - -::========================================================================================================================================== - -call :dk_product - -echo: -echo Activating... -echo: - -call :dk_act -call :dk_checkperm -if defined _perm ( -set activ=1 -call :dk_color %Green% "%winos% is permanently activated." -goto :dl_final -) - -:: Refresh some services and license status - -if %_lock%==1 set _retry=1 -if defined _intcon set _retry=1 - -if defined _retry ( -for %%# in (wlidsvc LicenseManager sppsvc) do (net stop %%# /y %nul% & net start %%# /y %nul%) -call :dk_refresh -call :dk_act -) - -call :dk_checkperm - -set "_unsup=call :dk_color %Magenta% "At the time of writing this, HWID Activation was not supported for this product."" - -if defined _perm ( -set activ=1 -call :dk_color %Green% "%winos% is permanently activated." -) else ( -call :dk_color %Red% "Activation Failed %error_code%" -if defined key if defined pkey %_unsup% -if not defined key %_unsup% -if defined notworking %_unsup% -if not defined notworking if defined key if not defined pkey call :dk_color %Magenta% "Restart the system and try again / Check troubleshooting steps in MAS Extras option" -) - -::======================================================================================================================================== - -:dl_final - -echo: -if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul% -if exist "%temp_%\" ( -call :dk_color %Red% "Cleaning Temp Files [Failed]" -) else ( -echo Cleaning Temp Files [Successful] -) - -if %osSKU%==175 ( -call :dk_color %Red% "ServerRdsh Editon does not officially support activation on non-azure platforms." -) - -if not defined activ call :dk_checkerrors - -if not defined activ if not defined error ( -echo Basic Diagnostic Tests [Error Not Found] -) - -goto :dk_done - -::======================================================================================================================================== - -:: A lean and mean snippet to set registry ownership and permission recursively -:: Written by @AveYo aka @BAU -:: pastebin.com/XTPt0JSC - -:: Modified by @abbodi1406 to make it work in ARM64 Windows 10 (builds older than 21277) where only x86 version of Powershell is installed. - -:: This code runs only if Lockbox method is manually set by the user in this script. - -:regown - -pushd "!_work!" -setlocal DisableDelayedExpansion - -set "0=%~nx0"&%psc% $A='%~1','%~2','%~3','%~4','%~5','%~6';iex(([io.file]::ReadAllText($env:0)-split':Own1\:.*')[1])&popd&setlocal EnableDelayedExpansion&exit/b:Own1: -$D1=[uri].module.gettype('System.Diagnostics.Process')."GetM`ethods"(42) |where {$_.Name -eq 'SetPrivilege'} #`:no-ev-warn -'SeSecurityPrivilege','SeTakeOwnershipPrivilege','SeBackupPrivilege','SeRestorePrivilege'|foreach {$D1.Invoke($null, @("$_",2))} -$path=$A[0]; $rk=$path-split'\\',2; switch -regex ($rk[0]){'[mM]'{$hv=2147483650};'[uU]'{$hv=2147483649};default{$hv=2147483648};} -$HK=[Microsoft.Win32.RegistryKey]::OpenBaseKey($hv, 256); $s=$A[1]; $sps=[Security.Principal.SecurityIdentifier] -$u=($A[2],'S-1-5-32-544')[!$A[2]];$o=($A[3],$u)[!$A[3]];$w=$u,$o |% {new-object $sps($_)}; $old=!$A[3];$own=!$old; $y=$s-eq'all' -$rar=new-object Security.AccessControl.RegistryAccessRule( $w[0], ($A[5],'FullControl')[!$A[5]], 1, 0, ($A[4],'Allow')[!$A[4]] ) -$x=$s-eq'none';function Own1($k){$t=$HK.OpenSubKey($k,2,'TakeOwnership');if($t){0,4|%{try{$o=$t.GetAccessControl($_)}catch{$old=0} -};if($old){$own=1;$w[1]=$o.GetOwner($sps)};$o.SetOwner($w[0]);$t.SetAccessControl($o); $c=$HK.OpenSubKey($k,2,'ChangePermissions') -$p=$c.GetAccessControl(2);if($y){$p.SetAccessRuleProtection(1,1)};$p.ResetAccessRule($rar);if($x){$p.RemoveAccessRuleAll($rar)} -$c.SetAccessControl($p);if($own){$o.SetOwner($w[1]);$t.SetAccessControl($o)};if($s){$($subkeys=$HK.OpenSubKey($k).GetSubKeyNames()) 2>$null; -foreach($n in $subkeys){Own1 "$k\$n"}}}};Own1 $rk[1];if($env:VO){get-acl Registry::$path|fl} #:Own1: lean & mean snippet by AveYo - -::======================================================================================================================================== - -:: Get Windows permanent activation status - -:dk_checkperm - -if %_wmic% EQU 1 wmic path SoftwareLicensingProduct where (LicenseStatus='1' and GracePeriodRemaining='0' and PartialProductKey is not NULL) get Name /value 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm= -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT Name FROM SoftwareLicensingProduct WHERE LicenseStatus=1 AND GracePeriodRemaining=0 AND PartialProductKey IS NOT NULL').Get()).Name | %% {echo ('Name='+$_)}" 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm= -exit /b - -:: Refresh license status - -:dk_refresh - -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call RefreshLicenseStatus %nul% -if %_wmic% EQU 0 %psc% "$null=(([WMICLASS]'SoftwareLicensingService').GetInstances()).RefreshLicenseStatus()" %nul% -exit /b - -:: Get Windows installed key channel - -:dk_channel - -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null" Get ProductKeyChannel /value 2^>nul') do set "_channel=%%#" -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT ProductKeyChannel FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL').Get()).ProductKeyChannel | %% {echo ('ProductKeyChannel='+$_)}" 2^>nul') do set "_channel=%%#" -exit /b - -:: Activation command - -:dk_act - -set error_code= -if %_wmic% EQU 1 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null" call Activate %nul% -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT ID FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL').Get()).Activate()" %nul% -if not %errorlevel%==0 cscript //nologo %windir%\system32\slmgr.vbs /ato %nul% -set error_code=%errorlevel% -cmd /c exit /b %error_code% -if %error_code% NEQ 0 (set "error_code=[Error Code: 0x%=ExitCode%]") else (set error_code=) -exit /b - -:: Get Windows Activation IDs - -:dk_actids - -set applist= -if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path SoftwareLicensingProduct where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f') get ID /VALUE" 2^>nul')" -if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')" -%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a")) -exit /b - -:: Get Product name (WMI/REG methods are not reliable in all conditions, hence winbrand.dll method is used) - -:dk_product - -set winos= -set d1=[DllImport(\"winbrand\",CharSet=CharSet.Unicode)]public static extern string BrandingFormatString(string s); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $AP::BrandingFormatString('%%WINDOWS_LONG%%') -for /f "delims=" %%s in ('"%psc% %d2%"') do if not errorlevel 1 (set winos=%%s) -echo "%winos%" | find /i "Windows" 1>nul || ( -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b" -if %winbuild% GEQ 22000 ( -set winos=!winos:Windows 10=Windows 11! -) -) -exit /b - -:: Check wmic.exe - -:dk_ckeckwmic - -set _wmic=0 -for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" ( -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul && set _wmic=1 -) -exit /b - -:dk_initial - -echo: -echo Initializing... - -:: Check and enable WinMgmt, sppsvc services if required - -for %%# in (WinMgmt sppsvc) do ( -for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start 2^>nul') do if /i %%b NEQ 0x2 ( -echo: -echo Enabling %%# service... -if /i %%#==sppsvc sc config %%# start= delayed-auto %nul% || echo Failed -if /i %%#==WinMgmt sc config %%# start= auto %nul% || echo Failed -) -sc start %%# %nul% -if !errorlevel! NEQ 1056 if !errorlevel! NEQ 0 ( -echo: -echo Starting %%# service... -sc start %%# -echo: -call :dk_color %Red% "Failed to start [%%#] service, rest of the process may take a long time..." -) -) - -:: Check WMI and SPP Errors - -call :dk_ckeckwmic - -set e_wmi= -set e_wmispp= -call :dk_actids - -if not defined applist ( -net stop sppsvc /y %nul% -cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -if !errorlevel! NEQ 0 cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -call :dk_refresh - -if %_wmic% EQU 1 wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul -if %_wmic% EQU 0 %psc% "Get-CIMInstance -Class Win32_ComputerSystem | Select-Object -Property CreationClassName" 2>nul | find /i "computersystem" 1>nul -if !errorlevel! NEQ 0 set e_wmi=1 - -if defined e_wmi (set e_wmispp=WMI, SPP) else (set e_wmispp=SPP) -call :dk_actids -) -exit /b - -::======================================================================================================================================== - -:: Get Product Key from pkeyhelper.dll for future new editions -:: It works on Windows 10 1803 (17134) and later builds. (Partially on 1803 & 1809, fully on 1903 and later) - -:dk_pkey - -set pkey= -set d1=[DllImport(\"pkeyhelper.dll\",CharSet=CharSet.Unicode)]public static extern int SkuGetProductKeyForEdition(int e, string c, out string k, out string p); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k=''; $null=$AP::SkuGetProductKeyForEdition(%1, %2, [ref]$k, [ref]$null); $k -for /f %%a in ('%psc% "%d2%"') do if not errorlevel 1 (set pkey=%%a) -exit /b - -:: Get channel name for the key which was extracted from pkeyhelper.dll - -:dk_pkeychannel - -set k=%1 -set pkeychannel= -set p=%SystemRoot%\System32\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms -set m=[System.Runtime.InteropServices.Marshal] -set d1=[DllImport(\"PidGenX.dll\",CharSet=CharSet.Unicode)]public static extern int PidGenX(string k,string p,string m,int u,IntPtr i,IntPtr d,IntPtr f); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k='%k%'; $p='%p%'; $r=[byte[]]::new(0x04F8); $r[0]=0xF8; $r[1]=0x04; $f=%m%::AllocHGlobal(1272); %m%::Copy($r,0,$f,1272); -set d3=%d2% [void]$AP::PidGenX($k,$p,\"00000\",0,0,0,$f); %m%::Copy($f,$r,0,1272); %m%::FreeHGlobal($f); [System.Text.Encoding]::Unicode.GetString($r, 1016, 128).Replace('0','') -for /f %%a in ('%psc% "%d3%"') do if not errorlevel 1 (set pkeychannel=%%a) -exit /b - -:dk_hwidkey - -for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b -for %%# in (Retail OEM:NONSLP OEM:DM Volume:MAK) do ( -call :dk_pkey %osSKU% '%%#' -if defined pkey call :dk_pkeychannel !pkey! -if /i [!pkeychannel!]==[%%#] ( -set key=!pkey! -exit /b -) -) -exit /b - -::======================================================================================================================================== - -:dk_checkerrors - -:: Check if the services are able to run or not -:: Workarounds are added to get correct status and error code because sc query doesn't output correct results in some conditions - -set serv_e= -for %%# in (%_serv%) do ( -set errorcode= -set checkerror= -sc query %%# | find /i ": 4 RUNNING" %nul% || net start %%# /y %nul% -sc start %%# %nul% -set errorcode=!errorlevel! -if !errorcode! NEQ 1056 if !errorcode! NEQ 0 set checkerror=1 -sc query %%# | find /i ": 4 RUNNING" %nul% || set checkerror=1 -if defined checkerror if defined serv_e (set "serv_e=!serv_e!, %%#-!errorcode!") else (set "serv_e=%%#-!errorcode!") -) - -if defined serv_e ( -set error=1 -call :dk_color %Red% "Starting Services [Failed] [%serv_e%]" -) - -:: Various error checks - -set token=0 -if exist %Systemdrive%\Windows\System32\spp\store\2.0\tokens.dat set token=1 -if exist %Systemdrive%\Windows\System32\spp\store_test\2.0\tokens.dat set token=1 -if %token%==0 ( -set error=1 -call :dk_color %Red% "Checking SPP tokens.dat [Not Found]" -) - -DISM /English /Online /Get-CurrentEdition %nul% -set error_code=%errorlevel% -cmd /c exit /b %error_code% -if %error_code% NEQ 0 set "error_code=[0x%=ExitCode%]" -if %error_code% NEQ 0 ( -set error=1 -call :dk_color %Red% "Checking DISM [Not Responding] %error_code%" -) - -%psc% $ExecutionContext.SessionState.LanguageMode 2>nul | find /i "Full" 1>nul || ( -set error=1 -call :dk_color %Red% "Checking Powershell [Not Responding]" -) - -for %%# in (wmic.exe) do @if "%%~$PATH:#"=="" ( -set error=1 -call :dk_color %Gray% "Checking WMIC.exe [Not Found]" -) - -reg query "HKU\S-1-5-20\Software\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\PersistedTSReArmed" %nul% && ( -set error=1 -call :dk_color %Red% "Checking Rearm [System Restart Is Required]" -) - -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState" %nul% && ( -set error=1 -call :dk_color %Red% "Checking ClipSVC [System Restart Is Required]" -) - -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "SkipRearm" 2^>nul') do if /i %%b NEQ 0x0 ( -reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "SkipRearm" /t REG_DWORD /d "0" /f %nul% -call :dk_color %Red% "Checking SkipRearm [Default 0 Value Not Found, Changing To 0]" -net stop sppsvc /y %nul% -net start sppsvc /y %nul% -set error=1 -) - -set _wsh=1 -reg query "HKCU\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _wsh=0) -reg query "HKLM\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _wsh=0) -if %_wsh% EQU 0 ( -set error=1 -call :dk_color %Gray% "Checking Windows Script Host [Disabled]" -) - -cscript //nologo %windir%\system32\slmgr.vbs /dlv %nul% -set error_code=%errorlevel% -cmd /c exit /b %error_code% -if %error_code% NEQ 0 set "error_code=[0x%=ExitCode%]" -if %error_code% NEQ 0 ( -set error=1 -call :dk_color %Red% "Checking slmgr /dlv [Not Responding] %error_code%" -) - -if not defined applist ( -set error=1 -call :dk_color %Red% "Checking WMI/SPP [Not Responding] [%e_wmispp%]" -) - -set nil= -set _sppint= -if not %_gent%==1 if not defined error ( -for %%# in (SppE%nil%xtComObj.exe,sppsvc.exe) do ( -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Ima%nil%ge File Execu%nil%tion Options\%%#" %nul% && set _sppint=1 -) -) - -if defined _sppint ( -call :dk_color %Red% "Checking SPP Interference In IFEO [Found] [Uninstall KMS Activator If There Is Any]" -set error=1 -) -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 -call :dk_color %_Yellow% "Press any key to %_exitmsg%..." -pause >nul -exit /b - -::======================================================================================================================================== - -:: 1st column = Activation ID -:: 2nd column = Generic Retail/OEM/MAK Key -:: 3rd column = SKU ID -:: 4th column = 1 = activation is not working (at the time of writing this), 0 = activation is working -:: 5th column = Key Type -:: 6th column = WMI Edition ID -:: 7th column = Version name incase same Edition ID is used in different OS versions with different key -:: Separator = _ - -:: Key preference is in the following order. Retail > OEM:NONSLP > OEM:DM > Volume:MAK - - -:hwiddata - -for %%# in ( -8b351c9c-f398-4515-9900-09df49427262_XGVPP-NMH47-7TTHJ-W3FW7-8HV2C___4_0_OEM:NONSLP_Enterprise -23505d51-32d6-41f0-8ca7-e78ad0f16e71_D6RD9-D4N8T-RT9QX-YW6YT-FCWWJ__11_1_____Retail_Starter -c83cef07-6b72-4bbc-a28f-a00386872839_3V6Q6-NQXCX-V8YXR-9QCYV-QPFCT__27_0_Volume:MAK_EnterpriseN -211b80cc-7f64-482c-89e9-4ba21ff827ad_3NFXW-2T27M-2BDW6-4GHRV-68XRX__47_1_____Retail_StarterN -4de7cb65-cdf1-4de9-8ae8-e3cce27b9f2c_VK7JG-NPHTM-C97JM-9MPGT-3V66T__48_0_____Retail_Professional -9fbaf5d6-4d83-4422-870d-fdda6e5858aa_2B87N-8KFHP-DKV6R-Y2C8J-PKCKT__49_0_____Retail_ProfessionalN -f742e4ff-909d-4fe9-aacb-3231d24a0c58_4CPRK-NM3K3-X6XXQ-RXX86-WXCHW__98_0_____Retail_CoreN -1d1bac85-7365-4fea-949a-96978ec91ae0_N2434-X9D7W-8PF6X-8DV9T-8TYMD__99_0_____Retail_CoreCountrySpecific -3ae2cc14-ab2d-41f4-972f-5e20142771dc_BT79Q-G7N6G-PGBYW-4YWX6-6F4BT_100_0_____Retail_CoreSingleLanguage -2b1f36bb-c1cd-4306-bf5c-a0367c2d97d8_YTMG3-N6DKC-DKB77-7M9GH-8HVX7_101_0_____Retail_Core -2a6137f3-75c0-4f26-8e3e-d83d802865a4_XKCNC-J26Q9-KFHD2-FKTHY-KD72Y_119_0_OEM:NONSLP_PPIPro -e558417a-5123-4f6f-91e7-385c1c7ca9d4_YNMGQ-8RYV3-4PGQ3-C8XTP-7CFBY_121_0_____Retail_Education -c5198a66-e435-4432-89cf-ec777c9d0352_84NGF-MHBT6-FXBX8-QWJK7-DRR8H_122_0_____Retail_EducationN -cce9d2de-98ee-4ce2-8113-222620c64a27_KCNVH-YKWX8-GJJB9-H9FDT-6F7W2_125_1_Volume:MAK_EnterpriseS_2021 -d06934ee-5448-4fd1-964a-cd077618aa06_43TBQ-NH92J-XKTM7-KT3KK-P39PB_125_0_OEM:NONSLP_EnterpriseS_2019 -706e0cfd-23f4-43bb-a9af-1a492b9f1302_NK96Y-D9CD8-W44CQ-R8YTK-DYJWX_125_0_OEM:NONSLP_EnterpriseS_2016 -faa57748-75c8-40a2-b851-71ce92aa8b45_FWN7H-PF93Q-4GGP8-M8RF3-MDWWW_125_0_OEM:NONSLP_EnterpriseS_2015 -2c060131-0e43-4e01-adc1-cf5ad1100da8_RQFNW-9TPM3-JQ73T-QV4VQ-DV9PT_126_1_Volume:MAK_EnterpriseSN_2021 -e8f74caa-03fb-4839-8bcc-2e442b317e53_M33WV-NHY3C-R7FPM-BQGPT-239PG_126_1_Volume:MAK_EnterpriseSN_2019 -3d1022d8-969f-4222-b54b-327f5a5af4c9_2DBW3-N2PJG-MVHW3-G7TDK-9HKR4_126_0_Volume:MAK_EnterpriseSN_2016 -60c243e1-f90b-4a1b-ba89-387294948fb6_NTX6B-BRYC2-K6786-F6MVQ-M7V2X_126_0_Volume:MAK_EnterpriseSN_2015 -a48938aa-62fa-4966-9d44-9f04da3f72f2_G3KNM-CHG6T-R36X3-9QDG6-8M8K9_138_1_____Retail_ProfessionalSingleLanguage -f7af7d09-40e4-419c-a49b-eae366689ebd_HNGCC-Y38KG-QVK8D-WMWRK-X86VK_139_1_____Retail_ProfessionalCountrySpecific -eb6d346f-1c60-4643-b960-40ec31596c45_DXG7C-N36C4-C4HTG-X4T3X-2YV77_161_0_____Retail_ProfessionalWorkstation -89e87510-ba92-45f6-8329-3afa905e3e83_WYPNQ-8C467-V2W6J-TX4WX-WT2RQ_162_0_____Retail_ProfessionalWorkstationN -62f0c100-9c53-4e02-b886-a3528ddfe7f6_8PTT6-RNW4C-6V7J2-C2D3X-MHBPB_164_0_____Retail_ProfessionalEducation -13a38698-4a49-4b9e-8e83-98fe51110953_GJTYN-HDMQY-FRR76-HVGC7-QPF8P_165_0_____Retail_ProfessionalEducationN -1ca0bfa8-d96b-4815-a732-7756f30c29e2_FV469-WGNG4-YQP66-2B2HY-KD8YX_171_1_OEM:NONSLP_EnterpriseG -8d6f6ffe-0c30-40ec-9db2-aad7b23bb6e3_FW7NV-4T673-HF4VX-9X4MM-B4H4T_172_1_OEM:NONSLP_EnterpriseGN -df96023b-dcd9-4be2-afa0-c6c871159ebe_NJCF7-PW8QT-3324D-688JX-2YV66_175_0_____Retail_ServerRdsh -d4ef7282-3d2c-4cf0-9976-8854e64a8d1e_V3WVW-N2PV2-CGWC3-34QGF-VMJ2C_178_0_____Retail_Cloud -af5c9381-9240-417d-8d35-eb40cd03e484_NH9J3-68WK7-6FB93-4K3DF-DJ4F6_179_0_____Retail_CloudN -c7051f63-3a76-4992-bce5-731ec0b1e825_2HN6V-HGTM8-6C97C-RK67V-JQPFD_183_1_____Retail_CloudE -8ab9bdd1-1f67-4997-82d9-8878520837d9_XQQYW-NFFMW-XJPBH-K8732-CKFFD_188_0_____OEM:DM_IoTEnterprise -ed655016-a9e8-4434-95d9-4345352c2552_QPM6N-7J2WJ-P88HH-P3YRH-YY74H_191_0_OEM:NONSLP_IoTEnterpriseS -d4bdc678-0a4b-4a32-a5b3-aaa24c3b0f24_K9VKN-3BGWV-Y624W-MCRMQ-BHDCD_202_0_____Retail_CloudEditionN -92fb8726-92a8-4ffc-94ce-f82e07444653_KY7PN-VR6RX-83W6Y-6DDYQ-T6R4W_203_0_____Retail_CloudEdition -) do ( -for /f "tokens=1-8 delims=_" %%A in ("%%#") do if %osSKU%==%%C ( - -if %1==attempt1 if not defined key ( -echo "!applist!" | find /i "%%A" 1>nul && ( -set app=%%A -set key=%%B -if %%D==1 set notworking=1 -) -) - -if %1==attempt2 if not defined key ( -set 7th=%%G -if not defined 7th ( -set app=%%A -if %%D==1 set notworking=1 -if %winbuild% GTR 19044 call :dk_hwidkey %nul% -if not defined key set key=%%B -) else ( -echo "%winos%" | find /i "%%G" 1>nul && ( -set app=%%A -if %%D==1 set notworking=1 -if %winbuild% GTR 19044 call :dk_hwidkey %nul% -if not defined key set key=%%B -) -) -) -) -) -exit /b - -::======================================================================================================================================== - -:: Below code is used to get alternate edition name and key if current edition doesn't support HWID activation - -:: ProfessionalCountrySpecific won't be converted because it's not a good idea to change CountrySpecific editions - -:: 1st column = Current Edition Activation ID -:: 2nd column = Alternate Edition Activation ID -:: 3rd column = Alternate Edition Key -:: 4th column = Current Edition Name -:: 5th column = Alternate Edition Name -:: Separator = _ - -:: Key preference is in the following order. Retail > OEM:NONSLP > OEM:DM > Volume:MAK - - -:hwidfallback - -if %_chan%==0 exit /b - -for %%# in ( -cce9d2de-98ee-4ce2-8113-222620c64a27_ed655016-a9e8-4434-95d9-4345352c2552_QPM6N-7J2WJ-P88HH-P3YRH-YY74H_EnterpriseS-2021____________IoTEnterpriseS -a48938aa-62fa-4966-9d44-9f04da3f72f2_4de7cb65-cdf1-4de9-8ae8-e3cce27b9f2c_VK7JG-NPHTM-C97JM-9MPGT-3V66T_ProfessionalSingleLanguage__Professional -) do ( -for /f "tokens=1-5 delims=_" %%A in ("%%#") do if "%app%"=="%%A" ( -echo "!applist!" | find /i "%%B" 1>nul && ( -set altkey=%%C -set curedition=%%D -set altedition=%%E -) -) -) -exit /b - -::======================================================================================================================================== - -:: Script changes below values in official gatherosstate.exe so that it can generate usable ticket in Windows unlicensed state - -:hex:[ -$bytes = [System.IO.File]::ReadAllBytes("gatherosstate.exe") -$bytes[320] = 0x9c -$bytes[321] = 0xfb -$bytes[322] = 0x05 -$bytes[13672] = 0x25 -$bytes[13674] = 0x73 -$bytes[13676] = 0x3b -$bytes[13678] = 0x00 -$bytes[13680] = 0x00 -$bytes[13682] = 0x00 -$bytes[13684] = 0x00 -$bytes[32748] = 0xe9 -$bytes[32749] = 0x9e -$bytes[32750] = 0x00 -$bytes[32751] = 0x00 -$bytes[32752] = 0x00 -$bytes[32894] = 0x8b -$bytes[32895] = 0x44 -$bytes[32897] = 0x64 -$bytes[32898] = 0x85 -$bytes[32899] = 0xc0 -$bytes[32900] = 0x0f -$bytes[32901] = 0x85 -$bytes[32902] = 0x1c -$bytes[32903] = 0x02 -$bytes[32904] = 0x00 -$bytes[32906] = 0xe9 -$bytes[32907] = 0x3c -$bytes[32908] = 0x01 -$bytes[32909] = 0x00 -$bytes[32910] = 0x00 -$bytes[32911] = 0x85 -$bytes[32912] = 0xdb -$bytes[32913] = 0x75 -$bytes[32914] = 0xeb -$bytes[32915] = 0xe9 -$bytes[32916] = 0x69 -$bytes[32917] = 0xff -$bytes[32918] = 0xff -$bytes[32919] = 0xff -$bytes[33094] = 0xe9 -$bytes[33095] = 0x80 -$bytes[33096] = 0x00 -$bytes[33097] = 0x00 -$bytes[33098] = 0x00 -$bytes[33449] = 0x64 -$bytes[33576] = 0x8d -$bytes[33577] = 0x54 -$bytes[33579] = 0x24 -$bytes[33580] = 0xe9 -$bytes[33581] = 0x55 -$bytes[33582] = 0x01 -$bytes[33583] = 0x00 -$bytes[33584] = 0x00 -$bytes[34189] = 0x59 -$bytes[34190] = 0xeb -$bytes[34191] = 0x28 -$bytes[34238] = 0xe9 -$bytes[34239] = 0x4f -$bytes[34240] = 0x00 -$bytes[34241] = 0x00 -$bytes[34242] = 0x00 -$bytes[34346] = 0x24 -$bytes[34376] = 0xeb -$bytes[34377] = 0x63 -[System.IO.File]::WriteAllBytes("gatherosstatemodified.exe", $bytes) -:hex:] - +@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+::============================================================================
+::
+:: This script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::============================================================================
+
+
+
+:: To activate with Downlevel method (default), run the script with /a parameter or change 0 to 1 in below line
+set _acti=0
+
+:: To only generate GenuineTicket.xml with Downlevel method (default), run the script with /g parameter or change 0 to 1 in below line
+set _gent=0
+
+:: To enable LockBox method, run the script with /k parameter or change 0 to 1 in below line
+:: You need to use this option with either activation or ticket generation.
+:: Example,
+:: HWID_Activation.cmd /a /k
+:: HWID_Activation.cmd /g /k
+set _lock=0
+
+
+
+:: If value is changed in above lines or any parameter is used then script will run in unattended mode
+:: Incase if more than one options are used then only one option will be applied
+
+
+
+::========================================================================================================================================
+
+:: 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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %*"
+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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %*"
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+::========================================================================================================================================
+
+cls
+color 07
+title HWID Activation
+
+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"=="/a" set _acti=1
+if /i "%%A"=="/g" set _gent=1
+if /i "%%A"=="/k" set _lock=1
+if /i "%%A"=="-el" set _elev=1
+)
+)
+
+for %%A in (%_acti% %_gent% %_lock%) do (if "%%A"=="1" set _unattended=1)
+
+::========================================================================================================================================
+
+set winbuild=1
+set "nul=>nul 2>&1"
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+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 2>nul | find /i "0x0" 1>nul && (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 "Magenta="45;97m""
+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 "Magenta="Darkmagenta" "white""
+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:"
+set slp=SoftwareLicensingProduct
+set sls=SoftwareLicensingService
+set wApp=55c92734-d682-4d71-983e-d6ec3f16059f
+if %~z0 GEQ 1500000 (set "_exitmsg=Go back") else (set "_exitmsg=Exit")
+set "notifytocheckupdate=if %winbuild% GTR 19044 echo Make sure you are using updated version of the script."
+
+::========================================================================================================================================
+
+if %winbuild% LSS 10240 (
+%eline%
+echo Unsupported OS version detected.
+echo Project is supported for Windows 10/11.
+goto dk_done
+)
+
+if %winbuild% GEQ 22483 if not exist %_psc% (
+%nceline%
+echo Powershell is not installed in the system.
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Fix for the special characters limitation 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 "_ttemp=%temp%"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" 1>nul && (
+%eline%
+echo Script is launched from the temp folder,
+echo Most likely you are 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
+)
+
+::========================================================================================================================================
+
+:: Elevate script as admin and pass arguments and preventing loop
+
+%nul% reg query HKU\S-1-5-19 || (
+if not defined _elev %nul% %_psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b
+%eline%
+echo This script require administrator privileges.
+echo To do so, right click on this script and select 'Run as administrator'.
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:dl_menu
+
+if %_unattended%==0 (
+cls
+mode 76, 25
+title HWID Activation
+
+if !_lock!==0 (set "_method=%_Green% "[Downlevel Method]"") else (set "_method=%_Yellow% " [LockBox Method]"")
+echo:
+echo:
+echo:
+echo ____________________________________________________________
+echo:
+call :dk_color2 %_White% " [1] HWID Activation " !_method!
+echo ____________________________________________
+echo:
+call :dk_color2 %_White% " [2] Generate Ticket " !_method!
+echo ____________________________________________
+echo:
+echo [3] Change Method
+echo:
+echo [4] %_exitmsg%
+echo ____________________________________________________________
+echo:
+call :dk_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard [1,2,3,4]"
+choice /C:1234 /N
+set _el=!errorlevel!
+if !_el!==4 exit /b
+if !_el!==3 (
+if !_lock!==0 (
+set _lock=1
+) else (
+set _lock=0
+)
+cls
+echo:
+call :dk_color %_Green% " Downlevel Method:"
+echo It creates downlevelGTkey ticket for activation with simplest process.
+echo:
+call :dk_color %_Yellow% " LockBox Method:"
+echo It creates clientLockboxKey ticket which better mimics genuine activation,
+echo But requires more steps such as,
+echo - Cleaning ClipSVC licences
+echo - Deleting a volatile and protected registry key by taking ownership
+echo - System may need a restart for succesfull activation
+echo - Microsoft Account and Store Apps may need relogin-restart in the system
+echo:
+call :dk_color2 %_White% " " %Green% "Note:"
+echo Microsoft accepts both types of tickets and that's unlikely to change.
+echo If you are not sure what to choose then select default Downlevel Method.
+echo:
+call :dk_color %_Yellow% " Press any key to go back..."
+pause >nul
+goto :dl_menu
+)
+if !_el!==2 set _gent=1&goto :dl_menu2
+if !_el!==1 goto :dl_menu2
+goto :dl_menu
+)
+
+:dl_menu2
+
+cls
+if %_gent%==1 (set _title=title Generate HWID GenuineTicket.xml) else (set _title=title HWID Activation)
+if %_lock%==0 (%_title% [Downlevel Method] & mode 102, 30) else (%_title% [Lockbox Method] & mode 102, 32)
+
+::========================================================================================================================================
+
+if not exist %_psc% if %_lock%==1 (
+set _lock=0
+set _gent=0
+%nceline%
+echo Powershell is not installed in the system.
+echo It is required for Lockbox Method of HWID.
+echo You need to set the script to the default.
+if %_unattended%==0 (
+echo:
+call :dk_color %_Yellow% "Press any key to go back..."
+pause >nul
+goto dl_menu
+) else (
+goto dk_done
+)
+)
+
+if %_gent%==1 if exist %Systemdrive%\GenuineTicket.xml (
+set _gent=0
+%eline%
+echo File '%Systemdrive%\GenuineTicket.xml' already exist.
+if %_unattended%==0 (
+echo:
+call :dk_color %_Yellow% "Press any key to go back..."
+pause >nul
+goto dl_menu
+) else (
+goto dk_done
+)
+)
+
+::========================================================================================================================================
+
+echo:
+echo Initializing...
+
+:: Check WMI and sppsvc Errors
+
+set applist=
+net start sppsvc /y %nul%
+if %winbuild% LSS 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%wApp%') get ID /VALUE" 2^>nul')"
+if %winbuild% GEQ 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')"
+%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a"))
+
+if not defined applist (
+%eline%
+echo Failed running WMI query check, verify that these services are working correctly
+echo Windows Management Instrumentation [WinMgmt], Software Protection [sppsvc]
+echo:
+echo Script will try to enable these services.
+echo:
+if %_unattended%==0 (
+call :dk_color %_Yellow% "Press any key to continue..."
+pause >nul
+)
+for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\WinMgmt /v Start 2^>nul') do if /i %%b equ 0x4 (sc config WinMgmt start= auto %nul%)
+net start WinMgmt /y %nul%
+net stop sppsvc /y %nul%
+net start sppsvc /y %nul%
+cls
+)
+
+::========================================================================================================================================
+
+:: Refresh license status, it helps to get correct product name in Windows 17134 and later builds
+
+call :dk_refresh
+
+:: Check product name
+
+set winos=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+
+::========================================================================================================================================
+
+:: Check if system is permanently activated or not
+
+cls
+call :dk_checkperm
+if defined _perm if not %_gent%==1 (
+echo ___________________________________________________________________________________________
+echo:
+call :dk_color2 %_White% " " %Green% "Checking: %winos% is Permanently Activated."
+call :dk_color2 %_White% " " %Gray% "Activation is not required."
+echo ___________________________________________________________________________________________
+if %_unattended%==1 goto dk_done
+echo:
+choice /C:12 /N /M "> [1] Activate [2] %_exitmsg% : "
+if errorlevel 2 exit /b
+)
+cls
+
+::========================================================================================================================================
+
+:: Check Evaluation version
+
+set _eval=
+set _evalserv=
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set _evalserv=1
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1 & set _evalserv=1
+
+if defined _eval (
+%eline%
+echo [%winos% ^| %winbuild%]
+if defined _evalserv (
+echo Server Evaluation cannot be activated. Convert it to full Server OS.
+) else (
+echo Evaluation Editions cannot be activated. Install full Windows OS.
+echo Check the ReadMe for how to get genuine installation media for full version.
+)
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check SKU value
+
+set osSKU=
+for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "osSKU=%%a"
+
+if not defined osSKU (
+%eline%
+echo SKU value was not detected properly. Aborting...
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check if HWID key (Retail,OEM,MAK) is already installed or not
+
+set _hwidk=
+call :dk_channel
+for %%A in (Retail,OEM,MAK) do echo: %_channel%| findstr /i "%%A" >nul && set _hwidk=1
+
+::========================================================================================================================================
+
+:: Detect Key
+
+set key=
+set notworking=
+set actidnotfound=
+
+if defined applist call :hwiddata attempt1
+if not defined key call :hwiddata attempt2
+
+::========================================================================================================================================
+
+if not defined key if not defined _hwidk (
+%eline%
+echo [%winos% ^| %winbuild% ^| SKU:%osSKU%]
+echo Unable to find this product in the supported product list.
+%notifytocheckupdate%
+echo:
+echo However, if you would like to try HWID activation on this product then,
+echo install any generic Retail, OEM, MAK key for this product and run the script.
+goto dk_done
+)
+
+if not defined key (
+echo:
+call :dk_color %Magenta% "====== Info ======"
+echo:
+echo [%winos% ^| %winbuild% ^| SKU:%osSKU%]
+echo Unable to find this product in the supported product list.
+%notifytocheckupdate%
+echo:
+echo Since %_channel% key is already installed, script will try to activate with HWID.
+echo:
+echo It may or may not activate it.
+if %_unattended%==0 (
+echo:
+call :dk_color %_Yellow% "Press any key to continue..."
+pause >nul
+)
+cls
+)
+
+::========================================================================================================================================
+
+:: Enterprise LTSC 2021 doesn't support HWID (At the time of writing this).
+:: To activate it with HWID, script insert the product key of Iot Enterprise LTSC 2021. Restart is required for full effect.
+
+:: If you don't want to change it then comment/delete the below lines.
+
+set changekey=
+if /i %key%==KCNVH-YKWX8-GJJB9-H9FDT-6F7W2 (
+set _chan=OEM:NONSLP
+set changekey=1
+set notworking=
+set key=QPM6N-7J2WJ-P88HH-P3YRH-YY74H
+)
+
+::========================================================================================================================================
+
+:: Check and show info for editions which doesn't support HWID now but may support it in future
+
+if defined notworking (
+echo:
+call :dk_color %Magenta% "====== Info ======"
+echo:
+echo [%winos% ^| %winbuild% ^| SKU:%osSKU%]
+echo At the time of writing this, HWID Activation was not supported for this product.
+echo:
+echo Now it may or may not activate it.
+if %_unattended%==0 (
+echo:
+call :dk_color %_Yellow% "Press any key to continue..."
+pause >nul
+)
+cls
+)
+
+::========================================================================================================================================
+
+:: Check Windows Architecture
+
+set arch=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b
+
+if not defined arch (
+%eline%
+echo Unable to detect Windows Architecture. Aborting...
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check files
+
+set ARM64_file=
+if /i "%arch%"=="ARM64" set ARM64_file=arm64_
+
+for %%# in (%ARM64_file%gatherosstate.exe %ARM64_file%slc.dll) do (
+if not exist "!_work!\BIN\%%#" (
+%eline%
+echo '%%#' file is missing in 'BIN' folder. Aborting...
+goto dk_done
+)
+)
+
+:: Verify gatherosstate.exe file
+
+set _hash=
+if /i "%arch%"=="ARM64" (set _orig=7E449AE5549A0D93CF65F4A1BB2AA7D1DC090D2D) else (set _orig=FABB5A0FC1E6A372219711152291339AF36ED0B5)
+for /f "skip=1 tokens=* delims=" %%# in ('certutil -hashfile "!_work!\BIN\%ARM64_file%gatherosstate.exe" SHA1^|findstr /i /v CertUtil') do set "_hash=%%#"
+set "_hash=%_hash: =%"
+
+if /i not "%_hash%"=="%_orig%" (
+%eline%
+echo %ARM64_file%gatherosstate.exe SHA1 hash mismatch found.
+echo:
+echo Expected: %_orig%
+echo Detected: %_hash%
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check Internet connection
+
+cls
+echo:
+echo Checking OS Info [%winos% ^| %winbuild% ^| %arch%]
+
+if not %_gent%==1 (
+set _intcon=
+ping -n 1 dns.msftncsi.com 2>nul | find "131.107.255.255" 1>nul || ping -n 1 www.microsoft.com 1>nul
+if !errorlevel!==0 (
+set _intcon=1
+echo Checking Internet Connection [Connected]
+) else (
+call :dk_color %Red% "Checking Internet Connection [Not connected]"
+)
+)
+
+::========================================================================================================================================
+
+echo:
+set "_serv=ClipSVC wlidsvc sppsvc LicenseManager Winmgmt wuauserv"
+
+:: Client License Service (ClipSVC)
+:: Microsoft Account Sign-in Assistant
+:: Software Protection
+:: Windows License Manager Service
+:: Windows Management Instrumentation
+:: Windows Update
+
+echo Checking Services [%_serv%]
+
+:: Check disabled services
+
+set serv_ste=
+for %%# in (%_serv%) do (
+set serv_dis=
+reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start %nul% || set serv_dis=1
+for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start 2^>nul') do if /i %%b equ 0x4 set serv_dis=1
+if defined serv_dis (if defined serv_ste (set "serv_ste=!serv_ste! %%#") else (set "serv_ste=%%#"))
+)
+
+:: Change disabled services startup type to auto
+
+set serv_csts=
+set serv_cste=
+
+if defined serv_ste (
+for %%# in (%serv_ste%) do (
+sc config %%# start= auto %nul% && (
+if defined serv_csts (set "serv_csts=!serv_csts! %%#") else (set "serv_csts=%%#")
+) || (
+if defined serv_cste (set "serv_cste=!serv_cste! %%#") else (set "serv_cste=%%#")
+)
+)
+)
+
+if defined serv_csts echo Enabling Disabled Services [Successful] [%serv_csts%]
+if defined serv_cste call :dk_color %Red% "Enabling Disabled Services [Failed] [%serv_cste%]"
+
+::========================================================================================================================================
+
+:: Check if the services are able to run or not
+
+set serv_e=
+for %%# in (%_serv%) do (
+sc query %%# | find /i "RUNNING" %nul% || net start %%# /y %nul%
+sc query %%# | find /i "RUNNING" %nul% || sc start %%# %nul%
+sc query %%# | find /i "RUNNING" %nul% || if defined serv_e (set "serv_e=!serv_e! %%#") else (set "serv_e=%%#")
+)
+
+if not defined serv_e (
+echo Starting Services [Successful]
+) else (
+call :dk_color %Red% "Starting Services [Failed] [%serv_e%]"
+echo %serv_e% | find /i "wuauserv" %nul% && (
+call :dk_color %Magenta% "Windows Update Service [wuauserv] is not working, check if you have blocked it"
+)
+)
+
+if not defined applist (
+call :dk_color %Red% "Checking WMI Query [Failed]"
+) else (
+echo Checking WMI Query [Successful]
+)
+
+::========================================================================================================================================
+
+:: Install key
+
+echo:
+if defined changekey call :dk_color %Magenta% "Windows 10 Iot Enterprise LTSC 2021 Product Key Is Selected For HWID Activation"&echo:
+
+set _partial=
+if defined key set _ipartial=%key:~-5%
+
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%# in ('wmic path %slp% where "ApplicationID='%wApp%' and PartialProductKey<>null" Get PartialProductKey /value 2^>nul') do set "_partial=%%#"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%# in ('%_psc% "(([WMISEARCHER]'SELECT PartialProductKey FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).PartialProductKey | %% {echo ('PartialProductKey='+$_)}" 2^>nul') do set "_partial=%%#"
+
+if defined key if /i "%_partial%"=="%_ipartial%" (
+echo Checking Installed Product Key [%key%] [%_channel%]
+)
+
+if not defined key (
+echo Checking Installed Product Key [Partial Key - %_partial%] [%_channel%]
+)
+
+set _channel=
+if defined key if /i not "%_partial%"=="%_ipartial%" (
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call InstallProductKey ProductKey="%key%" %nul%
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT Version FROM %sls%').Get()).InstallProductKey('%key%')" %nul%
+if not !errorlevel!==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul%
+
+if !errorlevel!==0 (
+call :dk_refresh
+echo Installing Generic Product Key [%key%] [%_chan%] [Successful]
+) else (
+call :dk_color %Red% "Installing Generic Product Key [%key%] [%_chan%] [Failed]%actidnotfound%"
+)
+)
+
+::========================================================================================================================================
+
+:: Files are copied to temp to generate ticket to avoid possible issues in case the path contains special character or non English names
+
+echo:
+set "temp_=%SystemRoot%\Temp\_Temp"
+if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul%
+md "%temp_%\" %nul%
+
+pushd "!_work!\BIN\"
+copy /y /b "%ARM64_file%gatherosstate.exe" "%temp_%\gatherosstate.exe" %nul%
+copy /y /b "%ARM64_file%slc.dll" "%temp_%\slc.dll" %nul%
+popd
+
+set copyf=
+if not exist "%temp_%\gatherosstate.exe" set copyf=1
+if not exist "%temp_%\slc.dll" set copyf=1
+
+if defined copyf (
+call :dk_color %Red% "Copying Required Files to Temp [%temp_%] [Failed]"
+goto :dl_final
+) else (
+echo Copying Required Files to Temp [%temp_%] [Successful]
+)
+
+::========================================================================================================================================
+
+:: Modify the Pfn value in gatherosstate with slc.dll as per the system, that way one gatherosstate can be used in all the editions
+
+pushd "%temp_%\"
+rundll32 "%temp_%\slc.dll",PatchGatherosstate %nul%
+popd
+if not exist "%temp_%\gatherosstatemodified.exe" (
+call :dk_color %Red% "Creating Modified Gatherosstate [Failed] Aborting..."
+call :dk_color %Magenta% "Most likely Antivirus blocked the process, disable it and/or create proper exclsuions"
+goto :dl_final
+) else (
+echo Creating Modified Gatherosstate [Successful]
+)
+
+::========================================================================================================================================
+
+:: Clean ClipSVC Licences
+:: This code runs only if Lockbox method to generate ticket is manually set by the user in this script.
+
+if %_lock%==1 (
+for %%# in (ClipSVC) do (
+sc query %%# | find /i "STOPPED" %nul% || net stop %%# /y %nul%
+sc query %%# | find /i "STOPPED" %nul% || sc stop %%# %nul%
+)
+
+rundll32 clipc.dll,ClipCleanUpState
+
+if exist "%ProgramData%\Microsoft\Windows\ClipSVC\*.dat" del /f /q "%ProgramData%\Microsoft\Windows\ClipSVC\*.dat" %nul%
+
+if exist "%ProgramData%\Microsoft\Windows\ClipSVC\tokens.dat" (
+call :dk_color %Red% "Cleaning ClipSVC Licences [Failed]"
+) else (
+echo Cleaning ClipSVC Licences [Successful]
+)
+)
+
+::========================================================================================================================================
+
+:: Below registry key (Volatile & Protected) gets created after the ClipSVC License cleanup command, and gets automatically deleted after
+:: system restart. It needs to be deleted to activate the system without restart.
+
+:: This code runs only if Lockbox method to generate ticket is manually set by the user in this script.
+
+set "RegKey=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState"
+
+if %_lock%==1 (
+call :regown "%RegKey%" %nul%
+reg delete "%RegKey%" /f %nul%
+
+reg query "%RegKey%" %nul% && (
+call :dk_color %Red% "Deleting a Volatile Registry [Failed]"
+call :dk_color %Magenta% "Restart the system, that will delete this registry key automatically"
+) || (
+echo Deleting a Volatile Registry [Successful]
+)
+)
+
+::========================================================================================================================================
+
+:: Multiple attempts to generate the ticket because in some cases, one attempt is not enough.
+
+echo:
+set "_noxml=if not exist "%temp_%\GenuineTicket.xml""
+
+start /wait "" "%temp_%/gatherosstatemodified.exe" %nul%
+%_noxml% timeout /t 3 %nul%
+%_noxml% net stop sppsvc /y %nul%
+%_noxml% call "%temp_%/gatherosstatemodified.exe" %nul%
+%_noxml% timeout /t 3 %nul%
+%_noxml% "%temp_%/gatherosstatemodified.exe" %nul%
+%_noxml% timeout /t 3 %nul%
+
+:: Refresh ClipSVC (required after cleanup) with below command, not related to generating tickets
+
+if %_lock%==1 (
+for %%# in (wlidsvc LicenseManager sppsvc) do (net stop %%# /y %nul% & net start %%# /y %nul%)
+call :dk_refresh
+)
+
+%_noxml% (
+call :dk_color %Red% "Generating GenuineTicket.xml [Failed] Aborting..."
+goto :dl_final
+)
+
+if %_lock%==1 (
+find /i "clientLockboxKey" "%temp_%\GenuineTicket.xml" >nul && (
+echo Generating GenuineTicket.xml [Successful] [clientLockboxKey Ticket]
+) || (
+call :dk_color %Red% "Generating GenuineTicket.xml [Failed] [downlevelGTkey Ticket created] Aborting..."
+call :dk_color %Magenta% "Try again / Restart system"
+goto :dl_final
+)
+) else (
+echo Generating GenuineTicket.xml [Successful]
+)
+
+::========================================================================================================================================
+
+:: Copy GenuineTicket.xml to the root of C drive and exit if ticket generation option was used in script
+
+if %_gent%==1 (
+echo:
+copy /y /b "%temp_%\GenuineTicket.xml" "%Systemdrive%\GenuineTicket.xml" %nul%
+if not exist "%Systemdrive%\GenuineTicket.xml" (
+call :dk_color %Red% "Copying GenuineTicket.xml to %Systemdrive%\ [Failed]"
+) else (
+call :dk_color %Green% "Copying GenuineTicket.xml to %Systemdrive%\ [Successful]"
+)
+goto :dl_final
+)
+
+::========================================================================================================================================
+
+:: clipup -v -o -altto <Ticket path> method to apply ticket is not used to avoid the certain issues in case if the username have
+:: spaces / special characters / non English names
+
+set "tdir=%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket"
+if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%
+copy /y /b "%temp_%\GenuineTicket.xml" "%tdir%\GenuineTicket.xml" %nul%
+
+if not exist "%tdir%\GenuineTicket.xml" (
+call :dk_color %Red% "Failed to copy Ticket to [%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket\]"
+goto :dl_final
+)
+
+set "_xmlexist=if exist "%tdir%\GenuineTicket.xml""
+
+net stop ClipSVC /y %nul%
+net start ClipSVC /y %nul%
+%_xmlexist% timeout /t 2 %nul%
+%_xmlexist% timeout /t 2 %nul%
+
+%_xmlexist% %_psc% Restart-Service ClipSVC %nul%
+%_xmlexist% timeout /t 2 %nul%
+%_xmlexist% timeout /t 2 %nul%
+
+set fallback_=
+%_xmlexist% (
+set fallback_=1
+%nul% clipup -v -o
+%_xmlexist% timeout /t 2 %nul%
+)
+
+%_xmlexist% (
+call :dk_color %Red% "Installing GenuineTicket.xml [Failed] Aborting..."
+if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%
+goto :dl_final
+) else (
+if defined fallback_ (call :dk_color %Red% "Installing GenuineTicket.xml [Successful] [Fallback method: clipup -v -o]"
+) else (echo Installing GenuineTicket.xml [Successful]
+)
+)
+
+::==========================================================================================================================================
+
+if defined changekey (
+set winos=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+)
+
+echo:
+echo Activating...
+echo:
+
+call :dk_act
+call :dk_checkperm
+if defined _perm (
+call :dk_color %Green% "%winos% is permanently activated."
+goto :dl_final
+)
+
+:: Refresh some services and license status
+
+if %_lock%==1 set _retry=1
+if defined _intcon set _retry=1
+
+if defined _retry (
+for %%# in (wlidsvc LicenseManager sppsvc) do (net stop %%# /y %nul% & net start %%# /y %nul%)
+call :dk_refresh
+call :dk_act
+cscript //nologo %windir%\system32\slmgr.vbs /ato %nul%
+)
+
+:: Check license status reason with wmi query, activation command errorlevel gives incorrect result in older builds of Windows 10
+
+set _status=0
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%wApp%' and PartialProductKey is not null) get LicenseStatusReason /VALUE" 2^>nul') do set "_status=%%a"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT LicenseStatusReason FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).LicenseStatusReason | %% {echo ('LicenseStatusReason='+$_)}" 2^>nul') do set "_status=%%a"
+cmd /c exit /b %_status%
+
+if %_status% NEQ 0 set "error_code=[Error Code: 0x!=ExitCode!]"
+
+call :dk_checkperm
+
+if defined _perm (
+call :dk_color %Green% "%winos% is permanently activated."
+) else (
+call :dk_color %Red% "Activation Failed %error_code%"
+call :dk_color %Magenta% "Try again / Restart system / Check troubleshooting steps in ReadMe"
+)
+
+::========================================================================================================================================
+
+:dl_final
+
+echo:
+if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul%
+if exist "%temp_%\" (
+call :dk_color %Red% "Cleaning Temp Files [Failed]"
+) else (
+echo Cleaning Temp Files [Successful]
+)
+
+:: Rolling back services startup type back to disabled
+
+set serv_rsts=
+set serv_rste=
+
+if defined serv_csts (
+for %%# in (%serv_csts%) do (
+sc config %%# start= disabled %nul% && (
+if defined serv_rsts (set "serv_rsts=!serv_rsts! %%#") else (set "serv_rsts=%%#")
+) || (
+if defined serv_rste (set "serv_cste=!serv_rste! %%#") else (set "serv_rste=%%#")
+)
+)
+)
+
+if defined serv_rsts echo Reverting Services Back To Disabled [Successful] [%serv_rsts%]
+if defined serv_rste call :dk_color %Red% "Reverting Services Back To Disabled [Failed] [%serv_rste%]"
+
+goto :dk_done
+
+::========================================================================================================================================
+
+:: A lean and mean snippet to set registry ownership and permission recursively
+:: Written by @AveYo aka @BAU
+:: pastebin.com/XTPt0JSC
+
+:: Modified by @abbodi1406 to make it work in ARM64 Windows 10 (builds older than 21277) where only x86 version of PowerShell is installed.
+
+:: This code runs only if Lockbox method is manually set by the user in this script.
+
+:regown
+
+%_psc% $A='%~1','%~2','%~3','%~4','%~5','%~6';iex(([io.file]::ReadAllText('!_batp!')-split':Own1\:.*')[1])&exit/b:Own1:
+$D1=[uri].module.gettype('System.Diagnostics.Process')."GetM`ethods"(42) |where {$_.Name -eq 'SetPrivilege'} #`:no-ev-warn
+'SeSecurityPrivilege','SeTakeOwnershipPrivilege','SeBackupPrivilege','SeRestorePrivilege'|foreach {$D1.Invoke($null, @("$_",2))}
+$path=$A[0]; $rk=$path-split'\\',2; switch -regex ($rk[0]){'[mM]'{$hv=2147483650};'[uU]'{$hv=2147483649};default{$hv=2147483648};}
+$HK=[Microsoft.Win32.RegistryKey]::OpenBaseKey($hv, 256); $s=$A[1]; $sps=[Security.Principal.SecurityIdentifier]
+$u=($A[2],'S-1-5-32-544')[!$A[2]];$o=($A[3],$u)[!$A[3]];$w=$u,$o |% {new-object $sps($_)}; $old=!$A[3];$own=!$old; $y=$s-eq'all'
+$rar=new-object Security.AccessControl.RegistryAccessRule( $w[0], ($A[5],'FullControl')[!$A[5]], 1, 0, ($A[4],'Allow')[!$A[4]] )
+$x=$s-eq'none';function Own1($k){$t=$HK.OpenSubKey($k,2,'TakeOwnership');if($t){0,4|%{try{$o=$t.GetAccessControl($_)}catch{$old=0}
+};if($old){$own=1;$w[1]=$o.GetOwner($sps)};$o.SetOwner($w[0]);$t.SetAccessControl($o); $c=$HK.OpenSubKey($k,2,'ChangePermissions')
+$p=$c.GetAccessControl(2);if($y){$p.SetAccessRuleProtection(1,1)};$p.ResetAccessRule($rar);if($x){$p.RemoveAccessRuleAll($rar)}
+$c.SetAccessControl($p);if($own){$o.SetOwner($w[1]);$t.SetAccessControl($o)};if($s){$($subkeys=$HK.OpenSubKey($k).GetSubKeyNames()) 2>$null;
+foreach($n in $subkeys){Own1 "$k\$n"}}}};Own1 $rk[1];if($env:VO){get-acl Registry::$path|fl} #:Own1: lean & mean snippet by AveYo
+
+::========================================================================================================================================
+
+:: Check Windows permanent activation status
+
+:dk_checkperm
+
+if %winbuild% LSS 22483 wmic path %slp% where (LicenseStatus='1' and GracePeriodRemaining='0' and PartialProductKey is not NULL) get Name /value 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm=
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT Name FROM %slp% WHERE LicenseStatus=1 AND GracePeriodRemaining=0 AND PartialProductKey IS NOT NULL').Get()).Name | %% {echo ('Name='+$_)}" 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm=
+exit /b
+
+:: Refresh license status
+
+:dk_refresh
+
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call RefreshLicenseStatus %nul%
+if %winbuild% GEQ 22483 %_psc% "$null=(([WMICLASS]'%sls%').GetInstances()).RefreshLicenseStatus()" %nul%
+exit /b
+
+:: Check Windows installed key channel
+
+:dk_channel
+
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%# in ('wmic path %slp% where "ApplicationID='%wApp%' and PartialProductKey<>null" Get ProductKeyChannel /value 2^>nul') do set "_channel=%%#"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%# in ('%_psc% "(([WMISEARCHER]'SELECT ProductKeyChannel FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).ProductKeyChannel | %% {echo ('ProductKeyChannel='+$_)}" 2^>nul') do set "_channel=%%#"
+exit /b
+
+:: Activation command
+
+:dk_act
+
+if %winbuild% LSS 22483 wmic path %slp% where "ApplicationID='%wApp%' and PartialProductKey<>null" call Activate %nul%
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).Activate()" %nul%
+exit /b
+
+::========================================================================================================================================
+
+:dk_color
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[0m
+) else (
+if not exist %_psc% (echo %~3) 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 (
+if not exist %_psc% (echo %~3%~6) 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
+call :dk_color %_Yellow% "Press any key to %_exitmsg%..."
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:: 1st column = Activation ID
+:: 2nd column = Generic Retail/OEM/MAK Key
+:: 3rd column = SKU ID
+:: 4th column = 1 = activation is not working (at the time of writing this), 0 = activation is working
+:: 5th column = Key Type
+:: 6th column = WMI Edition ID
+:: 7th column = Version name incase same Edition ID is used in different OS versions with different key
+:: Separator = _
+
+:: Key preference is in the following order. Retail > OEM:NONSLP > OEM:DM > Volume:MAK
+
+:hwiddata
+
+for %%# in (
+8b351c9c-f398-4515-9900-09df49427262_XGVPP-NMH47-7TTHJ-W3FW7-8HV2C___4_0_OEM:NONSLP_Enterprise
+23505d51-32d6-41f0-8ca7-e78ad0f16e71_D6RD9-D4N8T-RT9QX-YW6YT-FCWWJ__11_1_____Retail_Starter
+c83cef07-6b72-4bbc-a28f-a00386872839_3V6Q6-NQXCX-V8YXR-9QCYV-QPFCT__27_0_Volume:MAK_EnterpriseN
+211b80cc-7f64-482c-89e9-4ba21ff827ad_3NFXW-2T27M-2BDW6-4GHRV-68XRX__47_1_____Retail_StarterN
+4de7cb65-cdf1-4de9-8ae8-e3cce27b9f2c_VK7JG-NPHTM-C97JM-9MPGT-3V66T__48_0_____Retail_Professional
+9fbaf5d6-4d83-4422-870d-fdda6e5858aa_2B87N-8KFHP-DKV6R-Y2C8J-PKCKT__49_0_____Retail_ProfessionalN
+f742e4ff-909d-4fe9-aacb-3231d24a0c58_4CPRK-NM3K3-X6XXQ-RXX86-WXCHW__98_0_____Retail_CoreN
+1d1bac85-7365-4fea-949a-96978ec91ae0_N2434-X9D7W-8PF6X-8DV9T-8TYMD__99_0_____Retail_CoreCountrySpecific
+3ae2cc14-ab2d-41f4-972f-5e20142771dc_BT79Q-G7N6G-PGBYW-4YWX6-6F4BT_100_0_____Retail_CoreSingleLanguage
+2b1f36bb-c1cd-4306-bf5c-a0367c2d97d8_YTMG3-N6DKC-DKB77-7M9GH-8HVX7_101_0_____Retail_Core
+2a6137f3-75c0-4f26-8e3e-d83d802865a4_XKCNC-J26Q9-KFHD2-FKTHY-KD72Y_119_0_OEM:NONSLP_PPIPro
+e558417a-5123-4f6f-91e7-385c1c7ca9d4_YNMGQ-8RYV3-4PGQ3-C8XTP-7CFBY_121_0_____Retail_Education
+c5198a66-e435-4432-89cf-ec777c9d0352_84NGF-MHBT6-FXBX8-QWJK7-DRR8H_122_0_____Retail_EducationN
+cce9d2de-98ee-4ce2-8113-222620c64a27_KCNVH-YKWX8-GJJB9-H9FDT-6F7W2_125_1_Volume:MAK_EnterpriseS_2021
+d06934ee-5448-4fd1-964a-cd077618aa06_43TBQ-NH92J-XKTM7-KT3KK-P39PB_125_0_OEM:NONSLP_EnterpriseS_2019
+706e0cfd-23f4-43bb-a9af-1a492b9f1302_NK96Y-D9CD8-W44CQ-R8YTK-DYJWX_125_0_OEM:NONSLP_EnterpriseS_2016
+faa57748-75c8-40a2-b851-71ce92aa8b45_FWN7H-PF93Q-4GGP8-M8RF3-MDWWW_125_0_OEM:NONSLP_EnterpriseS_2015
+2c060131-0e43-4e01-adc1-cf5ad1100da8_RQFNW-9TPM3-JQ73T-QV4VQ-DV9PT_126_1_Volume:MAK_EnterpriseSN_2021
+e8f74caa-03fb-4839-8bcc-2e442b317e53_M33WV-NHY3C-R7FPM-BQGPT-239PG_126_1_Volume:MAK_EnterpriseSN_2019
+3d1022d8-969f-4222-b54b-327f5a5af4c9_2DBW3-N2PJG-MVHW3-G7TDK-9HKR4_126_0_Volume:MAK_EnterpriseSN_2016
+60c243e1-f90b-4a1b-ba89-387294948fb6_NTX6B-BRYC2-K6786-F6MVQ-M7V2X_126_0_Volume:MAK_EnterpriseSN_2015
+a48938aa-62fa-4966-9d44-9f04da3f72f2_G3KNM-CHG6T-R36X3-9QDG6-8M8K9_138_1_____Retail_ProfessionalSingleLanguage
+f7af7d09-40e4-419c-a49b-eae366689ebd_HNGCC-Y38KG-QVK8D-WMWRK-X86VK_139_1_____Retail_ProfessionalCountrySpecific
+eb6d346f-1c60-4643-b960-40ec31596c45_DXG7C-N36C4-C4HTG-X4T3X-2YV77_161_0_____Retail_ProfessionalWorkstation
+89e87510-ba92-45f6-8329-3afa905e3e83_WYPNQ-8C467-V2W6J-TX4WX-WT2RQ_162_0_____Retail_ProfessionalWorkstationN
+62f0c100-9c53-4e02-b886-a3528ddfe7f6_8PTT6-RNW4C-6V7J2-C2D3X-MHBPB_164_0_____Retail_ProfessionalEducation
+13a38698-4a49-4b9e-8e83-98fe51110953_GJTYN-HDMQY-FRR76-HVGC7-QPF8P_165_0_____Retail_ProfessionalEducationN
+1ca0bfa8-d96b-4815-a732-7756f30c29e2_FV469-WGNG4-YQP66-2B2HY-KD8YX_171_1_OEM:NONSLP_EnterpriseG
+8d6f6ffe-0c30-40ec-9db2-aad7b23bb6e3_FW7NV-4T673-HF4VX-9X4MM-B4H4T_172_1_OEM:NONSLP_EnterpriseGN
+df96023b-dcd9-4be2-afa0-c6c871159ebe_NJCF7-PW8QT-3324D-688JX-2YV66_175_0_____Retail_ServerRdsh
+d4ef7282-3d2c-4cf0-9976-8854e64a8d1e_V3WVW-N2PV2-CGWC3-34QGF-VMJ2C_178_0_____Retail_Cloud
+af5c9381-9240-417d-8d35-eb40cd03e484_NH9J3-68WK7-6FB93-4K3DF-DJ4F6_179_0_____Retail_CloudN
+c7051f63-3a76-4992-bce5-731ec0b1e825_2HN6V-HGTM8-6C97C-RK67V-JQPFD_183_1_____Retail_CloudE
+8ab9bdd1-1f67-4997-82d9-8878520837d9_XQQYW-NFFMW-XJPBH-K8732-CKFFD_188_0_____OEM:DM_IoTEnterprise
+ed655016-a9e8-4434-95d9-4345352c2552_QPM6N-7J2WJ-P88HH-P3YRH-YY74H_191_0_OEM:NONSLP_IoTEnterpriseS
+d4bdc678-0a4b-4a32-a5b3-aaa24c3b0f24_K9VKN-3BGWV-Y624W-MCRMQ-BHDCD_202_0_____Retail_CloudEditionN
+92fb8726-92a8-4ffc-94ce-f82e07444653_KY7PN-VR6RX-83W6Y-6DDYQ-T6R4W_203_0_____Retail_CloudEdition
+) do (
+for /f "tokens=1-7 delims=_" %%A in ("%%#") do if %osSKU%==%%C (
+
+if %1==attempt1 if not defined key echo "!applist!" | find /i "%%A" 1>nul && (set "key=%%B" & set "_chan=%%E" & if %%D==1 set notworking=1)
+
+if %1==attempt2 if not defined key (
+set "actidnotfound= [Mismatched Act-ID]"
+set 7th=%%G
+if not defined 7th (
+set "key=%%B" & set "_chan=%%E" & if %%D==1 set notworking=1
+) else (
+echo "%winos%" | find "%%G" 1>nul && (set "key=%%B" & set "_chan=%%E" & if %%D==1 set notworking=1)
+)
+)
+)
+)
+exit /b
+
::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/HWID-KMS38_Activation/KMS38_Activation.cmd b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/KMS38_Activation.cmd index 5e02c98..a47ae78 100644 --- a/MAS/Separate-Files-Version/HWID-KMS38_Activation/KMS38_Activation.cmd +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/KMS38_Activation.cmd @@ -1,1425 +1,1074 @@ -@setlocal DisableDelayedExpansion -@echo off - - - -::============================================================================ -:: -:: This script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::============================================================================ - - - -:: To activate, run the script with /a parameter or change 0 to 1 in below line -set _acti=0 - -:: To activate along with KMS38 protection (from being replaced by 180 days KMS activation), -:: run the script with /ap parameter or change 0 to 1 in below line -set _prot=0 - -:: To only generate GenuineTicket.xml, run the script with /g parameter or change 0 to 1 in below line -set _gent=0 - -:: To remove KMS38 protection, run the script with /x parameter or change 0 to 1 in below line -set _unin=0 - - - -:: If value is changed in ABOVE lines or any ABOVE parameter is used then script will run in unattended mode -:: Incase if more than one options are used then only one option will be applied - - -:: To disable changing edition if current edition doesn't support HWID activation, change the value to 0 from 1 or run the script with /c parameter -set _chan=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 - -set "_cmdf=%~f0" -for %%# in (%*) do ( -if /i "%%#"=="r1" set r1=1 -if /i "%%#"=="r2" set r2=1 -) - -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 Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -::======================================================================================================================================== - -cls -color 07 -title KMS38 Activation - -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"=="/a" set _acti=1 -if /i "%%A"=="/ap" set _prot=1 -if /i "%%A"=="/g" set _gent=1 -if /i "%%A"=="/x" set _unin=1 -if /i "%%A"=="/c" set _chan=0 -if /i "%%A"=="-el" set _elev=1 -) -) - -for %%A in (%_acti% %_prot% %_gent% %_unin%) do (if "%%A"=="1" set _unattended=1) - -::======================================================================================================================================== - -set winbuild=1 -set "nul=>nul 2>&1" -set psc=powershell.exe -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 2>nul | find /i "0x0" 1>nul && (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 "Magenta="45;97m"" -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 "Magenta="Darkmagenta" "white"" -set "_White="Black" "Gray"" -set "_Green="Black" "Green"" -set "_Yellow="Black" "Yellow"" -) - -set _k38= -set "nceline=echo: &echo ==== ERROR ==== &echo:" -set "eline=echo: &call :dk_color %Red% "==== ERROR ====" &echo:" -if %~z0 GEQ 500000 (set "_exitmsg=Go back") else (set "_exitmsg=Exit") -set "specific_kms=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f" - -::======================================================================================================================================== - -if %winbuild% LSS 14393 ( -%eline% -echo Unsupported OS version detected. -echo Project is supported for Windows 10/11/Server, build 14393 and later. -goto dk_done -) - -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find powershell.exe in the system. -goto dk_done -) - -::======================================================================================================================================== - -:: Fix for the special characters limitation 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 "_ttemp=%temp%" - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -echo "!_batf!" | find /i "!_ttemp!" 1>nul && ( -if /i not "!_work!"=="!_ttemp!" ( -%eline% -echo Script is launched from the temp folder, -echo Most likely you are 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 -) -) - -::======================================================================================================================================== - -:: Elevate script as admin and pass arguments and preventing loop - -%nul% reg query HKU\S-1-5-19 || ( -if not defined _elev %nul% %psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b -%eline% -echo This script require administrator privileges. -echo To do so, right click on this script and select 'Run as administrator'. -goto dk_done -) - -::======================================================================================================================================== - -if %_unin%==1 goto :k_uninstall - -:k_menu - -if %_unattended%==0 ( -cls -mode 76, 25 -title KMS38 Activation - -echo: -echo: -echo: -echo ____________________________________________________________ -echo: -echo [1] KMS38 Activation -echo: -echo [2] KMS38 Activation ^+ Protection -echo ____________________________________________ -echo: -echo [3] Remove Protection -echo: -echo [4] %_exitmsg% -echo ____________________________________________________________ -echo: -call :dk_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard [1,2,3,4]" -choice /C:1234 /N -set _el=!errorlevel! -if !_el!==4 exit /b -if !_el!==3 goto :k_uninstall -if !_el!==2 ( -cls -echo: -call :dk_color2 %_White% " " %_Green% "KMS38 Protection:" -echo: -echo It stops 180 days KMS Activation from replacing KMS38 activation. -echo Protection requires permission altering of a registry key. -echo: -echo If you are going to use KMS_VL_ALL or MAS's KMS activation for Office, -echo then you don't need to enable this protection. -echo For more info, check readme. -echo: -echo: -choice /C:12 /N /M "> [1] Continue [2] Go back : " -if errorlevel 2 goto :k_menu -if errorlevel 1 (set _prot=1&goto :k_menu2) -) -if !_el!==1 (set _prot=0&goto :k_menu2) -goto :k_menu -) - -:k_menu2 - -cls -mode 102, 34 -if %_gent%==1 (set _title=title Generate KMS38 GenuineTicket.xml) else (set _title=title KMS38 Activation) -%_title% - -::======================================================================================================================================== - -if %_gent%==1 if exist %Systemdrive%\GenuineTicket.xml ( -set _gent=0 -%eline% -echo File '%Systemdrive%\GenuineTicket.xml' already exist. -if %_unattended%==0 ( -echo: -call :dk_color %_Yellow% "Press any key to go back..." -pause >nul -goto k_menu -) else ( -goto dk_done -) -) - -::======================================================================================================================================== - -call :dk_initial - -:: Check if system is permanently activated or not - -cls -call :dk_product -call :dk_checkperm -if defined _perm if not %_gent%==1 ( -echo ___________________________________________________________________________________________ -echo: -call :dk_color2 %_White% " " %Green% "Checking: %winos% is Permanently Activated." -call :dk_color2 %_White% " " %Gray% "Activation is not required." -echo ___________________________________________________________________________________________ -if %_unattended%==1 goto dk_done -echo: -choice /C:12 /N /M "> [1] Activate [2] %_exitmsg% : " -if errorlevel 2 exit /b -) -cls - -::======================================================================================================================================== - -:: Check Evaluation version - -set _eval= -set _evalserv= - -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1 -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set _evalserv=1 -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1 & set _evalserv=1 - -if defined _eval ( -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionID 2>nul | find /i "Eval" 1>nul && ( -%eline% -echo [%winos% ^| %winbuild%] -if defined _evalserv ( -echo Server Evaluation cannot be activated. Convert it to full Server OS. -echo: -echo Check 'Change Edition Option' in Extras section in MAS. -) else ( -echo Evaluation Editions cannot be activated. Download ^& Install full version of Windows OS. -echo: -echo https://massgrave.dev/ -) -goto dk_done -) -) - -::======================================================================================================================================== - -:: Check SKU value / Check in multiple places to find Edition change corruption - -set osSKU= -set regSKU= -set wmiSKU= - -for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "regSKU=%%a" -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic Path Win32_OperatingSystem Get OperatingSystemSKU /format:LIST" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" -if %_wmic% EQU 0 for /f "tokens=1" %%a in ('%psc% "([WMI]'Win32_OperatingSystem=@').OperatingSystemSKU" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" - -set osSKU=%wmiSKU% -if not defined osSKU set osSKU=%regSKU% - -if not defined osSKU ( -%eline% -echo SKU value was not detected properly. Aborting... -goto dk_done -) - -::======================================================================================================================================== - -:: Check if GVLK (KMS key) is already installed or not - -set _gvlk= -call :dk_channel -if /i "Volume:GVLK"=="%_channel%" set _gvlk=1 - -::======================================================================================================================================== - -:: Detect Key - -set key= -set pkey= -set altkey= -set changekey= -set curedition= -set altedition= - -if defined applist call :kms38data getkey - -if not defined key call :dk_gvlk %nul% - -if defined applist if not defined key call :kms38fallback -if defined altkey (set key=%altkey%&set changekey=1) - -::======================================================================================================================================== - -if not defined key if not defined _gvlk ( -%eline% -%psc% $ExecutionContext.SessionState.LanguageMode 2>nul | find /i "Full" 1>nul || ( -echo PowerShell is not responding properly. Aborting... -goto dk_done -) -if not defined applist ( -echo Failed to get Key due to error in getting Activation IDs. -echo: -echo This error can appear when below services are not properly responding or system have other issues. -echo Windows Management Instrumentation [WinMgmt], Software Protection Platform [sppsvc] -echo: -call :dk_color2 %Red% "Error Found In:" %_White% " %e_wmispp%" -echo: -echo Check troubleshooting steps in MAS Extras option. -goto dk_done -) -echo [%winos% ^| %winbuild% ^| SKU:%osSKU%] -echo Unable to find this product in the supported product list. -echo Make sure you are using updated version of the script. -echo: -if not "%regSKU%"=="%wmiSKU%" ( -echo Difference Found In SKU Value- WMI:%wmiSKU% Reg:%regSKU% -echo Restart the system and try again. -goto dk_done -) -goto dk_done -) - -::======================================================================================================================================== - -:: Check files - -if not exist "!_work!\BIN\gatherosstate.exe" ( -%eline% -echo 'gatherosstate.exe' file is missing in 'BIN' folder. Aborting... -goto dk_done -) - -:: Verify gatherosstate.exe file - -set _hash= -for /f "skip=1 tokens=* delims=" %%# in ('certutil -hashfile "!_work!\BIN\gatherosstate.exe" SHA1^|findstr /i /v CertUtil') do set "_hash=%%#" -set "_hash=%_hash: =%" - -if /i not "%_hash%"=="FABB5A0FC1E6A372219711152291339AF36ED0B5" ( -if /i not "%_hash%"=="3FCCB9C359EDB9527C9F5688683F8B3C5910E75D" ( -%eline% -echo gatherosstate.exe SHA1 hash mismatch found. -echo: -echo Detected: %_hash% -goto dk_done -) -) - -::======================================================================================================================================== - -:: Check clipup.exe for the detection and activation of server cor and acor editions - -set a_cor= -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*CorEdition~*.mum" if not exist "%systemroot%\System32\clipup.exe" set a_cor=1 - -if defined a_cor ( -if not exist "!_work!\BIN\clipup.exe" ( -%eline% -echo 'ClipUp.exe' file is not found in 'BIN' folder. -goto dk_done -) -) - -::======================================================================================================================================== - -set error= -set activ= - -cls -echo: -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b -echo Checking OS Info [%winos% ^| %winbuild% ^| %arch%] - -::======================================================================================================================================== - -set "_serv=ClipSVC sppsvc Winmgmt" - -:: Client License Service (ClipSVC) -:: Software Protection -:: Windows Management Instrumentation - -:: Check disabled services - -set serv_ste= -for %%# in (%_serv%) do ( -set serv_dis= -reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start %nul% || set serv_dis=1 -for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start 2^>nul') do if /i %%b equ 0x4 set serv_dis=1 -if defined serv_dis (if defined serv_ste (set "serv_ste=!serv_ste! %%#") else (set "serv_ste=%%#")) -) - -:: Change disabled services startup type to default - -set serv_csts= -set serv_cste= - -if defined serv_ste ( -for %%# in (%serv_ste%) do ( -if /i %%#==ClipSVC sc config %%# start= demand %nul% -if /i %%#==sppsvc sc config %%# start= delayed-auto %nul% -if /i %%#==Winmgmt sc config %%# start= auto %nul% -if !errorlevel!==0 ( -if defined serv_csts (set "serv_csts=!serv_csts! %%#") else (set "serv_csts=%%#") -) else ( -set error=1 -if defined serv_cste (set "serv_cste=!serv_cste! %%#") else (set "serv_cste=%%#") -) -) -) - -if defined serv_csts echo Enabling Disabled Services [Successful] [%serv_csts%] -if defined serv_cste call :dk_color %Red% "Enabling Disabled Services [Failed] [%serv_cste%]" - -if not "%regSKU%"=="%wmiSKU%" ( -set error=1 -call :dk_color %Red% "Checking WMI/REG SKU [Difference Found - WMI:%wmiSKU% Reg:%regSKU%] [Restart System]" -) - -::======================================================================================================================================== - -:: Install key - -echo: -if defined changekey ( -call :dk_color %Magenta% "[%altedition%] Edition product key will be used to enable KMS38 activation." -echo: -) - -set _partial= -if not defined key ( -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null" Get PartialProductKey /value 2^>nul') do set "_partial=%%#" -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT PartialProductKey FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL').Get()).PartialProductKey | %% {echo ('PartialProductKey='+$_)}" 2^>nul') do set "_partial=%%#" -call echo Checking Installed Product Key [Partial Key - %%_partial%%] [Volume:GVLK] -) - -set error_code= -if defined key ( -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call InstallProductKey ProductKey="%key%" %nul% -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT Version FROM SoftwareLicensingService').Get()).InstallProductKey('%key%')" %nul% -if not !errorlevel!==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul% -set error_code=!errorlevel! -cmd /c exit /b !error_code! -if !error_code! NEQ 0 set "error_code=[0x!=ExitCode!]" - -if !error_code! EQU 0 ( -call :dk_refresh -echo Installing KMS Client Setup Key [%key%] [Successful] -) else ( -call :dk_color %Red% "Installing KMS Client Setup Key [%key%] [Failed] !error_code!" -) -) - -::======================================================================================================================================== - -:: Check activation ID for setting specific KMS host - -set app= -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic path SoftwareLicensingProduct where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get ID /VALUE" 2^>nul') do call set "app=%%a" -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL').Get()).ID | %% {echo ('ID='+$_)}" 2^>nul') do call set "app=%%a" - -if not defined app ( -call :dk_color %Red% "Checking Activation ID [Failed]" -) - -::======================================================================================================================================== - -:: Set specific KMS host to Local Host -:: By doing this, global KMS IP can not replace KMS38 activation but can be used with Office and other Windows Editions - -set regadd= -set k_error= - -if not %_gent%==1 if defined app ( -echo: -set regadd=1 -%nul% reg delete "HKLM\%specific_kms%" /f -%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f - -%nul% reg query "HKLM\%specific_kms%" && ( -call :regown "HKLM\%specific_kms%" -%nul% reg delete "HKLM\%specific_kms%" /f -) - -%nul% reg add "HKLM\%specific_kms%\%app%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" || set k_error=1 -%nul% reg add "HKLM\%specific_kms%\%app%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" || set k_error=1 - -if not defined k_error ( -echo Adding Specific KMS Host [LocalHost 127.0.0.2] [Successful] -) else ( -call :dk_color %Red% "Adding Specific KMS Host [LocalHost 127.0.0.2] [Failed]" -) -) - -if not %_gent%==1 if not defined app ( -call :dk_color %Red% "Adding Specific KMS Host [Skipped] [Activation ID Not Found]" -) - -::======================================================================================================================================== - -:: Files are copied to temp to generate ticket to avoid possible issues in case the path contains special character or non English names - -echo: -set "temp_=%SystemRoot%\Temp\_Temp" -set "_clipup=%systemroot%\System32\clipup.exe" -if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul% -md "%temp_%\" %nul% - -pushd "!_work!\BIN\" -copy /y /b "gatherosstate.exe" "%temp_%\gatherosstate.exe" %nul% -if defined a_cor copy /y /b "ClipUp.exe" "%_clipup%" %nul% -popd - -if not exist "%temp_%\gatherosstate.exe" ( -call :dk_color %Red% "Copying Required Files to Temp [%temp_%] [Failed]" -goto :k_final -) else ( -echo Copying Required Files to Temp [%temp_%] [Successful] -) - -if defined a_cor ( -if exist "%_clipup%" ( -echo Copying clipup.exe File to [%systemroot%\System32\] [Successful] -) else ( -call :dk_color %Red% "Copying clipup.exe File to [%systemroot%\System32\] [Failed] Aborting..." -goto :k_final -) -) - -::======================================================================================================================================== - -if /i "%_hash%"=="3FCCB9C359EDB9527C9F5688683F8B3C5910E75D" ( -echo Checking gatherosstate.exe [Already Modified] -%nul% ren "%temp_%\gatherosstate.exe" "gatherosstatemodified.exe" -goto :kskipmod -) - -:: Modify gatherosstate.exe - -pushd "%temp_%\" -%nul% %psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':hex\:.*';iex ($f[1]);" -popd - -if not exist "%temp_%\gatherosstatemodified.exe" ( -call :dk_color %Red% "Creating Modified Gatherosstate [Failed] Aborting..." -goto :k_final -) - -set _hash= -for /f "skip=1 tokens=* delims=" %%# in ('certutil -hashfile "%temp_%\gatherosstatemodified.exe" SHA1^|findstr /i /v CertUtil') do set "_hash=%%#" -set "_hash=%_hash: =%" - -if /i not "%_hash%"=="3FCCB9C359EDB9527C9F5688683F8B3C5910E75D" ( -call :dk_color %Red% "Creating Modified Gatherosstate [Failed] [Hash Not Matched] Aborting..." -goto :k_final -) else ( -echo Creating Modified Gatherosstate [Successful] -) - -:kskipmod - -::======================================================================================================================================== - -:: Multiple attempts to generate the ticket because in some cases, one attempt is not enough. - -set "_noxml=if not exist "%temp_%\GenuineTicket.xml"" - -"%temp_%/gatherosstatemodified.exe" GVLKExp=2038-01-19T03:14:07Z;DownlevelGenuineState=1 -%_noxml% timeout /t 3 %nul% -%_noxml% net stop sppsvc /y %nul% -%_noxml% call "%temp_%/gatherosstatemodified.exe" GVLKExp=2038-01-19T03:14:07Z;DownlevelGenuineState=1 -%_noxml% timeout /t 3 %nul% - -%_noxml% ( -call :dk_color %Red% "Generating GenuineTicket.xml [Failed] Aborting..." -goto :k_final -) else ( -echo Generating GenuineTicket.xml [Successful] -) - -::======================================================================================================================================== - -:: Copy GenuineTicket.xml to the root of C drive and exit if ticket generation option was used in script - -if %_gent%==1 ( -echo: -copy /y /b "%temp_%\GenuineTicket.xml" "%Systemdrive%\GenuineTicket.xml" %nul% -if not exist "%Systemdrive%\GenuineTicket.xml" ( -call :dk_color %Red% "Copying GenuineTicket.xml to %Systemdrive%\ [Failed]" -) else ( -call :dk_color %Green% "Copying GenuineTicket.xml to %Systemdrive%\ [Successful]" -) -goto :k_final -) - -::======================================================================================================================================== - -:: clipup -v -o -altto <path> & clipup -v -o both methods may fail if the username have spaces/special characters/non English names -:: Most correct way to apply a ticket is by restarting ClipSVC service but we can not check the log details in this way -:: To get the log details and also to correctly apply ticket, script will install tickets two times (service restart + clipup -v -o -altto <path>) - -set "tdir=%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket" -if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul% -if not exist "%tdir%\" md "%tdir%\" %nul% -copy /y /b "%temp_%\GenuineTicket.xml" "%tdir%\GenuineTicket.xml" %nul% - -if not exist "%tdir%\GenuineTicket.xml" ( -call :dk_color %Red% "Copying Ticket to ClipSVC Location [Failed]" -) - -set "_xmlexist=if exist "%tdir%\GenuineTicket.xml"" - -net stop sppsvc /y %nul% || net stop sppsvc /y %nul% -sc stop sppsvc %nul% - -clipup -v -o -altto %temp_%\ - -%_xmlexist% ( -net stop ClipSVC /y %nul% -net start ClipSVC /y %nul% -%_xmlexist% timeout /t 2 %nul% -%_xmlexist% timeout /t 2 %nul% - -%_xmlexist% ( -if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul% -call :dk_color %Red% "Installing GenuineTicket.xml [Failed With ClipSVC Service Restart Method]" -) -) - -::========================================================================================================================================== - -call :dk_product - -echo: -echo Activating... -echo: - -call :k_checkexp -if defined _k38 ( -set activ=1 -call :k_actinfo -goto :k_final -) - -:: Clear 180 Days KMS Activation lock with Windows SKU specific rearm and without the need to restart the system - -if %_wmic% EQU 1 wmic path SoftwareLicensingProduct where ID='%app%' call ReArmsku %nul% -if %_wmic% EQU 0 %psc% "$null=([WMI]'SoftwareLicensingProduct=''%app%''').ReArmsku()" %nul% - -if %errorlevel%==0 ( -echo Applying SKU-ID Rearm [Successful] -) else ( -call :dk_color %Red% "Applying SKU-ID Rearm [Failed]" -) - -echo: -call :k_checkexp -if defined _k38 ( -set activ=1 -call :k_actinfo -goto :k_final -) - -:: Restart software protection service to refresh itself and run refresh license status and activation commands - -net stop sppsvc /y %nul% -net start sppsvc /y %nul% -call :dk_refresh -call :dk_act - -call :k_checkexp -if defined _k38 ( -set activ=1 -call :k_actinfo -goto :k_final -) - -call :dk_color %Red% "Activation Failed" -call :dk_color %Magenta% "Restart the system and try again / Check troubleshooting steps in MAS Extras option" - -::======================================================================================================================================== - -:k_final - -:: Remove the added Specific KMS Host (Local Host) if activation is not completed - -echo: -set k_error= -if defined regadd if not defined _k38 ( -%nul% reg delete "HKLM\%specific_kms%" /f -%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f -%nul% reg query "HKLM\%specific_kms%" && set k_error=1 -%nul% reg query "HKU\S-1-5-20\%specific_kms%" && set k_error=1 -if not defined k_error ( -echo Removing The Added Specific KMS Host [Successful] -) else ( -call :dk_color %Red% "Removing The Added Specific KMS Host [Failed]" -) -) - -:: Protect KMS38 if opted by the user and conditions are correct - -if defined regadd if defined _k38 if %_prot%==1 ( -%nul% call :regown "HKLM\%specific_kms%" "" S-1-5-32-544 "" Deny "SetValue,Delete" -%nul% reg delete "HKLM\%specific_kms%" /f -%nul% reg query "HKLM\%specific_kms%" && ( -call :dk_color %Gray% "Locking a Registry To Protect KMS38 [Successful]" -) || ( -call :dk_color %Red% "Locking a Registry To Protect KMS38 [Failed]" -) -) - -:: clipup.exe does not exist in server cor and acor editions by default, it was copied there with this script - -if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul% -if defined a_cor if exist "%_clipup%" del /f /q "%_clipup%" %nul% - -if exist "%temp_%\" ( -call :dk_color %Red% "Cleaning Temp Files [Failed]" -) else ( -echo Cleaning Temp Files [Successful] -) - -if defined a_cor ( -if exist "%_clipup%" ( -call :dk_color %Red% "Deleting copied clipup.exe file [Failed]" -) else ( -echo Deleting copied clipup.exe file [Successful] -) -) - -if %osSKU%==175 ( -call :dk_color %Red% "ServerRdsh Editon does not officially support activation on non-azure platforms." -) - -if not defined activ call :dk_checkerrors - -if not defined activ if not defined error ( -echo Basic Diagnostic Tests [Error Not Found] -) - -goto :dk_done - -::======================================================================================================================================== - -:k_uninstall - -cls -mode 99, 28 -title Remove KMS38 Protection -set "RegKey=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState" -set "_ident=HKU\S-1-5-19\SOFTWARE\Microsoft\IdentityCRL" - -echo: -call :dk_ckeckwmic -call :k_checkexp - -:: It's better to not clean ClipSVC hence its skipped - -REM if defined _k38 ( -REM for %%# in (ClipSVC) do ( -REM sc query %%# | find /i "STOPPED" %nul% || net stop %%# /y %nul% -REM sc query %%# | find /i "STOPPED" %nul% || sc stop %%# %nul% -REM ) - -REM REM Thanks to @mspaintmsi for informing this command info - -REM rundll32 clipc.dll,ClipCleanUpState - -REM if exist "%ProgramData%\Microsoft\Windows\ClipSVC\tokens.dat" ( -REM call :dk_color %Red% "Cleaning ClipSVC Licences [Failed]" -REM ) else ( -REM echo Cleaning ClipSVC Licences [Successful] -REM ) - -REM REM Below registry key (Volatile & Protected) gets created after the ClipSVC License cleanup command, and gets automatically deleted after -REM REM system restart. It needs to be deleted to activate the system without restart. - -REM call :regown "%RegKey%" %nul% -REM reg delete "%RegKey%" /f %nul% - -REM reg query "%RegKey%" %nul% && ( -REM call :dk_color %Red% "Deleting a Volatile Registry [Failed]" -REM call :dk_color %Magenta% "Restart the system, that will delete this registry key automatically" -REM ) || ( -REM echo Deleting a Volatile Registry [Successful] -REM ) - -REM REM Clear HWID token related registry to fix activation incase if there is any corruption - -REM reg delete "%_ident%" /f %nul% -REM reg query "%_ident%" %nul% && ( -REM call :dk_color %Red% "Deleting a Registry [Failed] [%_ident%]" -REM ) || ( -REM echo Deleting a Registry [Successful] [%_ident%] -REM ) - -REM for %%# in (ClipSVC wlidsvc LicenseManager sppsvc) do (net stop %%# /y %nul% & net start %%# /y %nul%) -REM call :dk_refresh -REM ) - -set exist_= -%nul% reg query "HKLM\%specific_kms%" && ( -set exist_=1 -%nul% reg delete "HKLM\%specific_kms%" /f -) -%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f - -%nul% reg query "HKLM\%specific_kms%" && ( -%nul% call :regown "HKLM\%specific_kms%" -%nul% reg delete "HKLM\%specific_kms%" /f -) - -%nul% reg query "HKLM\%specific_kms%" && ( -call :dk_color %Red% "Removing Specific KMS Host [Failed]" -) || ( -if defined exist_ ( -echo Removing Specific KMS Host [Successful] -) else ( -echo Removing Specific KMS Host [Already Removed] -) -) - -goto :dk_done - -::======================================================================================================================================== - -:: A lean and mean snippet to set registry ownership and permission recursively -:: Written by @AveYo aka @BAU -:: pastebin.com/XTPt0JSC - -:: Modified by @abbodi1406 to make it work in ARM64 Windows 10 (builds older than 21277) where only x86 version of Powershell is installed. - -:: This code runs only if KMS38 protection option or complete uninstall option is used by the user in this script. - -:regown - -pushd "!_work!" -setlocal DisableDelayedExpansion - -set "0=%~nx0"&%psc% $A='%~1','%~2','%~3','%~4','%~5','%~6';iex(([io.file]::ReadAllText($env:0)-split':Own1\:.*')[1])&popd&setlocal EnableDelayedExpansion&exit/b:Own1: -$D1=[uri].module.gettype('System.Diagnostics.Process')."GetM`ethods"(42) |where {$_.Name -eq 'SetPrivilege'} #`:no-ev-warn -'SeSecurityPrivilege','SeTakeOwnershipPrivilege','SeBackupPrivilege','SeRestorePrivilege'|foreach {$D1.Invoke($null, @("$_",2))} -$path=$A[0]; $rk=$path-split'\\',2; switch -regex ($rk[0]){'[mM]'{$hv=2147483650};'[uU]'{$hv=2147483649};default{$hv=2147483648};} -$HK=[Microsoft.Win32.RegistryKey]::OpenBaseKey($hv, 256); $s=$A[1]; $sps=[Security.Principal.SecurityIdentifier] -$u=($A[2],'S-1-5-32-544')[!$A[2]];$o=($A[3],$u)[!$A[3]];$w=$u,$o |% {new-object $sps($_)}; $old=!$A[3];$own=!$old; $y=$s-eq'all' -$rar=new-object Security.AccessControl.RegistryAccessRule( $w[0], ($A[5],'FullControl')[!$A[5]], 1, 0, ($A[4],'Allow')[!$A[4]] ) -$x=$s-eq'none';function Own1($k){$t=$HK.OpenSubKey($k,2,'TakeOwnership');if($t){0,4|%{try{$o=$t.GetAccessControl($_)}catch{$old=0} -};if($old){$own=1;$w[1]=$o.GetOwner($sps)};$o.SetOwner($w[0]);$t.SetAccessControl($o); $c=$HK.OpenSubKey($k,2,'ChangePermissions') -$p=$c.GetAccessControl(2);if($y){$p.SetAccessRuleProtection(1,1)};$p.ResetAccessRule($rar);if($x){$p.RemoveAccessRuleAll($rar)} -$c.SetAccessControl($p);if($own){$o.SetOwner($w[1]);$t.SetAccessControl($o)};if($s){$($subkeys=$HK.OpenSubKey($k).GetSubKeyNames()) 2>$null; -foreach($n in $subkeys){Own1 "$k\$n"}}}};Own1 $rk[1];if($env:VO){get-acl Registry::$path|fl} #:Own1: lean & mean snippet by AveYo - -::======================================================================================================================================== - -:: Check KMS activation status - -:k_actinfo - -set xpr= -for /f "tokens=* delims=" %%# in ('%psc% "$([DateTime]::Now.addMinutes(%gpr%)).ToString('yyyy-MM-dd HH:mm:ss')" 2^>nul') do set "xpr=%%#" -call :dk_color %Green% "%winos% is activated till !xpr!" -exit /b - -:: Check remaining KMS activation grace period - -:k_checkexp - -set gpr=0 -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('"wmic path SoftwareLicensingProduct where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get GracePeriodRemaining /VALUE" 2^>nul') do set "gpr=%%#" -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT GracePeriodRemaining FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL').Get()).GracePeriodRemaining | %% {echo ('GracePeriodRemaining='+$_)}" 2^>nul') do set "gpr=%%#" -if %gpr% GTR 259200 (set _k38=1) else (set _k38=) -exit /b - -:: Get Windows permanent activation status - -:dk_checkperm - -if %_wmic% EQU 1 wmic path SoftwareLicensingProduct where (LicenseStatus='1' and GracePeriodRemaining='0' and PartialProductKey is not NULL) get Name /value 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm= -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT Name FROM SoftwareLicensingProduct WHERE LicenseStatus=1 AND GracePeriodRemaining=0 AND PartialProductKey IS NOT NULL').Get()).Name | %% {echo ('Name='+$_)}" 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm= -exit /b - -:: Refresh license status - -:dk_refresh - -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call RefreshLicenseStatus %nul% -if %_wmic% EQU 0 %psc% "$null=(([WMICLASS]'SoftwareLicensingService').GetInstances()).RefreshLicenseStatus()" %nul% -exit /b - -:: Get Windows installed key channel - -:dk_channel - -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null" Get ProductKeyChannel /value 2^>nul') do set "_channel=%%#" -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT ProductKeyChannel FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL').Get()).ProductKeyChannel | %% {echo ('ProductKeyChannel='+$_)}" 2^>nul') do set "_channel=%%#" -exit /b - -:: Activation command - -:dk_act - -if %_wmic% EQU 1 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null" call Activate %nul% -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT ID FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL').Get()).Activate()" %nul% -exit /b - -:: Get Windows Activation IDs - -:dk_actids - -set applist= -if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path SoftwareLicensingProduct where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f') get ID /VALUE" 2^>nul')" -if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')" -%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a")) -exit /b - -:: Get Product name (WMI/REG methods are not reliable in all conditions, hence winbrand.dll method is used) - -:dk_product - -set winos= -set d1=[DllImport(\"winbrand\",CharSet=CharSet.Unicode)]public static extern string BrandingFormatString(string s); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $AP::BrandingFormatString('%%WINDOWS_LONG%%') -for /f "delims=" %%s in ('"%psc% %d2%"') do if not errorlevel 1 (set winos=%%s) -echo "%winos%" | find /i "Windows" 1>nul || ( -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b" -if %winbuild% GEQ 22000 ( -set winos=!winos:Windows 10=Windows 11! -) -) -exit /b - -:: Check wmic.exe - -:dk_ckeckwmic - -set _wmic=0 -for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" ( -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul && set _wmic=1 -) -exit /b - -:dk_initial - -echo: -echo Initializing... - -:: Check and enable WinMgmt, sppsvc services if required - -for %%# in (WinMgmt sppsvc) do ( -for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start 2^>nul') do if /i %%b NEQ 0x2 ( -echo: -echo Enabling %%# service... -if /i %%#==sppsvc sc config %%# start= delayed-auto %nul% || echo Failed -if /i %%#==WinMgmt sc config %%# start= auto %nul% || echo Failed -) -sc start %%# %nul% -if !errorlevel! NEQ 1056 if !errorlevel! NEQ 0 ( -echo: -echo Starting %%# service... -sc start %%# -echo: -call :dk_color %Red% "Failed to start [%%#] service, rest of the process may take a long time..." -) -) - -:: Check WMI and SPP Errors - -call :dk_ckeckwmic - -set e_wmi= -set e_wmispp= -call :dk_actids - -if not defined applist ( -net stop sppsvc /y %nul% -cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -if !errorlevel! NEQ 0 cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -call :dk_refresh - -if %_wmic% EQU 1 wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul -if %_wmic% EQU 0 %psc% "Get-CIMInstance -Class Win32_ComputerSystem | Select-Object -Property CreationClassName" 2>nul | find /i "computersystem" 1>nul -if !errorlevel! NEQ 0 set e_wmi=1 - -if defined e_wmi (set e_wmispp=WMI, SPP) else (set e_wmispp=SPP) -call :dk_actids -) -exit /b - -::======================================================================================================================================== - -:: Get Product Key from pkeyhelper.dll for future new editions -:: It works on Windows 10 1803 (17134) and later builds. - -:dk_pkey - -set pkey= -set d1=[DllImport(\"pkeyhelper.dll\",CharSet=CharSet.Unicode)]public static extern int SkuGetProductKeyForEdition(int e, string c, out string k, out string p); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k=''; $null=$AP::SkuGetProductKeyForEdition(%1, %2, [ref]$k, [ref]$null); $k -for /f %%a in ('%psc% "%d2%"') do if not errorlevel 1 (set pkey=%%a) -exit /b - -:: Get channel name for the key which was extracted from pkeyhelper.dll - -:dk_pkeychannel - -set k=%1 -set pkeychannel= -set p=%SystemRoot%\System32\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms -set m=[System.Runtime.InteropServices.Marshal] -set d1=[DllImport(\"PidGenX.dll\",CharSet=CharSet.Unicode)]public static extern int PidGenX(string k,string p,string m,int u,IntPtr i,IntPtr d,IntPtr f); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k='%k%'; $p='%p%'; $r=[byte[]]::new(0x04F8); $r[0]=0xF8; $r[1]=0x04; $f=%m%::AllocHGlobal(1272); %m%::Copy($r,0,$f,1272); -set d3=%d2% [void]$AP::PidGenX($k,$p,\"00000\",0,0,0,$f); %m%::Copy($f,$r,0,1272); %m%::FreeHGlobal($f); [System.Text.Encoding]::Unicode.GetString($r, 1016, 128).Replace('0','') -for /f %%a in ('%psc% "%d3%"') do if not errorlevel 1 (set pkeychannel=%%a) -exit /b - -:dk_gvlk - -for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b -for %%# in (Volume:GVLK) do ( -call :dk_pkey %osSKU% '%%#' -if defined pkey call :dk_pkeychannel !pkey! -if /i [!pkeychannel!]==[%%#] ( -set key=!pkey! -exit /b -) -) -exit /b - -::======================================================================================================================================== - -:dk_checkerrors - -:: Check if the services are able to run or not -:: Workarounds are added to get correct status and error code because sc query doesn't output correct results in some conditions - -set serv_e= -for %%# in (%_serv%) do ( -set errorcode= -set checkerror= -sc query %%# | find /i ": 4 RUNNING" %nul% || net start %%# /y %nul% -sc start %%# %nul% -set errorcode=!errorlevel! -if !errorcode! NEQ 1056 if !errorcode! NEQ 0 set checkerror=1 -sc query %%# | find /i ": 4 RUNNING" %nul% || set checkerror=1 -if defined checkerror if defined serv_e (set "serv_e=!serv_e!, %%#-!errorcode!") else (set "serv_e=%%#-!errorcode!") -) - -if defined serv_e ( -set error=1 -call :dk_color %Red% "Starting Services [Failed] [%serv_e%]" -) - -:: Various error checks - -set token=0 -if exist %Systemdrive%\Windows\System32\spp\store\2.0\tokens.dat set token=1 -if exist %Systemdrive%\Windows\System32\spp\store_test\2.0\tokens.dat set token=1 -if %token%==0 ( -set error=1 -call :dk_color %Red% "Checking SPP tokens.dat [Not Found]" -) - -DISM /English /Online /Get-CurrentEdition %nul% -set error_code=%errorlevel% -cmd /c exit /b %error_code% -if %error_code% NEQ 0 set "error_code=[0x%=ExitCode%]" -if %error_code% NEQ 0 ( -set error=1 -call :dk_color %Red% "Checking DISM [Not Responding] %error_code%" -) - -%psc% $ExecutionContext.SessionState.LanguageMode 2>nul | find /i "Full" 1>nul || ( -set error=1 -call :dk_color %Red% "Checking Powershell [Not Responding]" -) - -for %%# in (wmic.exe) do @if "%%~$PATH:#"=="" ( -set error=1 -call :dk_color %Gray% "Checking WMIC.exe [Not Found]" -) - -reg query "HKU\S-1-5-20\Software\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\PersistedTSReArmed" %nul% && ( -set error=1 -call :dk_color %Red% "Checking Rearm [System Restart Is Required]" -) - -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState" %nul% && ( -set error=1 -call :dk_color %Red% "Checking ClipSVC [System Restart Is Required]" -) - -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "SkipRearm" 2^>nul') do if /i %%b NEQ 0x0 ( -reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "SkipRearm" /t REG_DWORD /d "0" /f %nul% -call :dk_color %Red% "Checking SkipRearm [Default 0 Value Not Found, Changing To 0]" -net stop sppsvc /y %nul% -net start sppsvc /y %nul% -set error=1 -) - -set _wsh=1 -reg query "HKCU\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _wsh=0) -reg query "HKLM\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _wsh=0) -if %_wsh% EQU 0 ( -set error=1 -call :dk_color %Gray% "Checking Windows Script Host [Disabled]" -) - -cscript //nologo %windir%\system32\slmgr.vbs /dlv %nul% -set error_code=%errorlevel% -cmd /c exit /b %error_code% -if %error_code% NEQ 0 set "error_code=[0x%=ExitCode%]" -if %error_code% NEQ 0 ( -set error=1 -call :dk_color %Red% "Checking slmgr /dlv [Not Responding] %error_code%" -) - -if not defined applist ( -set error=1 -call :dk_color %Red% "Checking WMI/SPP [Not Responding] [%e_wmispp%]" -) - -set nil= -set _sppint= -if not %_gent%==1 if not defined error ( -for %%# in (SppE%nil%xtComObj.exe,sppsvc.exe) do ( -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Ima%nil%ge File Execu%nil%tion Options\%%#" %nul% && set _sppint=1 -) -) - -if defined _sppint ( -call :dk_color %Red% "Checking SPP Interference In IFEO [Found] [Uninstall KMS Activator If There Is Any]" -set error=1 -) -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 -call :dk_color %_Yellow% "Press any key to %_exitmsg%..." -pause >nul -exit /b - -::======================================================================================================================================== - -:: 1st column = Activation ID -:: 2nd column = GVLK (Generic volume licensing key) -:: 3rd column = SKU ID -:: 4th column = WMI Edition ID (For reference only) -:: 5th column = Build Branch name incase same Edition ID is used in different OS versions with different key (For reference only) -:: Separator = "_" - -:kms38data - -for %%# in ( -73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2YT43___4_Enterprise -9bd77860-9b31-4b7b-96ad-2564017315bf_VDYBN-27WPP-V4HQT-9VMD4-VMK7H___7_ServerStandard_FE -de32eafd-aaee-4662-9444-c1befb41bde2_N69G4-B89J2-4G8F4-WWYCC-J464C___7_ServerStandard_RS5 -8c1c5410-9f39-4805-8c9d-63a07706358f_WC2BQ-8NRM3-FDDYY-2BFGV-KHKQY___7_ServerStandard_RS1 -ef6cfc9f-8c5d-44ac-9aad-de6a2ea0ae03_WX4NM-KYWYW-QJJR4-XV3QB-6VM33___8_ServerDatacenter_FE -34e1ae55-27f8-4950-8877-7a03be5fb181_WMDGN-G9PQG-XVVXX-R3X43-63DFG___8_ServerDatacenter_RS5 -21c56779-b449-4d20-adfc-eece0e1ad74b_CB7KF-BWN84-R7R2Y-793K2-8XDDG___8_ServerDatacenter_RS1 -e272e3e2-732f-4c65-a8f0-484747d0d947_DPH2V-TTNVB-4X9Q3-TJR4H-KHJW4__27_EnterpriseN -2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T83GX__48_Professional -a80b5abf-76ad-428b-b05d-a47d2dffeebf_MH37W-N47XK-V7XM9-C7227-GCQG9__49_ProfessionalN -034d3cbb-5d4b-4245-b3f8-f84571314078_WVDHN-86M7X-466P6-VHXV7-YY726__50_ServerSolution_RS5 -2b5a1b0f-a5ab-4c54-ac2f-a6d94824a283_JCKRF-N37P4-C2D82-9YXRT-4M63B__50_ServerSolution_RS1 -7b9e1751-a8da-4f75-9560-5fadfe3d8e38_3KHY7-WNT83-DGQKR-F7HPR-844BM__98_CoreN -a9107544-f4a0-4053-a96a-1479abdef912_PVMJN-6DFY6-9CCP6-7BKTT-D3WVR__99_CoreCountrySpecific -cd918a57-a41b-4c82-8dce-1a538e221a83_7HNRX-D7KGG-3K4RQ-4WPJ4-YTDFH_100_CoreSingleLanguage -58e97c99-f377-4ef1-81d5-4ad5522b5fd8_TX9XD-98N7V-6WMQ6-BX7FG-H8Q99_101_Core -7b4433f4-b1e7-4788-895a-c45378d38253_QN4C6-GBJD2-FB422-GHWJK-GJG2R_110_ServerCloudStorage -8de8eb62-bbe0-40ac-ac17-f75595071ea3_GRFBW-QNDC4-6QBHG-CCK3B-2PR88_120_ServerARM64_RS5 -43d9af6e-5e86-4be8-a797-d072a046896c_K9FYF-G6NCK-73M32-XMVPY-F9DRR_120_ServerARM64_RS4 -e0c42288-980c-4788-a014-c080d2e1926e_NW6C2-QMPVW-D7KKK-3GKT6-VCFB2_121_Education -3c102355-d027-42c6-ad23-2e7ef8a02585_2WH4N-8QGBV-H22JP-CT43Q-MDWWJ_122_EducationN -32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee_M7XTQ-FN8P6-TTKYV-9D4CC-J462D_125_EnterpriseS_RS5,VB -2d5a5a60-3040-48bf-beb0-fcd770c20ce0_DCPHK-NFMTC-H88MJ-PFHPY-QJ4BJ_125_EnterpriseS_RS1 -7b51a46c-0c04-4e8f-9af4-8496cca90d5e_WNMTR-4C88C-JK8YV-HQ7T2-76DF9_125_EnterpriseS_TH1 -7103a333-b8c8-49cc-93ce-d37c09687f92_92NFX-8DJQP-P6BBQ-THF9C-7CG2H_126_EnterpriseSN_RS5,VB -9f776d83-7156-45b2-8a5c-359b9c9f22a3_QFFDN-GRT3P-VKWWX-X7T3R-8B639_126_EnterpriseSN_RS1 -87b838b7-41b6-4590-8318-5797951d8529_2F77B-TNFGY-69QQF-B8YKP-D69TJ_126_EnterpriseSN_TH1 -39e69c41-42b4-4a0a-abad-8e3c10a797cc_QFND9-D3Y9C-J3KKY-6RPVP-2DPYV_145_ServerDatacenterACor_FE -90c362e5-0da1-4bfd-b53b-b87d309ade43_6NMRW-2C8FM-D24W7-TQWMY-CWH2D_145_ServerDatacenterACor_RS5 -e49c08e7-da82-42f8-bde2-b570fbcae76c_2HXDN-KRXHB-GPYC7-YCKFJ-7FVDG_145_ServerDatacenterACor_RS3 -f5e9429c-f50b-4b98-b15c-ef92eb5cff39_67KN8-4FYJW-2487Q-MQ2J7-4C4RG_146_ServerStandardACor_FE -73e3957c-fc0c-400d-9184-5f7b6f2eb409_N2KJX-J94YW-TQVFB-DG9YT-724CC_146_ServerStandardACor_RS5 -61c5ef22-f14f-4553-a824-c4b31e84b100_PTXN8-JFHJM-4WC78-MPCBR-9W4KR_146_ServerStandardACor_RS3 -82bbc092-bc50-4e16-8e18-b74fc486aec3_NRG8B-VKK3Q-CXVCJ-9G2XF-6Q84J_161_ProfessionalWorkstation -4b1571d3-bafb-4b40-8087-a961be2caf65_9FNHH-K3HBT-3W4TD-6383H-6XYWF_162_ProfessionalWorkstationN -3f1afc82-f8ac-4f6c-8005-1d233e606eee_6TP4R-GNPTD-KYYHQ-7B7DP-J447Y_164_ProfessionalEducation -5300b18c-2e33-4dc2-8291-47ffcec746dd_YVWGF-BXNMC-HTQYQ-CPQ99-66QFC_165_ProfessionalEducationN -8c8f0ad3-9a43-4e05-b840-93b8d1475cbc_6N379-GGTMK-23C6M-XVVTC-CKFRQ_168_ServerAzureCor_FE -a99cc1f0-7719-4306-9645-294102fbff95_FDNH6-VW9RW-BXPJ7-4XTYG-239TB_168_ServerAzureCor_RS5 -3dbf341b-5f6c-4fa7-b936-699dce9e263f_VP34G-4NPPG-79JTQ-864T4-R3MQX_168_ServerAzureCor_RS1 -e0b2d383-d112-413f-8a80-97f373a5820c_YYVX9-NTFWV-6MDM3-9PT4T-4M68B_171_EnterpriseG -e38454fb-41a4-4f59-a5dc-25080e354730_44RPN-FTY23-9VTTB-MP9BX-T84FV_172_EnterpriseGN -ec868e65-fadf-4759-b23e-93fe37f2cc29_CPWHC-NT2C7-VYW78-DHDB2-PG3GK_175_ServerRdsh_RS5 -e4db50ea-bda1-4566-b047-0ca50abc6f07_7NBT4-WGBQX-MP4H7-QXFF8-YP3KX_175_ServerRdsh_RS3 -0df4f814-3f57-4b8b-9a9d-fddadcd69fac_NBTWJ-3DR69-3C4V8-C26MC-GQ9M6_183_CloudE -59eb965c-9150-42b7-a0ec-22151b9897c5_KBN8V-HFGQ4-MGXVD-347P6-PDQGT_191_IoTEnterpriseS_NI -d30136fc-cb4b-416e-a23d-87207abc44a9_6XN7V-PCBDC-BDBRH-8DQY7-G6R44_202_CloudEditionN -ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69_37D7F-N49CB-WQR8W-TBJ73-FM8RX_203_CloudEdition -19b5e0fb-4431-46bc-bac1-2f1873e4ae73_NTBV8-9K7Q8-V27C6-M2BTV-KHMXV_407_ServerTurbine -) do ( -for /f "tokens=1-5 delims=_" %%A in ("%%#") do if %osSKU%==%%C ( -if %1==getkey if not defined key echo "!applist!" | find /i "%%A" >nul && set key=%%B -) -) -exit /b - -::======================================================================================================================================== - -:: Below code is used to get alternate edition name and key if current edition doesn't support KMS38 activation - -:: IoTEnterpriseS 2021 won't be converted to EnterpriseS 2021 to enable KMS38 activation because later has 5 years less update support -:: ProfessionalCountrySpecific won't be converted because it's not a good idea to change CountrySpecific editions - -:: 1st column = Current SKU ID -:: 2nd column = Current Edition Name -:: 3rd column = Alternate Edition Activation ID -:: 4th column = Alternate Edition GVLK -:: 5th column = Alternate Edition Name -:: Separator = _ - - -:kms38fallback - -if %_chan%==0 exit /b - -for %%# in ( -188_IoTEnterprise_______________73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2YT43_Enterprise -138_ProfessionalSingleLanguage__2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T83GX_Professional -) do ( -for /f "tokens=1-5 delims=_" %%A in ("%%#") do if %osSKU%==%%A ( -echo "!applist!" | find /i "%%C" 1>nul && ( -set altkey=%%D -set curedition=%%B -set altedition=%%E -) -) -) -exit /b - -::======================================================================================================================================== - -:: Script changes below values in official gatherosstate.exe so that it can generate usable ticket in Windows unlicensed state - -:hex:[ -$bytes = [System.IO.File]::ReadAllBytes("gatherosstate.exe") -$bytes[320] = 0x9c -$bytes[321] = 0xfb -$bytes[322] = 0x05 -$bytes[13672] = 0x25 -$bytes[13674] = 0x73 -$bytes[13676] = 0x3b -$bytes[13678] = 0x00 -$bytes[13680] = 0x00 -$bytes[13682] = 0x00 -$bytes[13684] = 0x00 -$bytes[32748] = 0xe9 -$bytes[32749] = 0x9e -$bytes[32750] = 0x00 -$bytes[32751] = 0x00 -$bytes[32752] = 0x00 -$bytes[32894] = 0x8b -$bytes[32895] = 0x44 -$bytes[32897] = 0x64 -$bytes[32898] = 0x85 -$bytes[32899] = 0xc0 -$bytes[32900] = 0x0f -$bytes[32901] = 0x85 -$bytes[32902] = 0x1c -$bytes[32903] = 0x02 -$bytes[32904] = 0x00 -$bytes[32906] = 0xe9 -$bytes[32907] = 0x3c -$bytes[32908] = 0x01 -$bytes[32909] = 0x00 -$bytes[32910] = 0x00 -$bytes[32911] = 0x85 -$bytes[32912] = 0xdb -$bytes[32913] = 0x75 -$bytes[32914] = 0xeb -$bytes[32915] = 0xe9 -$bytes[32916] = 0x69 -$bytes[32917] = 0xff -$bytes[32918] = 0xff -$bytes[32919] = 0xff -$bytes[33094] = 0xe9 -$bytes[33095] = 0x80 -$bytes[33096] = 0x00 -$bytes[33097] = 0x00 -$bytes[33098] = 0x00 -$bytes[33449] = 0x64 -$bytes[33576] = 0x8d -$bytes[33577] = 0x54 -$bytes[33579] = 0x24 -$bytes[33580] = 0xe9 -$bytes[33581] = 0x55 -$bytes[33582] = 0x01 -$bytes[33583] = 0x00 -$bytes[33584] = 0x00 -$bytes[34189] = 0x59 -$bytes[34190] = 0xeb -$bytes[34191] = 0x28 -$bytes[34238] = 0xe9 -$bytes[34239] = 0x4f -$bytes[34240] = 0x00 -$bytes[34241] = 0x00 -$bytes[34242] = 0x00 -$bytes[34346] = 0x24 -$bytes[34376] = 0xeb -$bytes[34377] = 0x63 -[System.IO.File]::WriteAllBytes("gatherosstatemodified.exe", $bytes) -:hex:] - +@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+::============================================================================
+::
+:: This script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::============================================================================
+
+
+
+:: To activate, run the script with /a parameter or change 0 to 1 in below line
+set _acti=0
+
+:: To activate along with KMS38 protection (from being replaced by 180 days KMS activation),
+:: run the script with /ap parameter or change 0 to 1 in below line
+set _prot=0
+
+:: To only generate GenuineTicket.xml, run the script with /g parameter or change 0 to 1 in below line
+set _gent=0
+
+:: To uninstall the KMS38, run the script with /x parameter or change 0 to 1 in below line
+set _unin=0
+
+
+
+:: If value is changed in above lines or any parameter is used then script will run in unattended mode
+:: Incase if more than one options are used then only one option will be applied
+
+
+
+::========================================================================================================================================
+
+:: 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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %*"
+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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %*"
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+::========================================================================================================================================
+
+cls
+color 07
+title KMS38 Activation
+
+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"=="/a" set _acti=1
+if /i "%%A"=="/ap" set _prot=1
+if /i "%%A"=="/g" set _gent=1
+if /i "%%A"=="/x" set _unin=1
+if /i "%%A"=="-el" set _elev=1
+)
+)
+
+for %%A in (%_acti% %_prot% %_gent% %_unin%) do (if "%%A"=="1" set _unattended=1)
+
+::========================================================================================================================================
+
+set winbuild=1
+set "nul=>nul 2>&1"
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+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 2>nul | find /i "0x0" 1>nul && (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 "Magenta="45;97m""
+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 "Magenta="Darkmagenta" "white""
+set "_White="Black" "Gray""
+set "_Green="Black" "Green""
+set "_Yellow="Black" "Yellow""
+)
+
+set _k38=
+set "nceline=echo: &echo ==== ERROR ==== &echo:"
+set "eline=echo: &call :dk_color %Red% "==== ERROR ====" &echo:"
+set slp=SoftwareLicensingProduct
+set sls=SoftwareLicensingService
+set wApp=55c92734-d682-4d71-983e-d6ec3f16059f
+if %~z0 GEQ 1500000 (set "_exitmsg=Go back") else (set "_exitmsg=Exit")
+set "SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform"
+set "notifytocheckupdate=if %winbuild% GTR 19044 echo Make sure you are using updated version of the script."
+
+::========================================================================================================================================
+
+if %winbuild% LSS 14393 (
+%eline%
+echo Unsupported OS version detected.
+echo Project is supported for Windows 10/11/Server, build 14393 and later.
+goto dk_done
+)
+
+if %winbuild% GEQ 22483 if not exist %_psc% (
+%nceline%
+echo Powershell is not installed in the system.
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Fix for the special characters limitation 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 "_ttemp=%temp%"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" 1>nul && (
+%eline%
+echo Script is launched from the temp folder,
+echo Most likely you are 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
+)
+
+::========================================================================================================================================
+
+:: Elevate script as admin and pass arguments and preventing loop
+
+%nul% reg query HKU\S-1-5-19 || (
+if not defined _elev %nul% %_psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b
+%eline%
+echo This script require administrator privileges.
+echo To do so, right click on this script and select 'Run as administrator'.
+goto dk_done
+)
+
+::========================================================================================================================================
+
+if %_unin%==1 goto :k_uninstall
+
+:k_menu
+
+if %_unattended%==0 (
+cls
+mode 76, 25
+title KMS38 Activation
+
+echo:
+echo:
+echo:
+echo ____________________________________________________________
+echo:
+echo [1] KMS38 Activation
+echo:
+echo [2] KMS38 Activation ^+ Protection
+echo ____________________________________________
+echo:
+echo [3] Generate Ticket
+echo ____________________________________________
+echo:
+echo [4] Complete Uninstall
+echo:
+echo [5] %_exitmsg%
+echo ____________________________________________________________
+echo:
+call :dk_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard [1,2,3,4,5]"
+choice /C:12345 /N
+set _el=!errorlevel!
+if !_el!==5 exit /b
+if !_el!==4 (
+cls
+echo:
+call :dk_color2 %_White% " " %_Green% "KMS38 Complete Uninstall:"
+echo:
+echo It requires below steps,
+echo - Cleaning ClipSVC licences
+echo - Deleting a volatile and protected registry key by taking ownership
+echo - Microsoft Account and Store Apps may need relogin-restart in the system
+echo - Removing Specific KMS Host for Windows
+echo:
+echo Its recommended to restart the system after this process.
+echo:
+echo:
+choice /C:12 /N /M "> [1] Continue [2] Go back : "
+if errorlevel 2 goto :k_menu
+if errorlevel 1 goto :k_uninstall
+)
+if !_el!==3 (set _gent=1&goto :k_menu2)
+if !_el!==2 (
+cls
+echo:
+call :dk_color2 %_White% " " %_Green% "KMS38 Protection:"
+echo:
+echo It stops 180 days KMS Activation from replacing KMS38 activation.
+echo Protection requires permission altering of a registry key.
+echo:
+echo If you are going to use KMS_VL_ALL or MAS's KMS activation for Office,
+echo then you don't need to enable this protection.
+echo For more info, check readme.
+echo:
+echo:
+choice /C:12 /N /M "> [1] Continue [2] Go back : "
+if errorlevel 2 goto :k_menu
+if errorlevel 1 (set _prot=1&goto :k_menu2)
+)
+if !_el!==1 (set _prot=0&goto :k_menu2)
+goto :k_menu
+)
+
+:k_menu2
+
+cls
+mode 102, 30
+if %_gent%==1 (set _title=title Generate KMS38 GenuineTicket.xml) else (set _title=title KMS38 Activation)
+%_title%
+
+::========================================================================================================================================
+
+if not exist %_psc% if %_prot%==1 (
+set _prot=0
+set _gent=0
+%nceline%
+echo Powershell is not installed in the system.
+echo It is required to protect KMS38 activation.
+echo You need to set the script to the default.
+if %_unattended%==0 (
+echo:
+call :dk_color %_Yellow% "Press any key to go back..."
+pause >nul
+goto k_menu
+)
+)
+
+if %_gent%==1 if exist %Systemdrive%\GenuineTicket.xml (
+set _gent=0
+%eline%
+echo File '%Systemdrive%\GenuineTicket.xml' already exist.
+if %_unattended%==0 (
+echo:
+call :dk_color %_Yellow% "Press any key to go back..."
+pause >nul
+goto k_menu
+) else (
+goto dk_done
+)
+)
+
+::========================================================================================================================================
+
+echo:
+echo Initializing...
+
+:: Check WMI and sppsvc Errors
+
+set applist=
+net start sppsvc /y %nul%
+if %winbuild% LSS 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%wApp%') get ID /VALUE" 2^>nul')"
+if %winbuild% GEQ 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')"
+%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a"))
+
+if not defined applist (
+%eline%
+echo Failed running WMI query check, verify that these services are working correctly
+echo Windows Management Instrumentation [WinMgmt], Software Protection [sppsvc]
+echo:
+echo Script will try to enable these services.
+echo:
+if %_unattended%==0 (
+call :dk_color %_Yellow% "Press any key to continue..."
+pause >nul
+)
+for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\WinMgmt /v Start 2^>nul') do if /i %%b equ 0x4 (sc config WinMgmt start= auto %nul%)
+net start WinMgmt /y %nul%
+net stop sppsvc /y %nul%
+net start sppsvc /y %nul%
+cls
+)
+
+::========================================================================================================================================
+
+:: Refresh license status, it helps to get correct product name in Windows 17134 and later builds
+
+call :dk_refresh
+
+:: Check product name
+
+set winos=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+
+::========================================================================================================================================
+
+:: Check if system is permanently activated or not
+
+cls
+call :dk_checkperm
+if defined _perm if not %_gent%==1 (
+echo ___________________________________________________________________________________________
+echo:
+call :dk_color2 %_White% " " %Green% "Checking: %winos% is Permanently Activated."
+call :dk_color2 %_White% " " %Gray% "Activation is not required."
+echo ___________________________________________________________________________________________
+if %_unattended%==1 goto dk_done
+echo:
+choice /C:12 /N /M "> [1] Activate [2] %_exitmsg% : "
+if errorlevel 2 exit /b
+)
+cls
+
+::========================================================================================================================================
+
+:: Check Evaluation version
+
+set _eval=
+set _evalserv=
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set _evalserv=1
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1 & set _evalserv=1
+
+if defined _eval (
+%eline%
+echo [%winos% ^| %winbuild%]
+if defined _evalserv (
+echo Server Evaluation cannot be activated. Convert it to full Server OS.
+) else (
+echo Evaluation Editions cannot be activated. Install full Windows OS.
+echo Check the ReadMe for how to get genuine installation media for full version.
+)
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check SKU value
+
+set osSKU=
+for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "osSKU=%%a"
+
+if not defined osSKU (
+%eline%
+echo SKU value was not detected properly. Aborting...
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check if GVLK (KMS key) is already installed or not
+
+set _gvlk=
+call :dk_channel
+echo: %_channel%| findstr /i "GVLK" 1>nul && set _gvlk=1
+
+::========================================================================================================================================
+
+:: Detect Key
+
+set app=
+set key=
+
+if defined applist call :kms38data getkey
+
+::========================================================================================================================================
+
+if not defined key if not defined _gvlk (
+%eline%
+if not defined applist (
+echo Failed running WMI query check, verify that these services are working correctly
+echo Windows Management Instrumentation [WinMgmt], Software Protection [sppsvc]
+echo:
+echo Try troublshooting steps listed in the ReadMe.
+goto dk_done
+)
+echo [%winos% ^| %winbuild% ^| SKU:%osSKU%]
+echo Unable to find this product in the supported product list.
+%notifytocheckupdate%
+echo:
+echo However, if you would like to try KMS38 activation on this product then,
+echo install KMS key [GVLK] for this product and run the script.
+goto dk_done
+)
+
+if not defined key (
+echo:
+call :dk_color %Magenta% "====== Info ======"
+echo:
+echo [%winos% ^| %winbuild% ^| SKU:%osSKU%]
+echo Unable to find this product in the supported product list.
+%notifytocheckupdate%
+echo:
+echo Since KMS key is already installed, script will activate with KMS38.
+if %_unattended%==0 (
+echo:
+call :dk_color %_Yellow% "Press any key to continue..."
+pause >nul
+)
+cls
+)
+
+::========================================================================================================================================
+
+:: Making sure we have activation ID if not defined yet
+
+if not defined key set app=
+if not defined app (
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get ID /VALUE" 2^>nul') do call set "app=%%a"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL').Get()).ID | %% {echo ('ID='+$_)}" 2^>nul') do call set "app=%%a"
+)
+
+if not defined app (
+%eline%
+echo [%winos% ^| SKU:%osSKU% ^| %winbuild%]
+echo Unable to detect activation ID.
+%notifytocheckupdate%
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check Windows Architecture
+
+set arch=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b
+
+if not defined arch (
+%eline%
+echo Unable to detect Windows Architecture. Aborting...
+goto dk_done
+)
+
+::========================================================================================================================================
+
+:: Check files
+
+set ARM64_file=
+if /i "%arch%"=="ARM64" set ARM64_file=arm64_
+
+for %%# in (%ARM64_file%gatherosstate.exe %ARM64_file%slc.dll) do (
+if not exist "!_work!\BIN\%%#" (
+%eline%
+echo '%%#' file is missing in 'BIN' folder. Aborting...
+goto dk_done
+)
+)
+
+::========================================================================================================================================
+
+:: Check clipup.exe for the detection and activation of server cor and acor editions
+
+set a_cor=
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*CorEdition~*.mum" if not exist "%systemroot%\System32\clipup.exe" set a_cor=1
+
+if defined a_cor (
+if not exist "!_work!\BIN\clipup.exe" (
+%eline%
+echo 'clipup.exe' file is missing in 'BIN' folder. Aborting...
+goto dk_done
+)
+)
+
+::========================================================================================================================================
+
+cls
+echo:
+echo Checking OS Info [%winos% ^| %winbuild% ^| %arch%]
+
+::========================================================================================================================================
+
+echo:
+set "_serv=ClipSVC sppsvc Winmgmt"
+
+:: Client License Service (ClipSVC)
+:: Software Protection
+:: Windows Management Instrumentation
+
+echo Checking Services [%_serv%]
+
+:: Check if the services are able to run or not
+
+set serv_e=
+for %%# in (%_serv%) do (
+sc query %%# | find /i "RUNNING" %nul% || net start %%# /y %nul%
+sc query %%# | find /i "RUNNING" %nul% || sc start %%# %nul%
+sc query %%# | find /i "RUNNING" %nul% || if defined serv_e (set "serv_e=!serv_e! %%#") else (set "serv_e=%%#")
+)
+
+if not defined serv_e (
+echo Starting Services [Successful]
+) else (
+call :dk_color %Red% "Starting Services [Failed] [%serv_e%]"
+)
+
+if not defined applist (
+call :dk_color %Red% "Checking WMI Query [Failed]"
+) else (
+echo Checking WMI Query [Successful]
+)
+
+::========================================================================================================================================
+
+:: Install key
+
+echo:
+set _partial=
+if defined key set _ipartial=%key:~-5%
+
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%# in ('wmic path %slp% where "ApplicationID='%wApp%' and PartialProductKey<>null" Get PartialProductKey /value 2^>nul') do set "_partial=%%#"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%# in ('%_psc% "(([WMISEARCHER]'SELECT PartialProductKey FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).PartialProductKey | %% {echo ('PartialProductKey='+$_)}" 2^>nul') do set "_partial=%%#"
+
+if defined key if /i "%_partial%"=="%_ipartial%" (
+echo Checking Installed Product Key [%key%] [Volume:GVLK]
+)
+
+if not defined key (
+echo Checking Installed Product Key [Partial Key - %_partial%] [Volume:GVLK]
+)
+
+if defined key if /i not "%_partial%"=="%_ipartial%" (
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call InstallProductKey ProductKey="%key%" %nul%
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT Version FROM %sls%').Get()).InstallProductKey('%key%')" %nul%
+if not !errorlevel!==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul%
+
+if !errorlevel!==0 (
+call :dk_refresh
+echo Installing KMS Client Setup Key [%key%] [Successful]
+) else (
+call :dk_color %Red% "Installing KMS Client Setup Key [%key%] [Failed]"
+)
+)
+
+::========================================================================================================================================
+
+:: Set specific KMS host to Local Host
+:: By doing this, global KMS IP can not replace KMS38 activation but can be used with Office and other Windows Editions
+
+set regadd=
+set k_error=
+
+if not %_gent%==1 (
+echo:
+set regadd=1
+%nul% reg delete "HKLM\%SPPk%\%wApp%" /f
+%nul% reg delete "HKU\S-1-5-20\%SPPk%\%wApp%" /f
+
+%nul% reg query "HKLM\%SPPk%\%wApp%" && (
+call :regown "HKLM\%SPPk%\%wApp%"
+%nul% reg delete "HKLM\%SPPk%\%wApp%" /f
+)
+
+%nul% reg add "HKLM\%SPPk%\%wApp%\%app%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" || set k_error=1
+%nul% reg add "HKLM\%SPPk%\%wApp%\%app%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" || set k_error=1
+
+if not defined k_error (
+echo Adding Specific KMS Host [LocalHost 127.0.0.2] [Successful]
+) else (
+call :dk_color %Red% "Adding Specific KMS Host [LocalHost 127.0.0.2] [Failed]"
+)
+)
+
+::========================================================================================================================================
+
+:: Files are copied to temp to generate ticket to avoid possible issues in case the path contains special character or non English names
+
+echo:
+set "temp_=%SystemRoot%\Temp\_Temp"
+set "_clipup=%systemroot%\System32\clipup.exe"
+if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul%
+md "%temp_%\" %nul%
+
+pushd "!_work!\BIN\"
+copy /y /b "%ARM64_file%gatherosstate.exe" "%temp_%\gatherosstate.exe" %nul%
+copy /y /b "%ARM64_file%slc.dll" "%temp_%\slc.dll" %nul%
+if defined a_cor copy /y /b "ClipUp.exe" "%_clipup%" %nul%
+popd
+
+set copyf=
+if not exist "%temp_%\gatherosstate.exe" set copyf=1
+if not exist "%temp_%\slc.dll" set copyf=1
+
+if defined copyf (
+call :dk_color %Red% "Copying Required Files to Temp [%temp_%] [Failed]"
+goto :k_final
+) else (
+echo Copying Required Files to Temp [%temp_%] [Successful]
+)
+
+if defined a_cor (
+if exist "%_clipup%" (
+echo Copying clipup.exe File to [%systemroot%\System32\] [Successful]
+) else (
+call :dk_color %Red% "Copying clipup.exe File to [%systemroot%\System32\] [Failed] Aborting..."
+goto :k_final
+)
+)
+
+::========================================================================================================================================
+
+:: Multiple attempts to generate the ticket because in some cases, one attempt is not enough.
+
+set "_noxml=if not exist "%temp_%\GenuineTicket.xml""
+
+start /wait "" "%temp_%/gatherosstate.exe" %nul%
+%_noxml% timeout /t 3 %nul%
+%_noxml% net stop sppsvc /y %nul%
+%_noxml% call "%temp_%/gatherosstate.exe" %nul%
+%_noxml% timeout /t 3 %nul%
+%_noxml% "%temp_%/gatherosstate.exe" %nul%
+%_noxml% timeout /t 3 %nul%
+
+%_noxml% (
+call :dk_color %Red% "Generating GenuineTicket.xml [Failed] Aborting..."
+goto :k_final
+) else (
+echo Generating GenuineTicket.xml [Successful]
+)
+
+::========================================================================================================================================
+
+:: Copy GenuineTicket.xml to the root of C drive and exit if ticket generation option was used in script
+
+if %_gent%==1 (
+echo:
+copy /y /b "%temp_%\GenuineTicket.xml" "%Systemdrive%\GenuineTicket.xml" %nul%
+if not exist "%Systemdrive%\GenuineTicket.xml" (
+call :dk_color %Red% "Copying GenuineTicket.xml to %Systemdrive%\ [Failed]"
+) else (
+call :dk_color %Green% "Copying GenuineTicket.xml to %Systemdrive%\ [Successful]"
+)
+goto :k_final
+)
+
+::========================================================================================================================================
+
+:: clipup -v -o -altto <Ticket path> method to apply ticket is not used to avoid the certain issues in case if the username have
+:: spaces / special characters / non English names
+
+set "tdir=%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket"
+if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%
+copy /y /b "%temp_%\GenuineTicket.xml" "%tdir%\GenuineTicket.xml" %nul%
+
+if not exist "%tdir%\GenuineTicket.xml" (
+call :dk_color %Red% "Failed to copy Ticket to [%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket\]"
+goto :k_final
+)
+
+set "_xmlexist=if exist "%tdir%\GenuineTicket.xml""
+
+net stop ClipSVC /y %nul%
+net start ClipSVC /y %nul%
+%_xmlexist% timeout /t 2 %nul%
+%_xmlexist% timeout /t 2 %nul%
+
+%_xmlexist% %_psc% Restart-Service ClipSVC %nul%
+%_xmlexist% timeout /t 2 %nul%
+%_xmlexist% timeout /t 2 %nul%
+
+set fallback_=
+%_xmlexist% (
+set fallback_=1
+%nul% clipup -v -o
+%_xmlexist% timeout /t 2 %nul%
+)
+
+%_xmlexist% (
+call :dk_color %Red% "Installing GenuineTicket.xml [Failed] Aborting..."
+if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%
+goto :k_final
+) else (
+if defined fallback_ (call :dk_color %Red% "Installing GenuineTicket.xml [Successful] [Fallback method: clipup -v -o]"
+) else (echo Installing GenuineTicket.xml [Successful]
+)
+)
+
+::==========================================================================================================================================
+
+echo:
+echo Activating...
+echo:
+
+call :k_checkexp
+if defined _k38 (
+call :k_actinfo
+goto :k_final
+)
+
+:: Clear 180 Days KMS Activation lock with Windows SKU specific rearm and without the need to restart the system
+
+if %winbuild% LSS 22483 wmic path %slp% where ID='%app%' call ReArmsku %nul%
+if %winbuild% GEQ 22483 %_psc% "$null=([WMI]'%slp%=''%app%''').ReArmsku()" %nul%
+
+if %errorlevel%==0 (
+echo Applying SKU-ID Rearm [Successful]
+) else (
+call :dk_color %Red% "Applying SKU-ID Rearm [Failed]"
+)
+
+echo:
+call :k_checkexp
+if defined _k38 (
+call :k_actinfo
+goto :k_final
+)
+
+:: Restart software protection service to refresh itself and run refresh license status and activation commands
+
+net stop sppsvc /y %nul%
+net start sppsvc /y %nul%
+call :dk_refresh
+call :dk_act
+
+call :k_checkexp
+if defined _k38 (
+call :k_actinfo
+goto :k_final
+)
+
+call :dk_color %Red% "Activation Failed"
+call :dk_color %Magenta% "Try again / Restart system / Check troubleshooting steps in ReadMe"
+
+::========================================================================================================================================
+
+:k_final
+
+:: Remove the added Specific KMS Host (Local Host) if activation is not completed
+
+echo:
+set k_error=
+if defined regadd if not defined _k38 (
+%nul% reg delete "HKLM\%SPPk%\%wApp%" /f
+%nul% reg delete "HKU\S-1-5-20\%SPPk%\%wApp%" /f
+%nul% reg query "HKLM\%SPPk%\%wApp%" && set k_error=1
+%nul% reg query "HKU\S-1-5-20\%SPPk%\%wApp%" && set k_error=1
+if not defined k_error (
+echo Removing The Added Specific KMS Host [Successful]
+) else (
+call :dk_color %Red% "Removing The Added Specific KMS Host [Failed]"
+)
+)
+
+:: Protect KMS38 if opted by the user and conditions are correct
+
+if defined regadd if defined _k38 if %_prot%==1 (
+%nul% call :regown "HKLM\%SPPk%\%wApp%" "" S-1-5-32-544 "" Deny "SetValue,Delete"
+%nul% reg delete "HKLM\%SPPk%\%wApp%" /f
+%nul% reg query "HKLM\%SPPk%\%wApp%" && (
+call :dk_color %Gray% "Locking a Registry To Protect KMS38 [Successful]"
+) || (
+call :dk_color %Red% "Locking a Registry To Protect KMS38 [Failed]"
+)
+)
+
+:: clipup.exe does not exist in server cor and acor editions by default, it was copied there with this script
+
+if exist "%temp_%\.*" rmdir /s /q "%temp_%\" %nul%
+if defined a_cor if exist "%_clipup%" del /f /q "%_clipup%" %nul%
+
+if exist "%temp_%\" (
+call :dk_color %Red% "Cleaning Temp Files [Failed]"
+) else (
+echo Cleaning Temp Files [Successful]
+)
+
+if defined a_cor (
+if exist "%_clipup%" (
+call :dk_color %Red% "Deleting copied clipup.exe file [Failed]"
+) else (
+echo Deleting copied clipup.exe file [Successful]
+)
+)
+
+goto :dk_done
+
+::========================================================================================================================================
+
+:k_uninstall
+
+cls
+mode 76, 25
+title KMS38 Complete Uninstall
+set "RegKey=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState"
+
+echo:
+call :k_checkexp
+
+if not defined _k38 (
+echo Windows is not activated with KMS38. Skipping cleaning ClipSVC Licences...
+echo:
+)
+
+if defined _k38 (
+for %%# in (ClipSVC) do (
+sc query %%# | find /i "STOPPED" %nul% || net stop %%# /y %nul%
+sc query %%# | find /i "STOPPED" %nul% || sc stop %%# %nul%
+)
+
+REM Thanks to @mspaintmsi for informing this command info
+
+rundll32 clipc.dll,ClipCleanUpState
+
+if exist "%ProgramData%\Microsoft\Windows\ClipSVC\tokens.dat" (
+call :dk_color %Red% "Cleaning ClipSVC Licences [Failed]"
+) else (
+echo Cleaning ClipSVC Licences [Successful]
+)
+
+REM Below registry key (Volatile & Protected) gets created after the ClipSVC License cleanup command, and gets automatically deleted after
+REM system restart. It needs to be deleted to activate the system without restart.
+
+call :regown "%RegKey%" %nul%
+reg delete "%RegKey%" /f %nul%
+
+reg query "%RegKey%" %nul% && (
+call :dk_color %Red% "Deleting a Volatile Registry [Failed]"
+call :dk_color %Magenta% "Restart the system, that will delete this registry key automatically"
+) || (
+echo Deleting a Volatile Registry [Successful]
+)
+
+for %%# in (ClipSVC wlidsvc LicenseManager sppsvc) do (net stop %%# /y %nul% & net start %%# /y %nul%)
+call :dk_refresh
+)
+
+set exist_=
+%nul% reg query "HKLM\%SPPk%\%wApp%" && (
+set exist_=1
+%nul% reg delete "HKLM\%SPPk%\%wApp%" /f
+)
+%nul% reg delete "HKU\S-1-5-20\%SPPk%\%wApp%" /f
+
+%nul% reg query "HKLM\%SPPk%\%wApp%" && (
+%nul% call :regown "HKLM\%SPPk%\%wApp%"
+%nul% reg delete "HKLM\%SPPk%\%wApp%" /f
+)
+
+%nul% reg query "HKLM\%SPPk%\%wApp%" && (
+call :dk_color %Red% "Removing Specific KMS Host [Failed]"
+) || (
+if defined exist_ (
+echo Removing Specific KMS Host [Successful]
+) else (
+echo Removing Specific KMS Host [Already Removed]
+)
+)
+
+if defined _k38 (
+echo:
+call :dk_color %Magenta% "Its recommended to restart the system now."
+)
+
+goto :dk_done
+
+::========================================================================================================================================
+
+:: A lean and mean snippet to set registry ownership and permission recursively
+:: Written by @AveYo aka @BAU
+:: pastebin.com/XTPt0JSC
+
+:: Modified by @abbodi1406 to make it work in ARM64 Windows 10 (builds older than 21277) where only x86 version of PowerShell is installed.
+
+:: This code runs only if KMS38 protection option or complete uninstall option is used by the user in this script.
+
+:regown
+
+%_psc% $A='%~1','%~2','%~3','%~4','%~5','%~6';iex(([io.file]::ReadAllText('!_batp!')-split':Own1\:.*')[1])&exit/b:Own1:
+$D1=[uri].module.gettype('System.Diagnostics.Process')."GetM`ethods"(42) |where {$_.Name -eq 'SetPrivilege'} #`:no-ev-warn
+'SeSecurityPrivilege','SeTakeOwnershipPrivilege','SeBackupPrivilege','SeRestorePrivilege'|foreach {$D1.Invoke($null, @("$_",2))}
+$path=$A[0]; $rk=$path-split'\\',2; switch -regex ($rk[0]){'[mM]'{$hv=2147483650};'[uU]'{$hv=2147483649};default{$hv=2147483648};}
+$HK=[Microsoft.Win32.RegistryKey]::OpenBaseKey($hv, 256); $s=$A[1]; $sps=[Security.Principal.SecurityIdentifier]
+$u=($A[2],'S-1-5-32-544')[!$A[2]];$o=($A[3],$u)[!$A[3]];$w=$u,$o |% {new-object $sps($_)}; $old=!$A[3];$own=!$old; $y=$s-eq'all'
+$rar=new-object Security.AccessControl.RegistryAccessRule( $w[0], ($A[5],'FullControl')[!$A[5]], 1, 0, ($A[4],'Allow')[!$A[4]] )
+$x=$s-eq'none';function Own1($k){$t=$HK.OpenSubKey($k,2,'TakeOwnership');if($t){0,4|%{try{$o=$t.GetAccessControl($_)}catch{$old=0}
+};if($old){$own=1;$w[1]=$o.GetOwner($sps)};$o.SetOwner($w[0]);$t.SetAccessControl($o); $c=$HK.OpenSubKey($k,2,'ChangePermissions')
+$p=$c.GetAccessControl(2);if($y){$p.SetAccessRuleProtection(1,1)};$p.ResetAccessRule($rar);if($x){$p.RemoveAccessRuleAll($rar)}
+$c.SetAccessControl($p);if($own){$o.SetOwner($w[1]);$t.SetAccessControl($o)};if($s){$($subkeys=$HK.OpenSubKey($k).GetSubKeyNames()) 2>$null;
+foreach($n in $subkeys){Own1 "$k\$n"}}}};Own1 $rk[1];if($env:VO){get-acl Registry::$path|fl} #:Own1: lean & mean snippet by AveYo
+
+::========================================================================================================================================
+
+:: Check KMS activation status
+
+:k_actinfo
+
+set xpr=
+if not exist %_psc% (
+cscript //nologo %windir%\system32\slmgr.vbs /xpr
+) else (
+for /f "tokens=* delims=" %%# in ('%_psc% "$([DateTime]::Now.addMinutes(%gpr%)).ToString('yyyy-MM-dd HH:mm:ss')" 2^>nul') do set "xpr=%%#"
+call :dk_color %Green% "%winos% is activated till !xpr!"
+)
+exit /b
+
+:: Check remaining KMS activation grace period
+
+:k_checkexp
+
+set gpr=0
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%# in ('"wmic path %slp% where (ApplicationID='%wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get GracePeriodRemaining /VALUE" 2^>nul') do set "gpr=%%#"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%# in ('%_psc% "(([WMISEARCHER]'SELECT GracePeriodRemaining FROM %slp% WHERE ApplicationID=''%wApp%'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL').Get()).GracePeriodRemaining | %% {echo ('GracePeriodRemaining='+$_)}" 2^>nul') do set "gpr=%%#"
+if %gpr% GTR 259200 (set _k38=1) else (set _k38=)
+exit /b
+
+:: Check Windows permanent activation status
+
+:dk_checkperm
+
+if %winbuild% LSS 22483 wmic path %slp% where (LicenseStatus='1' and GracePeriodRemaining='0' and PartialProductKey is not NULL) get Name /value 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm=
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT Name FROM %slp% WHERE LicenseStatus=1 AND GracePeriodRemaining=0 AND PartialProductKey IS NOT NULL').Get()).Name | %% {echo ('Name='+$_)}" 2>nul | findstr /i "Windows" 1>nul && set _perm=1||set _perm=
+exit /b
+
+:: Refresh license status
+
+:dk_refresh
+
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call RefreshLicenseStatus %nul%
+if %winbuild% GEQ 22483 %_psc% "$null=(([WMICLASS]'%sls%').GetInstances()).RefreshLicenseStatus()" %nul%
+exit /b
+
+:: Check Windows installed key channel
+
+:dk_channel
+
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%# in ('wmic path %slp% where "ApplicationID='%wApp%' and PartialProductKey<>null" Get ProductKeyChannel /value 2^>nul') do set "_channel=%%#"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%# in ('%_psc% "(([WMISEARCHER]'SELECT ProductKeyChannel FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).ProductKeyChannel | %% {echo ('ProductKeyChannel='+$_)}" 2^>nul') do set "_channel=%%#"
+exit /b
+
+:: Activation command
+
+:dk_act
+
+if %winbuild% LSS 22483 wmic path %slp% where "ApplicationID='%wApp%' and PartialProductKey<>null" call Activate %nul%
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).Activate()" %nul%
+exit /b
+
+::========================================================================================================================================
+
+:dk_color
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[0m
+) else (
+if not exist %_psc% (echo %~3) 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 (
+if not exist %_psc% (echo %~3%~6) 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
+call :dk_color %_Yellow% "Press any key to %_exitmsg%..."
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:: 1st column = Activation ID
+:: 2nd column = GVLK (Generic volume licensing key)
+:: 3rd column = SKU ID
+:: 4th column = WMI Edition ID (For reference only)
+:: 5th column = Build Branch name incase same Edition ID is used in different OS versions with different key (For reference only)
+:: Separator = "_"
+
+:kms38data
+
+for %%# in (
+73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2YT43___4_Enterprise
+9bd77860-9b31-4b7b-96ad-2564017315bf_VDYBN-27WPP-V4HQT-9VMD4-VMK7H___7_ServerStandard_FE
+de32eafd-aaee-4662-9444-c1befb41bde2_N69G4-B89J2-4G8F4-WWYCC-J464C___7_ServerStandard_RS5
+8c1c5410-9f39-4805-8c9d-63a07706358f_WC2BQ-8NRM3-FDDYY-2BFGV-KHKQY___7_ServerStandard_RS1
+ef6cfc9f-8c5d-44ac-9aad-de6a2ea0ae03_WX4NM-KYWYW-QJJR4-XV3QB-6VM33___8_ServerDatacenter_FE
+34e1ae55-27f8-4950-8877-7a03be5fb181_WMDGN-G9PQG-XVVXX-R3X43-63DFG___8_ServerDatacenter_RS5
+21c56779-b449-4d20-adfc-eece0e1ad74b_CB7KF-BWN84-R7R2Y-793K2-8XDDG___8_ServerDatacenter_RS1
+e272e3e2-732f-4c65-a8f0-484747d0d947_DPH2V-TTNVB-4X9Q3-TJR4H-KHJW4__27_EnterpriseN
+2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T83GX__48_Professional
+a80b5abf-76ad-428b-b05d-a47d2dffeebf_MH37W-N47XK-V7XM9-C7227-GCQG9__49_ProfessionalN
+034d3cbb-5d4b-4245-b3f8-f84571314078_WVDHN-86M7X-466P6-VHXV7-YY726__50_ServerSolution_RS5
+2b5a1b0f-a5ab-4c54-ac2f-a6d94824a283_JCKRF-N37P4-C2D82-9YXRT-4M63B__50_ServerSolution_RS1
+7b9e1751-a8da-4f75-9560-5fadfe3d8e38_3KHY7-WNT83-DGQKR-F7HPR-844BM__98_CoreN
+a9107544-f4a0-4053-a96a-1479abdef912_PVMJN-6DFY6-9CCP6-7BKTT-D3WVR__99_CoreCountrySpecific
+cd918a57-a41b-4c82-8dce-1a538e221a83_7HNRX-D7KGG-3K4RQ-4WPJ4-YTDFH_100_CoreSingleLanguage
+58e97c99-f377-4ef1-81d5-4ad5522b5fd8_TX9XD-98N7V-6WMQ6-BX7FG-H8Q99_101_Core
+7b4433f4-b1e7-4788-895a-c45378d38253_QN4C6-GBJD2-FB422-GHWJK-GJG2R_110_ServerCloudStorage
+8de8eb62-bbe0-40ac-ac17-f75595071ea3_GRFBW-QNDC4-6QBHG-CCK3B-2PR88_120_ServerARM64_RS5
+43d9af6e-5e86-4be8-a797-d072a046896c_K9FYF-G6NCK-73M32-XMVPY-F9DRR_120_ServerARM64_RS4
+e0c42288-980c-4788-a014-c080d2e1926e_NW6C2-QMPVW-D7KKK-3GKT6-VCFB2_121_Education
+3c102355-d027-42c6-ad23-2e7ef8a02585_2WH4N-8QGBV-H22JP-CT43Q-MDWWJ_122_EducationN
+32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee_M7XTQ-FN8P6-TTKYV-9D4CC-J462D_125_EnterpriseS_RS5,VB
+2d5a5a60-3040-48bf-beb0-fcd770c20ce0_DCPHK-NFMTC-H88MJ-PFHPY-QJ4BJ_125_EnterpriseS_RS1
+7b51a46c-0c04-4e8f-9af4-8496cca90d5e_WNMTR-4C88C-JK8YV-HQ7T2-76DF9_125_EnterpriseS_TH1
+7103a333-b8c8-49cc-93ce-d37c09687f92_92NFX-8DJQP-P6BBQ-THF9C-7CG2H_126_EnterpriseSN_RS5,VB
+9f776d83-7156-45b2-8a5c-359b9c9f22a3_QFFDN-GRT3P-VKWWX-X7T3R-8B639_126_EnterpriseSN_RS1
+87b838b7-41b6-4590-8318-5797951d8529_2F77B-TNFGY-69QQF-B8YKP-D69TJ_126_EnterpriseSN_TH1
+39e69c41-42b4-4a0a-abad-8e3c10a797cc_QFND9-D3Y9C-J3KKY-6RPVP-2DPYV_145_ServerDatacenterACor_FE
+90c362e5-0da1-4bfd-b53b-b87d309ade43_6NMRW-2C8FM-D24W7-TQWMY-CWH2D_145_ServerDatacenterACor_RS5
+e49c08e7-da82-42f8-bde2-b570fbcae76c_2HXDN-KRXHB-GPYC7-YCKFJ-7FVDG_145_ServerDatacenterACor_RS3
+f5e9429c-f50b-4b98-b15c-ef92eb5cff39_67KN8-4FYJW-2487Q-MQ2J7-4C4RG_146_ServerStandardACor_FE
+73e3957c-fc0c-400d-9184-5f7b6f2eb409_N2KJX-J94YW-TQVFB-DG9YT-724CC_146_ServerStandardACor_RS5
+61c5ef22-f14f-4553-a824-c4b31e84b100_PTXN8-JFHJM-4WC78-MPCBR-9W4KR_146_ServerStandardACor_RS3
+82bbc092-bc50-4e16-8e18-b74fc486aec3_NRG8B-VKK3Q-CXVCJ-9G2XF-6Q84J_161_ProfessionalWorkstation
+4b1571d3-bafb-4b40-8087-a961be2caf65_9FNHH-K3HBT-3W4TD-6383H-6XYWF_162_ProfessionalWorkstationN
+3f1afc82-f8ac-4f6c-8005-1d233e606eee_6TP4R-GNPTD-KYYHQ-7B7DP-J447Y_164_ProfessionalEducation
+5300b18c-2e33-4dc2-8291-47ffcec746dd_YVWGF-BXNMC-HTQYQ-CPQ99-66QFC_165_ProfessionalEducationN
+8c8f0ad3-9a43-4e05-b840-93b8d1475cbc_6N379-GGTMK-23C6M-XVVTC-CKFRQ_168_ServerAzureCor_FE
+a99cc1f0-7719-4306-9645-294102fbff95_FDNH6-VW9RW-BXPJ7-4XTYG-239TB_168_ServerAzureCor_RS5
+3dbf341b-5f6c-4fa7-b936-699dce9e263f_VP34G-4NPPG-79JTQ-864T4-R3MQX_168_ServerAzureCor_RS1
+e0b2d383-d112-413f-8a80-97f373a5820c_YYVX9-NTFWV-6MDM3-9PT4T-4M68B_171_EnterpriseG
+e38454fb-41a4-4f59-a5dc-25080e354730_44RPN-FTY23-9VTTB-MP9BX-T84FV_172_EnterpriseGN
+ec868e65-fadf-4759-b23e-93fe37f2cc29_CPWHC-NT2C7-VYW78-DHDB2-PG3GK_175_ServerRdsh_RS5
+e4db50ea-bda1-4566-b047-0ca50abc6f07_7NBT4-WGBQX-MP4H7-QXFF8-YP3KX_175_ServerRdsh_RS3
+0df4f814-3f57-4b8b-9a9d-fddadcd69fac_NBTWJ-3DR69-3C4V8-C26MC-GQ9M6_183_CloudE
+d30136fc-cb4b-416e-a23d-87207abc44a9_6XN7V-PCBDC-BDBRH-8DQY7-G6R44_202_CloudEditionN
+ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69_37D7F-N49CB-WQR8W-TBJ73-FM8RX_203_CloudEdition
+19b5e0fb-4431-46bc-bac1-2f1873e4ae73_NTBV8-9K7Q8-V27C6-M2BTV-KHMXV_407_ServerTurbine
+) do (
+for /f "tokens=1-5 delims=_" %%A in ("%%#") do if %osSKU%==%%C (
+if %1==getkey if not defined key echo "!applist!" | find /i "%%A" >nul && (set "app=%%A" & set "key=%%B")
+)
+)
+exit /b
+
::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/ReadMe_HWID.html b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/ReadMe_HWID.html new file mode 100644 index 0000000..5d05a66 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/ReadMe_HWID.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-hwid.html">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/ReadMe_KMS38.html b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/ReadMe_KMS38.html new file mode 100644 index 0000000..398e9c0 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/HWID-KMS38_Activation/ReadMe_KMS38.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-kms38.html">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Online_KMS_Activation/Activate.cmd b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/Activate.cmd index d675ae5..9f50910 100644 --- a/MAS/Separate-Files-Version/Online_KMS_Activation/Activate.cmd +++ b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/Activate.cmd @@ -1,4053 +1,4943 @@ -@setlocal DisableDelayedExpansion -@echo off - - - -::================================================================================================= -:: -:: Online KMS Script is a fork of @abbodi1406's KMS_VL_ALL forums.mydigitallife.net/posts/838808 -:: -:: This fork's purpose is to avoid having any KMS binary files and activate Windows/Office using -:: only transparent batch script with online public KMS servers. -::_____________________________________ -:: -:: Online KMS Activation Script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::================================================================================================= - - - - -::======================================================================================================================================== - -:: 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 - -set "_cmdf=%~f0" -for %%# in (%*) do ( -if /i "%%#"=="r1" set r1=1 -if /i "%%#"=="r2" set r2=1 -) - -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 Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -::======================================================================================================================================== - -cls -color 07 -title Online KMS Activation - -set WMI_VBS=0 -set _Debug=0 -set Silent=0 -set Logger=0 -set AutoR2V=1 -set SkipKMS38=1 - -set ActWindows=1 -set ActOffice=1 - -set _uni= -set _args= -set _elev= -set _renetask= -set _renacttask= -set _unattended= - -set _args=%* -if defined _args set _args=%_args:"=% -if defined _args ( -set _unattended=1 -if "%_args%"=="-el" set _unattended= - -for %%A in (%_args%) do ( -if /i "%%A"=="-el" (set _elev=1 -) else if /i "%%A"=="/rt" (set _renetask=1 -) else if /i "%%A"=="/rat" (set _renacttask=1 -) else if /i "%%A"=="/uni" (set _uni=1 -) else if /i "%%A"=="/w" (set ActWindows=1&set ActOffice=0 -) else if /i "%%A"=="/o" (set ActWindows=0&set ActOffice=1 -) else if /i "%%A"=="/wo" (set ActWindows=1&set ActOffice=1 -) else if /i "%%A"=="/d" (set _Debug=1 -) else if /i "%%A"=="/l" (set Logger=1&set Silent=1 -) -) -) - -::======================================================================================================================================== - -set winbuild=1 -set "nul=>nul 2>&1" -set psc=powershell.exe -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 2>nul | find /i "0x0" 1>nul && (set _NCS=0) - -call :_colorprep -set "_buf={$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=31;$B.Height=300;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}" - -set "nceline=echo. &echo ==== ERROR ==== &echo." -set "eline=echo. &call :_color %Red% "==== ERROR ====" &echo." -if %_Debug% EQU 1 set _unattended=1 - -::======================================================================================================================================== - -if %winbuild% LSS 7600 ( -%nceline% -echo Unsupported OS version detected. -echo Project is supported for Windows 7/8/8.1/10/11 and their Server equivalent. -goto Done -) - -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find powershell.exe in the system. -goto Done -) - -::======================================================================================================================================== - -:: Fix for the special characters limitation 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 "_ttemp=%temp%" - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -echo "!_batf!" | find /i "!_ttemp!" 1>nul && ( -if /i not "!_work!"=="!_ttemp!" ( -%nceline% -echo Script is launched from the temp folder, -echo Most likely you are running the script directly from the archive file. -echo. -echo Extract the archive file and launch the script from the extracted folder. -goto Done -) -) - -::======================================================================================================================================== - -:: Elevate script as admin and pass arguments and preventing loop - -%nul% reg query HKU\S-1-5-19 || ( -if not defined _elev %nul% %psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b -%nceline% -echo This script require administrator privileges. -echo To do so, right click on this script and select 'Run as administrator'. -goto Done -) - -::======================================================================================================================================== - -for %%# in (wmic.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find wmic.exe in the system. -if %winbuild% GEQ 22621 echo Make sure WMIC is enabled in optional features. -goto Done -) - -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "ComputerSystem" 1>nul || ( -%nceline% -echo wmic.exe is not responding in the system. -echo Aborting... -goto Done -) - -set _WSH=1 -reg query "HKCU\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0) -reg query "HKLM\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0) - -if %_WSH% EQU 0 ( -%nceline% -echo Windows Script Host is disabled. -echo It is required for this script to work. -echo Aborting... -goto Done -) - -::======================================================================================================================================== - -if %~z0 GEQ 500000 (set "_exitmsg=Go back") else (set "_exitmsg=Exit") - -:: Check not x86 Windows - -set notx86= -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b -if /i not "%arch%"=="x86" set notx86=1 - -::======================================================================================================================================== - -if defined _uni goto _Complete_Uninstall - -if defined _renacttask set ActTask=1&goto:RenTask -if defined _renetask set ActTask=&goto:RenTask - -::======================================================================================================================================== - -set "_title=Online KMS Activation" -set _gui= - -:_KMS_Menu - -set _tskinstalled= -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" /f Path /s | find /i "\Activation-Renewal" >nul && ( -set _tskinstalled=1 -) - -set _oldtsk= -if not defined _tskinstalled ( -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && ( -set _oldtsk=1 -) -) - -if defined _unattended ( -call :Activation_Start -goto Done -) - -cls -set _gui=1 -title %_title% -mode con: cols=76 lines=30 - -echo. -echo. -echo. -echo. -echo. ______________________________________________________________ -echo. -if %_Debug%==0 ( -echo. [1] Activate - Windows -echo. [2] Activate - Office -echo. [3] Activate - All -) else ( -call :_color2 %_White% " [1] Activate - Windows " %_Red% "[Debug Mode]" -call :_color2 %_White% " [2] Activate - Office " %_Red% "[Debug Mode]" -call :_color2 %_White% " [3] Activate - All " %_Red% "[Debug Mode]" -) -echo. -if defined _tskinstalled call :_color2 %_White% " [4] Install Auto-Renewal " %_Green% "[Installed]" -if defined _oldtsk call :_color2 %_White% " [4] Install Auto-Renewal " %_Red% "[Old Installed]" -if not defined _tskinstalled if not defined _oldtsk echo. [4] Install Auto-Renewal -echo. [5] Uninstall -echo. _______________________________________________ -echo. -echo. [6] Enable Debug Mode -echo. _______________________________________________ -echo. -echo. [7] %_exitmsg% -echo. ______________________________________________________________ -echo. -call :_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard [1,2,3,4,5,6,7]" -choice /C:1234567 /N -set _el=%errorlevel% - -if %_el%==7 exit /b -if %_el%==6 (if %_Debug%==0 (set _Debug=1) else (set _Debug=0)) &goto _KMS_Menu -if %_el%==5 call:_Complete_Uninstall&cls&goto _KMS_Menu -if %_el%==4 set ActTask=&call:RenTask&goto _KMS_Menu -if %_el%==3 cls&setlocal&set "ActWindows=1"&set "ActOffice=1"&call :Activation_Start&endlocal&cls&goto _KMS_Menu -if %_el%==2 cls&setlocal&set "ActWindows=0"&set "ActOffice=1"&call :Activation_Start&endlocal&cls&goto _KMS_Menu -if %_el%==1 cls&setlocal&set "ActWindows=1"&set "ActOffice=0"&call :Activation_Start&endlocal&cls&goto _KMS_Menu -goto _KMS_Menu - -::======================================================================================================================================== - -:Done - -if defined _unattended exit /b - -echo. -echo Press any key to exit... -pause >nul -exit /b - -:========================================================================================================================================= - -:Activation_Start - -@setlocal DisableDelayedExpansion - -set nil= -for %%# in (SppE%nil%xtComObj.exe,sppsvc.exe,osppsvc.exe) do ( -reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Ima%nil%ge File Execu%nil%tion Options\%%#" /f %nul%) -) - -set "_Null=1>nul 2>nul" -set KMS_Port=1688 -if %_Debug% EQU 1 set _unattended=1 -set "_run=nul" -if %Logger% EQU 1 set _run="%~dpn0_Silent.log" - -set "SysPath=%SystemRoot%\System32" -set "Path=%SystemRoot%\System32;%SystemRoot%\System32\Wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "SysPath=%SystemRoot%\Sysnative" -set "Path=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\Wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%Path%" -) -set "_bit=64" -set "_wow=1" -if /i "%PROCESSOR_ARCHITECTURE%"=="amd64" set "xBit=x64"&set "xOS=x64" -if /i "%PROCESSOR_ARCHITECTURE%"=="arm64" set "xBit=x86"&set "xOS=A64" -if /i "%PROCESSOR_ARCHITECTURE%"=="x86" if "%PROCESSOR_ARCHITEW6432%"=="" set "xBit=x86"&set "xOS=x86"&set "_wow=0"&set "_bit=32" -if /i "%PROCESSOR_ARCHITEW6432%"=="amd64" set "xBit=x64"&set "xOS=x64" -if /i "%PROCESSOR_ARCHITEW6432%"=="arm64" set "xBit=x86"&set "xOS=A64" - -set _cwmi=0 -for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" ( -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "ComputerSystem" 1>nul && set _cwmi=1 -) - -set "_Local=%LocalAppData%" -set "_temp=%SystemRoot%\Temp" -set "_log=%~dpn0" -set "_work=%~dp0" -if "%_work:~-1%"=="\" set "_work=%_work:~0,-1%" -set _UNC=0 -if "%_work:~0,2%"=="\\" set _UNC=1 -for /f "skip=2 tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v Desktop') do call set "_dsk=%%b" -if exist "%PUBLIC%\Desktop\desktop.ini" set "_dsk=%PUBLIC%\Desktop" -set "_mO21a=Detected Office 2021 C2R Retail is activated" -set "_mO19a=Detected Office 2019 C2R Retail is activated" -set "_mO16a=Detected Office 2016 C2R Retail is activated" -set "_mO15a=Detected Office 2013 C2R Retail is activated" -set "_mO21c=Detected Office 2021 C2R Retail could not be converted to Volume" -set "_mO19c=Detected Office 2019 C2R Retail could not be converted to Volume" -set "_mO16c=Detected Office 2016 C2R Retail could not be converted to Volume" -set "_mO15c=Detected Office 2013 C2R Retail could not be converted to Volume" -set "_mO14c=Detected Office 2010 C2R Retail is not supported by KMS_VL_ALL" -set "_mO14m=Detected Office 2010 MSI Retail is not supported by KMS_VL_ALL" -set "_mO15m=Detected Office 2013 MSI Retail is not supported by KMS_VL_ALL" -set "_mO16m=Detected Office 2016 MSI Retail is not supported by KMS_VL_ALL" -set "_mOuwp=Detected Office 365/2016 UWP is not supported by KMS_VL_ALL" -set DO16Ids=ProPlus,Standard,Access,SkypeforBusiness,Excel,Outlook,PowerPoint,Publisher,Word -set LV16Ids=Mondo,ProPlus,ProjectPro,VisioPro,Standard,ProjectStd,VisioStd,Access,SkypeforBusiness,OneNote,Excel,Outlook,PowerPoint,Publisher,Word -set LR16Ids=%LV16Ids%,Professional,HomeBusiness,HomeStudent,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud -set "ESUEditions=Enterprise,EnterpriseE,EnterpriseN,Professional,ProfessionalE,ProfessionalN,Ultimate,UltimateE,UltimateN" -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" ( -set "ESUEditions=ServerDatacenter,ServerDatacenterCore,ServerDatacenterV,ServerDatacenterVCore,ServerStandard,ServerStandardCore,ServerStandardV,ServerStandardVCore,ServerEnterprise,ServerEnterpriseCore,ServerEnterpriseV,ServerEnterpriseVCore" -) -for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G -set "_csq=cscript.exe //NoLogo //Job:WmiQuery "%~nx0?.wsf"" -set "_csm=cscript.exe //NoLogo //Job:WmiMethod "%~nx0?.wsf"" -set "_csp=cscript.exe //NoLogo //Job:WmiPKey "%~nx0?.wsf"" -set "_csd=cscript.exe //NoLogo //Job:MPS "%~nx0?.wsf"" -if %_cwmi% EQU 0 set WMI_VBS=1 -if %WMI_VBS% EQU 0 ( -set "_zz1=wmic path" -set "_zz2=where" -set "_zz3=get" -set "_zz4=/value" -set "_zz5=(" -set "_zz6=)" -set "_zz7="wmic path" -set "_zz8=/value"" -) else ( -set "_zz1=%_csq%" -set "_zz2=" -set "_zz3=" -set "_zz4=" -set "_zz5="" -set "_zz6="" -set "_zz7=%_csq%" -set "_zz8=" -) - -setlocal EnableDelayedExpansion -pushd "!_work!" - -if not defined _unattended ( -mode con cols=98 lines=31 -%nul% %psc% "&%_buf%" -title %_title% -) else ( -title Online KMS Activation -) - -if defined _gui if %_Debug%==1 mode con cols=98 lines=30 - -if %_Debug% EQU 0 ( - set "_Nul1=1>nul" - set "_Nul2=2>nul" - set "_Nul6=2^>nul" - set "_Nul3=1>nul 2>nul" - set "_Pause=pause >nul" - if %Silent% EQU 0 (call :Begin) else (call :Begin >!_run! 2>&1) -) else ( - set "_Nul1=" - set "_Nul2=" - set "_Nul6=" - set "_Nul3=" - set "_log=!_dsk!\%~n0" - if %Silent% EQU 0 ( - echo. - echo Running in Debug Mode... - if not defined _args (echo The window will be closed when finished) else (echo please wait...) - echo. - echo Writing debug log to: - echo "!_log!_Debug.log" - ) - @echo on - @prompt $G - @call :Begin >"!_log!_tmp.log" 2>&1 &cmd /u /c type "!_log!_tmp.log">"!_log!_Debug.log"&del "!_log!_tmp.log" -) -@echo off -if defined _gui if %_Debug%==1 ( -echo. -call :_color %_Yellow% "Press any key to go back..." -pause >nul -exit /b -) -@exit /b - -:Begin - -::======================================================================================================================================== - -set act_failed=0 -set /a act_attempt=0 - -echo. -echo Initializing... - -:: Check Internet connection. Works even if ICMP echo is disabled. - -call :setserv -for %%a in (%srvlist%) do ( -for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do ( -if not [%%#]==[] goto IntConnected -) -) - -nslookup dns.msftncsi.com 2>nul | find "131.107.255.255" 1>nul -if [%errorlevel%]==[0] goto IntConnected - -cls -if %_Debug%==1 ( -echo Error: Internet is not connected. -exit /b -) - -if defined _unattended ( -echo. -call :_color %_Red% "Internet is not connected, continuing the process anyway." -) else ( -%eline% -echo Internet is not connected. -echo: -call :_color %_Yellow% "Press any key to go back..." -pause >nul -exit /b -) - -:IntConnected - -call :getserv - -::======================================================================================================================================== - -set "_wApp=55c92734-d682-4d71-983e-d6ec3f16059f" -set "_oApp=0ff1ce15-a989-479d-af46-f275c6370663" -set "_oA14=59a52881-a989-479d-af46-f275c6370663" -set "IFEO=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options" -set "OPPk=SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" -set "SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" -set SSppHook=0 -for /f %%A in ('dir /b /ad %SysPath%\spp\tokens\skus') do ( - if %winbuild% GEQ 9200 if exist "%SysPath%\spp\tokens\skus\%%A\*GVLK*.xrm-ms" set SSppHook=1 - if %winbuild% LSS 9200 if exist "%SysPath%\spp\tokens\skus\%%A\*VLKMS*.xrm-ms" set SSppHook=1 - if %winbuild% LSS 9200 if exist "%SysPath%\spp\tokens\skus\%%A\*VL-BYPASS*.xrm-ms" set SSppHook=1 -) -set OsppHook=1 -sc query osppsvc %_Nul3% -if %errorlevel% EQU 1060 set OsppHook=0 - -set ESU_KMS=0 -if %winbuild% LSS 9200 for /f %%A in ('dir /b /ad %SysPath%\spp\tokens\channels') do ( - if exist "%SysPath%\spp\tokens\channels\%%A\*VL-BYPASS*.xrm-ms" set ESU_KMS=1 -) -if %ESU_KMS% EQU 1 (set "adoff=and LicenseDependsOn is NULL"&set "addon=and LicenseDependsOn is not NULL") else (set "adoff="&set "addon=") -set ESU_EDT=0 -if %ESU_KMS% EQU 1 for %%A in (%ESUEditions%) do ( - if exist "%SysPath%\spp\tokens\skus\Security-SPP-Component-SKU-%%A\*.xrm-ms" set ESU_EDT=1 -) -:: if %ESU_EDT% EQU 1 set SSppHook=1 -set ESU_ADD=0 - -if %winbuild% GEQ 9200 ( - set OSType=Win8 - set SppVer=SppExtComObj.exe -) else if %winbuild% GEQ 7600 ( - set OSType=Win7 - set SppVer=sppsvc.exe -) else ( - goto :UnsupportedVersion -) -if %OSType% EQU Win8 reg query "%IFEO%\sppsvc.exe" %_Nul3% && ( -reg delete "%IFEO%\sppsvc.exe" /f %_Nul3% -call :StopService sppsvc -) - -if %ActWindows% EQU 0 if %ActOffice% EQU 0 set ActWindows=1 -set _AUR=1 -if %winbuild% GEQ 9600 ( - reg add "HKLM\SOFTWARE\Policies\Microsoft\Windows NT\CurrentVersion\Software Protection Platform" /v NoGenTicket /t REG_DWORD /d 1 /f %_Nul3% - if %winbuild% EQU 14393 reg add "HKLM\SOFTWARE\Policies\Microsoft\Windows NT\CurrentVersion\Software Protection Platform" /v NoAcquireGT /t REG_DWORD /d 1 /f %_Nul3% -) -call :StopService sppsvc -if %OsppHook% NEQ 0 call :StopService osppsvc - -:ReturnHook -call :UpdateOSPPEntry osppsvc.exe - -SET Win10Gov=0 -SET "EditionWMI=" -SET "EditionID=" -IF %winbuild% LSS 14393 if %SSppHook% NEQ 0 GOTO :Main -SET "RegKey=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Component Based Servicing\Packages" -SET "Pattern=Microsoft-Windows-*Edition~31bf3856ad364e35" -SET "EditionPKG=FFFFFFFF" -FOR /F "TOKENS=8 DELIMS=\" %%A IN ('REG QUERY "%RegKey%" /f "%Pattern%" /k %_Nul6% ^| FIND /I "CurrentVersion"') DO ( - REG QUERY "%RegKey%\%%A" /v "CurrentState" %_Nul2% | FIND /I "0x70" %_Nul1% && ( - FOR /F "TOKENS=3 DELIMS=-~" %%B IN ('ECHO %%A') DO SET "EditionPKG=%%B" - ) -) -IF /I "%EditionPKG:~-7%"=="Edition" ( -SET "EditionID=%EditionPKG:~0,-7%" -) ELSE ( -FOR /F "TOKENS=3 DELIMS=: " %%A IN ('DISM /English /Online /Get-CurrentEdition %_Nul6% ^| FIND /I "Current Edition :"') DO SET "EditionID=%%A" -) -net start sppsvc /y %_Nul3% -set "_qr=%_zz7% SoftwareLicensingProduct %_zz2% %_zz5%ApplicationID='%_wApp%' %adoff% AND PartialProductKey is not NULL%_zz6% %_zz3% LicenseFamily %_zz8%" -FOR /F "TOKENS=2 DELIMS==" %%A IN ('%_qr% %_Nul6%') DO SET "EditionWMI=%%A" -IF "%EditionWMI%"=="" ( -IF %winbuild% GEQ 17063 FOR /F "SKIP=2 TOKENS=2*" %%A IN ('REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionId') DO SET "EditionID=%%B" -IF %winbuild% LSS 14393 ( - FOR /F "SKIP=2 TOKENS=2*" %%A IN ('REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionId') DO SET "EditionID=%%B" - GOTO :Main - ) -) -IF NOT "%EditionWMI%"=="" SET "EditionID=%EditionWMI%" -IF /I "%EditionID%"=="IoTEnterprise" SET "EditionID=Enterprise" -IF /I "%EditionID%"=="IoTEnterpriseS" IF %winbuild% LSS 22610 SET "EditionID=EnterpriseS" -IF /I "%EditionID%"=="ProfessionalSingleLanguage" SET "EditionID=Professional" -IF /I "%EditionID%"=="ProfessionalCountrySpecific" SET "EditionID=Professional" -IF /I "%EditionID%"=="EnterpriseG" SET Win10Gov=1 -IF /I "%EditionID%"=="EnterpriseGN" SET Win10Gov=1 - -:Main -if defined EditionID (set "_winos=Windows %EditionID% edition") else (set "_winos=Detected Windows") -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName %_Nul6%') do if not errorlevel 1 set "_winos=%%b" -set "nKMS=does not support KMS activation..." -set "nEval=Evaluation Editions cannot be activated. Please install full Windows OS." -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1 -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set "nEval=Server Evaluation cannot be activated. Please convert to full Server OS." -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1&set "nEval=Server Evaluation cannot be activated. Please convert to full Server OS." -set "_C16R=" -reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath %_Nul3% && for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" ( -reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds %_Nul3% && set "_C16R=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration" -) -if not defined _C16R reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath %_Nul3% && for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" ( -reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds %_Nul3% && set "_C16R=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration" -) -set "_C15R=" -reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath %_Nul3% && for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses\ProPlus*.xrm-ms" ( -reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds %_Nul3% && call set "_C15R=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration" -if not defined _C15R reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid %_Nul3% && call set "_C15R=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag" -) -set "_C14R=" -if %_wow%==0 (reg query HKLM\SOFTWARE\Microsoft\Office\14.0\CVH /f Click2run /k %_Nul3% && set "_C14R=1") else (reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\CVH /f Click2run /k %_Nul3% && set "_C14R=1") -for %%A in (14,15,16,19,21) do call :officeLoc %%A -if %_O14MSI% EQU 1 set "_C14R=" - -set S_OK=1 -call :RunSPP -if %ActOffice% NEQ 0 call :RunOSPP -if %ActOffice% EQU 0 (echo.&echo Office activation is OFF...) - -if exist "!_temp!\crv*.txt" del /f /q "!_temp!\crv*.txt" -if exist "!_temp!\*chk.txt" del /f /q "!_temp!\*chk.txt" -if exist "!_temp!\slmgr.vbs" del /f /q "!_temp!\slmgr.vbs" -call :StopService sppsvc -if %OsppHook% NEQ 0 call :StopService osppsvc - -sc start sppsvc trigger=timer;sessionid=0 %_Nul3% - -goto TheEnd - -:RunSPP -set spp=SoftwareLicensingProduct -set sps=SoftwareLicensingService -set W1nd0ws=1 -set WinPerm=0 -set WinVL=0 -set Off1ce=0 -set RanR2V=0 -set aC2R21=0 -set aC2R19=0 -set aC2R16=0 -set aC2R15=0 -if %winbuild% GEQ 9200 if %ActOffice% NEQ 0 call :sppoff -set "_qr=%_zz1% %spp% %_zz2% %_zz5%Description like '%%KMSCLIENT%%' %_zz6% %_zz3% Name %_zz4%" -%_qr% %_Nul2% | findstr /i Windows %_Nul1% && (set WinVL=1) -if %WinVL% EQU 0 ( -if %ActWindows% EQU 0 ( - echo.&echo Windows activation is OFF... - ) else ( - if %SSppHook% EQU 0 ( - echo.&echo %_winos% %nKMS% - if defined _eval echo %nEval% - ) else ( - echo.&echo Failed checking KMS Activation ID^(s^) for Windows.&echo Check Troubleshooting in MAS extras section.&call :CheckWS - exit /b - ) - ) -) -if %WinVL% EQU 0 if %Off1ce% EQU 0 exit /b -set _gvlk=0 -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL%_zz6% %_zz3% Name %_zz4%" -if %winbuild% GEQ 10240 %_qr% %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1) -set gpr=0 -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL%_zz6% %_zz3% GracePeriodRemaining %_zz8%" -if %winbuild% GEQ 10240 if %SkipKMS38% NEQ 0 if %_gvlk% EQU 1 for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set "gpr=%%A" -set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" %_zz3% LicenseFamily %_zz4%" -if %gpr% NEQ 0 if %gpr% GTR 259200 ( -set W1nd0ws=0 -%_qr% %_Nul2% | findstr /i EnterpriseG %_Nul1% && (call set W1nd0ws=1) -) -set "_qr=%_zz7% %sps% %_zz3% Version %_zz8%" -for /f "tokens=2 delims==" %%A in ('%_qr%') do set slsv=%%A -reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" %_Nul3% -reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3% -if %winbuild% GEQ 9200 ( -if not %xOS%==x86 ( -reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32 %_Nul3% -reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" /reg:32 %_Nul3% -reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32 %_Null% -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32 %_Nul3% -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" /reg:32 %_Nul3% -) -reg delete "HKLM\%SPPk%\%_oApp%" /f %_Null% -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" %_Nul3% -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3% -) -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' %_zz6% %_zz3% ID %_zz8%" -if %W1nd0ws% EQU 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :sppchkwin) -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' %adoff% %_zz6% %_zz3% ID %_zz8%" -if %W1nd0ws% EQU 1 if %ActWindows% NEQ 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :sppchkwin) -:: set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' %addon% %_zz6% %_zz3% ID %_zz8%" -:: if %ESU_EDT% EQU 1 if %ActWindows% NEQ 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :esuchk) -if %W1nd0ws% EQU 1 if %ActWindows% EQU 0 (echo.&echo Windows activation is OFF...) -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' and Description like '%%KMSCLIENT%%' %_zz6% %_zz3% ID %_zz8%" -if %Off1ce% EQU 1 if %ActOffice% NEQ 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :sppchkoff 1) -reg delete "HKLM\%SPPk%" /f /v DisableDnsPublishing %_Null% -reg delete "HKLM\%SPPk%" /f /v DisableKeyManagementServiceHostCaching %_Null% -exit /b - -:sppoff -set OffUWP=0 -if %winbuild% GEQ 10240 reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msoxmled.exe" %_Nul3% && ( -dir /b "%ProgramFiles%\WindowsApps\Microsoft.Office.Desktop*" %_Nul3% && set OffUWP=1 -if not %xOS%==x86 dir /b "%ProgramW6432%\WindowsApps\Microsoft.Office.Desktop*" %_Nul3% && set OffUWP=1 -) -rem nothing installed -if %loc_off21% EQU 0 if %loc_off19% EQU 0 if %loc_off16% EQU 0 if %loc_off15% EQU 0 ( -if %winbuild% GEQ 9200 ( - if %OffUWP% EQU 0 (echo.&echo No Installed Office 2013-2021 Product Detected...) else (echo.&echo %_mOuwp%) - exit /b - ) -if %winbuild% LSS 9200 (if %loc_off14% EQU 0 (echo.&echo No Installed Office %aword% Product Detected...&exit /b)) -) -set sub_O365=0 -set sub_proj=0 -set sub_vis=0 -set Off1ce=1 -set _sC2R=sppoff -set _fC2R=ReturnSPP -set vol_off14=0&set vol_off15=0&set vol_off16=0&set vol_off19=0&set vol_off21=0 -set "_qr=%_zz1% %spp% %_zz2% %_zz5%Description like '%%KMSCLIENT%%' AND NOT Name like '%%MondoR_KMS_Automation%%' %_zz6% %_zz3% Name %_zz4%" -%_qr% > "!_temp!\sppchk.txt" 2>&1 -find /i "Office 21" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off21=1) -find /i "Office 19" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off19=1) -find /i "Office 16" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off16=1) -find /i "Office 15" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off15=1) -if %winbuild% LSS 9200 find /i "Office 14" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off14=1) -for %%A in (14,15,16,19,21) do if !loc_off%%A! EQU 0 set vol_off%%A=0 -set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%'" %_zz3% LicenseFamily %_zz4%" -if %vol_off16% EQU 1 find /i "Office16MondoVL_KMS_Client" "!_temp!\sppchk.txt" %_Nul1% && ( -%_qr% %_Nul2% | find /i "O365" %_Nul1% || (set vol_off16=0) -) -set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'OfficeO365%%'" %_zz3% LicenseFamily %_zz4%" -if %vol_off15% EQU 1 find /i "OfficeMondoVL_KMS_Client" "!_temp!\sppchk.txt" %_Nul1% && ( -%_qr% %_Nul2% | find /i "O365" %_Nul1% || (set vol_off15=0) -) -set ret_off14=0&set ret_off15=0&set ret_off16=0&set ret_off19=0&set ret_off21=0 -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' AND NOT Name like '%%O365%%' %_zz6% %_zz3% Name %_zz4%" -%_qr% > "!_temp!\sppchk.txt" 2>&1 -find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 21" %_Nul1% && (set ret_off21=1) -find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 19" %_Nul1% && (set ret_off19=1) -find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 16" %_Nul1% && (set ret_off16=1) -find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 15" %_Nul1% && (set ret_off15=1) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oA14%'%_zz6% %_zz3% Description %_zz4%" -if %winbuild% LSS 9200 if %vol_off14% EQU 0 %_qr% %_Nul2% | findstr /i channel %_Nul1% && (set ret_off14=1) -set run_off21=0&set prr_off21=0&set prv_off21=0 -if %loc_off21% EQU 1 if %ret_off21% EQU 1 if %_O16MSI% EQU 0 if %vol_off21% EQU 0 set run_off21=1 -if %loc_off21% EQU 1 if %ret_off21% EQU 1 if %_O16MSI% EQU 0 if %vol_off21% EQU 1 ( -for %%a in (%DO16Ids%) do find /i "Office21%%a2021R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off21+=1 - find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off21+=1 - ) -for %%a in (Professional) do find /i "Office21%%a2021R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off21+=1 - find /i "Office21ProPlus2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off21+=1 - ) -for %%a in (HomeBusiness,HomeStudent) do find /i "Office21%%a2021R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off21+=1 - find /i "Office21Standard2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off21+=1 - ) -if %sub_proj% EQU 0 for %%a in (ProjectPro,ProjectStd) do find /i "Office21%%a2021R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off21+=1 - find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off21+=1 - ) -if %sub_vis% EQU 0 for %%a in (VisioPro,VisioStd) do find /i "Office21%%a2021R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off21+=1 - find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off21+=1 - ) -) -if %loc_off21% EQU 1 if %ret_off21% EQU 1 if %_O16MSI% EQU 0 if %vol_off21% EQU 1 if %prv_off21% LSS %prr_off21% (set vol_off21=0&set run_off21=1) -set run_off19=0&set prr_off19=0&set prv_off19=0 -if %loc_off19% EQU 1 if %ret_off19% EQU 1 if %_O16MSI% EQU 0 if %vol_off19% EQU 0 set run_off19=1 -if %loc_off19% EQU 1 if %ret_off19% EQU 1 if %_O16MSI% EQU 0 if %vol_off19% EQU 1 ( -for %%a in (%DO16Ids%) do find /i "Office19%%a2019R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off19+=1 - find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off19+=1 - ) -for %%a in (Professional) do find /i "Office19%%a2019R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off19+=1 - find /i "Office19ProPlus2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off19+=1 - ) -for %%a in (HomeBusiness,HomeStudent) do find /i "Office19%%a2019R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off19+=1 - find /i "Office19Standard2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off19+=1 - ) -if %sub_proj% EQU 0 for %%a in (ProjectPro,ProjectStd) do find /i "Office19%%a2019R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off19+=1 - find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off19+=1 - ) -if %sub_vis% EQU 0 for %%a in (VisioPro,VisioStd) do find /i "Office19%%a2019R" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off19+=1 - find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off19+=1 - ) -) -if %loc_off19% EQU 1 if %ret_off19% EQU 1 if %_O16MSI% EQU 0 if %vol_off19% EQU 1 if %prv_off19% LSS %prr_off19% (set vol_off19=0&set run_off19=1) -set run_off16=0&set prr_off16=0&set prv_off16=0 -if %loc_off16% EQU 1 if %ret_off16% EQU 1 if %_O16MSI% EQU 0 if defined _C16R ( -for %%a in (%DO16Ids%) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off16+=1 - if %vol_off16% EQU 1 if %vol_off21% EQU 0 if %vol_off19% EQU 0 find /i "Office16%%aVL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off21% EQU 1 find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off19% EQU 1 find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - ) -for %%a in (Professional) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off16+=1 - if %vol_off16% EQU 1 if %vol_off21% EQU 0 if %vol_off19% EQU 0 find /i "Office16ProPlusVL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off21% EQU 1 find /i "Office21ProPlus2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off19% EQU 1 find /i "Office19ProPlus2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - ) -for %%a in (HomeBusiness,HomeStudent) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off16+=1 - if %vol_off16% EQU 1 if %vol_off21% EQU 0 if %vol_off19% EQU 0 find /i "Office16StandardVL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off21% EQU 1 find /i "Office21Standard2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off19% EQU 1 find /i "Office19Standard2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - ) -if %sub_proj% EQU 0 for %%a in (ProjectPro,ProjectStd) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off16+=1 - if %vol_off16% EQU 1 if %vol_off21% EQU 0 if %vol_off19% EQU 0 find /i "Office16%%aVL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off21% EQU 1 find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off19% EQU 1 find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - ) -if %sub_vis% EQU 0 for %%a in (VisioPro,VisioStd) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && ( - call set /a prr_off16+=1 - if %vol_off16% EQU 1 if %vol_off21% EQU 0 if %vol_off19% EQU 0 find /i "Office16%%aVL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off21% EQU 1 find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - if %vol_off16% EQU 0 if %vol_off19% EQU 1 find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% && call set /a prv_off16+=1 - ) -) -if %loc_off16% EQU 1 if %ret_off16% EQU 1 if %_O16MSI% EQU 0 if defined _C16R if %prv_off16% LSS %prr_off16% (set vol_off16=0&set run_off16=1) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%' %_zz6% %_zz3% LicenseFamily %_zz4%" -if %loc_off16% EQU 1 if %run_off16% EQU 0 if %sub_O365% EQU 0 if defined _C16R %_qr% %_Nul2% | find /i "O365" %_Nul1% && ( -find /i "Office16MondoVL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1 -) -set run_off15=0 -if %loc_off15% EQU 1 if %ret_off15% EQU 1 if %_O15MSI% EQU 0 ( -set vol_off15=0 -if defined _C15R set run_off15=1 -) -set vol_offgl=1 -if %vol_off21% EQU 0 if %vol_off19% EQU 0 if %vol_off16% EQU 0 if %vol_off15% EQU 0 ( -if %winbuild% GEQ 9200 set vol_offgl=0 -if %winbuild% LSS 9200 if %vol_off14% EQU 0 set vol_offgl=0 -) -rem mixed Volume + Retail -if %run_off21% EQU 1 if %AutoR2V% EQU 1 if %RanR2V% EQU 0 goto :C2RR2V -if %run_off19% EQU 1 if %AutoR2V% EQU 1 if %RanR2V% EQU 0 goto :C2RR2V -if %run_off16% EQU 1 if %AutoR2V% EQU 1 if %RanR2V% EQU 0 goto :C2RR2V -if %run_off15% EQU 1 if %AutoR2V% EQU 1 if %RanR2V% EQU 0 goto :C2RR2V -rem all supported Volume + message for unsupported -if %loc_off16% EQU 0 if %ret_off16% EQU 1 if %_O16MSI% EQU 0 if %OffUWP% EQU 1 (echo.&echo %_mOuwp%) -if %vol_offgl% EQU 1 ( -if %ret_off16% EQU 1 if %_O16MSI% EQU 1 (echo.&echo %_mO16m%) -if %ret_off15% EQU 1 if %_O15MSI% EQU 1 (echo.&echo %_mO15m%) -if %winbuild% LSS 9200 if %loc_off14% EQU 1 if %vol_off14% EQU 0 (if defined _C14R (echo.&echo %_mO14c%) else if %_O14MSI% EQU 1 (if %ret_off14% EQU 1 echo.&echo %_mO14m%)) -exit /b -) -set Off1ce=0 -rem Retail C2R -if %AutoR2V% EQU 1 if %RanR2V% EQU 0 goto :C2RR2V -:ReturnSPP -rem Retail MSI/C2R or failed C2R-R2V -if %loc_off21% EQU 1 if %vol_off21% EQU 0 ( -if %aC2R21% EQU 1 (echo.&echo %_mO21a%) else (echo.&echo %_mO21c%) -) -if %loc_off19% EQU 1 if %vol_off19% EQU 0 ( -if %aC2R19% EQU 1 (echo.&echo %_mO19a%) else (echo.&echo %_mO19c%) -) -if %loc_off16% EQU 1 if %vol_off16% EQU 0 ( -if defined _C16R (if %aC2R16% EQU 1 (echo.&echo %_mO16a%) else (if %sub_O365% EQU 0 echo.&echo %_mO16c%)) else if %_O16MSI% EQU 1 (if %ret_off16% EQU 1 echo.&echo %_mO16m%) -) -if %loc_off15% EQU 1 if %vol_off15% EQU 0 ( -if defined _C15R (if %aC2R15% EQU 1 (echo.&echo %_mO15a%) else (echo.&echo %_mO15c%)) else if %_O15MSI% EQU 1 (if %ret_off15% EQU 1 echo.&echo %_mO15m%) -) -if %winbuild% LSS 9200 if %loc_off14% EQU 1 if %vol_off14% EQU 0 ( -if defined _C14R (echo.&echo %_mO14c%) else if %_O14MSI% EQU 1 (if %ret_off14% EQU 1 echo.&echo %_mO14m%) -) -exit /b - -:sppchkoff -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz4%" -%_qr% > "!_temp!\sppchk.txt" -if %winbuild% LSS 9200 find /i "Office 14" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off14% EQU 0 exit /b) -find /i "Office 15" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off15% EQU 0 exit /b) -find /i "Office 16" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off16% EQU 0 exit /b) -find /i "Office 19" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off19% EQU 0 exit /b) -find /i "Office 21" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off21% EQU 0 exit /b) -if %1 EQU 1 (set _officespp=1) else (set _officespp=0) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%PartialProductKey is not NULL%_zz6% %_zz3% ID %_zz4%" -%_qr% %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b) -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%" -for /f "tokens=3 delims==, " %%G in ('%_qr%') do set OffVer=%%G -call :offchk%OffVer% -exit /b - -:sppchkwin -set _officespp=0 -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL%_zz6% %_zz3% Name %_zz4%" -if %winbuild% GEQ 14393 if %WinPerm% EQU 0 if %_gvlk% EQU 0 %_qr% %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% LicenseStatus %_zz4%" -%_qr% %_Nul2% | findstr "1" %_Nul1% && (echo.&call :activate&exit /b) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%PartialProductKey is not NULL%_zz6% %_zz3% ID %_zz4%" -%_qr% %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b) -if %winbuild% GEQ 14393 if %_gvlk% EQU 1 exit /b -if %WinPerm% EQU 1 exit /b -if %winbuild% LSS 10240 (call :winchk&exit /b) -for %%A in ( -b71515d9-89a2-4c60-88c8-656fbcca7f3a,af43f7f0-3b1e-4266-a123-1fdb53f4323b,075aca1f-05d7-42e5-a3ce-e349e7be7078 -11a37f09-fb7f-4002-bd84-f3ae71d11e90,43f2ab05-7c87-4d56-b27c-44d0f9a3dabd,2cf5af84-abab-4ff0-83f8-f040fb2576eb -6ae51eeb-c268-4a21-9aae-df74c38b586d,ff808201-fec6-4fd4-ae16-abbddade5706,34260150-69ac-49a3-8a0d-4a403ab55763 -4dfd543d-caa6-4f69-a95f-5ddfe2b89567,5fe40dd6-cf1f-4cf2-8729-92121ac2e997,903663f7-d2ab-49c9-8942-14aa9e0a9c72 -2cc171ef-db48-4adc-af09-7c574b37f139,5b2add49-b8f4-42e0-a77c-adad4efeeeb1 -) do ( -if /i '%app%' EQU '%%A' exit /b -) -if not defined EditionID (call :winchk&exit /b) -if %winbuild% LSS 14393 (call :winchk&exit /b) -if /i '%app%' EQU '32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee' if /i %EditionID% NEQ EnterpriseS exit /b -if /i '%app%' EQU 'ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69' if /i %EditionID% NEQ CloudEdition exit /b -if /i '%app%' EQU 'd30136fc-cb4b-416e-a23d-87207abc44a9' if /i %EditionID% NEQ CloudEditionN exit /b -if /i '%app%' EQU '0df4f814-3f57-4b8b-9a9d-fddadcd69fac' if /i %EditionID% NEQ CloudE exit /b -if /i '%app%' EQU 'e0c42288-980c-4788-a014-c080d2e1926e' if /i %EditionID% NEQ Education exit /b -if /i '%app%' EQU '73111121-5638-40f6-bc11-f1d7b0d64300' if /i %EditionID% NEQ Enterprise exit /b -if /i '%app%' EQU '2de67392-b7a7-462a-b1ca-108dd189f588' if /i %EditionID% NEQ Professional exit /b -if /i '%app%' EQU '3f1afc82-f8ac-4f6c-8005-1d233e606eee' if /i %EditionID% NEQ ProfessionalEducation exit /b -if /i '%app%' EQU '82bbc092-bc50-4e16-8e18-b74fc486aec3' if /i %EditionID% NEQ ProfessionalWorkstation exit /b -if /i '%app%' EQU '3c102355-d027-42c6-ad23-2e7ef8a02585' if /i %EditionID% NEQ EducationN exit /b -if /i '%app%' EQU 'e272e3e2-732f-4c65-a8f0-484747d0d947' if /i %EditionID% NEQ EnterpriseN exit /b -if /i '%app%' EQU 'a80b5abf-76ad-428b-b05d-a47d2dffeebf' if /i %EditionID% NEQ ProfessionalN exit /b -if /i '%app%' EQU '5300b18c-2e33-4dc2-8291-47ffcec746dd' if /i %EditionID% NEQ ProfessionalEducationN exit /b -if /i '%app%' EQU '4b1571d3-bafb-4b40-8087-a961be2caf65' if /i %EditionID% NEQ ProfessionalWorkstationN exit /b -if /i '%app%' EQU '58e97c99-f377-4ef1-81d5-4ad5522b5fd8' if /i %EditionID% NEQ Core exit /b -if /i '%app%' EQU 'cd918a57-a41b-4c82-8dce-1a538e221a83' if /i %EditionID% NEQ CoreSingleLanguage exit /b -if /i '%app%' EQU 'ec868e65-fadf-4759-b23e-93fe37f2cc29' if /i %EditionID% NEQ ServerRdsh exit /b -if /i '%app%' EQU 'e4db50ea-bda1-4566-b047-0ca50abc6f07' if /i %EditionID% NEQ ServerRdsh exit /b -set "_qr=%_zz1% %spp% %_zz2% "Description like '%%KMSCLIENT%%'" %_zz3% ID %_zz4%" -if /i "%app%" EQU "e4db50ea-bda1-4566-b047-0ca50abc6f07" ( -%_qr% | findstr /i "ec868e65-fadf-4759-b23e-93fe37f2cc29" %_Nul3% && (exit /b) -) -call :winchk -exit /b - -:winchk -if not defined tok (if %winbuild% GEQ 9200 (set "tok=4") else (set "tok=7")) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%LicenseStatus='1' and Description like '%%KMSCLIENT%%' %adoff% %_zz6% %_zz3% Name %_zz4%" -%_qr% %_Nul2% | findstr /i "Windows" %_Nul3% && (exit /b) -echo. -set "_qr=%_zz1% %spp% %_zz2% %_zz5%LicenseStatus='1' and GracePeriodRemaining='0' %adoff% and PartialProductKey is not NULL%_zz6% %_zz3% Name %_zz4%" -%_qr% %_Nul2% | findstr /i "Windows" %_Nul3% && ( -set WinPerm=1 -) -set WinOEM=0 -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and LicenseStatus='1' %adoff% %_zz6% %_zz3% Name %_zz4%" -if %WinPerm% EQU 0 %_qr% %_Nul2% | findstr /i "Windows" %_Nul3% && set WinOEM=1 -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and LicenseStatus='1' %adoff% %_zz6% %_zz3% Description %_zz8%" -if %WinOEM% EQU 1 ( -for /f "tokens=%tok% delims=, " %%G in ('%_qr%') do set "channel=%%G" -for %%A in (VOLUME_MAK, RETAIL, OEM_DM, OEM_SLP, OEM_COA, OEM_COA_SLP, OEM_COA_NSLP, OEM_NONSLP, OEM) do if /i "%%A"=="!channel!" set WinPerm=1 -) -if %WinPerm% EQU 0 ( -copy /y %SysPath%\slmgr.vbs "!_temp!\slmgr.vbs" %_Nul3% -cscript //nologo "!_temp!\slmgr.vbs" /xpr %_Nul2% | findstr /i "permanently" %_Nul3% && set WinPerm=1 -) -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and LicenseStatus='1' %adoff% %_zz6% %_zz3% Name %_zz8%" -if %WinPerm% EQU 1 ( -for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Checking: %%x -echo Product is Permanently Activated. -exit /b -) -call :insKey -exit /b - -:esuchk -set _officespp=0 -set ESU_ADD=1 -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% LicenseStatus %_zz4%" -%_qr% %_Nul2% | findstr "1" %_Nul1% && (echo.&call :activate&exit /b) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='77db037b-95c3-48d7-a3ab-a9c6d41093e0'%_zz6% %_zz3% LicenseStatus %_zz4%" -if /i "%app%" EQU "3fcc2df2-f625-428d-909a-1f76efc849b6" ( -%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b) -) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='0e00c25d-8795-4fb7-9572-3803d91b6880'%_zz6% %_zz3% LicenseStatus %_zz4%" -if /i "%app%" EQU "dadfcd24-6e37-47be-8f7f-4ceda614cece" ( -%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b) -) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='4220f546-f522-46df-8202-4d07afd26454'%_zz6% %_zz3% LicenseStatus %_zz4%" -if /i "%app%" EQU "0c29c85e-12d7-4af8-8e4d-ca1e424c480c" ( -%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b) -) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='553673ed-6ddf-419c-a153-b760283472fd'%_zz6% %_zz3% LicenseStatus %_zz4%" -if /i "%app%" EQU "f2b21bfc-a6b0-4413-b4bb-9f06b55f2812" ( -%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b) -) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='04fa0286-fa74-401e-bbe9-fbfbb158010d'%_zz6% %_zz3% LicenseStatus %_zz4%" -if /i "%app%" EQU "bfc078d0-8c7f-475c-8519-accc46773113" ( -%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b) -) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='16c08c85-0c8b-4009-9b2b-f1f7319e45f9'%_zz6% %_zz3% LicenseStatus %_zz4%" -if /i "%app%" EQU "23c6188f-c9d8-457e-81b6-adb6dacb8779" ( -%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b) -) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='8e7bfb1e-acc1-4f56-abae-b80fce56cd4b'%_zz6% %_zz3% LicenseStatus %_zz4%" -if /i "%app%" EQU "e7cce015-33d6-41c1-9831-022ba63fe1da" ( -%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b) -) -set "_qr=%_zz1% %spp% %_zz2% %_zz5%PartialProductKey is not NULL%_zz6% %_zz3% ID %_zz4%" -%_qr% %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b) -call :insKey -exit /b - -:RunOSPP -set spp=OfficeSoftwareProtectionProduct -set sps=OfficeSoftwareProtectionService -set Off1ce=0 -set RanR2V=0 -set aC2R21=0 -set aC2R19=0 -set aC2R16=0 -set aC2R15=0 -if %winbuild% LSS 9200 (set "aword=2010-2021") else (set "aword=2010") -if %OsppHook% EQU 0 (echo.&echo No Installed Office %aword% Product Detected...&exit /b) -if %winbuild% GEQ 9200 if %loc_off14% EQU 0 (echo.&echo No Installed Office %aword% Product Detected...&exit /b) -set err_offsvc=0 -net start osppsvc /y %_Nul3% || ( -sc start osppsvc %_Nul3% -if !errorlevel! EQU 1053 set err_offsvc=1 -) -if %err_offsvc% EQU 1 (echo.&echo Error: osppsvc service is not running...&exit /b) -if %winbuild% GEQ 9200 call :oppoff -if %winbuild% LSS 9200 call :sppoff -if %Off1ce% EQU 0 exit /b -set "vPrem="&set "vProf=" -set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='OfficeVisioPrem-MAK'%_zz6% %_zz3% LicenseStatus %_zz8%" -if %loc_off14% EQU 1 for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set vPrem=%%A -set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='OfficeVisioPro-MAK'%_zz6% %_zz3% LicenseStatus %_zz8%" -if %loc_off14% EQU 1 for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set vProf=%%A -set "_qr=%_zz7% %sps% %_zz3% Version %_zz8%" -for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set slsv=%%A -reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" %_Nul3% -reg add "HKLM\%OPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3% -set "_qr=%_zz7% %spp% %_zz2% %_zz5%Description like '%%KMSCLIENT%%' %_zz6% %_zz3% ID %_zz8%" -for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :sppchkoff 2) -reg delete "HKLM\%OPPk%" /f /v DisableDnsPublishing %_Null% -reg delete "HKLM\%OPPk%" /f /v DisableKeyManagementServiceHostCaching %_Null% -exit /b - -:oppoff -set "_qr=%_zz1% %spp% %_zz3% Description %_zz4%" -%_qr% %_Nul2% | findstr /i KMSCLIENT %_Nul1% && ( -set Off1ce=1 -exit /b -) -set ret_off14=0 -%_qr% %_Nul2% | findstr /i channel %_Nul1% && (set ret_off14=1) -if defined _C14R (echo.&echo %_mO14c%) else if %_O14MSI% EQU 1 (if %ret_off14% EQU 1 echo.&echo %_mO14m%) -exit /b - -:offchk -set ls=0 -set ls2=0 -set ls3=0 -set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='Office%~1'%_zz6% %_zz3% LicenseStatus %_zz8%" -for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set /a ls=%%A -set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='Office%~3'%_zz6% %_zz3% LicenseStatus %_zz8%" -if /i not "%~3"=="" for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set /a ls2=%%A -set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='Office%~5'%_zz6% %_zz3% LicenseStatus %_zz8%" -if /i not "%~5"=="" for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set /a ls3=%%A -if "%ls3%"=="1" ( -echo Checking: %~6 -echo Product is Permanently Activated. -exit /b -) -if "%ls2%"=="1" ( -echo Checking: %~4 -echo Product is Permanently Activated. -exit /b -) -if "%ls%"=="1" ( -echo Checking: %~2 -echo Product is Permanently Activated. -exit /b -) -call :insKey -exit /b - -:offchk21 -if /i '%app%' EQU 'f3fb2d68-83dd-4c8b-8f09-08e0d950ac3b' exit /b -if /i '%app%' EQU '76093b1b-7057-49d7-b970-638ebcbfd873' exit /b -if /i '%app%' EQU 'a3b44174-2451-4cd6-b25f-66638bfb9046' exit /b -if /i '%app%' EQU 'fbdb3e18-a8ef-4fb3-9183-dffd60bd0984' ( -call :offchk "21ProPlus2021VL_MAK_AE1" "Office ProPlus 2021" "21ProPlus2021VL_MAK_AE2" -exit /b -) -if /i '%app%' EQU '080a45c5-9f9f-49eb-b4b0-c3c610a5ebd3' ( -call :offchk "21Standard2021VL_MAK_AE" "Office Standard 2021" -exit /b -) -if /i '%app%' EQU '76881159-155c-43e0-9db7-2d70a9a3a4ca' ( -call :offchk "21ProjectPro2021VL_MAK_AE1" "Project Pro 2021" "21ProjectPro2021VL_MAK_AE2" -exit /b -) -if /i '%app%' EQU '6dd72704-f752-4b71-94c7-11cec6bfc355' ( -call :offchk "21ProjectStd2021VL_MAK_AE" "Project Standard 2021" -exit /b -) -if /i '%app%' EQU 'fb61ac9a-1688-45d2-8f6b-0674dbffa33c' ( -call :offchk "21VisioPro2021VL_MAK_AE" "Visio Pro 2021" -exit /b -) -if /i '%app%' EQU '72fce797-1884-48dd-a860-b2f6a5efd3ca' ( -call :offchk "21VisioStd2021VL_MAK_AE" "Visio Standard 2021" -exit /b -) -call :insKey -exit /b - -:offchk19 -if /i '%app%' EQU '0bc88885-718c-491d-921f-6f214349e79c' exit /b -if /i '%app%' EQU 'fc7c4d0c-2e85-4bb9-afd4-01ed1476b5e9' exit /b -if /i '%app%' EQU '500f6619-ef93-4b75-bcb4-82819998a3ca' exit /b -if /i '%app%' EQU '85dd8b5f-eaa4-4af3-a628-cce9e77c9a03' ( -call :offchk "19ProPlus2019VL_MAK_AE" "Office ProPlus 2019" -exit /b -) -if /i '%app%' EQU '6912a74b-a5fb-401a-bfdb-2e3ab46f4b02' ( -call :offchk "19Standard2019VL_MAK_AE" "Office Standard 2019" -exit /b -) -if /i '%app%' EQU '2ca2bf3f-949e-446a-82c7-e25a15ec78c4' ( -call :offchk "19ProjectPro2019VL_MAK_AE" "Project Pro 2019" -exit /b -) -if /i '%app%' EQU '1777f0e3-7392-4198-97ea-8ae4de6f6381' ( -call :offchk "19ProjectStd2019VL_MAK_AE" "Project Standard 2019" -exit /b -) -if /i '%app%' EQU '5b5cf08f-b81a-431d-b080-3450d8620565' ( -call :offchk "19VisioPro2019VL_MAK_AE" "Visio Pro 2019" -exit /b -) -if /i '%app%' EQU 'e06d7df3-aad0-419d-8dfb-0ac37e2bdf39' ( -call :offchk "19VisioStd2019VL_MAK_AE" "Visio Standard 2019" -exit /b -) -call :insKey -exit /b - -:offchk16 -if /i '%app%' EQU 'd450596f-894d-49e0-966a-fd39ed4c4c64' ( -call :offchk "16ProPlusVL_MAK" "Office ProPlus 2016" -exit /b -) -if /i '%app%' EQU 'dedfa23d-6ed1-45a6-85dc-63cae0546de6' ( -call :offchk "16StandardVL_MAK" "Office Standard 2016" -exit /b -) -if /i '%app%' EQU '4f414197-0fc2-4c01-b68a-86cbb9ac254c' ( -call :offchk "16ProjectProVL_MAK" "Project Pro 2016" -exit /b -) -if /i '%app%' EQU 'da7ddabc-3fbe-4447-9e01-6ab7440b4cd4' ( -call :offchk "16ProjectStdVL_MAK" "Project Standard 2016" -exit /b -) -if /i '%app%' EQU '6bf301c1-b94a-43e9-ba31-d494598c47fb' ( -call :offchk "16VisioProVL_MAK" "Visio Pro 2016" -exit /b -) -if /i '%app%' EQU 'aa2a7821-1827-4c2c-8f1d-4513a34dda97' ( -call :offchk "16VisioStdVL_MAK" "Visio Standard 2016" -exit /b -) -if /i '%app%' EQU '829b8110-0e6f-4349-bca4-42803577788d' ( -call :offchk "16ProjectProXC2RVL_MAKC2R" "Project Pro 2016 C2R" -exit /b -) -if /i '%app%' EQU 'cbbaca45-556a-4416-ad03-bda598eaa7c8' ( -call :offchk "16ProjectStdXC2RVL_MAKC2R" "Project Standard 2016 C2R" -exit /b -) -if /i '%app%' EQU 'b234abe3-0857-4f9c-b05a-4dc314f85557' ( -call :offchk "16VisioProXC2RVL_MAKC2R" "Visio Pro 2016 C2R" -exit /b -) -if /i '%app%' EQU '361fe620-64f4-41b5-ba77-84f8e079b1f7' ( -call :offchk "16VisioStdXC2RVL_MAKC2R" "Visio Standard 2016 C2R" -exit /b -) -call :insKey -exit /b - -:offchk15 -if /i '%app%' EQU 'b322da9c-a2e2-4058-9e4e-f59a6970bd69' ( -call :offchk "ProPlusVL_MAK" "Office ProPlus 2013" -exit /b -) -if /i '%app%' EQU 'b13afb38-cd79-4ae5-9f7f-eed058d750ca' ( -call :offchk "StandardVL_MAK" "Office Standard 2013" -exit /b -) -if /i '%app%' EQU '4a5d124a-e620-44ba-b6ff-658961b33b9a' ( -call :offchk "ProjectProVL_MAK" "Project Pro 2013" -exit /b -) -if /i '%app%' EQU '427a28d1-d17c-4abf-b717-32c780ba6f07' ( -call :offchk "ProjectStdVL_MAK" "Project Standard 2013" -exit /b -) -if /i '%app%' EQU 'e13ac10e-75d0-4aff-a0cd-764982cf541c' ( -call :offchk "VisioProVL_MAK" "Visio Pro 2013" -exit /b -) -if /i '%app%' EQU 'ac4efaf0-f81f-4f61-bdf7-ea32b02ab117' ( -call :offchk "VisioStdVL_MAK" "Visio Standard 2013" -exit /b -) -call :insKey -exit /b - -:offchk14 -if /i '%app%' EQU '6f327760-8c5c-417c-9b61-836a98287e0c' ( -call :offchk "ProPlus-MAK" "Office ProPlus 2010" "ProPlusAcad-MAK" "Office Professional Academic 2010" -exit /b -) -if /i '%app%' EQU '9da2a678-fb6b-4e67-ab84-60dd6a9c819a' ( -call :offchk "Standard-MAK" "Office Standard 2010" "StandardAcad-MAK" "Office Standard Academic 2010" -exit /b -) -if /i '%app%' EQU 'ea509e87-07a1-4a45-9edc-eba5a39f36af' ( -call :offchk "SmallBusBasics-MAK" "Office Small Business Basics 2010" -exit /b -) -if /i '%app%' EQU 'df133ff7-bf14-4f95-afe3-7b48e7e331ef' ( -call :offchk "ProjectPro-MAK" "Project Pro 2010" -exit /b -) -if /i '%app%' EQU '5dc7bf61-5ec9-4996-9ccb-df806a2d0efe' ( -call :offchk "ProjectStd-MAK" "Project Standard 2010" "ProjectStd-MAK2" "Project Standard 2010" -exit /b -) -if /i '%app%' EQU '92236105-bb67-494f-94c7-7f7a607929bd' ( -call :offchk "VisioPrem-MAK" "Visio Premium 2010" "VisioPro-MAK" "Visio Pro 2010" -exit /b -) -if defined vPrem exit /b -if /i '%app%' EQU 'e558389c-83c3-4b29-adfe-5e4d7f46c358' ( -call :offchk "VisioPro-MAK" "Visio Pro 2010" "VisioStd-MAK" "Visio Standard 2010" -exit /b -) -if defined vProf exit /b -if /i '%app%' EQU '9ed833ff-4f92-4f36-b370-8683a4f13275' ( -call :offchk "VisioStd-MAK" "Visio Standard 2010" -exit /b -) -call :insKey -exit /b - -:officeLoc -set loc_off%1=0 -set _O%1MSI=0 -if %1 EQU 19 ( -if defined _C16R reg query %_C16R% /v ProductReleaseIds %_Nul2% | findstr 2019 %_Nul1% && set loc_off%1=1 -exit /b -) -if %1 EQU 21 ( -if defined _C16R reg query %_C16R% /v ProductReleaseIds %_Nul2% | findstr 2021 %_Nul1% && set loc_off%1=1 -exit /b -) - -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\%1.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" ( -set loc_off%1=1 -set _O%1MSI=1 -) -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\%1.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" ( -set loc_off%1=1 -set _O%1MSI=1 -) - -if %1 EQU 16 if defined _C16R ( -for /f "skip=2 tokens=2*" %%a in ('reg query %_C16R% /v ProductReleaseIds') do echo %%b> "!_temp!\c2rchk.txt" -for %%a in (%LV16Ids%,ProjectProX,ProjectStdX,VisioProX,VisioStdX) do ( - findstr /I /C:"%%aVolume" "!_temp!\c2rchk.txt" %_Nul1% && set loc_off%1=1 - ) -for %%a in (%LR16Ids%) do ( - findstr /I /C:"%%aRetail" "!_temp!\c2rchk.txt" %_Nul1% && set loc_off%1=1 - ) -exit /b -) - -if %1 EQU 15 if defined _C15R ( -set loc_off%1=1 -exit /b -) - -if exist "%ProgramFiles%\Microsoft Office\Office%1\OSPP.VBS" set loc_off%1=1 -if not %xOS%==x86 if exist "%ProgramW6432%\Microsoft Office\Office%1\OSPP.VBS" set loc_off%1=1 -if not %xOS%==x86 if exist "%ProgramFiles(x86)%\Microsoft Office\Office%1\OSPP.VBS" set loc_off%1=1 -exit /b - -:insKey -set S_OK=1 -echo. -set "_key=" -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%" -if %ESU_ADD% EQU 0 for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Installing Key: %%x -if %ESU_ADD% EQU 1 for /f "tokens=2 delims==f" %%x in ('%_qr%') do echo Installing Key: %%x -set ESU_ADD=0 -call :keys %app% -if "%_key%"=="" (echo No associated KMS Client key found&exit /b) -set "_qr=wmic path %sps% where Version='%slsv%' call InstallProductKey ProductKey="%_key%"" -if %WMI_VBS% NEQ 0 set "_qr=%_csp% %sps% "%_key%"" -%_qr% %_Nul3% -set ERRORCODE=%ERRORLEVEL% -if %ERRORCODE% NEQ 0 ( -cmd /c exit /b %ERRORCODE% -echo Failed: 0x!=ExitCode! -set S_OK=0 -exit /b -) -set "_qr=wmic path %sps% where Version='%slsv%' call RefreshLicenseStatus" -if %WMI_VBS% NEQ 0 set "_qr=%_csm% "%sps%.Version='%slsv%'" RefreshLicenseStatus" -if %sps% EQU SoftwareLicensingService %_qr% %_Nul3% - -:activate -set S_OK=1 -if %sps% EQU SoftwareLicensingService ( -if %_officespp% EQU 0 (reg delete "HKLM\%SPPk%\%_wApp%\%app%" /f %_Null%) else (reg delete "HKLM\%SPPk%\%_oApp%\%app%" /f %_Null%) -) else ( -reg delete "HKLM\%OPPk%\%_oA14%\%app%" /f %_Null% -reg delete "HKLM\%OPPk%\%_oApp%\%app%" /f %_Null% -) -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%" -if %W1nd0ws% EQU 0 if %_officespp% EQU 0 if %sps% EQU SoftwareLicensingService ( -reg add "HKLM\%SPPk%\%_wApp%\%app%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" %_Nul3% -reg add "HKLM\%SPPk%\%_wApp%\%app%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3% -for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Checking: %%x -echo Product is KMS 2038 Activated. -set _keepkms38=1 -exit /b -) -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%" -if %act_attempt% LSS 1 ( -if %ESU_ADD% EQU 0 for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Activating: %%x -if %ESU_ADD% EQU 1 for /f "tokens=2 delims==f" %%x in ('%_qr%') do echo Activating: %%x -) - -set ESU_ADD=0 -set "_qr=wmic path %spp% where ID='%app%' call Activate" -if %WMI_VBS% NEQ 0 set "_qr=%_csm% "%spp%.ID='%app%'" Activate" -%_qr% %_Nul3% -call set ERRORCODE=%ERRORLEVEL% -if %act_attempt% LSS 1 if %ERRORCODE% EQU -1073418187 ( -echo Product Activation Failed: 0xC004F035 -if %OSType% EQU Win7 echo Windows 7 cannot be KMS-activated on this computer due to unqualified OEM BIOS. -echo See Read Me for details. -exit /b -) -if %act_attempt% LSS 1 if %ERRORCODE% EQU -1073417728 ( -echo Product Activation Failed: 0xC004F200 -echo Windows needs to rebuild the activation-related files. -echo See KB2736303 for details. -exit /b -) -if %act_attempt% LSS 1 if %ERRORCODE% EQU -1073422315 ( -echo Product Activation Failed: 0xC004E015 -echo Running slmgr.vbs /rilc to mitigate. -cscript //Nologo //B %SysPath%\slmgr.vbs /rilc -) -set gpr=0 -set gpr2=0 -set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% GracePeriodRemaining %_zz8%" -for /f "tokens=2 delims==" %%x in ('%_qr%') do (set gpr=%%x&set /a "gpr2=(%%x+1440-1)/1440") -if %act_attempt% LSS 1 if %ERRORCODE% EQU 0 if %gpr% EQU 0 ( -echo Product Activation succeeded, but Remaining Period failed to increase. -if %OSType% EQU Win7 echo This could be related to the error described in KB4487266 -exit /b -) -set Act_OK=0 -if %gpr% EQU 43200 if %_officespp% EQU 0 if %winbuild% GEQ 9200 set Act_OK=1 -if %gpr% EQU 64800 set Act_OK=1 -if %gpr% GTR 259200 if %Win10Gov% EQU 1 set Act_OK=1 -if %gpr% EQU 259200 set Act_OK=1 - -if %ERRORCODE% EQU 0 if %Act_OK% EQU 1 ( -call :_color %_Green% "Product Activation Successful" -echo Remaining Period: %gpr2% days ^(%gpr% minutes^) -set /a act_attempt=0 -exit /b -) - -if not !server_num! gtr %max_servers% ( -if %act_attempt% LSS 3 ( -set /a act_attempt+=1 -call :getserv -%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" -%nul% reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" -if %winbuild% GEQ 9200 ( -%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" -if defined notx86 ( -%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" /reg:32 -%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" /reg:32 -) -) -goto :activate -) -) - -cmd /c exit /b %ERRORCODE% -if %ERRORCODE% NEQ 0 ( -call :_color %_Red% "Product Activation Failed: 0x!=ExitCode!" -) else ( -call :_color %_Red% "Product Activation Failed" -) -echo Remaining Period: %gpr2% days ^(%gpr% minutes^) -set S_OK=0 -set act_failed=1 -set /a act_attempt=0 -exit /b - -:StopService -sc query %1 | find /i "STOPPED" %_Nul1% || net stop %1 /y %_Nul3% -sc query %1 | find /i "STOPPED" %_Nul1% || sc stop %1 %_Nul3% -goto :eof - -:UpdateOSPPEntry -if /i %1 EQU osppsvc.exe ( -reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" %_Nul3% -reg add "HKLM\%OPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3% -) -goto :eof - -:CheckFR - -set WMIe=0 -call :CheckWS -if %WMIe% EQU 1 ( -echo. -echo %_err% -echo Failed running WMI query check. -echo. -echo Verify that these services are working correctly: -echo Windows Management Instrumentation [WinMgmt] -echo Software Protection [sppsvc] -) -goto :eof - -:CheckWS -set "_qrw=%_zz1% Win32_ComputerSystem %_zz3% CreationClassName %_zz4%" -set "_qrs=%_zz1% SoftwareLicensingService %_zz3% Version %_zz4%" - -%_qrs% %_Nul2% | findstr /r "[0-9]*\.[0-9]*\.[0-9]*\.[0-9]*" %_Nul1% || ( - set WMIe=1 - %_qrw% %_Nul2% | find /i "ComputerSystem" %_Nul1% && ( - echo Error: SPP is not responding - ) || ( - echo Error: WMI ^& SPP are not responding - ) -) -goto :eof - -:C2RR2V -set RanR2V=1 -set "_SLMGR=%SysPath%\slmgr.vbs" -if %_Debug% EQU 0 ( -set "_cscript=cscript //Nologo //B" -) else ( -set "_cscript=cscript //Nologo" -) -set _LTSC=0 -set "_tag="&set "_ons= 2016" -sc query ClickToRunSvc %_Nul3% -set error1=%errorlevel% -sc query OfficeSvc %_Nul3% -set error2=%errorlevel% -if %error1% EQU 1060 if %error2% EQU 1060 ( -echo Error: Office C2R service is not detected -goto :%_fC2R% -) -set _Office16=0 -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" ( - set _Office16=1 -) -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" ( - set _Office16=1 -) -set _Office15=0 -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses\ProPlus*.xrm-ms" ( - set _Office15=1 -) -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses\ProPlus*.xrm-ms" ( - set _Office15=1 -) -if %_Office16% EQU 0 if %_Office15% EQU 0 ( -echo Error: Office C2R InstallPath is not detected -goto :%_fC2R% -) - -:Reg16istry -if %_Office16% EQU 0 goto :Reg15istry -set "_InstallRoot=" -set "_ProductIds=" -set "_GUID=" -set "_Config=" -set "_PRIDs=" -set "_LicensesPath=" -set "_Integrator=" -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do (set "_InstallRoot=%%b\root") -if not "%_InstallRoot%"=="" ( - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v PackageGUID" %_Nul6%') do (set "_GUID=%%b") - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_ProductIds=%%b") - set "_Config=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration" - set "_PRIDs=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\ProductReleaseIDs" -) else ( - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do (set "_InstallRoot=%%b\root") - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v PackageGUID" %_Nul6%') do (set "_GUID=%%b") - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_ProductIds=%%b") - set "_Config=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration" - set "_PRIDs=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\ProductReleaseIDs" -) -set "_LicensesPath=%_InstallRoot%\Licenses16" -set "_Integrator=%_InstallRoot%\integration\integrator.exe" -for /f "skip=2 tokens=2*" %%a in ('"reg query %_PRIDs% /v ActiveConfiguration" %_Nul6%') do set "_PRIDs=%_PRIDs%\%%b" -if "%_ProductIds%"=="" ( -if %_Office15% EQU 0 (echo Error: Office C2R ProductIDs are not detected&goto :%_fC2R%) else (goto :Reg15istry) -) -if not exist "%_LicensesPath%\ProPlus*.xrm-ms" ( -if %_Office15% EQU 0 (echo Error: Office C2R Licenses files are not detected&goto :%_fC2R%) else (goto :Reg15istry) -) -if not exist "%_Integrator%" ( -if %_Office15% EQU 0 (echo Error: Office C2R Licenses Integrator is not detected&goto :%_fC2R%) else (goto :Reg15istry) -) -if exist "%_LicensesPath%\Word2019VL_KMS_Client_AE*.xrm-ms" (set "_tag=2019"&set "_ons= 2019") -if exist "%_LicensesPath%\Word2021VL_KMS_Client_AE*.xrm-ms" (set _LTSC=1) -if %winbuild% LSS 10240 if !_LTSC! EQU 1 (set "_tag=2021"&set "_ons= 2021") -if %_Office15% EQU 0 goto :CheckC2R - -:Reg15istry -set "_Install15Root=" -set "_Product15Ids=" -set "_Con15fig=" -set "_PR15IDs=" -set "_OSPP15Ready=" -set "_Licenses15Path=" -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do (set "_Install15Root=%%b\root") -if not "%_Install15Root%"=="" ( - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_Product15Ids=%%b") - set "_Con15fig=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds" - set "_PR15IDs=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\ProductReleaseIDs" - set "_OSPP15Ready=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration" -) else ( - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do (set "_Install15Root=%%b\root") - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_Product15Ids=%%b") - set "_Con15fig=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds" - set "_PR15IDs=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\ProductReleaseIDs" - set "_OSPP15Ready=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\Configuration" -) -set "_OSPP15ReadT=REG_SZ" -if "%_Product15Ids%"=="" ( -reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid %_Nul3% && ( - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid" %_Nul6%') do (set "_Product15Ids=%%b") - set "_Con15fig=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid" - set "_OSPP15Ready=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun" - set "_OSPP15ReadT=REG_DWORD" - ) -reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid %_Nul3% && ( - for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid" %_Nul6%') do (set "_Product15Ids=%%b") - set "_Con15fig=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid" - set "_OSPP15Ready=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun" - set "_OSPP15ReadT=REG_DWORD" - ) -) -set "_Licenses15Path=%_Install15Root%\Licenses" -if exist "%ProgramFiles%\Microsoft Office\Office15\OSPP.VBS" ( - set "_OSPP15VBS=%ProgramFiles%\Microsoft Office\Office15\OSPP.VBS" -) else if exist "%ProgramW6432%\Microsoft Office\Office15\OSPP.VBS" ( - set "_OSPP15VBS=%ProgramW6432%\Microsoft Office\Office15\OSPP.VBS" -) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\OSPP.VBS" ( - set "_OSPP15VBS=%ProgramFiles(x86)%\Microsoft Office\Office15\OSPP.VBS" -) -if "%_Product15Ids%"=="" ( -if %_Office16% EQU 0 (echo Error: Office 2013 C2R ProductIDs are not detected&goto :%_fC2R%) else (goto :CheckC2R) -) -if not exist "%_Licenses15Path%\ProPlus*.xrm-ms" ( -if %_Office16% EQU 0 (echo Error: Office 2013 C2R Licenses files are not detected&goto :%_fC2R%) else (goto :CheckC2R) -) -if %winbuild% LSS 9200 if not exist "%_OSPP15VBS%" ( -if %_Office16% EQU 0 (echo Error: Office 2013 C2R Licensing tool OSPP.vbs is not detected&goto :%_fC2R%) else (goto :CheckC2R) -) - -:CheckC2R -set _OMSI=0 -if %_Office16% EQU 0 ( -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1 -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1 -) -if %_Office15% EQU 0 ( -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1 -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\15.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1 -) -if %winbuild% GEQ 9200 ( -set _spp=SoftwareLicensingProduct -set _sps=SoftwareLicensingService -set "_vbsi=%_SLMGR% /ilc " -) else ( -set _spp=OfficeSoftwareProtectionProduct -set _sps=OfficeSoftwareProtectionService -set _vbsi="!_OSPP15VBS!" /inslic: -) -set "_wmi=" -set "_qr=%_zz7% %_sps% %_zz3% Version %_zz8%" -for /f "tokens=2 delims==" %%# in ('%_qr%') do set _wmi=%%# -if "%_wmi%"=="" ( -echo Error: %_sps% WMI version is not detected -call :CheckWS -goto :%_fC2R% -) -set _Identity=0 -set _vNext=0 -dir /b /s /a:-d "!_Local!\Microsoft\Office\Licenses\*1*" %_Nul3% && set _Identity=1 -dir /b /s /a:-d "!ProgramData!\Microsoft\Office\Licenses\*1*" %_Nul3% && set _Identity=1 -set kNext=HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext -if %_Identity% EQU 1 reg query %kNext% /v MigrationToV5Done %_Nul2% | find /i "0x1" %_Nul1% && set _vNext=1 -if %_vNext% EQU 1 ( -reg query %kNext% | findstr /i /r ".*retail" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x2" %_Nul1% && (set sub_O365=1) -reg query %kNext% | findstr /i /r ".*retail" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x3" %_Nul1% && (set sub_O365=1) -reg query %kNext% | findstr /i /r ".*volume" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x2" %_Nul1% && (set sub_O365=1) -reg query %kNext% | findstr /i /r ".*volume" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x3" %_Nul1% && (set sub_O365=1) -reg query %kNext% | findstr /i /r "project.*" %_Nul2% | find /i "0x2" %_Nul1% && set sub_proj=1 -reg query %kNext% | findstr /i /r "project.*" %_Nul2% | find /i "0x3" %_Nul1% && set sub_proj=1 -reg query %kNext% | findstr /i /r "visio.*" %_Nul2% | find /i "0x2" %_Nul1% && set sub_vis=1 -reg query %kNext% | findstr /i /r "visio.*" %_Nul2% | find /i "0x3" %_Nul1% && set sub_vis=1 -) -set _Retail=0 -set "_ocq=ApplicationID='%_oApp%' AND LicenseStatus='1' AND PartialProductKey is not NULL" -if %WMI_VBS% EQU 0 wmic path %_spp% where (%_ocq%) get Description %_Nul2% |findstr /V /R "^$" >"!_temp!\crvRetail.txt" -set "_qr=%_csq% %_spp% "%_ocq%" Description" -if %WMI_VBS% NEQ 0 %_qr% %_Nul2% >"!_temp!\crvRetail.txt" -find /i "RETAIL channel" "!_temp!\crvRetail.txt" %_Nul1% && set _Retail=1 -find /i "RETAIL(MAK) channel" "!_temp!\crvRetail.txt" %_Nul1% && set _Retail=1 -find /i "TIMEBASED_SUB channel" "!_temp!\crvRetail.txt" %_Nul1% && set _Retail=1 -set "_copp=" -if exist "%SysPath%\msvcr100.dll" ( -set _copp=1 -) else if exist "!_InstallRoot!\vfs\System\msvcr100.dll" ( -set _copp="!_InstallRoot!\vfs\System" -) else if exist "!_Install15Root!\vfs\System\msvcr100.dll" ( -set _copp="!_Install15Root!\vfs\System" -) else if exist "%SystemRoot%\SysWOW64\msvcr100.dll" ( -set _copp=1 -set xBit=x86 -) else if exist "!_InstallRoot!\vfs\SystemX86\msvcr100.dll" ( -set _copp="!_InstallRoot!\vfs\SystemX86" -set xBit=x86 -) else if exist "!_Install15Root!\vfs\SystemX86\msvcr100.dll" ( -set _copp="!_Install15Root!\vfs\SystemX86" -set xBit=x86 -) -if not exist "!_work!\bin\cleanospp%xBit%.exe" ( -set "_copp=" -) -set rancopp=0 -if %_Identity% EQU 0 if %_Retail% EQU 0 if %_OMSI% EQU 0 if defined _copp ( -set rancopp=1 -if "!_copp!"=="1" ( -%_Nul3% "!_work!\bin\cleanospp%xBit%.exe" -Licenses -) else ( -pushd %_copp% -%_Nul3% copy /y "!_work!\bin\cleanospp%xBit%.exe" cleanospp.exe -%_Nul3% cleanospp.exe -Licenses -%_Nul3% del /f /q cleanospp.exe -popd - ) -) -set _O16O365=0 -set _C16Msg=0 -set _C15Msg=0 -set "_qr=%_csq% %_spp% "%_ocq%" LicenseFamily" -if %_Retail% EQU 1 if %WMI_VBS% EQU 0 wmic path %_spp% where (%_ocq%) get LicenseFamily %_Nul2% |findstr /V /R "^$" >"!_temp!\crvRetail.txt" -if %_Retail% EQU 1 if %WMI_VBS% NEQ 0 %_qr% %_Nul2% >"!_temp!\crvRetail.txt" -set "_qr=%_csq% %_spp% "ApplicationID='%_oApp%'" LicenseFamily" -if %WMI_VBS% EQU 0 wmic path %_spp% where "ApplicationID='%_oApp%'" get LicenseFamily %_Nul2% |findstr /V /R "^$" >"!_temp!\crvVolume.txt" 2>&1 -if %WMI_VBS% NEQ 0 %_qr% %_Nul2% >"!_temp!\crvVolume.txt" 2>&1 - -if %_Office16% EQU 0 goto :R15V - -set _O21Ids=ProPlus2021,ProjectPro2021,VisioPro2021,Standard2021,ProjectStd2021,VisioStd2021,Access2021,SkypeforBusiness2021 -set _O19Ids=ProPlus2019,ProjectPro2019,VisioPro2019,Standard2019,ProjectStd2019,VisioStd2019,Access2019,SkypeforBusiness2019 -set _O16Ids=ProjectPro,VisioPro,Standard,ProjectStd,VisioStd,Access,SkypeforBusiness -set _A21Ids=Excel2021,Outlook2021,PowerPoint2021,Publisher2021,Word2021 -set _A19Ids=Excel2019,Outlook2019,PowerPoint2019,Publisher2019,Word2019 -set _A16Ids=Excel,Outlook,PowerPoint,Publisher,Word -set _V21Ids=%_O21Ids%,%_A21Ids% -set _V19Ids=%_O19Ids%,%_A19Ids% -set _V16Ids=Mondo,%_O16Ids%,%_A16Ids%,OneNote -set _R16Ids=%_V16Ids%,Professional,HomeBusiness,HomeStudent,O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud -set _RetIds=%_V21Ids%,Professional2021,HomeBusiness2021,HomeStudent2021,%_V19Ids%,Professional2019,HomeBusiness2019,HomeStudent2019,%_R16Ids% -set _Suites=Mondo,O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud,ProPlus,Standard,Professional,HomeBusiness,HomeStudent,ProPlus2019,Standard2019,Professional2019,HomeBusiness2019,HomeStudent2019,ProPlus2021,Standard2021,Professional2021,HomeBusiness2021,HomeStudent2021 -set _PrjSKU=ProjectPro,ProjectStd,ProjectPro2019,ProjectStd2019,ProjectPro2021,ProjectStd2021 -set _VisSKU=VisioPro,VisioStd,VisioPro2019,VisioStd2019,VisioPro2021,VisioStd2021 - -echo %_ProductIds%>"!_temp!\crvProductIds.txt" -for %%a in (%_RetIds%,ProPlus) do ( -set _%%a=0 -) -for %%a in (%_RetIds%) do ( -findstr /I /C:"%%aRetail" "!_temp!\crvProductIds.txt" %_Nul1% && set _%%a=1 -) -if !_LTSC! EQU 0 for %%a in (%_V21Ids%) do ( -set _%%a=0 -) -if !_LTSC! EQU 1 for %%a in (%_V21Ids%) do ( -findstr /I /C:"%%aVolume" "!_temp!\crvProductIds.txt" %_Nul1% && ( - find /i "Office21%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1) - ) -) -for %%a in (%_V19Ids%) do ( -findstr /I /C:"%%aVolume" "!_temp!\crvProductIds.txt" %_Nul1% && ( - find /i "Office19%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1) - ) -) -for %%a in (%_V16Ids%) do ( -findstr /I /C:"%%aVolume" "!_temp!\crvProductIds.txt" %_Nul1% && ( - find /i "Office16%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1) - ) -) -reg query %_PRIDs%\ProPlusRetail.16 %_Nul3% && ( - find /i "Office16ProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1) -) -reg query %_PRIDs%\ProPlusVolume.16 %_Nul3% && ( - find /i "Office16ProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1) -) -if %_Retail% EQU 1 for %%a in (%_RetIds%) do ( -findstr /I /C:"%%aRetail" "!_temp!\crvProductIds.txt" %_Nul1% && ( - find /i "Office16%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aR_Sub" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aR_PIN" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aE5R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aEDUR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aCO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office16%%aXC2RVL_MAKC2R" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1) - find /i "Office19%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1) - find /i "Office19%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1) - find /i "Office19%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1) - find /i "Office19%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1) - find /i "Office21%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1) - find /i "Office21%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1) - find /i "Office21%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1) - find /i "Office21%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1) - ) -) -if %_Retail% EQU 1 reg query %_PRIDs%\ProPlusRetail.16 %_Nul3% && ( - find /i "Office16ProPlusR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1) - find /i "Office16ProPlusR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1) - find /i "Office16ProPlusMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1) - find /i "Office16ProPlusVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1) -) -set "_qr=%_zz1% %_spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%'" %_zz3% LicenseFamily %_zz4%" -find /i "Office16MondoVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && ( -%_qr% %_Nul2% | find /i "O365" %_Nul1% && ( - for %%a in (O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud) do set _%%a=0 - ) -) -if %sub_O365% EQU 1 ( - for %%a in (%_Suites%) do set _%%a=0 -echo. -echo Microsoft Office is activated with a subscription. -) -if %sub_proj% EQU 1 ( - for %%a in (%_PrjSKU%) do set _%%a=0 -echo. -echo Microsoft Project is activated with a subscription. -) -if %sub_vis% EQU 1 ( - for %%a in (%_VisSKU%) do set _%%a=0 -echo. -echo Microsoft Visio is activated with a subscription. -) - -for %%a in (%_RetIds%,ProPlus) do if !_%%a! EQU 1 ( -set _C16Msg=1 -) -if %_C16Msg% EQU 1 ( -echo. -echo Converting Office C2R Retail-to-Volume: -) -if %_C16Msg% EQU 0 (if %_Office15% EQU 1 (goto :R15V) else (goto :GVLKC2R)) - -if !_Mondo! EQU 1 ( -call :InsLic Mondo -) -if !_O365ProPlus! EQU 1 ( -echo O365ProPlus 2016 Suite ^<-^> Mondo 2016 Licenses -call :InsLic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK -if !_Mondo! EQU 0 call :InsLic Mondo -) -if !_O365Business! EQU 1 if !_O365ProPlus! EQU 0 ( -set _O365ProPlus=1 -echo O365Business 2016 Suite ^<-^> Mondo 2016 Licenses -call :InsLic O365Business NCHRJ-3VPGW-X73DM-6B36K-3RQ6B -if !_Mondo! EQU 0 call :InsLic Mondo -) -if !_O365SmallBusPrem! EQU 1 if !_O365Business! EQU 0 if !_O365ProPlus! EQU 0 ( -set _O365ProPlus=1 -echo O365SmallBusPrem 2016 Suite ^<-^> Mondo 2016 Licenses -call :InsLic O365SmallBusPrem 3FBRX-NFP7C-6JWVK-F2YGK-H499R -if !_Mondo! EQU 0 call :InsLic Mondo -) -if !_O365HomePrem! EQU 1 if !_O365SmallBusPrem! EQU 0 if !_O365Business! EQU 0 if !_O365ProPlus! EQU 0 ( -set _O365ProPlus=1 -echo O365HomePrem 2016 Suite ^<-^> Mondo 2016 Licenses -call :InsLic O365HomePrem 9FNY8-PWWTY-8RY4F-GJMTV-KHGM9 -if !_Mondo! EQU 0 call :InsLic Mondo -) -if !_O365EduCloud! EQU 1 if !_O365HomePrem! EQU 0 if !_O365SmallBusPrem! EQU 0 if !_O365Business! EQU 0 if !_O365ProPlus! EQU 0 ( -set _O365ProPlus=1 -echo O365EduCloud 2016 Suite ^<-^> Mondo 2016 Licenses -call :InsLic O365EduCloud 8843N-BCXXD-Q84H8-R4Q37-T3CPT -if !_Mondo! EQU 0 call :InsLic Mondo -) -if !_O365ProPlus! EQU 1 set _O16O365=1 -if !_Mondo! EQU 1 if !_O365ProPlus! EQU 0 ( -echo Mondo 2016 Suite -call :InsLic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK -if %_Office15% EQU 1 (goto :R15V) else (goto :GVLKC2R) -) -if !_ProPlus2021! EQU 1 if !_O365ProPlus! EQU 0 ( -echo ProPlus 2021 Suite -call :InsLic ProPlus2021 -) -if !_ProPlus2019! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 ( -echo ProPlus 2019 Suite -^> ProPlus%_ons% Licenses -call :InsLic ProPlus%_tag% -) -if !_ProPlus! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 ( -echo ProPlus 2016 Suite -^> ProPlus%_ons% Licenses -call :InsLic ProPlus%_tag% -) -if !_Professional2021! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 ( -echo Professional 2021 Suite -^> ProPlus 2021 Licenses -call :InsLic ProPlus2021 -) -if !_Professional2019! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 ( -echo Professional 2019 Suite -^> ProPlus%_ons% Licenses -call :InsLic ProPlus%_tag% -) -if !_Professional! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 ( -echo Professional 2016 Suite -^> ProPlus%_ons% Licenses -call :InsLic ProPlus%_tag% -) -if !_Standard2021! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 ( -echo Standard 2021 Suite -call :InsLic Standard2021 -) -if !_Standard2019! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 ( -echo Standard 2019 Suite -^> Standard%_ons% Licenses -call :InsLic Standard%_tag% -) -if !_Standard! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 ( -echo Standard 2016 Suite -^> Standard%_ons% Licenses -call :InsLic Standard%_tag% -) -for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a2021! EQU 1 ( - echo %%a 2021 SKU - call :InsLic %%a2021 -) -for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a2019! EQU 1 ( -if !_%%a2021! EQU 0 ( - echo %%a 2019 SKU -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a! EQU 1 ( -if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 ( - echo %%a 2016 SKU -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -for %%a in (HomeBusiness,HomeStudent) do if !_%%a2021! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 ( - set _Standard2021=1 - echo %%a 2021 Suite -^> Standard 2021 Licenses - call :InsLic Standard2021 - ) -) -for %%a in (HomeBusiness,HomeStudent) do if !_%%a2019! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 ( - set _Standard2019=1 - echo %%a 2019 Suite -^> Standard%_ons% Licenses - call :InsLic Standard%_tag% - ) -) -for %%a in (HomeBusiness,HomeStudent) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 ( - set _Standard=1 - echo %%a 2016 Suite -^> Standard%_ons% Licenses - call :InsLic Standard%_tag% - ) -) -for %%a in (%_A21Ids%,OneNote) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 ( - echo %%a App - call :InsLic %%a - ) -) -for %%a in (%_A16Ids%) do if !_%%a2019! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 ( - echo %%a 2019 App -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -for %%a in (%_A16Ids%) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 ( - echo %%a 2016 App -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -for %%a in (Access) do if !_%%a2021! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 ( - echo %%a 2021 App - call :InsLic %%a2021 - ) -) -for %%a in (Access) do if !_%%a2019! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_%%a2021! EQU 0 ( - echo %%a 2019 App -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -for %%a in (Access) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 ( - echo %%a 2016 App -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -for %%a in (SkypeforBusiness) do if !_%%a2021! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 ( - echo %%a 2021 App - call :InsLic %%a2021 - ) -) -for %%a in (SkypeforBusiness) do if !_%%a2019! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_%%a2021! EQU 0 ( - echo %%a 2019 App -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -for %%a in (SkypeforBusiness) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 ( - echo %%a 2016 App -^> %%a%_ons% Licenses - call :InsLic %%a%_tag% - ) -) -if %_Office15% EQU 1 (goto :R15V) else (goto :GVLKC2R) - -:R15V -for %%# in ("!_Licenses15Path!\client-issuance-*.xrm-ms") do ( -%_cscript% %_vbsi%"!_Licenses15Path!\%%~nx#" -) -%_cscript% %_vbsi%"!_Licenses15Path!\pkeyconfig-office.xrm-ms" - -set _O15Ids=Standard,ProjectPro,VisioPro,ProjectStd,VisioStd,Access,Lync -set _A15Ids=Excel,Groove,InfoPath,OneNote,Outlook,PowerPoint,Publisher,Word -set _R15Ids=SPD,Mondo,%_O15Ids%,%_A15Ids%,Professional,HomeBusiness,HomeStudent,O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem -set _V15Ids=Mondo,%_O15Ids%,%_A15Ids% - -echo %_Product15Ids%>"!_temp!\crvProduct15s.txt" -for %%a in (%_R15Ids%,ProPlus) do ( -set _%%a=0 -) -for %%a in (%_R15Ids%) do ( -findstr /I /C:"%%aRetail" "!_temp!\crvProduct15s.txt" %_Nul1% && set _%%a=1 -) -for %%a in (%_V15Ids%) do ( -findstr /I /C:"%%aVolume" "!_temp!\crvProduct15s.txt" %_Nul1% && ( - find /i "Office%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1) - ) -) -reg query %_PR15IDs%\Active\ProPlusRetail\x-none %_Nul3% && ( - find /i "OfficeProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1) -) -reg query %_PR15IDs%\Active\ProPlusVolume\x-none %_Nul3% && ( - find /i "OfficeProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1) -) -if %_Retail% EQU 1 for %%a in (%_R15Ids%) do ( -findstr /I /C:"%%aRetail" "!_temp!\crvProduct15s.txt" %_Nul1% && ( - find /i "Office%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - find /i "Office%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - find /i "Office%%aR_Sub" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - find /i "Office%%aR_PIN" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - find /i "Office%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - find /i "Office%%aO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - find /i "Office%%aCO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - find /i "Office%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1) - ) -) -if %_Retail% EQU 1 reg query %_PR15IDs%\Active\ProPlusRetail\x-none %_Nul3% && ( - find /i "OfficeProPlusR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1) - find /i "OfficeProPlusR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1) - find /i "OfficeProPlusMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1) - find /i "OfficeProPlusVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1) -) -set "_qr=%_zz1% %_spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'OfficeO365%%'" %_zz3% LicenseFamily %_zz4%" -find /i "OfficeMondoVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && ( -%_qr% %_Nul2% | find /i "O365" %_Nul1% && ( - for %%a in (O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem) do set _%%a=0 - ) -) - -for %%a in (%_R15Ids%,ProPlus) do if !_%%a! EQU 1 ( -set _C15Msg=1 -) -if %_C15Msg% EQU 1 if %_C16Msg% EQU 0 ( -echo. -echo Converting Office C2R Retail-to-Volume: -) -if %_C15Msg% EQU 0 goto :GVLKC2R - -if !_Mondo! EQU 1 ( -call :Ins15Lic Mondo -) -if !_O365ProPlus! EQU 1 if !_O16O365! EQU 0 ( -echo O365ProPlus 2013 Suite ^<-^> Mondo 2013 Licenses -call :Ins15Lic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK -if !_Mondo! EQU 0 call :Ins15Lic Mondo -) -if !_O365SmallBusPrem! EQU 1 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 ( -set _O365ProPlus=1 -echo O365SmallBusPrem 2013 Suite ^<-^> Mondo 2013 Licenses -call :Ins15Lic O365SmallBusPrem 3FBRX-NFP7C-6JWVK-F2YGK-H499R -if !_Mondo! EQU 0 call :Ins15Lic Mondo -) -if !_O365HomePrem! EQU 1 if !_O365SmallBusPrem! EQU 0 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 ( -set _O365ProPlus=1 -echo O365HomePrem 2013 Suite ^<-^> Mondo 2013 Licenses -call :Ins15Lic O365HomePrem 9FNY8-PWWTY-8RY4F-GJMTV-KHGM9 -if !_Mondo! EQU 0 call :Ins15Lic Mondo -) -if !_O365Business! EQU 1 if !_O365HomePrem! EQU 0 if !_O365SmallBusPrem! EQU 0 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 ( -set _O365ProPlus=1 -echo O365Business 2013 Suite ^<-^> Mondo 2013 Licenses -call :Ins15Lic O365Business MCPBN-CPY7X-3PK9R-P6GTT-H8P8Y -if !_Mondo! EQU 0 call :Ins15Lic Mondo -) -if !_Mondo! EQU 1 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 ( -echo Mondo 2013 Suite -call :Ins15Lic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK -goto :GVLKC2R -) -if !_SPD! EQU 1 if !_Mondo! EQU 0 if !_O365ProPlus! EQU 0 ( -echo SharePoint Designer 2013 App -^> Mondo 2013 Licenses -call :Ins15Lic Mondo -goto :GVLKC2R -) -if !_ProPlus! EQU 1 if !_O365ProPlus! EQU 0 ( -echo ProPlus 2013 Suite -call :Ins15Lic ProPlus -) -if !_Professional! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 ( -echo Professional 2013 Suite -^> ProPlus 2013 Licenses -call :Ins15Lic ProPlus -) -if !_Standard! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 ( -echo Standard 2013 Suite -call :Ins15Lic Standard -) -for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a! EQU 1 ( -echo %%a 2013 SKU -call :Ins15Lic %%a -) -for %%a in (HomeBusiness,HomeStudent) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 if !_Standard! EQU 0 ( - set _Standard=1 - echo %%a 2013 Suite -^> Standard 2013 Licenses - call :Ins15Lic Standard - ) -) -for %%a in (%_A15Ids%) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 if !_Standard! EQU 0 ( - echo %%a 2013 App - call :Ins15Lic %%a - ) -) -for %%a in (Access) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 ( - echo %%a 2013 App - call :Ins15Lic %%a - ) -) -for %%a in (Lync) do if !_%%a! EQU 1 ( -if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 ( - echo SkypeforBusiness 2015 App - call :Ins15Lic %%a - ) -) -goto :GVLKC2R - -:InsLic -set "_ID=%1Volume" -set "_pkey=" -if not "%2"=="" ( -set "_ID=%1Retail" -set "_pkey=PidKey=%2" -) -reg delete %_Config% /f /v %_ID%.OSPPReady %_Nul3% -"!_Integrator!" /I /License PRIDName=%_ID%.16 %_pkey% PackageGUID="%_GUID%" PackageRoot="!_InstallRoot!" %_Nul1% -reg add %_Config% /f /v %_ID%.OSPPReady /t REG_SZ /d 1 %_Nul1% -reg query %_Config% /v ProductReleaseIds | findstr /I "%_ID%" %_Nul1% -if %errorlevel% NEQ 0 ( -for /f "skip=2 tokens=2*" %%a in ('reg query %_Config% /v ProductReleaseIds') do reg add %_Config% /v ProductReleaseIds /t REG_SZ /d "%%b,%_ID%" /f %_Nul1% -) -exit /b - -:Ins15Lic -set "_ID=%1Volume" -set "_patt=%1VL_" -set "_pkey=" -if not "%2"=="" ( -set "_ID=%1Retail" -set "_patt=%1R_" -set "_pkey=%2" -) -reg delete %_OSPP15Ready% /f /v %_ID%.OSPPReady %_Nul3% -for %%# in ("!_Licenses15Path!\%_patt%*.xrm-ms") do ( -%_cscript% %_vbsi%"!_Licenses15Path!\%%~nx#" -) -set "_qr=wmic path %_sps% where Version='%_wmi%' call InstallProductKey ProductKey="%_pkey%"" -if %WMI_VBS% NEQ 0 set "_qr=%_csp% %_sps% "%_pkey%"" -if defined _pkey %_qr% %_Nul3% -reg add %_OSPP15Ready% /f /v %_ID%.OSPPReady /t %_OSPP15ReadT% /d 1 %_Nul1% -reg query %_Con15fig% %_Nul2% | findstr /I "%_ID%" %_Nul1% -if %errorlevel% NEQ 0 ( -for /f "skip=2 tokens=2*" %%a in ('reg query %_Con15fig% %_Nul6%') do reg add %_Con15fig% /t REG_SZ /d "%%b,%_ID%" /f %_Nul1% -) -exit /b - -:GVLKC2R -set _CtRMsg=0 -if %_C16Msg% EQU 1 set _CtRMsg=1 -if %_C15Msg% EQU 1 set _CtRMsg=1 -if %_Office16% EQU 1 ( -for %%a in (%_RetIds%,ProPlus) do set "_%%a=" -) -if %_Office15% EQU 1 ( -for %%a in (%_R15Ids%,ProPlus) do set "_%%a=" -) -set "_qr=wmic path %_sps% where version='%_wmi%' call RefreshLicenseStatus" -if %WMI_VBS% NEQ 0 set "_qr=%_csm% "%_sps%.Version='%_wmi%'" RefreshLicenseStatus" -if %winbuild% GEQ 9200 %_qr% %_Nul3% -if exist "%SysPath%\spp\store_test\2.0\tokens.dat" if %rancopp% EQU 1 if %_CtRMsg% EQU 1 ( -%_cscript% %_SLMGR% /rilc -if !ERRORLEVEL! NEQ 0 %_cscript% %_SLMGR% /rilc -) -goto :%_sC2R% - -:keys -if "%~1"=="" exit /b -set hy=- -goto :%1 %_Nul2% - -:: Windows 11 [Ni] -:59eb965c-9150-42b7-a0ec-22151b9897c5 -set "_key=KBN8V%hy%HFGQ4%hy%MGXVD%hy%347P6%hy%PDQGT" &:: IoT Enterprise LTSC -exit /b - -:: Windows 11 [Co] -:ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69 -set "_key=37D7F%hy%N49CB%hy%WQR8W%hy%TBJ73%hy%FM8RX" &:: SE {Cloud} -exit /b - -:d30136fc-cb4b-416e-a23d-87207abc44a9 -set "_key=6XN7V%hy%PCBDC%hy%BDBRH%hy%8DQY7%hy%G6R44" &:: SE N {Cloud N} -exit /b - -:: Windows 10 [RS5] -:32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee -set "_key=M7XTQ%hy%FN8P6%hy%TTKYV%hy%9D4CC%hy%J462D" &:: Enterprise LTSC 2019 -exit /b - -:7103a333-b8c8-49cc-93ce-d37c09687f92 -set "_key=92NFX%hy%8DJQP%hy%P6BBQ%hy%THF9C%hy%7CG2H" &:: Enterprise LTSC 2019 N -exit /b - -:ec868e65-fadf-4759-b23e-93fe37f2cc29 -set "_key=CPWHC%hy%NT2C7%hy%VYW78%hy%DHDB2%hy%PG3GK" &:: Enterprise for Virtual Desktops -exit /b - -:0df4f814-3f57-4b8b-9a9d-fddadcd69fac -set "_key=NBTWJ%hy%3DR69%hy%3C4V8%hy%C26MC%hy%GQ9M6" &:: Lean -exit /b - -:: Windows 10 [RS3] -:82bbc092-bc50-4e16-8e18-b74fc486aec3 -set "_key=NRG8B%hy%VKK3Q%hy%CXVCJ%hy%9G2XF%hy%6Q84J" &:: Pro Workstation -exit /b - -:4b1571d3-bafb-4b40-8087-a961be2caf65 -set "_key=9FNHH%hy%K3HBT%hy%3W4TD%hy%6383H%hy%6XYWF" &:: Pro Workstation N -exit /b - -:e4db50ea-bda1-4566-b047-0ca50abc6f07 -set "_key=7NBT4%hy%WGBQX%hy%MP4H7%hy%QXFF8%hy%YP3KX" &:: Enterprise Remote Server -exit /b - -:: Windows 10 [RS2] -:e0b2d383-d112-413f-8a80-97f373a5820c -set "_key=YYVX9%hy%NTFWV%hy%6MDM3%hy%9PT4T%hy%4M68B" &:: Enterprise G -exit /b - -:e38454fb-41a4-4f59-a5dc-25080e354730 -set "_key=44RPN%hy%FTY23%hy%9VTTB%hy%MP9BX%hy%T84FV" &:: Enterprise G N -exit /b - -:: Windows 10 [RS1] -:2d5a5a60-3040-48bf-beb0-fcd770c20ce0 -set "_key=DCPHK%hy%NFMTC%hy%H88MJ%hy%PFHPY%hy%QJ4BJ" &:: Enterprise 2016 LTSB -exit /b - -:9f776d83-7156-45b2-8a5c-359b9c9f22a3 -set "_key=QFFDN%hy%GRT3P%hy%VKWWX%hy%X7T3R%hy%8B639" &:: Enterprise 2016 LTSB N -exit /b - -:3f1afc82-f8ac-4f6c-8005-1d233e606eee -set "_key=6TP4R%hy%GNPTD%hy%KYYHQ%hy%7B7DP%hy%J447Y" &:: Pro Education -exit /b - -:5300b18c-2e33-4dc2-8291-47ffcec746dd -set "_key=YVWGF%hy%BXNMC%hy%HTQYQ%hy%CPQ99%hy%66QFC" &:: Pro Education N -exit /b - -:: Windows 10 [TH] -:58e97c99-f377-4ef1-81d5-4ad5522b5fd8 -set "_key=TX9XD%hy%98N7V%hy%6WMQ6%hy%BX7FG%hy%H8Q99" &:: Home -exit /b - -:7b9e1751-a8da-4f75-9560-5fadfe3d8e38 -set "_key=3KHY7%hy%WNT83%hy%DGQKR%hy%F7HPR%hy%844BM" &:: Home N -exit /b - -:cd918a57-a41b-4c82-8dce-1a538e221a83 -set "_key=7HNRX%hy%D7KGG%hy%3K4RQ%hy%4WPJ4%hy%YTDFH" &:: Home Single Language -exit /b - -:a9107544-f4a0-4053-a96a-1479abdef912 -set "_key=PVMJN%hy%6DFY6%hy%9CCP6%hy%7BKTT%hy%D3WVR" &:: Home China -exit /b - -:2de67392-b7a7-462a-b1ca-108dd189f588 -set "_key=W269N%hy%WFGWX%hy%YVC9B%hy%4J6C9%hy%T83GX" &:: Pro -exit /b - -:a80b5abf-76ad-428b-b05d-a47d2dffeebf -set "_key=MH37W%hy%N47XK%hy%V7XM9%hy%C7227%hy%GCQG9" &:: Pro N -exit /b - -:e0c42288-980c-4788-a014-c080d2e1926e -set "_key=NW6C2%hy%QMPVW%hy%D7KKK%hy%3GKT6%hy%VCFB2" &:: Education -exit /b - -:3c102355-d027-42c6-ad23-2e7ef8a02585 -set "_key=2WH4N%hy%8QGBV%hy%H22JP%hy%CT43Q%hy%MDWWJ" &:: Education N -exit /b - -:73111121-5638-40f6-bc11-f1d7b0d64300 -set "_key=NPPR9%hy%FWDCX%hy%D2C8J%hy%H872K%hy%2YT43" &:: Enterprise -exit /b - -:e272e3e2-732f-4c65-a8f0-484747d0d947 -set "_key=DPH2V%hy%TTNVB%hy%4X9Q3%hy%TJR4H%hy%KHJW4" &:: Enterprise N -exit /b - -:7b51a46c-0c04-4e8f-9af4-8496cca90d5e -set "_key=WNMTR%hy%4C88C%hy%JK8YV%hy%HQ7T2%hy%76DF9" &:: Enterprise 2015 LTSB -exit /b - -:87b838b7-41b6-4590-8318-5797951d8529 -set "_key=2F77B%hy%TNFGY%hy%69QQF%hy%B8YKP%hy%D69TJ" &:: Enterprise 2015 LTSB N -exit /b - -:: Windows Server 2022 [Fe] -:9bd77860-9b31-4b7b-96ad-2564017315bf -set "_key=VDYBN%hy%27WPP%hy%V4HQT%hy%9VMD4%hy%VMK7H" &:: Standard -exit /b - -:ef6cfc9f-8c5d-44ac-9aad-de6a2ea0ae03 -set "_key=WX4NM%hy%KYWYW%hy%QJJR4%hy%XV3QB%hy%6VM33" &:: Datacenter -exit /b - -:8c8f0ad3-9a43-4e05-b840-93b8d1475cbc -set "_key=6N379%hy%GGTMK%hy%23C6M%hy%XVVTC%hy%CKFRQ" &:: Azure Core -exit /b - -:f5e9429c-f50b-4b98-b15c-ef92eb5cff39 -set "_key=67KN8%hy%4FYJW%hy%2487Q%hy%MQ2J7%hy%4C4RG" &:: Standard ACor -exit /b - -:39e69c41-42b4-4a0a-abad-8e3c10a797cc -set "_key=QFND9%hy%D3Y9C%hy%J3KKY%hy%6RPVP%hy%2DPYV" &:: Datacenter ACor -exit /b - -:: Windows Server 2019 [RS5] -:de32eafd-aaee-4662-9444-c1befb41bde2 -set "_key=N69G4%hy%B89J2%hy%4G8F4%hy%WWYCC%hy%J464C" &:: Standard -exit /b - -:34e1ae55-27f8-4950-8877-7a03be5fb181 -set "_key=WMDGN%hy%G9PQG%hy%XVVXX%hy%R3X43%hy%63DFG" &:: Datacenter -exit /b - -:a99cc1f0-7719-4306-9645-294102fbff95 -set "_key=FDNH6%hy%VW9RW%hy%BXPJ7%hy%4XTYG%hy%239TB" &:: Azure Core -exit /b - -:73e3957c-fc0c-400d-9184-5f7b6f2eb409 -set "_key=N2KJX%hy%J94YW%hy%TQVFB%hy%DG9YT%hy%724CC" &:: Standard ACor -exit /b - -:90c362e5-0da1-4bfd-b53b-b87d309ade43 -set "_key=6NMRW%hy%2C8FM%hy%D24W7%hy%TQWMY%hy%CWH2D" &:: Datacenter ACor -exit /b - -:034d3cbb-5d4b-4245-b3f8-f84571314078 -set "_key=WVDHN%hy%86M7X%hy%466P6%hy%VHXV7%hy%YY726" &:: Essentials -exit /b - -:8de8eb62-bbe0-40ac-ac17-f75595071ea3 -set "_key=GRFBW%hy%QNDC4%hy%6QBHG%hy%CCK3B%hy%2PR88" &:: ServerARM64 -exit /b - -:19b5e0fb-4431-46bc-bac1-2f1873e4ae73 -set "_key=NTBV8%hy%9K7Q8%hy%V27C6%hy%M2BTV%hy%KHMXV" &:: Azure Datacenter %hy% ServerTurbine -exit /b - -:: Windows Server 2016 [RS4] -:43d9af6e-5e86-4be8-a797-d072a046896c -set "_key=K9FYF%hy%G6NCK%hy%73M32%hy%XMVPY%hy%F9DRR" &:: ServerARM64 -exit /b - -:: Windows Server 2016 [RS3] -:61c5ef22-f14f-4553-a824-c4b31e84b100 -set "_key=PTXN8%hy%JFHJM%hy%4WC78%hy%MPCBR%hy%9W4KR" &:: Standard ACor -exit /b - -:e49c08e7-da82-42f8-bde2-b570fbcae76c -set "_key=2HXDN%hy%KRXHB%hy%GPYC7%hy%YCKFJ%hy%7FVDG" &:: Datacenter ACor -exit /b - -:: Windows Server 2016 [RS1] -:8c1c5410-9f39-4805-8c9d-63a07706358f -set "_key=WC2BQ%hy%8NRM3%hy%FDDYY%hy%2BFGV%hy%KHKQY" &:: Standard -exit /b - -:21c56779-b449-4d20-adfc-eece0e1ad74b -set "_key=CB7KF%hy%BWN84%hy%R7R2Y%hy%793K2%hy%8XDDG" &:: Datacenter -exit /b - -:3dbf341b-5f6c-4fa7-b936-699dce9e263f -set "_key=VP34G%hy%4NPPG%hy%79JTQ%hy%864T4%hy%R3MQX" &:: Azure Core -exit /b - -:2b5a1b0f-a5ab-4c54-ac2f-a6d94824a283 -set "_key=JCKRF%hy%N37P4%hy%C2D82%hy%9YXRT%hy%4M63B" &:: Essentials -exit /b - -:7b4433f4-b1e7-4788-895a-c45378d38253 -set "_key=QN4C6%hy%GBJD2%hy%FB422%hy%GHWJK%hy%GJG2R" &:: Cloud Storage -exit /b - -:: Windows 8.1 -:fe1c3238-432a-43a1-8e25-97e7d1ef10f3 -set "_key=M9Q9P%hy%WNJJT%hy%6PXPY%hy%DWX8H%hy%6XWKK" &:: Core -exit /b - -:78558a64-dc19-43fe-a0d0-8075b2a370a3 -set "_key=7B9N3%hy%D94CG%hy%YTVHR%hy%QBPX3%hy%RJP64" &:: Core N -exit /b - -:c72c6a1d-f252-4e7e-bdd1-3fca342acb35 -set "_key=BB6NG%hy%PQ82V%hy%VRDPW%hy%8XVD2%hy%V8P66" &:: Core Single Language -exit /b - -:db78b74f-ef1c-4892-abfe-1e66b8231df6 -set "_key=NCTT7%hy%2RGK8%hy%WMHRF%hy%RY7YQ%hy%JTXG3" &:: Core China -exit /b - -:ffee456a-cd87-4390-8e07-16146c672fd0 -set "_key=XYTND%hy%K6QKT%hy%K2MRH%hy%66RTM%hy%43JKP" &:: Core ARM -exit /b - -:c06b6981-d7fd-4a35-b7b4-054742b7af67 -set "_key=GCRJD%hy%8NW9H%hy%F2CDX%hy%CCM8D%hy%9D6T9" &:: Pro -exit /b - -:7476d79f-8e48-49b4-ab63-4d0b813a16e4 -set "_key=HMCNV%hy%VVBFX%hy%7HMBH%hy%CTY9B%hy%B4FXY" &:: Pro N -exit /b - -:096ce63d-4fac-48a9-82a9-61ae9e800e5f -set "_key=789NJ%hy%TQK6T%hy%6XTH8%hy%J39CJ%hy%J8D3P" &:: Pro with Media Center -exit /b - -:81671aaf-79d1-4eb1-b004-8cbbe173afea -set "_key=MHF9N%hy%XY6XB%hy%WVXMC%hy%BTDCT%hy%MKKG7" &:: Enterprise -exit /b - -:113e705c-fa49-48a4-beea-7dd879b46b14 -set "_key=TT4HM%hy%HN7YT%hy%62K67%hy%RGRQJ%hy%JFFXW" &:: Enterprise N -exit /b - -:0ab82d54-47f4-4acb-818c-cc5bf0ecb649 -set "_key=NMMPB%hy%38DD4%hy%R2823%hy%62W8D%hy%VXKJB" &:: Embedded Industry Pro -exit /b - -:cd4e2d9f-5059-4a50-a92d-05d5bb1267c7 -set "_key=FNFKF%hy%PWTVT%hy%9RC8H%hy%32HB2%hy%JB34X" &:: Embedded Industry Enterprise -exit /b - -:f7e88590-dfc7-4c78-bccb-6f3865b99d1a -set "_key=VHXM3%hy%NR6FT%hy%RY6RT%hy%CK882%hy%KW2CJ" &:: Embedded Industry Automotive -exit /b - -:e9942b32-2e55-4197-b0bd-5ff58cba8860 -set "_key=3PY8R%hy%QHNP9%hy%W7XQD%hy%G6DPH%hy%3J2C9" &:: with Bing -exit /b - -:c6ddecd6-2354-4c19-909b-306a3058484e -set "_key=Q6HTR%hy%N24GM%hy%PMJFP%hy%69CD8%hy%2GXKR" &:: with Bing N -exit /b - -:b8f5e3a3-ed33-4608-81e1-37d6c9dcfd9c -set "_key=KF37N%hy%VDV38%hy%GRRTV%hy%XH8X6%hy%6F3BB" &:: with Bing Single Language -exit /b - -:ba998212-460a-44db-bfb5-71bf09d1c68b -set "_key=R962J%hy%37N87%hy%9VVK2%hy%WJ74P%hy%XTMHR" &:: with Bing China -exit /b - -:e58d87b5-8126-4580-80fb-861b22f79296 -set "_key=MX3RK%hy%9HNGX%hy%K3QKC%hy%6PJ3F%hy%W8D7B" &:: Pro for Students -exit /b - -:cab491c7-a918-4f60-b502-dab75e334f40 -set "_key=TNFGH%hy%2R6PB%hy%8XM3K%hy%QYHX2%hy%J4296" &:: Pro for Students N -exit /b - -:: Windows Server 2012 R2 -:b3ca044e-a358-4d68-9883-aaa2941aca99 -set "_key=D2N9P%hy%3P6X9%hy%2R39C%hy%7RTCD%hy%MDVJX" &:: Standard -exit /b - -:00091344-1ea4-4f37-b789-01750ba6988c -set "_key=W3GGN%hy%FT8W3%hy%Y4M27%hy%J84CP%hy%Q3VJ9" &:: Datacenter -exit /b - -:21db6ba4-9a7b-4a14-9e29-64a60c59301d -set "_key=KNC87%hy%3J2TX%hy%XB4WP%hy%VCPJV%hy%M4FWM" &:: Essentials -exit /b - -:b743a2be-68d4-4dd3-af32-92425b7bb623 -set "_key=3NPTF%hy%33KPT%hy%GGBPR%hy%YX76B%hy%39KDD" &:: Cloud Storage -exit /b - -:: Windows 8 -:c04ed6bf-55c8-4b47-9f8e-5a1f31ceee60 -set "_key=BN3D2%hy%R7TKB%hy%3YPBD%hy%8DRP2%hy%27GG4" &:: Core -exit /b - -:197390a0-65f6-4a95-bdc4-55d58a3b0253 -set "_key=8N2M2%hy%HWPGY%hy%7PGT9%hy%HGDD8%hy%GVGGY" &:: Core N -exit /b - -:8860fcd4-a77b-4a20-9045-a150ff11d609 -set "_key=2WN2H%hy%YGCQR%hy%KFX6K%hy%CD6TF%hy%84YXQ" &:: Core Single Language -exit /b - -:9d5584a2-2d85-419a-982c-a00888bb9ddf -set "_key=4K36P%hy%JN4VD%hy%GDC6V%hy%KDT89%hy%DYFKP" &:: Core China -exit /b - -:af35d7b7-5035-4b63-8972-f0b747b9f4dc -set "_key=DXHJF%hy%N9KQX%hy%MFPVR%hy%GHGQK%hy%Y7RKV" &:: Core ARM -exit /b - -:a98bcd6d-5343-4603-8afe-5908e4611112 -set "_key=NG4HW%hy%VH26C%hy%733KW%hy%K6F98%hy%J8CK4" &:: Pro -exit /b - -:ebf245c1-29a8-4daf-9cb1-38dfc608a8c8 -set "_key=XCVCF%hy%2NXM9%hy%723PB%hy%MHCB7%hy%2RYQQ" &:: Pro N -exit /b - -:a00018a3-f20f-4632-bf7c-8daa5351c914 -set "_key=GNBB8%hy%YVD74%hy%QJHX6%hy%27H4K%hy%8QHDG" &:: Pro with Media Center -exit /b - -:458e1bec-837a-45f6-b9d5-925ed5d299de -set "_key=32JNW%hy%9KQ84%hy%P47T8%hy%D8GGY%hy%CWCK7" &:: Enterprise -exit /b - -:e14997e7-800a-4cf7-ad10-de4b45b578db -set "_key=JMNMF%hy%RHW7P%hy%DMY6X%hy%RF3DR%hy%X2BQT" &:: Enterprise N -exit /b - -:10018baf-ce21-4060-80bd-47fe74ed4dab -set "_key=RYXVT%hy%BNQG7%hy%VD29F%hy%DBMRY%hy%HT73M" &:: Embedded Industry Pro -exit /b - -:18db1848-12e0-4167-b9d7-da7fcda507db -set "_key=NKB3R%hy%R2F8T%hy%3XCDP%hy%7Q2KW%hy%XWYQ2" &:: Embedded Industry Enterprise -exit /b - -:: Windows Server 2012 -:f0f5ec41-0d55-4732-af02-440a44a3cf0f -set "_key=XC9B7%hy%NBPP2%hy%83J2H%hy%RHMBY%hy%92BT4" &:: Standard -exit /b - -:d3643d60-0c42-412d-a7d6-52e6635327f6 -set "_key=48HP8%hy%DN98B%hy%MYWDG%hy%T2DCC%hy%8W83P" &:: Datacenter -exit /b - -:7d5486c7-e120-4771-b7f1-7b56c6d3170c -set "_key=HM7DN%hy%YVMH3%hy%46JC3%hy%XYTG7%hy%CYQJJ" &:: MultiPoint Standard -exit /b - -:95fd1c83-7df5-494a-be8b-1300e1c9d1cd -set "_key=XNH6W%hy%2V9GX%hy%RGJ4K%hy%Y8X6F%hy%QGJ2G" &:: MultiPoint Premium -exit /b - -:: Windows 7 -:b92e9980-b9d5-4821-9c94-140f632f6312 -set "_key=FJ82H%hy%XT6CR%hy%J8D7P%hy%XQJJ2%hy%GPDD4" &:: Professional -exit /b - -:54a09a0d-d57b-4c10-8b69-a842d6590ad5 -set "_key=MRPKT%hy%YTG23%hy%K7D7T%hy%X2JMM%hy%QY7MG" &:: Professional N -exit /b - -:5a041529-fef8-4d07-b06f-b59b573b32d2 -set "_key=W82YF%hy%2Q76Y%hy%63HXB%hy%FGJG9%hy%GF7QX" &:: Professional E -exit /b - -:ae2ee509-1b34-41c0-acb7-6d4650168915 -set "_key=33PXH%hy%7Y6KF%hy%2VJC9%hy%XBBR8%hy%HVTHH" &:: Enterprise -exit /b - -:1cb6d605-11b3-4e14-bb30-da91c8e3983a -set "_key=YDRBP%hy%3D83W%hy%TY26F%hy%D46B2%hy%XCKRJ" &:: Enterprise N -exit /b - -:46bbed08-9c7b-48fc-a614-95250573f4ea -set "_key=C29WB%hy%22CC8%hy%VJ326%hy%GHFJW%hy%H9DH4" &:: Enterprise E -exit /b - -:db537896-376f-48ae-a492-53d0547773d0 -set "_key=YBYF6%hy%BHCR3%hy%JPKRB%hy%CDW7B%hy%F9BK4" &:: Embedded POSReady 7 -exit /b - -:e1a8296a-db37-44d1-8cce-7bc961d59c54 -set "_key=XGY72%hy%BRBBT%hy%FF8MH%hy%2GG8H%hy%W7KCW" &:: Embedded Standard -exit /b - -:aa6dd3aa-c2b4-40e2-a544-a6bbb3f5c395 -set "_key=73KQT%hy%CD9G6%hy%K7TQG%hy%66MRP%hy%CQ22C" &:: Embedded ThinPC -exit /b - -:: Windows Server 2008 R2 -:a78b8bd9-8017-4df5-b86a-09f756affa7c -set "_key=6TPJF%hy%RBVHG%hy%WBW2R%hy%86QPH%hy%6RTM4" &:: Web -exit /b - -:cda18cf3-c196-46ad-b289-60c072869994 -set "_key=TT8MH%hy%CG224%hy%D3D7Q%hy%498W2%hy%9QCTX" &:: HPC -exit /b - -:68531fb9-5511-4989-97be-d11a0f55633f -set "_key=YC6KT%hy%GKW9T%hy%YTKYR%hy%T4X34%hy%R7VHC" &:: Standard -exit /b - -:7482e61b-c589-4b7f-8ecc-46d455ac3b87 -set "_key=74YFP%hy%3QFB3%hy%KQT8W%hy%PMXWJ%hy%7M648" &:: Datacenter -exit /b - -:620e2b3d-09e7-42fd-802a-17a13652fe7a -set "_key=489J6%hy%VHDMP%hy%X63PK%hy%3K798%hy%CPX3Y" &:: Enterprise -exit /b - -:8a26851c-1c7e-48d3-a687-fbca9b9ac16b -set "_key=GT63C%hy%RJFQ3%hy%4GMB6%hy%BRFB9%hy%CB83V" &:: Itanium -exit /b - -:f772515c-0e87-48d5-a676-e6962c3e1195 -set "_key=736RG%hy%XDKJK%hy%V34PF%hy%BHK87%hy%J6X3K" &:: MultiPoint Server %hy% ServerEmbeddedSolution -exit /b - -:: Office 2021 -:fbdb3e18-a8ef-4fb3-9183-dffd60bd0984 -set "_key=FXYTK%hy%NJJ8C%hy%GB6DW%hy%3DYQT%hy%6F7TH" &:: Professional Plus -exit /b - -:080a45c5-9f9f-49eb-b4b0-c3c610a5ebd3 -set "_key=KDX7X%hy%BNVR8%hy%TXXGX%hy%4Q7Y8%hy%78VT3" &:: Standard -exit /b - -:76881159-155c-43e0-9db7-2d70a9a3a4ca -set "_key=FTNWT%hy%C6WBT%hy%8HMGF%hy%K9PRX%hy%QV9H8" &:: Project Professional -exit /b - -:6dd72704-f752-4b71-94c7-11cec6bfc355 -set "_key=J2JDC%hy%NJCYY%hy%9RGQ4%hy%YXWMH%hy%T3D4T" &:: Project Standard -exit /b - -:fb61ac9a-1688-45d2-8f6b-0674dbffa33c -set "_key=KNH8D%hy%FGHT4%hy%T8RK3%hy%CTDYJ%hy%K2HT4" &:: Visio Professional -exit /b - -:72fce797-1884-48dd-a860-b2f6a5efd3ca -set "_key=MJVNY%hy%BYWPY%hy%CWV6J%hy%2RKRT%hy%4M8QG" &:: Visio Standard -exit /b - -:1fe429d8-3fa7-4a39-b6f0-03dded42fe14 -set "_key=WM8YG%hy%YNGDD%hy%4JHDC%hy%PG3F4%hy%FC4T4" &:: Access -exit /b - -:ea71effc-69f1-4925-9991-2f5e319bbc24 -set "_key=NWG3X%hy%87C9K%hy%TC7YY%hy%BC2G7%hy%G6RVC" &:: Excel -exit /b - -:a5799e4c-f83c-4c6e-9516-dfe9b696150b -set "_key=C9FM6%hy%3N72F%hy%HFJXB%hy%TM3V9%hy%T86R9" &:: Outlook -exit /b - -:6e166cc3-495d-438a-89e7-d7c9e6fd4dea -set "_key=TY7XF%hy%NFRBR%hy%KJ44C%hy%G83KF%hy%GX27K" &:: PowerPoint -exit /b - -:aa66521f-2370-4ad8-a2bb-c095e3e4338f -set "_key=2MW9D%hy%N4BXM%hy%9VBPG%hy%Q7W6M%hy%KFBGQ" &:: Publisher -exit /b - -:1f32a9af-1274-48bd-ba1e-1ab7508a23e8 -set "_key=HWCXN%hy%K3WBT%hy%WJBKY%hy%R8BD9%hy%XK29P" &:: Skype for Business -exit /b - -:abe28aea-625a-43b1-8e30-225eb8fbd9e5 -set "_key=TN8H9%hy%M34D3%hy%Y64V9%hy%TR72V%hy%X79KV" &:: Word -exit /b - -:: Office 2019 -:85dd8b5f-eaa4-4af3-a628-cce9e77c9a03 -set "_key=NMMKJ%hy%6RK4F%hy%KMJVX%hy%8D9MJ%hy%6MWKP" &:: Professional Plus -exit /b - -:6912a74b-a5fb-401a-bfdb-2e3ab46f4b02 -set "_key=6NWWJ%hy%YQWMR%hy%QKGCB%hy%6TMB3%hy%9D9HK" &:: Standard -exit /b - -:2ca2bf3f-949e-446a-82c7-e25a15ec78c4 -set "_key=B4NPR%hy%3FKK7%hy%T2MBV%hy%FRQ4W%hy%PKD2B" &:: Project Professional -exit /b - -:1777f0e3-7392-4198-97ea-8ae4de6f6381 -set "_key=C4F7P%hy%NCP8C%hy%6CQPT%hy%MQHV9%hy%JXD2M" &:: Project Standard -exit /b - -:5b5cf08f-b81a-431d-b080-3450d8620565 -set "_key=9BGNQ%hy%K37YR%hy%RQHF2%hy%38RQ3%hy%7VCBB" &:: Visio Professional -exit /b - -:e06d7df3-aad0-419d-8dfb-0ac37e2bdf39 -set "_key=7TQNQ%hy%K3YQQ%hy%3PFH7%hy%CCPPM%hy%X4VQ2" &:: Visio Standard -exit /b - -:9e9bceeb-e736-4f26-88de-763f87dcc485 -set "_key=9N9PT%hy%27V4Y%hy%VJ2PD%hy%YXFMF%hy%YTFQT" &:: Access -exit /b - -:237854e9-79fc-4497-a0c1-a70969691c6b -set "_key=TMJWT%hy%YYNMB%hy%3BKTF%hy%644FC%hy%RVXBD" &:: Excel -exit /b - -:c8f8a301-19f5-4132-96ce-2de9d4adbd33 -set "_key=7HD7K%hy%N4PVK%hy%BHBCQ%hy%YWQRW%hy%XW4VK" &:: Outlook -exit /b - -:3131fd61-5e4f-4308-8d6d-62be1987c92c -set "_key=RRNCX%hy%C64HY%hy%W2MM7%hy%MCH9G%hy%TJHMQ" &:: PowerPoint -exit /b - -:9d3e4cca-e172-46f1-a2f4-1d2107051444 -set "_key=G2KWX%hy%3NW6P%hy%PY93R%hy%JXK2T%hy%C9Y9V" &:: Publisher -exit /b - -:734c6c6e-b0ba-4298-a891-671772b2bd1b -set "_key=NCJ33%hy%JHBBY%hy%HTK98%hy%MYCV8%hy%HMKHJ" &:: Skype for Business -exit /b - -:059834fe-a8ea-4bff-b67b-4d006b5447d3 -set "_key=PBX3G%hy%NWMT6%hy%Q7XBW%hy%PYJGG%hy%WXD33" &:: Word -exit /b - -:0bc88885-718c-491d-921f-6f214349e79c -set "_key=VQ9DP%hy%NVHPH%hy%T9HJC%hy%J9PDT%hy%KTQRG" &:: Pro Plus 2019 Preview -exit /b - -:fc7c4d0c-2e85-4bb9-afd4-01ed1476b5e9 -set "_key=XM2V9%hy%DN9HH%hy%QB449%hy%XDGKC%hy%W2RMW" &:: Project Pro 2019 Preview -exit /b - -:500f6619-ef93-4b75-bcb4-82819998a3ca -set "_key=N2CG9%hy%YD3YK%hy%936X4%hy%3WR82%hy%Q3X4H" &:: Visio Pro 2019 Preview -exit /b - -:f3fb2d68-83dd-4c8b-8f09-08e0d950ac3b -set "_key=HFPBN%hy%RYGG8%hy%HQWCW%hy%26CH6%hy%PDPVF" &:: Pro Plus 2021 Preview -exit /b - -:76093b1b-7057-49d7-b970-638ebcbfd873 -set "_key=WDNBY%hy%PCYFY%hy%9WP6G%hy%BXVXM%hy%92HDV" &:: Project Pro 2021 Preview -exit /b - -:a3b44174-2451-4cd6-b25f-66638bfb9046 -set "_key=2XYX7%hy%NXXBK%hy%9CK7W%hy%K2TKW%hy%JFJ7G" &:: Visio Pro 2021 Preview -exit /b - -:: Office 2016 -:829b8110-0e6f-4349-bca4-42803577788d -set "_key=WGT24%hy%HCNMF%hy%FQ7XH%hy%6M8K7%hy%DRTW9" &:: Project Professional C2R%hy%P -exit /b - -:cbbaca45-556a-4416-ad03-bda598eaa7c8 -set "_key=D8NRQ%hy%JTYM3%hy%7J2DX%hy%646CT%hy%6836M" &:: Project Standard C2R%hy%P -exit /b - -:b234abe3-0857-4f9c-b05a-4dc314f85557 -set "_key=69WXN%hy%MBYV6%hy%22PQG%hy%3WGHK%hy%RM6XC" &:: Visio Professional C2R%hy%P -exit /b - -:361fe620-64f4-41b5-ba77-84f8e079b1f7 -set "_key=NY48V%hy%PPYYH%hy%3F4PX%hy%XJRKJ%hy%W4423" &:: Visio Standard C2R%hy%P -exit /b - -:e914ea6e-a5fa-4439-a394-a9bb3293ca09 -set "_key=DMTCJ%hy%KNRKX%hy%26982%hy%JYCKT%hy%P7KB6" &:: MondoR -exit /b - -:9caabccb-61b1-4b4b-8bec-d10a3c3ac2ce -set "_key=HFTND%hy%W9MK4%hy%8B7MJ%hy%B6C4G%hy%XQBR2" &:: Mondo -exit /b - -:d450596f-894d-49e0-966a-fd39ed4c4c64 -set "_key=XQNVK%hy%8JYDB%hy%WJ9W3%hy%YJ8YR%hy%WFG99" &:: Professional Plus -exit /b - -:dedfa23d-6ed1-45a6-85dc-63cae0546de6 -set "_key=JNRGM%hy%WHDWX%hy%FJJG3%hy%K47QV%hy%DRTFM" &:: Standard -exit /b - -:4f414197-0fc2-4c01-b68a-86cbb9ac254c -set "_key=YG9NW%hy%3K39V%hy%2T3HJ%hy%93F3Q%hy%G83KT" &:: Project Professional -exit /b - -:da7ddabc-3fbe-4447-9e01-6ab7440b4cd4 -set "_key=GNFHQ%hy%F6YQM%hy%KQDGJ%hy%327XX%hy%KQBVC" &:: Project Standard -exit /b - -:6bf301c1-b94a-43e9-ba31-d494598c47fb -set "_key=PD3PC%hy%RHNGV%hy%FXJ29%hy%8JK7D%hy%RJRJK" &:: Visio Professional -exit /b - -:aa2a7821-1827-4c2c-8f1d-4513a34dda97 -set "_key=7WHWN%hy%4T7MP%hy%G96JF%hy%G33KR%hy%W8GF4" &:: Visio Standard -exit /b - -:67c0fc0c-deba-401b-bf8b-9c8ad8395804 -set "_key=GNH9Y%hy%D2J4T%hy%FJHGG%hy%QRVH7%hy%QPFDW" &:: Access -exit /b - -:c3e65d36-141f-4d2f-a303-a842ee756a29 -set "_key=9C2PK%hy%NWTVB%hy%JMPW8%hy%BFT28%hy%7FTBF" &:: Excel -exit /b - -:d8cace59-33d2-4ac7-9b1b-9b72339c51c8 -set "_key=DR92N%hy%9HTF2%hy%97XKM%hy%XW2WJ%hy%XW3J6" &:: OneNote -exit /b - -:ec9d9265-9d1e-4ed0-838a-cdc20f2551a1 -set "_key=R69KK%hy%NTPKF%hy%7M3Q4%hy%QYBHW%hy%6MT9B" &:: Outlook -exit /b - -:d70b1bba-b893-4544-96e2-b7a318091c33 -set "_key=J7MQP%hy%HNJ4Y%hy%WJ7YM%hy%PFYGF%hy%BY6C6" &:: Powerpoint -exit /b - -:041a06cb-c5b8-4772-809f-416d03d16654 -set "_key=F47MM%hy%N3XJP%hy%TQXJ9%hy%BP99D%hy%8K837" &:: Publisher -exit /b - -:83e04ee1-fa8d-436d-8994-d31a862cab77 -set "_key=869NQ%hy%FJ69K%hy%466HW%hy%QYCP2%hy%DDBV6" &:: Skype for Business -exit /b - -:bb11badf-d8aa-470e-9311-20eaf80fe5cc -set "_key=WXY84%hy%JN2Q9%hy%RBCCQ%hy%3Q3J3%hy%3PFJ6" &:: Word -exit /b - -:: Office 2013 -:dc981c6b-fc8e-420f-aa43-f8f33e5c0923 -set "_key=42QTK%hy%RN8M7%hy%J3C4G%hy%BBGYM%hy%88CYV" &:: Mondo -exit /b - -:b322da9c-a2e2-4058-9e4e-f59a6970bd69 -set "_key=YC7DK%hy%G2NP3%hy%2QQC3%hy%J6H88%hy%GVGXT" &:: Professional Plus -exit /b - -:b13afb38-cd79-4ae5-9f7f-eed058d750ca -set "_key=KBKQT%hy%2NMXY%hy%JJWGP%hy%M62JB%hy%92CD4" &:: Standard -exit /b - -:4a5d124a-e620-44ba-b6ff-658961b33b9a -set "_key=FN8TT%hy%7WMH6%hy%2D4X9%hy%M337T%hy%2342K" &:: Project Professional -exit /b - -:427a28d1-d17c-4abf-b717-32c780ba6f07 -set "_key=6NTH3%hy%CW976%hy%3G3Y2%hy%JK3TX%hy%8QHTT" &:: Project Standard -exit /b - -:e13ac10e-75d0-4aff-a0cd-764982cf541c -set "_key=C2FG9%hy%N6J68%hy%H8BTJ%hy%BW3QX%hy%RM3B3" &:: Visio Professional -exit /b - -:ac4efaf0-f81f-4f61-bdf7-ea32b02ab117 -set "_key=J484Y%hy%4NKBF%hy%W2HMG%hy%DBMJC%hy%PGWR7" &:: Visio Standard -exit /b - -:6ee7622c-18d8-4005-9fb7-92db644a279b -set "_key=NG2JY%hy%H4JBT%hy%HQXYP%hy%78QH9%hy%4JM2D" &:: Access -exit /b - -:f7461d52-7c2b-43b2-8744-ea958e0bd09a -set "_key=VGPNG%hy%Y7HQW%hy%9RHP7%hy%TKPV3%hy%BG7GB" &:: Excel -exit /b - -:fb4875ec-0c6b-450f-b82b-ab57d8d1677f -set "_key=H7R7V%hy%WPNXQ%hy%WCYYC%hy%76BGV%hy%VT7GH" &:: Groove -exit /b - -:a30b8040-d68a-423f-b0b5-9ce292ea5a8f -set "_key=DKT8B%hy%N7VXH%hy%D963P%hy%Q4PHY%hy%F8894" &:: InfoPath -exit /b - -:1b9f11e3-c85c-4e1b-bb29-879ad2c909e3 -set "_key=2MG3G%hy%3BNTT%hy%3MFW9%hy%KDQW3%hy%TCK7R" &:: Lync -exit /b - -:efe1f3e6-aea2-4144-a208-32aa872b6545 -set "_key=TGN6P%hy%8MMBC%hy%37P2F%hy%XHXXK%hy%P34VW" &:: OneNote -exit /b - -:771c3afa-50c5-443f-b151-ff2546d863a0 -set "_key=QPN8Q%hy%BJBTJ%hy%334K3%hy%93TGY%hy%2PMBT" &:: Outlook -exit /b - -:8c762649-97d1-4953-ad27-b7e2c25b972e -set "_key=4NT99%hy%8RJFH%hy%Q2VDH%hy%KYG2C%hy%4RD4F" &:: Powerpoint -exit /b - -:00c79ff1-6850-443d-bf61-71cde0de305f -set "_key=PN2WF%hy%29XG2%hy%T9HJ7%hy%JQPJR%hy%FCXK4" &:: Publisher -exit /b - -:d9f5b1c6-5386-495a-88f9-9ad6b41ac9b3 -set "_key=6Q7VD%hy%NX8JD%hy%WJ2VH%hy%88V73%hy%4GBJ7" &:: Word -exit /b - -:: Office 2010 -:09ed9640-f020-400a-acd8-d7d867dfd9c2 -set "_key=YBJTT%hy%JG6MD%hy%V9Q7P%hy%DBKXJ%hy%38W9R" &:: Mondo -exit /b - -:ef3d4e49-a53d-4d81-a2b1-2ca6c2556b2c -set "_key=7TC2V%hy%WXF6P%hy%TD7RT%hy%BQRXR%hy%B8K32" &:: Mondo2 -exit /b - -:6f327760-8c5c-417c-9b61-836a98287e0c -set "_key=VYBBJ%hy%TRJPB%hy%QFQRF%hy%QFT4D%hy%H3GVB" &:: Professional Plus -exit /b - -:9da2a678-fb6b-4e67-ab84-60dd6a9c819a -set "_key=V7QKV%hy%4XVVR%hy%XYV4D%hy%F7DFM%hy%8R6BM" &:: Standard -exit /b - -:df133ff7-bf14-4f95-afe3-7b48e7e331ef -set "_key=YGX6F%hy%PGV49%hy%PGW3J%hy%9BTGG%hy%VHKC6" &:: Project Professional -exit /b - -:5dc7bf61-5ec9-4996-9ccb-df806a2d0efe -set "_key=4HP3K%hy%88W3F%hy%W2K3D%hy%6677X%hy%F9PGB" &:: Project Standard -exit /b - -:92236105-bb67-494f-94c7-7f7a607929bd -set "_key=D9DWC%hy%HPYVV%hy%JGF4P%hy%BTWQB%hy%WX8BJ" &:: Visio Premium -exit /b - -:e558389c-83c3-4b29-adfe-5e4d7f46c358 -set "_key=7MCW8%hy%VRQVK%hy%G677T%hy%PDJCM%hy%Q8TCP" &:: Visio Professional -exit /b - -:9ed833ff-4f92-4f36-b370-8683a4f13275 -set "_key=767HD%hy%QGMWX%hy%8QTDB%hy%9G3R2%hy%KHFGJ" &:: Visio Standard -exit /b - -:8ce7e872-188c-4b98-9d90-f8f90b7aad02 -set "_key=V7Y44%hy%9T38C%hy%R2VJK%hy%666HK%hy%T7DDX" &:: Access -exit /b - -:cee5d470-6e3b-4fcc-8c2b-d17428568a9f -set "_key=H62QG%hy%HXVKF%hy%PP4HP%hy%66KMR%hy%CW9BM" &:: Excel -exit /b - -:8947d0b8-c33b-43e1-8c56-9b674c052832 -set "_key=QYYW6%hy%QP4CB%hy%MBV6G%hy%HYMCJ%hy%4T3J4" &:: Groove %hy% SharePoint Workspace -exit /b - -:ca6b6639-4ad6-40ae-a575-14dee07f6430 -set "_key=K96W8%hy%67RPQ%hy%62T9Y%hy%J8FQJ%hy%BT37T" &:: InfoPath -exit /b - -:ab586f5c-5256-4632-962f-fefd8b49e6f4 -set "_key=Q4Y4M%hy%RHWJM%hy%PY37F%hy%MTKWH%hy%D3XHX" &:: OneNote -exit /b - -:ecb7c192-73ab-4ded-acf4-2399b095d0cc -set "_key=7YDC2%hy%CWM8M%hy%RRTJC%hy%8MDVC%hy%X3DWQ" &:: Outlook -exit /b - -:45593b1d-dfb1-4e91-bbfb-2d5d0ce2227a -set "_key=RC8FX%hy%88JRY%hy%3PF7C%hy%X8P67%hy%P4VTT" &:: Powerpoint -exit /b - -:b50c4f75-599b-43e8-8dcd-1081a7967241 -set "_key=BFK7F%hy%9MYHM%hy%V68C7%hy%DRQ66%hy%83YTP" &:: Publisher -exit /b - -:2d0882e7-a4e7-423b-8ccc-70d91e0158b1 -set "_key=HVHB3%hy%C6FV7%hy%KQX9W%hy%YQG79%hy%CRY7T" &:: Word -exit /b - -:ea509e87-07a1-4a45-9edc-eba5a39f36af -set "_key=D6QFG%hy%VBYP2%hy%XQHM7%hy%J97RH%hy%VVRCK" &:: Small Business Basics -exit /b - -:TheEnd - -if %act_failed% EQU 1 ( -echo __________________________________________________________________ -echo. -call :_errorinfo -) - -echo. -if not defined _tskinstalled if not defined _oldtsk ( -if %winbuild% GEQ 9200 ( -call :leavenonexistentkms %nul% -echo Keeping the non-existent IP address 10.0.0.10 as KMS Server. -) else ( -call :Clear-KMS-Cache -) -) - -if defined _tskinstalled echo Renewal Task found, keeping the online KMS IP in the system. -if defined _oldtsk echo Renewal Task found, keeping the online KMS IP in the system. - -if defined _unattended exit /b - -echo ___________________________________________________________________ -echo. -call :_color %_Yellow% "Press any key to go back..." -pause >nul -exit /b - -::======================================================================================================================================== - -:_errorinfo - -(set msg1=echo Try again and if the issue still persist then either use a^ -&echo different Internet connection or use this offline KMS activator^ -&echo KMS_VL_ALL by @abbodi1406 pastebin.com/raw/cpdmr6HZ -) - -call :CheckFR - -if !server_num! GTR %max_servers% ( -ping -n 1 one.one.one.one 1>nul || ping -n 1 resolver1.opendns.com 1>nul || ( -call :_color %_Red% "Unable to test KMS servers due to restricted or no Internet." -echo. -%msg1% -exit /b -) -) - -echo Restart the system and try again. -echo KMS server is not an issue in this case. -echo Check Troubleshooting steps in the ReadMe. -exit /b - -::======================================================================================================================================== - -:setserv - -:: Multi KMS servers integration and servers randomization - -set srvlist= -set -= - -set "srvlist=win.km%-%s.pub xincheng213%-%618.cn kms.six%-%yin.com kms.moec%-%lub.org kms.cgts%-%oft.com" -set "srvlist=%srvlist% kms.03%-%k.org kms.moey%-%uuko.com kms.lol%-%i.best kms.zhuxi%-%aole.org kms.ca%-%tqu.com" -set "srvlist=%srvlist% kms.lol%-%i.beer kms.ca%-%ry.tech kms.wx%-%lost.com kms.moeyu%-%uko.top kms.ghp%-%ym.com" - -set n=1 -for %%a in (%srvlist%) do (set %%a=&set server!n!=%%a&set /a n+=1) -set max_servers=15 -set /a server_num=0 -exit /b - -:getserv - -if %server_num% equ %max_servers% set /a server_num+=1&set KMS_IP=222.184.9.98&exit /b -set /a rand=%Random%%%(15+1-1)+1 -if defined !server%rand%! goto :getserv -set KMS_IP=!server%rand%! -set !server%rand%!=1 - -:: Get IPv4 address of KMS server to use for the activation, works even if ICMP echo is disabled. -:: Microsoft and Antivirus's may flag the issue if public KMS server host name is directly used for the activation. - -set /a server_num+=1 -(for /f "delims=[] tokens=2" %%a in ('ping -4 -n 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%a" -if [%KMS_IP%]==[!KMS_IP!] for /f "delims=[] tokens=2" %%# in ('pathping -4 -h 1 -n -p 1 -q 1 -w 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%#" -if not [%KMS_IP%]==[!KMS_IP!] exit /b -goto :getserv -) - -:========================================================================================================================================== - -:Clear-KMS-Cache - -set OPPk=SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform -set SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform - -set _wApp=55c92734-d682-4d71-983e-d6ec3f16059f -set _oApp=0ff1ce15-a989-479d-af46-f275c6370663 -set _oA14=59a52881-a989-479d-af46-f275c6370663 - -%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServiceName -%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServicePort -%nul% reg delete "HKLM\%SPPk%" /f /v DisableDnsPublishing -%nul% reg delete "HKLM\%SPPk%" /f /v DisableKeyManagementServiceHostCaching -%nul% reg delete "HKLM\%SPPk%\%_wApp%" /f -if %winbuild% GEQ 9200 ( -if defined notx86 ( -%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServiceName /reg:32 -%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServicePort /reg:32 -%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32 -) -%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f -) -if %winbuild% GEQ 9600 ( -%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_wApp%" /f -%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_oApp%" /f -) -%nul% reg delete "HKLM\%OPPk%" /f /v KeyManagementServiceName -%nul% reg delete "HKLM\%OPPk%" /f /v KeyManagementServicePort -%nul% reg delete "HKLM\%OPPk%" /f /v DisableDnsPublishing -%nul% reg delete "HKLM\%OPPk%" /f /v DisableKeyManagementServiceHostCaching -%nul% reg delete "HKLM\%OPPk%\%_oA14%" /f -%nul% reg delete "HKLM\%OPPk%\%_oApp%" /f - -:: check KMS38 lock - -%nul% reg query "HKLM\%SPPk%\%_wApp%" && ( -set error_=9 -echo Failed to completely clear KMS Cache. -reg query "HKLM\%SPPk%\%_wApp%" /s 2>nul | findstr /i "127.0.0.2" >nul && echo Most likely, the KMS38 activation is locked. -) || ( -echo Cleared KMS Cache successfully. -) -exit /b - -:========================================================================================================================================= - -:leavenonexistentkms - -reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "10.0.0.10" -reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" -reg delete "HKLM\%SPPk%" /f /v DisableDnsPublishing -reg delete "HKLM\%SPPk%" /f /v DisableKeyManagementServiceHostCaching -if not defined _keepkms38 reg delete "HKLM\%SPPk%\%_wApp%" /f -if %winbuild% GEQ 9200 ( -if not %xOS%==x86 ( -reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "10.0.0.10" /reg:32 -reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32 -reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32 -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "10.0.0.10" /reg:32 -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32 -) -reg delete "HKLM\%SPPk%\%_oApp%" /f -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "10.0.0.10" -reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" -) -if %winbuild% GEQ 9600 ( -reg delete "HKU\S-1-5-20\%SPPk%\%_wApp%" /f -reg delete "HKU\S-1-5-20\%SPPk%\%_oApp%" /f -) -reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "10.0.0.10" -reg delete "HKLM\%OPPk%" /f /v KeyManagementServicePort -reg delete "HKLM\%OPPk%" /f /v DisableDnsPublishing -reg delete "HKLM\%OPPk%" /f /v DisableKeyManagementServiceHostCaching -reg delete "HKLM\%OPPk%\%_oA14%" /f -reg delete "HKLM\%OPPk%\%_oApp%" /f -goto :eof - -:========================================================================================================================================= - -:_Complete_Uninstall - -cls -mode con: cols=91 lines=30 -title Online KMS Complete Uninstall - -set "key=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" - -set "_C16R=" -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" set "_C16R=1" -for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath /reg:32" 2^>nul') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" set "_C16R=1" -if %winbuild% GEQ 9200 if defined _C16R ( -echo. -echo ## Notice ## -echo. -echo To make sure Office programs do not show a non-genuine banner, -echo please run the activation option once, and don't uninstall afterward. -echo __________________________________________________________________________________________ -) - -set error_= -echo. -call :Clear-KMS-Cache -call :clearstuff - -if defined error_ ( -if [%error_%]==[1] ( -echo __________________________________________________________________________________________ -%eline% -echo Try Again / Restart the System -echo __________________________________________________________________________________________ -) -) else ( -echo __________________________________________________________________________________________ -echo. -call :_color %Green% "Online KMS Complete Uninstall was done successfully." -echo __________________________________________________________________________________________ -) - -if defined _unattended exit /b - -echo. -call :_color %_Yellow% "Press any key to go back..." -pause >nul -exit /b - -:clearstuff - -reg query "%key%" /f Path /s | find /i "\Activation-Renewal" >nul && ( -echo Deleting [Task] Activation-Renewal -schtasks /delete /tn Activation-Renewal /f %nul% -) - -reg query "%key%" /f Path /s | find /i "\Activation-Run_Once" >nul && ( -echo Deleting [Task] Activation-Run_Once -schtasks /delete /tn Activation-Run_Once /f %nul% -) - -reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && ( -echo Deleting [Task] Online_KMS_Activation_Script-Renewal -schtasks /delete /tn Online_KMS_Activation_Script-Renewal /f %nul% -) - -reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && ( -echo Deleting [Task] Online_KMS_Activation_Script-Run_Once -schtasks /delete /tn Online_KMS_Activation_Script-Run_Once /f %nul% -) - -If exist "%windir%\Online_KMS_Activation_Script\" ( -echo Deleting [Folder] %windir%\Online_KMS_Activation_Script\ -rmdir /s /q "%windir%\Online_KMS_Activation_Script\" %nul% -) - -if exist "%ProgramData%\Online_KMS_Activation.cmd" ( -echo Deleting [File] %ProgramData%\Online_KMS_Activation.cmd -del /f /q "%ProgramData%\Online_KMS_Activation.cmd" %nul% -) - -If exist "%ProgramData%\Online_KMS_Activation\" ( -echo Deleting [Folder] %ProgramData%\Online_KMS_Activation\ -rmdir /s /q "%ProgramData%\Online_KMS_Activation\" %nul% -) - -If exist "%ProgramData%\Activation-Renewal\" ( -echo Deleting [Folder] %ProgramData%\Activation-Renewal\ -rmdir /s /q "%ProgramData%\Activation-Renewal\" %nul% -) - -reg query "HKCR\DesktopBackground\shell\Activate Windows - Office" %nul% && ( -echo Deleting [Registry] HKCR\DesktopBackground\shell\Activate Windows - Office -Reg delete "HKCR\DesktopBackground\shell\Activate Windows - Office" /f %nul% -) - -reg query "%key%" /f Path /s | find /i "\Activation-Renewal" >nul && (set error_=1) -reg query "%key%" /f Path /s | find /i "\Activation-Run_Once" >nul && (set error_=1) -reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && (set error_=1) -reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && (set error_=1) -If exist "%windir%\Online_KMS_Activation_Script\" (set error_=1) -reg query "HKCR\DesktopBackground\shell\Activate Windows - Office" %nul% && (set error_=1) -if exist "%ProgramData%\Online_KMS_Activation.cmd" (set error_=1) -if exist "%ProgramData%\Online_KMS_Activation\" (set error_=1) -if exist "%ProgramData%\Activation-Renewal\" (set error_=1) -exit /b - -:========================================================================================================================================= - -:RenTask - -cls -mode con cols=91 lines=30 -title Install Activation Auto-Renewal - -set error_= -set "_dest=%ProgramData%\Activation-Renewal" -set "key=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" - -call :clearstuff %nul% - -if defined error_ ( -%eline% -echo Failed to completely clear KMS related folders/tasks. -echo Run the Uninstall option and then try again. -goto :RenDone -) - -if not exist "%_dest%\" md "%_dest%\" %nul% -set "_temp=%SystemRoot%\Temp\_taskwork" - -set nil= -if exist "%_temp%\.*" rmdir /s /q "%_temp%\" %nul% -md "%_temp%\" %nul% -call :RenExport renewal "%_temp%\Renewal.xml" Unicode -if defined ActTask (call :RenExport run_once "%_temp%\Run_Once.xml" Unicode) -s%nil%cht%nil%asks /cre%nil%ate /tn "Activation-Renewal" /ru "SYS%nil%TEM" /xml "%_temp%\Renewal.xml" %nul% -if defined ActTask (s%nil%cht%nil%asks /cre%nil%ate /tn "Activation-Run_Once" /ru "SYS%nil%TEM" /xml "%_temp%\Run_Once.xml" %nul%) -if exist "%_temp%\.*" rmdir /s /q "%_temp%\" %nul% - -call :createInfo.txt -call :RenExport _extracttask "%_dest%\Activation_task.cmd" ASCII -title Install Activation Auto-Renewal - -::======================================================================================================================================== - -reg query "%key%" /f Path /s | find /i "\Activation-Renewal" >nul || (set error_=1) -if defined ActTask reg query "%key%" /f Path /s | find /i "\Activation-Run_Once" >nul || (set error_=1) - -If not exist "%_dest%\Activation_task.cmd" (set error_=1) -If not exist "%_dest%\Info.txt" (set error_=1) - -if defined error_ ( - -reg query "%key%" /f Path /s | find /i "\Activation-Renewal" >nul && ( -schtasks /delete /tn Activation-Renewal /f %nul% -) -reg query "%key%" /f Path /s | find /i "\Activation-Run_Once" >nul && ( -schtasks /delete /tn Activation-Run_Once /f %nul% -) - -If exist "%_dest%\" ( -rmdir /s /q "%_dest%\" %nul% -) - -%eline% -echo Run the Uninstall option and then try again. -goto :RenDone -) - -echo __________________________________________________________________________________________ -echo. -echo Files created: -echo %_dest%\Activation_task.cmd -echo %_dest%\Info.txt -echo. -(if defined ActTask (echo Scheduled Tasks created:) else (echo Scheduled Task created:)) -echo \Activation-Renewal [Weekly] -if defined ActTask (echo \Activation-Run_Once) -echo __________________________________________________________________________________________ -echo. -echo Info: -echo Activation will be renewed every week if the Internet connection is found. -echo __________________________________________________________________________________________ -echo. -if defined ActTask ( -call :_color %Green% "Renewal and Activation Tasks were successfully created." -) else ( -call :_color %Green% "Renewal Task was successfully created." -) -echo. -call :_color %Gray% "Make sure to run the Activation from the previous menu atleast once." -echo __________________________________________________________________________________________ -) - -::======================================================================================================================================== - -:RenDone - -if defined _unattended exit /b - -echo. -call :_color %_Yellow% "Press any key to go back..." -pause >nul -exit /b - -::======================================================================================================================================== - -:createInfo.txt - -( -echo The use of this script is to activate/renew your Windows/Office license using online KMS. -echo: -echo If renewal/activation Scheduled tasks were created then following would exist, -echo: -echo - Scheduled tasks -echo Activation-Renewal [Renewal / Weekly] -echo Activation-Run_Once [Activation Task - deletes itself once activated] -echo The scheduled tasks runs only if the system is connected to the Internet. -echo: -echo - Files -echo C:\ProgramData\Activation-Renewal\Activation_task.cmd -echo C:\ProgramData\Activation-Renewal\Info.txt -echo C:\ProgramData\Activation-Renewal\Logs.txt -echo ______________________________________________________________________________________________ -echo: -echo Online KMS Activation Script is a part of 'Microsoft Activation Scripts' [MAS] project. -echo: -echo Homepage: massgrave.dev -echo Email: [email protected] -)>"%_dest%\Info.txt" -exit /b - -::======================================================================================================================================== - -:renewal: -<?xml version="1.0" encoding="UTF-16"?> -<Task version="1.3" xmlns="http://schemas.microsoft.com/windows/2004/02/mit/task"> - <RegistrationInfo> - <Source>Microsoft Corporation</Source> - <Date>1999-01-01T12:00:00.34375</Date> - <Author>WindowsAddict</Author> - <Version>1.0</Version> - <Description>Online_K-M-S_Activation-Renewal - Weekly Task</Description> - <URI>\Activation-Renewal</URI> - <SecurityDescriptor>D:P(A;;FA;;;SY)(A;;FA;;;BA)(A;;FRFX;;;LS)(A;;FRFW;;;S-1-5-80-123231216-2592883651-3715271367-3753151631-4175906628)(A;;FR;;;S-1-5-4)</SecurityDescriptor> - </RegistrationInfo> - <Triggers> - <CalendarTrigger> - <StartBoundary>1999-01-01T12:00:00</StartBoundary> - <Enabled>true</Enabled> - <ScheduleByWeek> - <DaysOfWeek> - <Sunday /> - </DaysOfWeek> - <WeeksInterval>1</WeeksInterval> - </ScheduleByWeek> - </CalendarTrigger> - </Triggers> - <Principals> - <Principal id="LocalSystem"> - <UserId>S-1-5-18</UserId> - <RunLevel>HighestAvailable</RunLevel> - </Principal> - </Principals> - <Settings> - <MultipleInstancesPolicy>IgnoreNew</MultipleInstancesPolicy> - <DisallowStartIfOnBatteries>false</DisallowStartIfOnBatteries> - <StopIfGoingOnBatteries>false</StopIfGoingOnBatteries> - <AllowHardTerminate>true</AllowHardTerminate> - <StartWhenAvailable>true</StartWhenAvailable> - <RunOnlyIfNetworkAvailable>true</RunOnlyIfNetworkAvailable> - <IdleSettings> - <StopOnIdleEnd>false</StopOnIdleEnd> - <RestartOnIdle>false</RestartOnIdle> - </IdleSettings> - <AllowStartOnDemand>true</AllowStartOnDemand> - <Enabled>true</Enabled> - <Hidden>true</Hidden> - <RunOnlyIfIdle>false</RunOnlyIfIdle> - <DisallowStartOnRemoteAppSession>false</DisallowStartOnRemoteAppSession> - <UseUnifiedSchedulingEngine>true</UseUnifiedSchedulingEngine> - <WakeToRun>false</WakeToRun> - <ExecutionTimeLimit>PT10M</ExecutionTimeLimit> - <Priority>7</Priority> - <RestartOnFailure> - <Interval>PT2M</Interval> - <Count>3</Count> - </RestartOnFailure> - </Settings> - <Actions Context="LocalSystem"> - <Exec> - <Command>%ProgramData%\Activation-Renewal\Activation_task.cmd</Command> - <Arguments>Task</Arguments> - </Exec> - </Actions> -</Task> -:renewal: - -:run_once: -<?xml version="1.0" encoding="UTF-16"?> -<Task version="1.3" xmlns="http://schemas.microsoft.com/windows/2004/02/mit/task"> - <RegistrationInfo> - <Source>Microsoft Corporation</Source> - <Date>1999-01-01T12:00:00.34375</Date> - <Author>WindowsAddict</Author> - <Version>1.0</Version> - <Description>Online_K-M-S_Activation-Run_Once - Run and Delete itself on first Internet Contact</Description> - <URI>\Activation-Run_Once</URI> - <SecurityDescriptor>D:P(A;;FA;;;SY)(A;;FA;;;BA)(A;;FRFX;;;LS)(A;;FRFW;;;S-1-5-80-123231216-2592883651-3715271367-3753151631-4175906628)(A;;FR;;;S-1-5-4)</SecurityDescriptor> - </RegistrationInfo> - <Triggers> - <LogonTrigger> - <Enabled>true</Enabled> - </LogonTrigger> - </Triggers> - <Principals> - <Principal id="LocalSystem"> - <UserId>S-1-5-18</UserId> - <RunLevel>HighestAvailable</RunLevel> - </Principal> - </Principals> - <Settings> - <MultipleInstancesPolicy>IgnoreNew</MultipleInstancesPolicy> - <DisallowStartIfOnBatteries>false</DisallowStartIfOnBatteries> - <StopIfGoingOnBatteries>false</StopIfGoingOnBatteries> - <AllowHardTerminate>true</AllowHardTerminate> - <StartWhenAvailable>true</StartWhenAvailable> - <RunOnlyIfNetworkAvailable>true</RunOnlyIfNetworkAvailable> - <IdleSettings> - <StopOnIdleEnd>false</StopOnIdleEnd> - <RestartOnIdle>false</RestartOnIdle> - </IdleSettings> - <AllowStartOnDemand>true</AllowStartOnDemand> - <Enabled>true</Enabled> - <Hidden>true</Hidden> - <RunOnlyIfIdle>false</RunOnlyIfIdle> - <DisallowStartOnRemoteAppSession>false</DisallowStartOnRemoteAppSession> - <UseUnifiedSchedulingEngine>true</UseUnifiedSchedulingEngine> - <WakeToRun>false</WakeToRun> - <ExecutionTimeLimit>PT10M</ExecutionTimeLimit> - <Priority>7</Priority> - <RestartOnFailure> - <Interval>PT2M</Interval> - <Count>3</Count> - </RestartOnFailure> - </Settings> - <Actions Context="LocalSystem"> - <Exec> - <Command>%ProgramData%\Activation-Renewal\Activation_task.cmd</Command> - <Arguments>Task</Arguments> - </Exec> - </Actions> -</Task> -:run_once: - -::======================================================================================================================================== - -:: Extract the text from batch script without character and file encoding issue - -:RenExport - -%nul% %psc% "$f=[io.file]::ReadAllText('!_batp!') -split \":%~1\:.*`r`n\"; [io.file]::WriteAllText('%~2',$f[1].Trim(),[System.Text.Encoding]::%~3);" -exit /b - -::======================================================================================================================================== - -:_extracttask: -@echo off - -:: Renew K-M-S activation with Online servers via scheduled task - -::============================================================================ -:: -:: This script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::============================================================================ - - -if not "%~1"=="Task" ( -echo. -echo ====== Error ====== -echo. -echo This file is supposed to be run only by the scheduled task. -echo. -echo Press any key to exit -pause >nul -exit /b -) - -:: Set Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -reg query HKU\S-1-5-19 1>nul 2>nul || exit /b - -::======================================================================================================================================== - -set _tserror= -set "nul=>nul 2>&1" -for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G -set psc=powershell.exe - -set run_once= -set t_name=Renewal Task -reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" /f Path /s | find /i "\Activation-Run_Once" >nul && ( -set run_once=1 -set t_name=Run Once Task -) - -set _wmic=0 -for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" ( -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul && set _wmic=1 -) - -setlocal EnableDelayedExpansion -if exist "%ProgramData%\Activation-Renewal\" call :_taskstart>>"%ProgramData%\Activation-Renewal\Logs.txt" & exit - -::======================================================================================================================================== - -:_taskstart - -echo. -echo %date%, %time% - -set /a loop=1 -set /a max_loop=4 - -call :_tasksetserv - -:_intrepeat - -:: Check Internet connection. Works even if ICMP echo is disabled. - -for %%a in (%srvlist%) do ( -for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do ( -if not [%%#]==[] goto _taskIntConnected -) -) - -nslookup dns.msftncsi.com 2>nul | find "131.107.255.255" 1>nul -if [%errorlevel%]==[0] goto _taskIntConnected - -if %loop%==%max_loop% ( -set _tserror=1 -goto _taskend -) - -echo. -echo Error: Internet is not connected -echo Waiting 30 seconds - -timeout /t 30 >nul -set /a loop=%loop%+1 -goto _intrepeat - -:_taskIntConnected - -::======================================================================================================================================== - -:: Check not x86 Windows - -set notx86= -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b -if /i not "%arch%"=="x86" set notx86=1 - -::======================================================================================================================================== - -set "OPPk=SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" -set "SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" - -set "slp=SoftwareLicensingProduct" -set "ospp=OfficeSoftwareProtectionProduct" - -set "_wApp=55c92734-d682-4d71-983e-d6ec3f16059f" -set "_oApp=0ff1ce15-a989-479d-af46-f275c6370663" -set "_oA14=59a52881-a989-479d-af46-f275c6370663" - -::======================================================================================================================================== - -:: Clean existing KMS cache from the registry / Set port value to 1688 - -%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServiceName -%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" -%nul% reg delete "HKLM\%SPPk%\%_wApp%" /f -if %winbuild% GEQ 9200 ( -if defined notx86 ( -%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32 -%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32 -%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32 -) -%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f -%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" -) -if %winbuild% GEQ 9600 ( -%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_wApp%" /f -%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_oApp%" /f -) -%nul% reg add "HKLM\%OPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" -%nul% reg delete "HKLM\%OPPk%\%_oA14%" /f -%nul% reg delete "HKLM\%OPPk%\%_oApp%" /f - -::======================================================================================================================================== - -:: Check WMI and sppsvc Errors - -set applist= -net start sppsvc /y %nul% -if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%_wApp%') get ID /VALUE" 2^>nul')" -if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%_wApp%''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')" -%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a")) - -if not defined applist ( -set _tserror=1 -if %_wmic% EQU 1 wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul -if %_wmic% EQU 0 %psc% "Get-CIMInstance -Class Win32_ComputerSystem | Select-Object -Property CreationClassName" 2>nul | find /i "computersystem" 1>nul -if !errorlevel! NEQ 0 (set e_wmispp=WMI, SPP) else (set e_wmispp=SPP) -echo. -echo Error: Not Respoding- !e_wmispp! -echo. -) - -::======================================================================================================================================== - -:: Check installed volume products activation ID's - -call :_taskgetids sppwid %slp% windows -call :_taskgetids sppoid %slp% office -call :_taskgetids osppid %ospp% office - -::======================================================================================================================================== - -echo. -echo Renewing KMS activation for all installed Volume products - -if not defined sppwid if not defined sppoid if not defined osppid ( -echo. -echo No installed Volume Windows / Office product found -echo. -echo Renewing KMS server -call :_taskgetserv -call :_taskregserv -goto :_skipact -) - -::======================================================================================================================================== - -:: Check KMS38 activation - -set gpr=0 -set _kms38=0 -if defined sppwid if %winbuild% GEQ 14393 ( -set _path=%slp% -set _actid=%sppwid% -call :_taskgetgrace -) - -if %gpr% NEQ 0 if %gpr% GTR 259200 ( -set _kms38=1 -call :_taskchkEnterpriseG _kms38 -) - -:: Set specific KMS host to Local Host so that global KMS IP can not replace KMS38 activation but can be used with Office and other Windows Editions. - -if %_kms38% EQU 1 ( -%nul% reg add "HKLM\%SPPk%\%_wApp%\%sppwid%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" -%nul% reg add "HKLM\%SPPk%\%_wApp%\%sppwid%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" -) - -::======================================================================================================================================== - -echo. -if defined sppwid ( -set _path=%slp% -set _actid=%sppwid% -call :_actprod -call :_act act_win -call :_actinfo act_win -) else ( -echo Checking: Volume version of Windows is not installed -) - -if defined sppoid ( -set _path=%slp% -for %%# in (%sppoid%) do ( -echo. -set _actid=%%# -call :_actprod -call :_act -call :_actinfo -) -) - -if defined osppid ( -set _path=%ospp% -for %%# in (%osppid%) do ( -echo. -set _actid=%%# -call :_actprod -call :_act -call :_actinfo -) -) - -if not defined sppoid if not defined osppid ( -echo. -echo Checking: Volume version of Office is not installed -) - -:_skipact - -::======================================================================================================================================== - -if defined run_once ( -echo. -echo Deleting Scheduled Task Activation-Run_Once -schtasks /delete /tn Activation-Run_Once /f %nul% -) - -::======================================================================================================================================== - -:_taskend - -echo. -echo Exiting -echo ______________________________________________________________________ - -if defined _tserror (exit /b 123456789) else (exit /b 0) - -::======================================================================================================================================== - -:_act - -set errorcode=12345 -set /a act_attempt=0 - -:_act2 - -if %act_attempt% GTR 4 exit /b - -if not [%act_ok%]==[1] ( -call :_taskgetserv -call :_taskregserv -) - -if not !server_num! GTR %max_servers% ( - -if [%1]==[act_win] if %_kms38% EQU 1 ( -set act_ok=1 -exit /b -) - -if %_wmic% EQU 1 wmic path !_path! where ID='!_actid!' call Activate %nul% -if %_wmic% EQU 0 %psc% "try {$null=(([WMISEARCHER]'SELECT ID FROM !_path! where ID=''!_actid!''').Get()).Activate(); exit 0} catch { exit $_.Exception.InnerException.HResult }" - -call set errorcode=!errorlevel! - -if !errorcode! EQU 0 ( -set act_ok=1 -exit /b -) -if [%1]==[act_win] if !errorcode! EQU -1073418187 if %winbuild% LSS 9200 ( -set act_ok=1 -exit /b -) - -set act_ok=0 -set /a act_attempt+=1 -goto _act2 -) -exit /b - -:_actprod - -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%x in ('"wmic path !_path! where ID='!_actid!' get Name /VALUE" 2^>nul') do call echo Activating: %%x -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%x in ('%psc% "(([WMISEARCHER]'SELECT Name FROM !_path! WHERE ID=''!_actid!''').Get()).Name | %% {echo ('Name='+$_)}" 2^>nul') do call echo Activating: %%x -exit /b - -::======================================================================================================================================== - -:_actinfo - -if [%1]==[act_win] if %_kms38% EQU 1 ( -echo Windows is activated with KMS38 -exit /b -) - -if %errorcode% EQU 12345 ( -echo Product Activation Failed -echo Unable to test KMS servers due to restricted or no Internet -set _tserror=1 -exit /b -) - -if %errorcode% EQU -1073418187 ( -echo Product Activation Failed: 0xC004F035 -if [%1]==[act_win] if %winbuild% LSS 9200 echo Windows 7 cannot be KMS-activated on this computer due to unqualified OEM BIOS -exit /b -) - -if %errorcode% EQU -1073417728 ( -echo Product Activation Failed: 0xC004F200 -echo Windows needs to rebuild the activation-related files. -echo See KB2736303 for details. -set _tserror=1 -exit /b -) - -set gpr=0 -set gpr2=0 -call :_taskgetgrace -set /a "gpr2=(%gpr%+1440-1)/1440" - -if %errorcode% EQU 0 if %gpr% EQU 0 ( -echo Product Activation succeeded, but Remaining Period failed to increase. -if [%1]==[act_win] if %winbuild% LSS 9200 echo This could be related to the error described in KB4487266 -set _tserror=1 -exit /b -) - -set _actpass=1 -if %gpr% EQU 43200 if [%1]==[act_win] if %winbuild% GEQ 9200 set _actpass=0 -if %gpr% EQU 64800 set _actpass=0 -if %gpr% GTR 259200 if [%1]==[act_win] call :_taskchkEnterpriseG _actpass -if %gpr% EQU 259200 set _actpass=0 - -if %errorcode% EQU 0 if %_actpass% EQU 0 ( -echo Product Activation Successful -echo Remaining Period: %gpr2% days ^(%gpr% minutes^) -exit /b -) - -cmd /c exit /b %errorcode% -if %errorcode% NEQ 0 ( -echo Product Activation Failed: 0x!=ExitCode! -) else ( -echo Product Activation Failed -) -echo Remaining Period: %gpr2% days ^(%gpr% minutes^) -set _tserror=1 -exit /b - -::======================================================================================================================================== - -:_taskgetids - -set %1= -if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %2 where (Name like '%%%3%%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get ID /VALUE" 2^>nul')" -if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM %2 WHERE Name like ''%%%3%%'' and Description like ''%%KMSCLIENT%%'' and PartialProductKey is not NULL').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')" -%chkapp% do (if defined %1 (call set "%1=!%1! %%a") else (call set "%1=%%a")) -exit /b - -:_taskgetgrace - -set gpr=0 -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('"wmic path !_path! where ID='!_actid!' get GracePeriodRemaining /VALUE" 2^>nul') do call set "gpr=%%#" -if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT GracePeriodRemaining FROM !_path! where ID=''!_actid!''').Get()).GracePeriodRemaining | %% {echo ('GracePeriodRemaining='+$_)}" 2^>nul') do call set "gpr=%%#" -exit /b - -:_taskchkEnterpriseG - -for %%# in (e0b2d383-d112-413f-8a80-97f373a5820c e38454fb-41a4-4f59-a5dc-25080e354730) do (if %sppwid%==%%# set %1=0) -exit /b - -::======================================================================================================================================== - -:_taskregserv - -%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" -%nul% reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" - -:: Thanks to @dialmak for Office non-genuine banner solution -:: forum.ru-board.com/topic.cgi?forum=35&topic=81283&start=6080#19 - -if %winbuild% GEQ 9200 ( -%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" -if defined notx86 ( -%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32 -%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32 -) -) -exit /b - -::======================================================================================================================================== - -:_tasksetserv - -:: Multi KMS servers integration and servers randomization - -set srvlist= -set -= - -set "srvlist=win.km%-%s.pub xincheng213%-%618.cn kms.six%-%yin.com kms.moec%-%lub.org kms.cgts%-%oft.com" -set "srvlist=%srvlist% kms.03%-%k.org kms.moey%-%uuko.com kms.lol%-%i.best kms.zhuxi%-%aole.org kms.ca%-%tqu.com" -set "srvlist=%srvlist% kms.lol%-%i.beer kms.ca%-%ry.tech kms.wx%-%lost.com kms.moeyu%-%uko.top kms.ghp%-%ym.com" - -set n=1 -for %%a in (%srvlist%) do (set %%a=&set server!n!=%%a&set /a n+=1) -set max_servers=15 -set /a server_num=0 -exit /b - -:_taskgetserv - -if %server_num% geq %max_servers% (set /a server_num+=1&set KMS_IP=222.184.9.98&exit /b) -set /a rand=%Random%%%(15+1-1)+1 -if defined !server%rand%! goto :_taskgetserv -set KMS_IP=!server%rand%! -set !server%rand%!=1 - -:: Get IPv4 address of KMS server to use for the activation, works even if ICMP echo is disabled. -:: Microsoft and Antivirus's may flag the issue if public KMS server host name is directly used for the activation. - -set /a server_num+=1 -(for /f "delims=[] tokens=2" %%a in ('ping -4 -n 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%a" -if [%KMS_IP%]==[!KMS_IP!] for /f "delims=[] tokens=2" %%# in ('pathping -4 -h 1 -n -p 1 -q 1 -w 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%#" -if not [%KMS_IP%]==[!KMS_IP!] exit /b -goto :_taskgetserv -) - -:: Ver:1.6 -::======================================================================================================================================== -:_extracttask: - -:====================================================================================================================================================== - -:_color - -if %_NCS% EQU 1 ( -if defined _unattended (echo %~2) else (echo %esc%[%~1%~2%esc%[0m) -) else ( -if defined _unattended (echo %~2) else (call :batcol %~1 "%~2") -) -exit /b - -:_color2 - -if %_NCS% EQU 1 ( -echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m -) else ( -call :batcol %~1 "%~2" %~3 "%~4" -) -exit /b - -::======================================= - -:: Colored text with pure batch method -:: Thanks to @dbenham and @jeb -:: stackoverflow.com/a/10407642 - -:batcol - -pushd %_coltemp% -if not exist "'" (<nul >"'" set /p "=.") -setlocal -set "s=%~2" -set "t=%~4" -call :_batcol %1 s %3 t -del /f /q "'" -del /f /q "`.txt" -popd -exit /b - -:_batcol - -setlocal EnableDelayedExpansion -set "s=!%~2!" -set "t=!%~4!" -for /f delims^=^ eol^= %%i in ("!s!") do ( - if "!" equ "" setlocal DisableDelayedExpansion - >`.txt (echo %%i\..\') - findstr /a:%~1 /f:`.txt "." - <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%" -) -if "%~4"=="" echo(&exit /b -setlocal EnableDelayedExpansion -for /f delims^=^ eol^= %%i in ("!t!") do ( - if "!" equ "" setlocal DisableDelayedExpansion - >`.txt (echo %%i\..\') - findstr /a:%~3 /f:`.txt "." - <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%" -) -echo( -exit /b - -::======================================= - -:_colorprep - -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 "Black="30m"" -set "Green="42;97m"" -set "Blue="44;97m"" -set "Yellow="43;97m"" -set "Magenta="45;97m"" - -set "_Red="40;91m"" -set "_Green="40;92m"" -set "_Blue="40;94m"" -set "_White="40;37m"" -set "_Yellow="40;93m"" - -exit /b -) - -for /f %%A in ('"prompt $H&for %%B in (1) do rem"') do set "_BS=%%A %%A" -set "_coltemp=%SystemRoot%\Temp" - -set "Red="CF"" -set "Gray="8F"" -set "Black="00"" -set "Green="2F"" -set "Blue="1F"" -set "Yellow="6F"" -set "Magenta="5F"" - -set "_Red="0C"" -set "_Green="0A"" -set "_Blue="09"" -set "_White="07"" -set "_Yellow="0E"" - -exit /b - -::========================================================================================================================================
\ No newline at end of file +<!-- : Begin batch script
+@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+::=================================================================================================
+::
+:: Online KMS Script is a fork of @abbodi1406's KMS_VL_ALL forums.mydigitallife.net/posts/838808
+::
+:: This fork's purpose is to avoid having any KMS binary files and activate Windows/Office using
+:: only transparent batch script with online public KMS servers.
+::_____________________________________
+::
+:: Online KMS Activation Script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::=================================================================================================
+
+
+
+
+::========================================================================================================================================
+
+:: 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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %*"
+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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %*"
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+::========================================================================================================================================
+
+cls
+color 07
+title Online KMS Activation [KMS_VL_ALL Fork]
+
+set WMI_VBS=0
+set _Debug=0
+set Silent=0
+set Logger=0
+
+set AutoR2V=1
+set SkipKMS38=1
+set ActWindows=1
+set ActOffice=1
+
+set _uni=
+set _args=
+set _elev=
+set _renetask=
+set _deskmenu=
+set _renacttask=
+set _unattended=
+
+
+set _args=%*
+if defined _args set _args=%_args:"=%
+if defined _args (
+set _unattended=1
+if "%_args%"=="-el" set _unattended=
+
+for %%A in (%_args%) do (
+if /i "%%A"=="-el" (set _elev=1
+) else if /i "%%A"=="/rt" (set _renetask=1
+) else if /i "%%A"=="/rat" (set _renacttask=1
+) else if /i "%%A"=="/dcm" (set _deskmenu=1
+) else if /i "%%A"=="/uni" (set _uni=1
+) else if /i "%%A"=="/w" (set ActWindows=1&set ActOffice=0
+) else if /i "%%A"=="/o" (set ActWindows=0&set ActOffice=1
+) else if /i "%%A"=="/wo" (set ActWindows=1&set ActOffice=1
+) else if /i "%%A"=="/nc" (set AutoR2V=0
+) else if /i "%%A"=="/x" (set SkipKMS38=0
+) else if /i "%%A"=="/d" (set _Debug=1
+) else if /i "%%A"=="/l" (set Logger=1&set Silent=1
+)
+)
+)
+
+::========================================================================================================================================
+
+set winbuild=1
+set "nul=>nul 2>&1"
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+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 2>nul | find /i "0x0" 1>nul && (set _NCS=0)
+
+call :_colorprep
+set "_buf={$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=31;$B.Height=300;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}"
+
+set "nceline=echo. &echo ==== ERROR ==== &echo."
+set "eline=echo. &call :_color %Red% "==== ERROR ====" &echo."
+if %_Debug% EQU 1 set _unattended=1
+
+::========================================================================================================================================
+
+if %winbuild% LSS 7600 (
+%nceline%
+echo Unsupported OS version detected.
+echo Project is supported for Windows 7/8/8.1/10/11 and their Server equivalent.
+goto Done
+)
+
+if not exist "%_psc%" (
+%nceline%
+echo Powershell is not installed in the system.
+echo Aborting...
+goto Done
+)
+
+::========================================================================================================================================
+
+:: Fix for the special characters limitation 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 "_ttemp=%temp%"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" 1>nul && (
+%nceline%
+echo Script is launched from the temp folder,
+echo Most likely you are running the script directly from the archive file.
+echo.
+echo Extract the archive file and launch the script from the extracted folder.
+goto Done
+)
+
+::========================================================================================================================================
+
+:: Elevate script as admin and pass arguments and preventing loop
+
+%nul% reg query HKU\S-1-5-19 || (
+if not defined _elev %nul% %_psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b
+%nceline%
+if "!_batf!"=="%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd" (
+echo Unable to elevate the script as admin.
+echo Try to manually run the file as admin - "%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd"
+) else (
+echo This script require administrator privileges.
+echo To do so, right click on this script and select 'Run as administrator'.
+)
+goto Done
+)
+
+::========================================================================================================================================
+
+if "!_batf!"=="%SystemRoot%\Temp\__MAS\Activate.cmd" (set "_exitmsg=Go back") else (set "_exitmsg=Exit")
+
+:: Check not x86 Windows
+
+set notx86=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b
+if /i not "%arch%"=="x86" set notx86=1
+
+::========================================================================================================================================
+
+if defined _uni goto _Complete_Uninstall
+
+if defined _renacttask set ActTask=1&goto:RenTask
+if defined _renetask set ActTask=&goto:RenTask
+if defined _deskmenu goto:RenContextMenu
+
+::========================================================================================================================================
+
+if "!_batf!"=="%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd" (
+set "_title=[%ProgramData%\Online_KMS_Activation] [KMS_VL_ALL Fork]"
+) else (
+set "_title=Online KMS Activation [KMS_VL_ALL Fork]"
+)
+
+set _gui=
+
+:_KMS_Menu
+
+set _tskinstalled=
+if exist "%ProgramData%\Online_KMS_Activation\Activate_tsk.cmd" (
+find /i "Ver:1.5" "%ProgramData%\Online_KMS_Activation\Activate_tsk.cmd" 1>nul && (
+reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && (
+set _tskinstalled=1
+)
+)
+)
+
+set _dskinstalled=
+if exist "%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd" (
+find /i "Ver:1.5" "%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd" 1>nul && (
+reg query "HKCR\DesktopBackground\shell\Activate Windows - Office" %nul% && (
+set _dskinstalled=1
+)
+)
+)
+
+set _oldtsk=
+if not defined _tskinstalled (
+reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && (
+set _oldtsk=1
+)
+)
+
+set _olddsk=
+if not defined _dskinstalled (
+reg query "HKCR\DesktopBackground\shell\Activate Windows - Office" %nul% && (
+set _olddsk=1
+)
+)
+
+if defined _unattended (
+call :Activation_Start
+goto Done
+)
+
+cls
+set _gui=1
+title %_title%
+mode con: cols=76 lines=33
+
+echo.
+echo.
+echo. ______________________________________________________________
+echo.
+echo. [1] Activate - Windows
+echo. [2] Activate - Office
+echo. [3] Activate - All
+echo.
+if defined _tskinstalled call :_color2 %_White% " [I] Activation Auto-Renewal " %_Green% "[Installed]"
+if defined _oldtsk call :_color2 %_White% " [I] Activation Auto-Renewal " %_Red% "[Old Installed]"
+if not defined _tskinstalled if not defined _oldtsk echo. [I] Activation Auto-Renewal [Not Installed]
+
+if defined _dskinstalled call :_color2 %_White% " [M] Desktop Context Menu " %_Green% "[Installed]"
+if defined _olddsk call :_color2 %_White% " [M] Desktop Context Menu " %_Red% "[Old Installed]"
+if not defined _dskinstalled if not defined _olddsk echo. [M] Desktop Context Menu [Not Installed]
+echo. [U] Uninstall Completely
+echo. _______________________________________________
+echo.
+echo. Configure Activation:
+echo.
+if %_Debug%==0 (
+echo. [D] Enable Debug Mode [No]
+) else (
+call :_color2 %_White% " [D] Enable Debug Mode " %_Red% "[Yes]"
+)
+
+if %AutoR2V%==1 (
+echo. [C] Convert Office C2R-R2V [Yes]
+) else (
+call :_color2 %_White% " [C] Convert Office C2R-R2V " %_Yellow% "[No]"
+)
+
+if %winbuild% GEQ 14393 (
+if %SkipKMS38%==1 (
+echo. [X] Skip Windows 10 KMS38 [Yes]
+) else (
+call :_color2 %_White% " [X] Skip Windows 10 KMS38 " %_Yellow% "[No]"
+)
+)
+echo. _______________________________________________
+echo.
+echo. [V] Check Activation Status [vbs]
+echo. [W] Check Activation Status [wmi]
+echo. _______________________________________________
+echo.
+echo. [R] Read Me
+echo. [9] %_exitmsg%
+echo. ______________________________________________________________
+echo.
+call :_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard :"
+choice /C:123IMUDCXVWR9 /N
+set _el=%errorlevel%
+
+if %_el%==13 exit /b
+if %_el%==12 start https://windowsaddict.ml/readme-online-kms &goto _KMS_Menu
+if %_el%==11 cls&setlocal&call :_Check_Status_wmi&endlocal&cls&goto _KMS_Menu
+if %_el%==10 cls&setlocal&call :_Check_Status_vbs&endlocal&cls&goto _KMS_Menu
+if %_el%==9 (if %winbuild% GEQ 14393 (if %SkipKMS38%==0 (set SkipKMS38=1) else (set SkipKMS38=0))) &goto _KMS_Menu
+if %_el%==8 (if %AutoR2V%==0 (set AutoR2V=1) else (set AutoR2V=0)) &goto _KMS_Menu
+if %_el%==7 (if %_Debug%==0 (set _Debug=1) else (set _Debug=0)) &goto _KMS_Menu
+if %_el%==6 call:_Complete_Uninstall&cls&goto _KMS_Menu
+if %_el%==5 call:RenContextMenu&goto _KMS_Menu
+if %_el%==4 set ActTask=&call:RenTask&goto _KMS_Menu
+if %_el%==3 cls&setlocal&set "ActWindows=1"&set "ActOffice=1"&call :Activation_Start&endlocal&cls&goto _KMS_Menu
+if %_el%==2 cls&setlocal&set "ActWindows=0"&set "ActOffice=1"&call :Activation_Start&endlocal&cls&goto _KMS_Menu
+if %_el%==1 cls&setlocal&set "ActWindows=1"&set "ActOffice=0"&call :Activation_Start&endlocal&cls&goto _KMS_Menu
+goto _KMS_Menu
+
+::========================================================================================================================================
+
+:Done
+
+if defined _unattended exit /b
+
+echo.
+echo Press any key to exit...
+pause >nul
+exit /b
+
+:=========================================================================================================================================
+
+:Activation_Start
+
+@setlocal DisableDelayedExpansion
+
+set "_Null=1>nul 2>nul"
+set KMS_Port=1688
+if %_Debug% EQU 1 set _unattended=1
+set "_run=nul"
+if %Logger% EQU 1 set _run="%~dpn0_Silent.log"
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+set "_bit=64"
+set "_wow=1"
+if /i "%PROCESSOR_ARCHITECTURE%"=="amd64" set "xBit=x64"&set "xOS=x64"
+if /i "%PROCESSOR_ARCHITECTURE%"=="arm64" set "xBit=x86"&set "xOS=A64"
+if /i "%PROCESSOR_ARCHITECTURE%"=="x86" if "%PROCESSOR_ARCHITEW6432%"=="" set "xBit=x86"&set "xOS=x86"&set "_wow=0"&set "_bit=32"
+if /i "%PROCESSOR_ARCHITEW6432%"=="amd64" set "xBit=x64"&set "xOS=x64"
+if /i "%PROCESSOR_ARCHITEW6432%"=="arm64" set "xBit=x86"&set "xOS=A64"
+
+set "_Local=%LocalAppData%"
+set "_temp=%SystemRoot%\Temp"
+set "_log=%~dpn0"
+set "_work=%~dp0"
+if "%_work:~-1%"=="\" set "_work=%_work:~0,-1%"
+set _UNC=0
+if "%_work:~0,2%"=="\\" set _UNC=1
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v Desktop') do call set "_dsk=%%b"
+if exist "%PUBLIC%\Desktop\desktop.ini" set "_dsk=%PUBLIC%\Desktop"
+set "_mO21a=Detected Office 2021 C2R Retail is activated"
+set "_mO19a=Detected Office 2019 C2R Retail is activated"
+set "_mO16a=Detected Office 2016 C2R Retail is activated"
+set "_mO15a=Detected Office 2013 C2R Retail is activated"
+set "_mO21c=Detected Office 2021 C2R Retail could not be converted to Volume"
+set "_mO19c=Detected Office 2019 C2R Retail could not be converted to Volume"
+set "_mO16c=Detected Office 2016 C2R Retail could not be converted to Volume"
+set "_mO15c=Detected Office 2013 C2R Retail could not be converted to Volume"
+set "_mO14c=Detected Office 2010 C2R Retail is not supported by KMS_VL_ALL"
+set "_mO14m=Detected Office 2010 MSI Retail is not supported by KMS_VL_ALL"
+set "_mO15m=Detected Office 2013 MSI Retail is not supported by KMS_VL_ALL"
+set "_mO16m=Detected Office 2016 MSI Retail is not supported by KMS_VL_ALL"
+set "_mOuwp=Detected Office 365/2016 UWP is not supported by KMS_VL_ALL"
+set DO16Ids=ProPlus,ProjectPro,VisioPro,Standard,ProjectStd,VisioStd,Access,SkypeforBusiness,Excel,Outlook,PowerPoint,Publisher,Word
+set LV16Ids=Mondo,ProPlus,ProjectPro,VisioPro,Standard,ProjectStd,VisioStd,Access,SkypeforBusiness,OneNote,Excel,Outlook,PowerPoint,Publisher,Word
+set LR16Ids=%LV16Ids%,Professional,HomeBusiness,HomeStudent,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud
+set "ESUEditions=Enterprise,EnterpriseE,EnterpriseN,Professional,ProfessionalE,ProfessionalN,Ultimate,UltimateE,UltimateN"
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" (
+set "ESUEditions=ServerDatacenter,ServerDatacenterCore,ServerDatacenterV,ServerDatacenterVCore,ServerStandard,ServerStandardCore,ServerStandardV,ServerStandardVCore,ServerEnterprise,ServerEnterpriseCore,ServerEnterpriseV,ServerEnterpriseVCore"
+)
+for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G
+set "_csq=cscript.exe //NoLogo //Job:WmiQuery "%~nx0?.wsf""
+set "_csm=cscript.exe //NoLogo //Job:WmiMethod "%~nx0?.wsf""
+set "_csp=cscript.exe //NoLogo //Job:WmiPKey "%~nx0?.wsf""
+set "_csd=cscript.exe //NoLogo //Job:MPS "%~nx0?.wsf""
+if %winbuild% GEQ 22483 set WMI_VBS=1
+if %WMI_VBS% EQU 0 (
+set "_zz1=wmic path"
+set "_zz2=where"
+set "_zz3=get"
+set "_zz4=/value"
+set "_zz5=("
+set "_zz6=)"
+set "_zz7="wmic path"
+set "_zz8=/value""
+) else (
+set "_zz1=%_csq%"
+set "_zz2="
+set "_zz3="
+set "_zz4="
+set "_zz5=""
+set "_zz6=""
+set "_zz7=%_csq%"
+set "_zz8="
+)
+set _WSH=1
+reg query "HKCU\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0)
+reg query "HKLM\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0)
+
+setlocal EnableDelayedExpansion
+pushd "!_work!"
+
+if not defined _unattended (
+mode con cols=98 lines=31
+%nul% %_psc% "&%_buf%"
+title %_title%
+) else (
+title Online KMS Activation [KMS_VL_ALL Fork]
+)
+
+if defined _gui if %_Debug%==1 mode con cols=98 lines=30
+
+if %_Debug% EQU 0 (
+ set "_Nul1=1>nul"
+ set "_Nul2=2>nul"
+ set "_Nul6=2^>nul"
+ set "_Nul3=1>nul 2>nul"
+ set "_Pause=pause >nul"
+ if %Silent% EQU 0 (call :Begin) else (call :Begin >!_run! 2>&1)
+) else (
+ set "_Nul1="
+ set "_Nul2="
+ set "_Nul6="
+ set "_Nul3="
+ set "_log=!_dsk!\%~n0"
+ if %Silent% EQU 0 (
+ echo.
+ echo Running in Debug Mode...
+ if not defined _args (echo The window will be closed when finished) else (echo please wait...)
+ echo.
+ echo Writing debug log to:
+ echo "!_log!_Debug.log"
+ )
+ @echo on
+ @prompt $G
+ @call :Begin >"!_log!_tmp.log" 2>&1 &cmd /u /c type "!_log!_tmp.log">"!_log!_Debug.log"&del "!_log!_tmp.log"
+)
+@echo off
+if defined _gui if %_Debug%==1 (
+echo.
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+exit /b
+)
+@exit /b
+
+:Begin
+
+::========================================================================================================================================
+
+set act_failed=0
+set /a act_attempt=0
+
+echo.
+echo Initializing...
+
+if %_WSH% EQU 0 if %WMI_VBS% NEQ 0 (
+%eline%
+echo Windows Script Host is disabled.
+echo It is required for this script to work.
+if %_Debug%==1 exit /b
+if defined _unattended exit /b
+echo:
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+exit /b
+)
+
+:: Check Internet connection. Works even if ICMP echo is disabled.
+
+call :setserv
+for %%a in (%srvlist%) do (
+for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do (
+if not [%%#]==[] goto IntConnected
+)
+)
+
+nslookup dns.msftncsi.com 2>nul | find "131.107.255.255" 1>nul
+if [%errorlevel%]==[0] goto IntConnected
+
+cls
+if %_Debug%==1 (
+echo Error: Internet is not connected.
+exit /b
+)
+
+if defined _unattended (
+echo.
+call :_color %_Red% "Internet is not connected, continuing the process anyway."
+) else (
+%eline%
+echo Internet is not connected.
+echo:
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+exit /b
+)
+
+:IntConnected
+
+call :getserv
+
+::========================================================================================================================================
+
+set "_wApp=55c92734-d682-4d71-983e-d6ec3f16059f"
+set "_oApp=0ff1ce15-a989-479d-af46-f275c6370663"
+set "_oA14=59a52881-a989-479d-af46-f275c6370663"
+set "IFEO=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options"
+set "OPPk=SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform"
+set "SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform"
+set SSppHook=0
+for /f %%A in ('dir /b /ad %SysPath%\spp\tokens\skus') do (
+ if %winbuild% GEQ 9200 if exist "%SysPath%\spp\tokens\skus\%%A\*GVLK*.xrm-ms" set SSppHook=1
+ if %winbuild% LSS 9200 if exist "%SysPath%\spp\tokens\skus\%%A\*VLKMS*.xrm-ms" set SSppHook=1
+ if %winbuild% LSS 9200 if exist "%SysPath%\spp\tokens\skus\%%A\*VL-BYPASS*.xrm-ms" set SSppHook=1
+)
+set OsppHook=1
+sc query osppsvc %_Nul3%
+if %errorlevel% EQU 1060 set OsppHook=0
+
+set ESU_KMS=0
+if %winbuild% LSS 9200 for /f %%A in ('dir /b /ad %SysPath%\spp\tokens\channels') do (
+ if exist "%SysPath%\spp\tokens\channels\%%A\*VL-BYPASS*.xrm-ms" set ESU_KMS=1
+)
+if %ESU_KMS% EQU 1 (set "adoff=and LicenseDependsOn is NULL"&set "addon=and LicenseDependsOn is not NULL") else (set "adoff="&set "addon=")
+set ESU_EDT=0
+if %ESU_KMS% EQU 1 for %%A in (%ESUEditions%) do (
+ if exist "%SysPath%\spp\tokens\skus\Security-SPP-Component-SKU-%%A\*.xrm-ms" set ESU_EDT=1
+)
+:: if %ESU_EDT% EQU 1 set SSppHook=1
+set ESU_ADD=0
+
+if %winbuild% GEQ 9200 (
+ set OSType=Win8
+ set SppVer=SppExtComObj.exe
+) else if %winbuild% GEQ 7600 (
+ set OSType=Win7
+ set SppVer=sppsvc.exe
+) else (
+ goto :UnsupportedVersion
+)
+if %OSType% EQU Win8 reg query "%IFEO%\sppsvc.exe" %_Nul3% && (
+reg delete "%IFEO%\sppsvc.exe" /f %_Nul3%
+call :StopService sppsvc
+)
+
+if %ActWindows% EQU 0 if %ActOffice% EQU 0 set ActWindows=1
+set _AUR=1
+if %winbuild% GEQ 9600 (
+ reg add "HKLM\SOFTWARE\Policies\Microsoft\Windows NT\CurrentVersion\Software Protection Platform" /v NoGenTicket /t REG_DWORD /d 1 /f %_Nul3%
+ if %winbuild% EQU 14393 reg add "HKLM\SOFTWARE\Policies\Microsoft\Windows NT\CurrentVersion\Software Protection Platform" /v NoAcquireGT /t REG_DWORD /d 1 /f %_Nul3%
+)
+call :StopService sppsvc
+if %OsppHook% NEQ 0 call :StopService osppsvc
+
+:ReturnHook
+call :UpdateOSPPEntry osppsvc.exe
+
+SET Win10Gov=0
+SET "EditionWMI="
+SET "EditionID="
+IF %winbuild% LSS 14393 if %SSppHook% NEQ 0 GOTO :Main
+SET "RegKey=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Component Based Servicing\Packages"
+SET "Pattern=Microsoft-Windows-*Edition~31bf3856ad364e35"
+SET "EditionPKG=FFFFFFFF"
+FOR /F "TOKENS=8 DELIMS=\" %%A IN ('REG QUERY "%RegKey%" /f "%Pattern%" /k %_Nul6% ^| FIND /I "CurrentVersion"') DO (
+ REG QUERY "%RegKey%\%%A" /v "CurrentState" %_Nul2% | FIND /I "0x70" %_Nul1% && (
+ FOR /F "TOKENS=3 DELIMS=-~" %%B IN ('ECHO %%A') DO SET "EditionPKG=%%B"
+ )
+)
+IF /I "%EditionPKG:~-7%"=="Edition" (
+SET "EditionID=%EditionPKG:~0,-7%"
+) ELSE (
+FOR /F "TOKENS=3 DELIMS=: " %%A IN ('DISM /English /Online /Get-CurrentEdition %_Nul6% ^| FIND /I "Current Edition :"') DO SET "EditionID=%%A"
+)
+net start sppsvc /y %_Nul3%
+set "_qr=%_zz7% SoftwareLicensingProduct %_zz2% %_zz5%ApplicationID='%_wApp%' %adoff% AND PartialProductKey is not NULL%_zz6% %_zz3% LicenseFamily %_zz8%"
+FOR /F "TOKENS=2 DELIMS==" %%A IN ('%_qr% %_Nul6%') DO SET "EditionWMI=%%A"
+IF "%EditionWMI%"=="" (
+IF %winbuild% GEQ 17063 FOR /F "SKIP=2 TOKENS=2*" %%A IN ('REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionId') DO SET "EditionID=%%B"
+IF %winbuild% LSS 14393 (
+ FOR /F "SKIP=2 TOKENS=2*" %%A IN ('REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionId') DO SET "EditionID=%%B"
+ GOTO :Main
+ )
+)
+IF NOT "%EditionWMI%"=="" SET "EditionID=%EditionWMI%"
+IF /I "%EditionID%"=="IoTEnterprise" SET "EditionID=Enterprise"
+IF /I "%EditionID%"=="IoTEnterpriseS" SET "EditionID=EnterpriseS"
+IF /I "%EditionID%"=="ProfessionalSingleLanguage" SET "EditionID=Professional"
+IF /I "%EditionID%"=="ProfessionalCountrySpecific" SET "EditionID=Professional"
+IF /I "%EditionID%"=="EnterpriseG" SET Win10Gov=1
+IF /I "%EditionID%"=="EnterpriseGN" SET Win10Gov=1
+
+:Main
+if defined EditionID (set "_winos=Windows %EditionID% edition") else (set "_winos=Detected Windows")
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName %_Nul6%') do if not errorlevel 1 set "_winos=%%b"
+set "nKMS=does not support KMS activation..."
+set "nEval=Evaluation Editions cannot be activated. Please install full Windows OS."
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set "nEval=Server Evaluation cannot be activated. Please convert to full Server OS."
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1&set "nEval=Server Evaluation cannot be activated. Please convert to full Server OS."
+set "_C16R="
+reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath %_Nul3% && for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (
+reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds %_Nul3% && set "_C16R=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration"
+)
+if not defined _C16R reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath %_Nul3% && for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (
+reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds %_Nul3% && set "_C16R=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration"
+)
+set "_C15R="
+reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath %_Nul3% && for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses\ProPlus*.xrm-ms" (
+reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds %_Nul3% && call set "_C15R=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration"
+if not defined _C15R reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid %_Nul3% && call set "_C15R=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag"
+)
+set "_C14R="
+if %_wow%==0 (reg query HKLM\SOFTWARE\Microsoft\Office\14.0\CVH /f Click2run /k %_Nul3% && set "_C14R=1") else (reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\CVH /f Click2run /k %_Nul3% && set "_C14R=1")
+for %%A in (14,15,16,19,21) do call :officeLoc %%A
+if %_O14MSI% EQU 1 set "_C14R="
+
+set S_OK=1
+call :RunSPP
+if %ActOffice% NEQ 0 call :RunOSPP
+if %ActOffice% EQU 0 (echo.&echo Office activation is OFF...)
+
+if exist "!_temp!\crv*.txt" del /f /q "!_temp!\crv*.txt"
+if exist "!_temp!\*chk.txt" del /f /q "!_temp!\*chk.txt"
+if exist "!_temp!\slmgr.vbs" del /f /q "!_temp!\slmgr.vbs"
+call :StopService sppsvc
+if %OsppHook% NEQ 0 call :StopService osppsvc
+
+sc start sppsvc trigger=timer;sessionid=0 %_Nul3%
+
+goto TheEnd
+
+:RunSPP
+set spp=SoftwareLicensingProduct
+set sps=SoftwareLicensingService
+set W1nd0ws=1
+set WinPerm=0
+set WinVL=0
+set Off1ce=0
+set RunR2V=0
+set aC2R21=0
+set aC2R19=0
+set aC2R16=0
+set aC2R15=0
+if %winbuild% GEQ 9200 if %ActOffice% NEQ 0 call :sppoff
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%Description like '%%KMSCLIENT%%' %_zz6% %_zz3% Name %_zz4%"
+%_qr% %_Nul2% | findstr /i Windows %_Nul1% && (set WinVL=1)
+if %WinVL% EQU 0 (
+if %ActWindows% EQU 0 (
+ echo.&echo Windows activation is OFF...
+ ) else (
+ if %SSppHook% EQU 0 (
+ echo.&echo %_winos% %nKMS%
+ if defined _eval echo %nEval%
+ ) else (
+ echo.&echo Failed checking KMS Activation ID^(s^) for Windows.&echo See Read Me for troubleshooting.
+ exit /b
+ )
+ )
+)
+if %WinVL% EQU 0 if %Off1ce% EQU 0 exit /b
+set _gvlk=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL%_zz6% %_zz3% Name %_zz4%"
+if %winbuild% GEQ 10240 %_qr% %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1)
+set gpr=0
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL%_zz6% %_zz3% GracePeriodRemaining %_zz8%"
+if %winbuild% GEQ 10240 if %SkipKMS38% NEQ 0 if %_gvlk% EQU 1 for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set "gpr=%%A"
+set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" %_zz3% LicenseFamily %_zz4%"
+if %gpr% NEQ 0 if %gpr% GTR 259200 (
+set W1nd0ws=0
+%_qr% %_Nul2% | findstr /i EnterpriseG %_Nul1% && (call set W1nd0ws=1)
+)
+set "_qr=%_zz7% %sps% %_zz3% Version %_zz8%"
+for /f "tokens=2 delims==" %%A in ('%_qr%') do set slsv=%%A
+reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" %_Nul3%
+reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3%
+if %winbuild% GEQ 9200 (
+if not %xOS%==x86 (
+reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32 %_Nul3%
+reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" /reg:32 %_Nul3%
+reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32 %_Null%
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32 %_Nul3%
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" /reg:32 %_Nul3%
+)
+reg delete "HKLM\%SPPk%\%_oApp%" /f %_Null%
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" %_Nul3%
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3%
+)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' %_zz6% %_zz3% ID %_zz8%"
+if %W1nd0ws% EQU 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :sppchkwin)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' %adoff% %_zz6% %_zz3% ID %_zz8%"
+if %W1nd0ws% EQU 1 if %ActWindows% NEQ 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :sppchkwin)
+:: set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' %addon% %_zz6% %_zz3% ID %_zz8%"
+:: if %ESU_EDT% EQU 1 if %ActWindows% NEQ 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :esuchk)
+if %W1nd0ws% EQU 1 if %ActWindows% EQU 0 (echo.&echo Windows activation is OFF...)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' and Description like '%%KMSCLIENT%%' %_zz6% %_zz3% ID %_zz8%"
+if %Off1ce% EQU 1 if %ActOffice% NEQ 0 for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :sppchkoff)
+reg delete "HKLM\%SPPk%" /f /v DisableDnsPublishing %_Null%
+reg delete "HKLM\%SPPk%" /f /v DisableKeyManagementServiceHostCaching %_Null%
+exit /b
+
+:sppoff
+set OffUWP=0
+if %winbuild% GEQ 10240 reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msoxmled.exe" %_Nul3% && (
+dir /b "%ProgramFiles%\WindowsApps\Microsoft.Office.Desktop*" %_Nul3% && set OffUWP=1
+if not %xOS%==x86 dir /b "%ProgramW6432%\WindowsApps\Microsoft.Office.Desktop*" %_Nul3% && set OffUWP=1
+)
+rem nothing installed
+if %loc_off21% EQU 0 if %loc_off19% EQU 0 if %loc_off16% EQU 0 if %loc_off15% EQU 0 (
+if %OffUWP% EQU 0 (echo.&echo No Installed Office 2013-2021 Product Detected...) else (echo.&echo %_mOuwp%)
+exit /b
+)
+set Off1ce=1
+set _sC2R=sppoff
+set _fC2R=ReturnSPP
+set vol_off15=0&set vol_off16=0&set vol_off19=0&set vol_off21=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%Description like '%%KMSCLIENT%%' AND NOT Name like '%%MondoR_KMS_Automation%%' %_zz6% %_zz3% Name %_zz4%"
+%_qr% > "!_temp!\sppchk.txt" 2>&1
+find /i "Office 21" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off21=1)
+find /i "Office 19" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off19=1)
+find /i "Office 16" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off16=1)
+find /i "Office 15" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off15=1)
+for %%A in (15,16,19,21) do if !loc_off%%A! EQU 0 set vol_off%%A=0
+set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%'" %_zz3% LicenseFamily %_zz4%"
+if %vol_off16% EQU 1 find /i "Office16MondoVL_KMS_Client" "!_temp!\sppchk.txt" %_Nul1% && (
+%_qr% %_Nul2% | find /i "O365" %_Nul1% || (set vol_off16=0)
+)
+set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'OfficeO365%%'" %_zz3% LicenseFamily %_zz4%"
+if %vol_off15% EQU 1 find /i "OfficeMondoVL_KMS_Client" "!_temp!\sppchk.txt" %_Nul1% && (
+%_qr% %_Nul2% | find /i "O365" %_Nul1% || (set vol_off15=0)
+)
+set ret_off15=0&set ret_off16=0&set ret_off19=0&set ret_off21=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' AND NOT Name like '%%O365%%' %_zz6% %_zz3% Name %_zz4%"
+%_qr% > "!_temp!\sppchk.txt" 2>&1
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 21" %_Nul1% && (set ret_off21=1)
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 19" %_Nul1% && (set ret_off19=1)
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 16" %_Nul1% && (set ret_off16=1)
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 15" %_Nul1% && (set ret_off15=1)
+if %ret_off21% EQU 1 if %_O16MSI% EQU 0 set vol_off21=0
+if %ret_off19% EQU 1 if %_O16MSI% EQU 0 set vol_off19=0
+if %ret_off16% EQU 1 if %_O16MSI% EQU 0 set vol_off16=0
+if %ret_off15% EQU 1 if %_O15MSI% EQU 0 set vol_off15=0
+set run_off16=0
+if defined _C16R if %loc_off16% EQU 1 if %vol_off16% EQU 0 if %ret_off16% EQU 1 (
+for %%a in (%DO16Ids%) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && (
+ if %vol_off21% EQU 1 find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ if %vol_off19% EQU 1 find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ )
+for %%a in (Professional) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && (
+ if %vol_off21% EQU 1 find /i "Office21ProPlus2021VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ if %vol_off19% EQU 1 find /i "Office19ProPlus2019VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ )
+for %%a in (HomeBusiness,HomeStudent) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && (
+ if %vol_off21% EQU 1 find /i "Office21Standard2021VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ if %vol_off19% EQU 1 find /i "Office19Standard2019VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ )
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%' %_zz6% %_zz3% LicenseFamily %_zz4%"
+if defined _C16R if %loc_off16% EQU 1 if %run_off16% EQU 0 %_qr% %_Nul2% | find /i "O365" %_Nul1% && (
+find /i "Office16MondoVL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+)
+set vol_offgl=1
+if %vol_off21% EQU 0 if %vol_off19% EQU 0 if %vol_off16% EQU 0 if %vol_off15% EQU 0 set vol_offgl=0
+rem mixed Volume + Retail
+if %loc_off21% EQU 1 if %vol_off21% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+if %loc_off19% EQU 1 if %vol_off19% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+if defined _C16R if %loc_off16% EQU 1 if %vol_off16% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 if %run_off16% EQU 1 goto :C2RR2V
+if defined _C15R if %loc_off15% EQU 1 if %vol_off15% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+if %loc_off16% EQU 0 if %ret_off16% EQU 1 if %_O16MSI% EQU 0 if %OffUWP% EQU 1 (echo.&echo %_mOuwp%)
+rem all supported Volume + message for unsupported
+if %vol_offgl% EQU 1 (
+if %ret_off16% EQU 1 if %_O16MSI% EQU 1 (echo.&echo %_mO16m%)
+if %ret_off15% EQU 1 if %_O15MSI% EQU 1 (echo.&echo %_mO15m%)
+exit /b
+)
+set Off1ce=0
+rem Retail C2R
+if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+:ReturnSPP
+rem Retail MSI/C2R or failed C2R-R2V
+if %loc_off21% EQU 1 if %vol_off21% EQU 0 (
+if %aC2R21% EQU 1 (echo.&echo %_mO21a%) else (echo.&echo %_mO21c%)
+)
+if %loc_off19% EQU 1 if %vol_off19% EQU 0 (
+if %aC2R19% EQU 1 (echo.&echo %_mO19a%) else (echo.&echo %_mO19c%)
+)
+if %loc_off16% EQU 1 if %vol_off16% EQU 0 (
+if defined _C16R (if %aC2R16% EQU 1 (echo.&echo %_mO16a%) else (echo.&echo %_mO16c%)) else if %_O16MSI% EQU 1 (if %ret_off16% EQU 1 echo.&echo %_mO16m%)
+)
+if %loc_off15% EQU 1 if %vol_off15% EQU 0 (
+if defined _C15R (if %aC2R15% EQU 1 (echo.&echo %_mO15a%) else (echo.&echo %_mO15c%)) else if %_O15MSI% EQU 1 (if %ret_off15% EQU 1 echo.&echo %_mO15m%)
+)
+exit /b
+
+:sppchkoff
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz4%"
+%_qr% > "!_temp!\sppchk.txt"
+find /i "Office 15" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off15% EQU 0 exit /b)
+find /i "Office 16" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off16% EQU 0 exit /b)
+find /i "Office 19" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off19% EQU 0 exit /b)
+find /i "Office 21" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off21% EQU 0 exit /b)
+set _officespp=1
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%PartialProductKey is not NULL%_zz6% %_zz3% ID %_zz4%"
+%_qr% %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%"
+for /f "tokens=3 delims==, " %%G in ('%_qr%') do set OffVer=%%G
+call :offchk%OffVer%
+exit /b
+
+:sppchkwin
+set _officespp=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL%_zz6% %_zz3% Name %_zz4%"
+if %winbuild% GEQ 14393 if %WinPerm% EQU 0 if %_gvlk% EQU 0 %_qr% %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% LicenseStatus %_zz4%"
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (echo.&call :activate&exit /b)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%PartialProductKey is not NULL%_zz6% %_zz3% ID %_zz4%"
+%_qr% %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b)
+if %winbuild% GEQ 14393 if %_gvlk% EQU 1 exit /b
+if %WinPerm% EQU 1 exit /b
+if %winbuild% LSS 10240 (call :winchk&exit /b)
+for %%A in (
+b71515d9-89a2-4c60-88c8-656fbcca7f3a,af43f7f0-3b1e-4266-a123-1fdb53f4323b,075aca1f-05d7-42e5-a3ce-e349e7be7078
+11a37f09-fb7f-4002-bd84-f3ae71d11e90,43f2ab05-7c87-4d56-b27c-44d0f9a3dabd,2cf5af84-abab-4ff0-83f8-f040fb2576eb
+6ae51eeb-c268-4a21-9aae-df74c38b586d,ff808201-fec6-4fd4-ae16-abbddade5706,34260150-69ac-49a3-8a0d-4a403ab55763
+4dfd543d-caa6-4f69-a95f-5ddfe2b89567,5fe40dd6-cf1f-4cf2-8729-92121ac2e997,903663f7-d2ab-49c9-8942-14aa9e0a9c72
+2cc171ef-db48-4adc-af09-7c574b37f139,5b2add49-b8f4-42e0-a77c-adad4efeeeb1
+) do (
+if /i '%app%' EQU '%%A' exit /b
+)
+if not defined EditionID (call :winchk&exit /b)
+if %winbuild% LSS 14393 (call :winchk&exit /b)
+if /i '%app%' EQU '32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee' if /i %EditionID% NEQ EnterpriseS exit /b
+if /i '%app%' EQU 'ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69' if /i %EditionID% NEQ CloudEdition exit /b
+if /i '%app%' EQU 'd30136fc-cb4b-416e-a23d-87207abc44a9' if /i %EditionID% NEQ CloudEditionN exit /b
+if /i '%app%' EQU '0df4f814-3f57-4b8b-9a9d-fddadcd69fac' if /i %EditionID% NEQ CloudE exit /b
+if /i '%app%' EQU 'e0c42288-980c-4788-a014-c080d2e1926e' if /i %EditionID% NEQ Education exit /b
+if /i '%app%' EQU '73111121-5638-40f6-bc11-f1d7b0d64300' if /i %EditionID% NEQ Enterprise exit /b
+if /i '%app%' EQU '2de67392-b7a7-462a-b1ca-108dd189f588' if /i %EditionID% NEQ Professional exit /b
+if /i '%app%' EQU '3f1afc82-f8ac-4f6c-8005-1d233e606eee' if /i %EditionID% NEQ ProfessionalEducation exit /b
+if /i '%app%' EQU '82bbc092-bc50-4e16-8e18-b74fc486aec3' if /i %EditionID% NEQ ProfessionalWorkstation exit /b
+if /i '%app%' EQU '3c102355-d027-42c6-ad23-2e7ef8a02585' if /i %EditionID% NEQ EducationN exit /b
+if /i '%app%' EQU 'e272e3e2-732f-4c65-a8f0-484747d0d947' if /i %EditionID% NEQ EnterpriseN exit /b
+if /i '%app%' EQU 'a80b5abf-76ad-428b-b05d-a47d2dffeebf' if /i %EditionID% NEQ ProfessionalN exit /b
+if /i '%app%' EQU '5300b18c-2e33-4dc2-8291-47ffcec746dd' if /i %EditionID% NEQ ProfessionalEducationN exit /b
+if /i '%app%' EQU '4b1571d3-bafb-4b40-8087-a961be2caf65' if /i %EditionID% NEQ ProfessionalWorkstationN exit /b
+if /i '%app%' EQU '58e97c99-f377-4ef1-81d5-4ad5522b5fd8' if /i %EditionID% NEQ Core exit /b
+if /i '%app%' EQU 'cd918a57-a41b-4c82-8dce-1a538e221a83' if /i %EditionID% NEQ CoreSingleLanguage exit /b
+if /i '%app%' EQU 'ec868e65-fadf-4759-b23e-93fe37f2cc29' if /i %EditionID% NEQ ServerRdsh exit /b
+if /i '%app%' EQU 'e4db50ea-bda1-4566-b047-0ca50abc6f07' if /i %EditionID% NEQ ServerRdsh exit /b
+set "_qr=%_zz1% %spp% %_zz2% "Description like '%%KMSCLIENT%%'" %_zz3% ID %_zz4%"
+if /i "%app%" EQU "e4db50ea-bda1-4566-b047-0ca50abc6f07" (
+%_qr% | findstr /i "ec868e65-fadf-4759-b23e-93fe37f2cc29" %_Nul3% && (exit /b)
+)
+call :winchk
+exit /b
+
+:winchk
+if not defined tok (if %winbuild% GEQ 9200 (set "tok=4") else (set "tok=7"))
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%LicenseStatus='1' and Description like '%%KMSCLIENT%%' %adoff% %_zz6% %_zz3% Name %_zz4%"
+%_qr% %_Nul2% | findstr /i "Windows" %_Nul3% && (exit /b)
+echo.
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%LicenseStatus='1' and GracePeriodRemaining='0' %adoff% and PartialProductKey is not NULL%_zz6% %_zz3% Name %_zz4%"
+%_qr% %_Nul2% | findstr /i "Windows" %_Nul3% && (
+set WinPerm=1
+)
+set WinOEM=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and LicenseStatus='1' %adoff% %_zz6% %_zz3% Name %_zz4%"
+if %WinPerm% EQU 0 %_qr% %_Nul2% | findstr /i "Windows" %_Nul3% && set WinOEM=1
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and LicenseStatus='1' %adoff% %_zz6% %_zz3% Description %_zz8%"
+if %WinOEM% EQU 1 (
+for /f "tokens=%tok% delims=, " %%G in ('%_qr%') do set "channel=%%G"
+for %%A in (VOLUME_MAK, RETAIL, OEM_DM, OEM_SLP, OEM_COA, OEM_COA_SLP, OEM_COA_NSLP, OEM_NONSLP, OEM) do if /i "%%A"=="!channel!" set WinPerm=1
+)
+if %WinPerm% EQU 0 (
+copy /y %SysPath%\slmgr.vbs "!_temp!\slmgr.vbs" %_Nul3%
+cscript //nologo "!_temp!\slmgr.vbs" /xpr %_Nul2% | findstr /i "permanently" %_Nul3% && set WinPerm=1
+)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ApplicationID='%_wApp%' and LicenseStatus='1' %adoff% %_zz6% %_zz3% Name %_zz8%"
+if %WinPerm% EQU 1 (
+for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Checking: %%x
+echo Product is Permanently Activated.
+exit /b
+)
+call :insKey
+exit /b
+
+:esuchk
+set _officespp=0
+set ESU_ADD=1
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% LicenseStatus %_zz4%"
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (echo.&call :activate&exit /b)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='77db037b-95c3-48d7-a3ab-a9c6d41093e0'%_zz6% %_zz3% LicenseStatus %_zz4%"
+if /i "%app%" EQU "3fcc2df2-f625-428d-909a-1f76efc849b6" (
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b)
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='0e00c25d-8795-4fb7-9572-3803d91b6880'%_zz6% %_zz3% LicenseStatus %_zz4%"
+if /i "%app%" EQU "dadfcd24-6e37-47be-8f7f-4ceda614cece" (
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b)
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='4220f546-f522-46df-8202-4d07afd26454'%_zz6% %_zz3% LicenseStatus %_zz4%"
+if /i "%app%" EQU "0c29c85e-12d7-4af8-8e4d-ca1e424c480c" (
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b)
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='553673ed-6ddf-419c-a153-b760283472fd'%_zz6% %_zz3% LicenseStatus %_zz4%"
+if /i "%app%" EQU "f2b21bfc-a6b0-4413-b4bb-9f06b55f2812" (
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b)
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='04fa0286-fa74-401e-bbe9-fbfbb158010d'%_zz6% %_zz3% LicenseStatus %_zz4%"
+if /i "%app%" EQU "bfc078d0-8c7f-475c-8519-accc46773113" (
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b)
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='16c08c85-0c8b-4009-9b2b-f1f7319e45f9'%_zz6% %_zz3% LicenseStatus %_zz4%"
+if /i "%app%" EQU "23c6188f-c9d8-457e-81b6-adb6dacb8779" (
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b)
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='8e7bfb1e-acc1-4f56-abae-b80fce56cd4b'%_zz6% %_zz3% LicenseStatus %_zz4%"
+if /i "%app%" EQU "e7cce015-33d6-41c1-9831-022ba63fe1da" (
+%_qr% %_Nul2% | findstr "1" %_Nul1% && (exit /b)
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%PartialProductKey is not NULL%_zz6% %_zz3% ID %_zz4%"
+%_qr% %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b)
+call :insKey
+exit /b
+
+:RunOSPP
+set spp=OfficeSoftwareProtectionProduct
+set sps=OfficeSoftwareProtectionService
+set Off1ce=0
+set RunR2V=0
+set aC2R21=0
+set aC2R19=0
+set aC2R16=0
+set aC2R15=0
+if %winbuild% LSS 9200 (set "aword=2010-2021") else (set "aword=2010")
+if %OsppHook% EQU 0 (echo.&echo No Installed Office %aword% Product Detected...&exit /b)
+if %winbuild% GEQ 9200 if %loc_off14% EQU 0 (echo.&echo No Installed Office %aword% Product Detected...&exit /b)
+set err_offsvc=0
+net start osppsvc /y %_Nul3% || (
+sc start osppsvc %_Nul3%
+if !errorlevel! EQU 1053 set err_offsvc=1
+)
+if %err_offsvc% EQU 1 (echo.&echo Error: osppsvc service is not running...&exit /b)
+if %winbuild% GEQ 9200 call :win8off
+if %winbuild% LSS 9200 call :win7off
+if %Off1ce% EQU 0 exit /b
+set "vPrem="&set "vProf="
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='OfficeVisioPrem-MAK'%_zz6% %_zz3% LicenseStatus %_zz8%"
+if %loc_off14% EQU 1 for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set vPrem=%%A
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='OfficeVisioPro-MAK'%_zz6% %_zz3% LicenseStatus %_zz8%"
+if %loc_off14% EQU 1 for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set vProf=%%A
+set "_qr=%_zz7% %sps% %_zz3% Version %_zz8%"
+for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set slsv=%%A
+reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" %_Nul3%
+reg add "HKLM\%OPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3%
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%Description like '%%KMSCLIENT%%' %_zz6% %_zz3% ID %_zz8%"
+for /f "tokens=2 delims==" %%G in ('%_qr%') do (set app=%%G&call :osppchk)
+reg delete "HKLM\%OPPk%" /f /v DisableDnsPublishing %_Null%
+reg delete "HKLM\%OPPk%" /f /v DisableKeyManagementServiceHostCaching %_Null%
+exit /b
+
+:win8off
+set "_qr=%_zz1% %spp% %_zz3% Description %_zz4%"
+%_qr% %_Nul2% | findstr /i KMSCLIENT %_Nul1% && (
+set Off1ce=1
+exit /b
+)
+set ret_off14=0
+%_qr% %_Nul2% | findstr /i channel %_Nul1% && (set ret_off14=1)
+if defined _C14R (echo.&echo %_mO14c%) else if %_O14MSI% EQU 1 (if %ret_off14% EQU 1 echo.&echo %_mO14m%)
+exit /b
+
+:win7off
+rem nothing installed
+if %loc_off21% EQU 0 if %loc_off19% EQU 0 if %loc_off16% EQU 0 if %loc_off15% EQU 0 if %loc_off14% EQU 0 (echo.&echo No Installed Office %aword% Product Detected...&exit /b)
+set Off1ce=1
+set _sC2R=win7off
+set _fC2R=ReturnOSPP
+set vol_off14=0&set vol_off15=0&set vol_off16=0&set vol_off19=0&set vol_off21=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%Description like '%%KMSCLIENT%%' AND NOT Name like '%%MondoR_KMS_Automation%%' %_zz6% %_zz3% Name %_zz4%"
+%_qr% > "!_temp!\sppchk.txt" 2>&1
+find /i "Office 21" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off21=1)
+find /i "Office 19" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off19=1)
+find /i "Office 16" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off16=1)
+find /i "Office 15" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off15=1)
+find /i "Office 14" "!_temp!\sppchk.txt" %_Nul1% && (set vol_off14=1)
+for %%A in (14,15,16,19,21) do if !loc_off%%A! EQU 0 set vol_off%%A=0
+set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%'" %_zz3% LicenseFamily %_zz4%"
+if %vol_off16% EQU 1 find /i "Office16MondoVL_KMS_Client" "!_temp!\sppchk.txt" %_Nul1% && (
+%_qr% %_Nul2% | find /i "O365" %_Nul1% || (set vol_off16=0)
+)
+set "_qr=%_zz1% %spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'OfficeO365%%'" %_zz3% LicenseFamily %_zz4%"
+if %vol_off15% EQU 1 find /i "OfficeMondoVL_KMS_Client" "!_temp!\sppchk.txt" %_Nul1% && (
+%_qr% %_Nul2% | find /i "O365" %_Nul1% || (set vol_off15=0)
+)
+set ret_off14=0&set ret_off15=0&set ret_off16=0&set ret_off19=0&set ret_off21=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' AND NOT Name like '%%O365%%' %_zz6% %_zz3% Name %_zz4%"
+%_qr% > "!_temp!\sppchk.txt" 2>&1
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 21" %_Nul1% && (set ret_off21=1)
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 19" %_Nul1% && (set ret_off19=1)
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 16" %_Nul1% && (set ret_off16=1)
+find /i "R_Retail" "!_temp!\sppchk.txt" %_Nul2% | find /i "Office 15" %_Nul1% && (set ret_off15=1)
+if %ret_off21% EQU 1 if %_O16MSI% EQU 0 set vol_off21=0
+if %ret_off19% EQU 1 if %_O16MSI% EQU 0 set vol_off19=0
+if %ret_off16% EQU 1 if %_O16MSI% EQU 0 set vol_off16=0
+if %ret_off15% EQU 1 if %_O15MSI% EQU 0 set vol_off15=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oA14%'%_zz6% %_zz3% Description %_zz4%"
+if %vol_off14% EQU 0 %_qr% %_Nul2% | findstr /i channel %_Nul1% && (set ret_off14=1)
+set run_off16=0
+if defined _C16R if %loc_off16% EQU 1 if %vol_off16% EQU 0 if %ret_off16% EQU 1 (
+for %%a in (%DO16Ids%) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && (
+ if %vol_off21% EQU 1 find /i "Office21%%a2021VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ if %vol_off19% EQU 1 find /i "Office19%%a2019VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ )
+for %%a in (Professional) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && (
+ if %vol_off21% EQU 1 find /i "Office21ProPlus2021VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ if %vol_off19% EQU 1 find /i "Office19ProPlus2019VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ )
+for %%a in (HomeBusiness,HomeStudent) do find /i "Office16%%aR" "!_temp!\sppchk.txt" %_Nul1% && (
+ if %vol_off21% EQU 1 find /i "Office21Standard2021VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ if %vol_off19% EQU 1 find /i "Office19Standard2019VL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+ )
+)
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%' %_zz6% %_zz3% LicenseFamily %_zz4%"
+if defined _C16R if %loc_off16% EQU 1 if %run_off16% EQU 0 %_qr% %_Nul2% | find /i "O365" %_Nul1% && (
+find /i "Office16MondoVL" "!_temp!\sppchk.txt" %_Nul1% || set run_off16=1
+)
+set vol_offgl=1
+if %vol_off21% EQU 0 if %vol_off19% EQU 0 if %vol_off16% EQU 0 if %vol_off15% EQU 0 if %vol_off14% EQU 0 set vol_offgl=0
+rem mixed Volume + Retail
+if %loc_off21% EQU 1 if %vol_off21% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+if %loc_off19% EQU 1 if %vol_off19% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+if defined _C16R if %loc_off16% EQU 1 if %vol_off16% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 if %run_off16% EQU 1 goto :C2RR2V
+if defined _C15R if %loc_off15% EQU 1 if %vol_off15% EQU 0 if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+rem all supported Volume + message for unsupported
+if %vol_offgl% EQU 1 (
+if %ret_off16% EQU 1 if %_O16MSI% EQU 1 (echo.&echo %_mO16m%)
+if %ret_off15% EQU 1 if %_O15MSI% EQU 1 (echo.&echo %_mO15m%)
+if %loc_off14% EQU 1 if %vol_off14% EQU 0 (if defined _C14R (echo.&echo %_mO14c%) else if %_O14MSI% EQU 1 (if %ret_off14% EQU 1 echo.&echo %_mO14m%))
+exit /b
+)
+set Off1ce=0
+rem Retail C2R
+if %RunR2V% EQU 0 if %AutoR2V% EQU 1 goto :C2RR2V
+:ReturnOSPP
+rem Retail MSI/C2R or failed C2R-R2V
+if %loc_off21% EQU 1 if %vol_off21% EQU 0 (
+if %aC2R21% EQU 1 (echo.&echo %_mO21a%) else (echo.&echo %_mO21c%)
+)
+if %loc_off19% EQU 1 if %vol_off19% EQU 0 (
+if %aC2R19% EQU 1 (echo.&echo %_mO19a%) else (echo.&echo %_mO19c%)
+)
+if %loc_off16% EQU 1 if %vol_off16% EQU 0 (
+if defined _C16R (if %aC2R16% EQU 1 (echo.&echo %_mO16a%) else (echo.&echo %_mO16c%)) else if %_O16MSI% EQU 1 (if %ret_off16% EQU 1 echo.&echo %_mO16m%)
+)
+if %loc_off15% EQU 1 if %vol_off15% EQU 0 (
+if defined _C15R (if %aC2R15% EQU 1 (echo.&echo %_mO15a%) else (echo.&echo %_mO15c%)) else if %_O15MSI% EQU 1 (if %ret_off15% EQU 1 echo.&echo %_mO15m%)
+)
+if %loc_off14% EQU 1 if %vol_off14% EQU 0 (
+if defined _C14R (echo.&echo %_mO14c%) else if %_O14MSI% EQU 1 (if %ret_off14% EQU 1 echo.&echo %_mO14m%)
+)
+exit /b
+
+:osppchk
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz4%"
+%_qr% > "!_temp!\sppchk.txt"
+find /i "Office 14" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off14% EQU 0 exit /b)
+find /i "Office 15" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off15% EQU 0 exit /b)
+find /i "Office 16" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off16% EQU 0 exit /b)
+find /i "Office 19" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off19% EQU 0 exit /b)
+find /i "Office 21" "!_temp!\sppchk.txt" %_Nul1% && (if %loc_off21% EQU 0 exit /b)
+set _officespp=0
+set "_qr=%_zz1% %spp% %_zz2% %_zz5%PartialProductKey is not NULL%_zz6% %_zz3% ID %_zz4%"
+%_qr% %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%"
+for /f "tokens=3 delims==, " %%G in ('%_qr%') do set OffVer=%%G
+call :offchk%OffVer%
+exit /b
+
+:offchk
+set ls=0
+set ls2=0
+set ls3=0
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='Office%~1'%_zz6% %_zz3% LicenseStatus %_zz8%"
+for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set /a ls=%%A
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='Office%~3'%_zz6% %_zz3% LicenseStatus %_zz8%"
+if /i not "%~3"=="" for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set /a ls2=%%A
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%LicenseFamily='Office%~5'%_zz6% %_zz3% LicenseStatus %_zz8%"
+if /i not "%~5"=="" for /f "tokens=2 delims==" %%A in ('%_qr% %_Nul6%') do set /a ls3=%%A
+if "%ls3%"=="1" (
+echo Checking: %~6
+echo Product is Permanently Activated.
+exit /b
+)
+if "%ls2%"=="1" (
+echo Checking: %~4
+echo Product is Permanently Activated.
+exit /b
+)
+if "%ls%"=="1" (
+echo Checking: %~2
+echo Product is Permanently Activated.
+exit /b
+)
+call :insKey
+exit /b
+
+:offchk21
+if /i '%app%' EQU 'f3fb2d68-83dd-4c8b-8f09-08e0d950ac3b' exit /b
+if /i '%app%' EQU '76093b1b-7057-49d7-b970-638ebcbfd873' exit /b
+if /i '%app%' EQU 'a3b44174-2451-4cd6-b25f-66638bfb9046' exit /b
+if /i '%app%' EQU 'fbdb3e18-a8ef-4fb3-9183-dffd60bd0984' (
+call :offchk "21ProPlus2021VL_MAK_AE1" "Office ProPlus 2021" "21ProPlus2021VL_MAK_AE2"
+exit /b
+)
+if /i '%app%' EQU '080a45c5-9f9f-49eb-b4b0-c3c610a5ebd3' (
+call :offchk "21Standard2021VL_MAK_AE" "Office Standard 2021"
+exit /b
+)
+if /i '%app%' EQU '76881159-155c-43e0-9db7-2d70a9a3a4ca' (
+call :offchk "21ProjectPro2021VL_MAK_AE1" "Project Pro 2021" "21ProjectPro2021VL_MAK_AE2"
+exit /b
+)
+if /i '%app%' EQU '6dd72704-f752-4b71-94c7-11cec6bfc355' (
+call :offchk "21ProjectStd2021VL_MAK_AE" "Project Standard 2021"
+exit /b
+)
+if /i '%app%' EQU 'fb61ac9a-1688-45d2-8f6b-0674dbffa33c' (
+call :offchk "21VisioPro2021VL_MAK_AE" "Visio Pro 2021"
+exit /b
+)
+if /i '%app%' EQU '72fce797-1884-48dd-a860-b2f6a5efd3ca' (
+call :offchk "21VisioStd2021VL_MAK_AE" "Visio Standard 2021"
+exit /b
+)
+call :insKey
+exit /b
+
+:offchk19
+if /i '%app%' EQU '0bc88885-718c-491d-921f-6f214349e79c' exit /b
+if /i '%app%' EQU 'fc7c4d0c-2e85-4bb9-afd4-01ed1476b5e9' exit /b
+if /i '%app%' EQU '500f6619-ef93-4b75-bcb4-82819998a3ca' exit /b
+if /i '%app%' EQU '85dd8b5f-eaa4-4af3-a628-cce9e77c9a03' (
+call :offchk "19ProPlus2019VL_MAK_AE" "Office ProPlus 2019"
+exit /b
+)
+if /i '%app%' EQU '6912a74b-a5fb-401a-bfdb-2e3ab46f4b02' (
+call :offchk "19Standard2019VL_MAK_AE" "Office Standard 2019"
+exit /b
+)
+if /i '%app%' EQU '2ca2bf3f-949e-446a-82c7-e25a15ec78c4' (
+call :offchk "19ProjectPro2019VL_MAK_AE" "Project Pro 2019"
+exit /b
+)
+if /i '%app%' EQU '1777f0e3-7392-4198-97ea-8ae4de6f6381' (
+call :offchk "19ProjectStd2019VL_MAK_AE" "Project Standard 2019"
+exit /b
+)
+if /i '%app%' EQU '5b5cf08f-b81a-431d-b080-3450d8620565' (
+call :offchk "19VisioPro2019VL_MAK_AE" "Visio Pro 2019"
+exit /b
+)
+if /i '%app%' EQU 'e06d7df3-aad0-419d-8dfb-0ac37e2bdf39' (
+call :offchk "19VisioStd2019VL_MAK_AE" "Visio Standard 2019"
+exit /b
+)
+call :insKey
+exit /b
+
+:offchk16
+if /i '%app%' EQU 'd450596f-894d-49e0-966a-fd39ed4c4c64' (
+call :offchk "16ProPlusVL_MAK" "Office ProPlus 2016"
+exit /b
+)
+if /i '%app%' EQU 'dedfa23d-6ed1-45a6-85dc-63cae0546de6' (
+call :offchk "16StandardVL_MAK" "Office Standard 2016"
+exit /b
+)
+if /i '%app%' EQU '4f414197-0fc2-4c01-b68a-86cbb9ac254c' (
+call :offchk "16ProjectProVL_MAK" "Project Pro 2016"
+exit /b
+)
+if /i '%app%' EQU 'da7ddabc-3fbe-4447-9e01-6ab7440b4cd4' (
+call :offchk "16ProjectStdVL_MAK" "Project Standard 2016"
+exit /b
+)
+if /i '%app%' EQU '6bf301c1-b94a-43e9-ba31-d494598c47fb' (
+call :offchk "16VisioProVL_MAK" "Visio Pro 2016"
+exit /b
+)
+if /i '%app%' EQU 'aa2a7821-1827-4c2c-8f1d-4513a34dda97' (
+call :offchk "16VisioStdVL_MAK" "Visio Standard 2016"
+exit /b
+)
+if /i '%app%' EQU '829b8110-0e6f-4349-bca4-42803577788d' (
+call :offchk "16ProjectProXC2RVL_MAKC2R" "Project Pro 2016 C2R"
+exit /b
+)
+if /i '%app%' EQU 'cbbaca45-556a-4416-ad03-bda598eaa7c8' (
+call :offchk "16ProjectStdXC2RVL_MAKC2R" "Project Standard 2016 C2R"
+exit /b
+)
+if /i '%app%' EQU 'b234abe3-0857-4f9c-b05a-4dc314f85557' (
+call :offchk "16VisioProXC2RVL_MAKC2R" "Visio Pro 2016 C2R"
+exit /b
+)
+if /i '%app%' EQU '361fe620-64f4-41b5-ba77-84f8e079b1f7' (
+call :offchk "16VisioStdXC2RVL_MAKC2R" "Visio Standard 2016 C2R"
+exit /b
+)
+call :insKey
+exit /b
+
+:offchk15
+if /i '%app%' EQU 'b322da9c-a2e2-4058-9e4e-f59a6970bd69' (
+call :offchk "ProPlusVL_MAK" "Office ProPlus 2013"
+exit /b
+)
+if /i '%app%' EQU 'b13afb38-cd79-4ae5-9f7f-eed058d750ca' (
+call :offchk "StandardVL_MAK" "Office Standard 2013"
+exit /b
+)
+if /i '%app%' EQU '4a5d124a-e620-44ba-b6ff-658961b33b9a' (
+call :offchk "ProjectProVL_MAK" "Project Pro 2013"
+exit /b
+)
+if /i '%app%' EQU '427a28d1-d17c-4abf-b717-32c780ba6f07' (
+call :offchk "ProjectStdVL_MAK" "Project Standard 2013"
+exit /b
+)
+if /i '%app%' EQU 'e13ac10e-75d0-4aff-a0cd-764982cf541c' (
+call :offchk "VisioProVL_MAK" "Visio Pro 2013"
+exit /b
+)
+if /i '%app%' EQU 'ac4efaf0-f81f-4f61-bdf7-ea32b02ab117' (
+call :offchk "VisioStdVL_MAK" "Visio Standard 2013"
+exit /b
+)
+call :insKey
+exit /b
+
+:offchk14
+if /i '%app%' EQU '6f327760-8c5c-417c-9b61-836a98287e0c' (
+call :offchk "ProPlus-MAK" "Office ProPlus 2010" "ProPlusAcad-MAK" "Office Professional Academic 2010"
+exit /b
+)
+if /i '%app%' EQU '9da2a678-fb6b-4e67-ab84-60dd6a9c819a' (
+call :offchk "Standard-MAK" "Office Standard 2010" "StandardAcad-MAK" "Office Standard Academic 2010"
+exit /b
+)
+if /i '%app%' EQU 'ea509e87-07a1-4a45-9edc-eba5a39f36af' (
+call :offchk "SmallBusBasics-MAK" "Office Small Business Basics 2010"
+exit /b
+)
+if /i '%app%' EQU 'df133ff7-bf14-4f95-afe3-7b48e7e331ef' (
+call :offchk "ProjectPro-MAK" "Project Pro 2010"
+exit /b
+)
+if /i '%app%' EQU '5dc7bf61-5ec9-4996-9ccb-df806a2d0efe' (
+call :offchk "ProjectStd-MAK" "Project Standard 2010" "ProjectStd-MAK2" "Project Standard 2010"
+exit /b
+)
+if /i '%app%' EQU '92236105-bb67-494f-94c7-7f7a607929bd' (
+call :offchk "VisioPrem-MAK" "Visio Premium 2010" "VisioPro-MAK" "Visio Pro 2010"
+exit /b
+)
+if defined vPrem exit /b
+if /i '%app%' EQU 'e558389c-83c3-4b29-adfe-5e4d7f46c358' (
+call :offchk "VisioPro-MAK" "Visio Pro 2010" "VisioStd-MAK" "Visio Standard 2010"
+exit /b
+)
+if defined vProf exit /b
+if /i '%app%' EQU '9ed833ff-4f92-4f36-b370-8683a4f13275' (
+call :offchk "VisioStd-MAK" "Visio Standard 2010"
+exit /b
+)
+call :insKey
+exit /b
+
+:officeLoc
+set loc_off%1=0
+set _O%1MSI=0
+if %1 EQU 19 (
+if defined _C16R reg query %_C16R% /v ProductReleaseIds %_Nul2% | findstr 2019 %_Nul1% && set loc_off%1=1
+exit /b
+)
+if %1 EQU 21 (
+if defined _C16R reg query %_C16R% /v ProductReleaseIds %_Nul2% | findstr 2021 %_Nul1% && set loc_off%1=1
+exit /b
+)
+
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\%1.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" (
+set loc_off%1=1
+set _O%1MSI=1
+)
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\%1.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" (
+set loc_off%1=1
+set _O%1MSI=1
+)
+
+if %1 EQU 16 if defined _C16R (
+for /f "skip=2 tokens=2*" %%a in ('reg query %_C16R% /v ProductReleaseIds') do echo %%b> "!_temp!\c2rchk.txt"
+for %%a in (%LV16Ids%,ProjectProX,ProjectStdX,VisioProX,VisioStdX) do (
+ findstr /I /C:"%%aVolume" "!_temp!\c2rchk.txt" %_Nul1% && set loc_off%1=1
+ )
+for %%a in (%LR16Ids%) do (
+ findstr /I /C:"%%aRetail" "!_temp!\c2rchk.txt" %_Nul1% && set loc_off%1=1
+ )
+exit /b
+)
+
+if %1 EQU 15 if defined _C15R (
+set loc_off%1=1
+exit /b
+)
+
+if exist "%ProgramFiles%\Microsoft Office\Office%1\OSPP.VBS" set loc_off%1=1
+if not %xOS%==x86 if exist "%ProgramW6432%\Microsoft Office\Office%1\OSPP.VBS" set loc_off%1=1
+if not %xOS%==x86 if exist "%ProgramFiles(x86)%\Microsoft Office\Office%1\OSPP.VBS" set loc_off%1=1
+exit /b
+
+:insKey
+set S_OK=1
+echo.
+set "_key="
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%"
+if %ESU_ADD% EQU 0 for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Installing Key: %%x
+if %ESU_ADD% EQU 1 for /f "tokens=2 delims==f" %%x in ('%_qr%') do echo Installing Key: %%x
+set ESU_ADD=0
+call :keys %app%
+if "%_key%"=="" (echo No associated KMS Client key found&exit /b)
+set "_qr=wmic path %sps% where Version='%slsv%' call InstallProductKey ProductKey="%_key%""
+if %WMI_VBS% NEQ 0 set "_qr=%_csp% %sps% "%_key%""
+%_qr% %_Nul3%
+set ERRORCODE=%ERRORLEVEL%
+if %ERRORCODE% NEQ 0 (
+cmd /c exit /b %ERRORCODE%
+echo Failed: 0x!=ExitCode!
+set S_OK=0
+exit /b
+)
+set "_qr=wmic path %sps% where Version='%slsv%' call RefreshLicenseStatus"
+if %WMI_VBS% NEQ 0 set "_qr=%_csm% "%sps%.Version='%slsv%'" RefreshLicenseStatus"
+if %sps% EQU SoftwareLicensingService %_qr% %_Nul3%
+
+:activate
+set S_OK=1
+if %sps% EQU SoftwareLicensingService (
+if %_officespp% EQU 0 (reg delete "HKLM\%SPPk%\%_wApp%\%app%" /f %_Null%) else (reg delete "HKLM\%SPPk%\%_oApp%\%app%" /f %_Null%)
+) else (
+reg delete "HKLM\%OPPk%\%_oA14%\%app%" /f %_Null%
+reg delete "HKLM\%OPPk%\%_oApp%\%app%" /f %_Null%
+)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%"
+if %W1nd0ws% EQU 0 if %_officespp% EQU 0 if %sps% EQU SoftwareLicensingService (
+reg add "HKLM\%SPPk%\%_wApp%\%app%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" %_Nul3%
+reg add "HKLM\%SPPk%\%_wApp%\%app%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3%
+for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Checking: %%x
+echo Product is KMS 2038 Activated.
+set _keepkms38=1
+exit /b
+)
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% Name %_zz8%"
+if %act_attempt% LSS 1 (
+if %ESU_ADD% EQU 0 for /f "tokens=2 delims==" %%x in ('%_qr%') do echo Activating: %%x
+if %ESU_ADD% EQU 1 for /f "tokens=2 delims==f" %%x in ('%_qr%') do echo Activating: %%x
+)
+
+set ESU_ADD=0
+set "_qr=wmic path %spp% where ID='%app%' call Activate"
+if %WMI_VBS% NEQ 0 set "_qr=%_csm% "%spp%.ID='%app%'" Activate"
+%_qr% %_Nul3%
+call set ERRORCODE=%ERRORLEVEL%
+if %ERRORCODE% EQU -1073418187 (
+echo Product Activation Failed: 0xC004F035
+if %OSType% EQU Win7 echo Windows 7 cannot be KMS-activated on this computer due to unqualified OEM BIOS.
+echo See Read Me for details.
+exit /b
+)
+if %ERRORCODE% EQU -1073417728 (
+echo Product Activation Failed: 0xC004F200
+echo Windows needs to rebuild the activation-related files.
+echo See KB2736303 for details.
+exit /b
+)
+if %ERRORCODE% NEQ 0 (
+if %sps% EQU SoftwareLicensingService (call :StopService sppsvc) else (call :StopService osppsvc)
+%_qr% %_Nul3%
+call set ERRORCODE=!ERRORLEVEL!
+)
+set gpr=0
+set gpr2=0
+set "_qr=%_zz7% %spp% %_zz2% %_zz5%ID='%app%'%_zz6% %_zz3% GracePeriodRemaining %_zz8%"
+for /f "tokens=2 delims==" %%x in ('%_qr%') do (set gpr=%%x&set /a "gpr2=(%%x+1440-1)/1440")
+if %ERRORCODE% EQU 0 if %gpr% EQU 0 (
+echo Product Activation succeeded, but Remaining Period failed to increase.
+if %OSType% EQU Win7 echo This could be related to the error described in KB4487266
+exit /b
+)
+set Act_OK=0
+if %gpr% EQU 43200 if %_officespp% EQU 0 if %winbuild% GEQ 9200 set Act_OK=1
+if %gpr% EQU 64800 set Act_OK=1
+if %gpr% GTR 259200 if %Win10Gov% EQU 1 set Act_OK=1
+if %gpr% EQU 259200 set Act_OK=1
+
+if %ERRORCODE% EQU 0 if %Act_OK% EQU 1 (
+call :_color %_Green% "Product Activation Successful"
+echo Remaining Period: %gpr2% days ^(%gpr% minutes^)
+set /a act_attempt=0
+exit /b
+)
+
+if not !server_num! gtr %max_servers% (
+if %act_attempt% LSS 4 (
+set /a act_attempt+=1
+call :getserv
+%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!"
+%nul% reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!"
+if %winbuild% GEQ 9200 (
+%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!"
+if defined notx86 (
+%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" /reg:32
+%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" /reg:32
+)
+)
+goto :activate
+)
+)
+
+cmd /c exit /b %ERRORCODE%
+if %ERRORCODE% NEQ 0 (
+call :_color %_Red% "Product Activation Failed: 0x!=ExitCode!"
+) else (
+call :_color %_Red% "Product Activation Failed"
+)
+echo Remaining Period: %gpr2% days ^(%gpr% minutes^)
+set S_OK=0
+set act_failed=1
+set /a act_attempt=0
+exit /b
+
+:StopService
+sc query %1 | find /i "STOPPED" %_Nul1% || net stop %1 /y %_Nul3%
+sc query %1 | find /i "STOPPED" %_Nul1% || sc stop %1 %_Nul3%
+goto :eof
+
+:UpdateOSPPEntry
+if /i %1 EQU osppsvc.exe (
+reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "!KMS_IP!" %_Nul3%
+reg add "HKLM\%OPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "%KMS_Port%" %_Nul3%
+)
+goto :eof
+
+:CheckFR
+
+set E_WMI=0
+for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\WinMgmt /v Start %_Nul6%') do if /i %%b equ 0x4 set E_WMI=1
+set "_qr=%_zz1% Win32_ComputerSystem %_zz3% CreationClassName %_zz4%"
+%_qr% %_Nul2% | find /i "computersystem" %_Nul1%
+if %errorlevel% NEQ 0 set E_WMI=1
+set "_qr=%_zz1% SoftwareLicensingService %_zz3% Version %_zz4%"
+%_qr% %_Nul2% | find /i "." %_Nul1%
+if %errorlevel% NEQ 0 set E_WMI=1
+if %E_WMI% EQU 1 (
+echo Failed running WMI query check.
+echo.
+echo Verify that these services are working correctly:
+echo Windows Management Instrumentation [WinMgmt]
+echo Software Protection [sppsvc]
+echo.
+)
+
+goto :eof
+
+:C2RR2V
+set RunR2V=1
+set "_SLMGR=%SysPath%\slmgr.vbs"
+if %_Debug% EQU 0 (
+set "_cscript=cscript //Nologo //B"
+) else (
+set "_cscript=cscript //Nologo"
+)
+set _LTSC=0
+set "_tag="&set "_ons= 2016"
+sc query ClickToRunSvc %_Nul3%
+set error1=%errorlevel%
+sc query OfficeSvc %_Nul3%
+set error2=%errorlevel%
+if %error1% EQU 1060 if %error2% EQU 1060 (
+goto :%_fC2R%
+)
+set _Office16=0
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (
+ set _Office16=1
+)
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (
+ set _Office16=1
+)
+set _Office15=0
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses\ProPlus*.xrm-ms" (
+ set _Office15=1
+)
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do if exist "%%b\root\Licenses\ProPlus*.xrm-ms" (
+ set _Office15=1
+)
+if %_Office16% EQU 0 if %_Office15% EQU 0 (
+goto :%_fC2R%
+)
+
+:Reg16istry
+if %_Office16% EQU 0 goto :Reg15istry
+set "_InstallRoot="
+set "_ProductIds="
+set "_GUID="
+set "_Config="
+set "_PRIDs="
+set "_LicensesPath="
+set "_Integrator="
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do (set "_InstallRoot=%%b\root")
+if not "%_InstallRoot%"=="" (
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v PackageGUID" %_Nul6%') do (set "_GUID=%%b")
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_ProductIds=%%b")
+ set "_Config=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration"
+ set "_PRIDs=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\ProductReleaseIDs"
+) else (
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" %_Nul6%') do (set "_InstallRoot=%%b\root")
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v PackageGUID" %_Nul6%') do (set "_GUID=%%b")
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_ProductIds=%%b")
+ set "_Config=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration"
+ set "_PRIDs=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\ProductReleaseIDs"
+)
+set "_LicensesPath=%_InstallRoot%\Licenses16"
+set "_Integrator=%_InstallRoot%\integration\integrator.exe"
+for /f "skip=2 tokens=2*" %%a in ('"reg query %_PRIDs% /v ActiveConfiguration" %_Nul6%') do set "_PRIDs=%_PRIDs%\%%b"
+if "%_ProductIds%"=="" (
+if %_Office15% EQU 0 (goto :%_fC2R%) else (goto :Reg15istry)
+)
+if not exist "%_LicensesPath%\ProPlus*.xrm-ms" (
+if %_Office15% EQU 0 (goto :%_fC2R%) else (goto :Reg15istry)
+)
+if not exist "%_Integrator%" (
+if %_Office15% EQU 0 (goto :%_fC2R%) else (goto :Reg15istry)
+)
+if exist "%_LicensesPath%\Word2019VL_KMS_Client_AE*.xrm-ms" (set "_tag=2019"&set "_ons= 2019")
+if exist "%_LicensesPath%\Word2021VL_KMS_Client_AE*.xrm-ms" (set _LTSC=1)
+if %winbuild% LSS 10240 if !_LTSC! EQU 1 (set "_tag=2021"&set "_ons= 2021")
+if %_Office15% EQU 0 goto :CheckC2R
+
+:Reg15istry
+set "_Install15Root="
+set "_Product15Ids="
+set "_Con15fig="
+set "_PR15IDs="
+set "_OSPP15Ready="
+set "_Licenses15Path="
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do (set "_Install15Root=%%b\root")
+if not "%_Install15Root%"=="" (
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_Product15Ids=%%b")
+ set "_Con15fig=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds"
+ set "_PR15IDs=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\ProductReleaseIDs"
+ set "_OSPP15Ready=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration"
+) else (
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath" %_Nul6%') do (set "_Install15Root=%%b\root")
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds" %_Nul6%') do (set "_Product15Ids=%%b")
+ set "_Con15fig=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds"
+ set "_PR15IDs=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\ProductReleaseIDs"
+ set "_OSPP15Ready=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\Configuration"
+)
+set "_OSPP15ReadT=REG_SZ"
+if "%_Product15Ids%"=="" (
+reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid %_Nul3% && (
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid" %_Nul6%') do (set "_Product15Ids=%%b")
+ set "_Con15fig=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid"
+ set "_OSPP15Ready=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun"
+ set "_OSPP15ReadT=REG_DWORD"
+ )
+reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid %_Nul3% && (
+ for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid" %_Nul6%') do (set "_Product15Ids=%%b")
+ set "_Con15fig=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid"
+ set "_OSPP15Ready=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun"
+ set "_OSPP15ReadT=REG_DWORD"
+ )
+)
+set "_Licenses15Path=%_Install15Root%\Licenses"
+if exist "%ProgramFiles%\Microsoft Office\Office15\OSPP.VBS" (
+ set "_OSPP15VBS=%ProgramFiles%\Microsoft Office\Office15\OSPP.VBS"
+) else if exist "%ProgramW6432%\Microsoft Office\Office15\OSPP.VBS" (
+ set "_OSPP15VBS=%ProgramW6432%\Microsoft Office\Office15\OSPP.VBS"
+) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\OSPP.VBS" (
+ set "_OSPP15VBS=%ProgramFiles(x86)%\Microsoft Office\Office15\OSPP.VBS"
+)
+if "%_Product15Ids%"=="" (
+if %_Office16% EQU 0 (goto :%_fC2R%) else (goto :CheckC2R)
+)
+if not exist "%_Licenses15Path%\ProPlus*.xrm-ms" (
+if %_Office16% EQU 0 (goto :%_fC2R%) else (goto :CheckC2R)
+)
+if %winbuild% LSS 9200 if not exist "%_OSPP15VBS%" (
+if %_Office16% EQU 0 (goto :%_fC2R%) else (goto :CheckC2R)
+)
+
+:CheckC2R
+set _OMSI=0
+if %_Office16% EQU 0 (
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1
+)
+if %_Office15% EQU 0 (
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\15.0\Common\InstallRoot /v Path" %_Nul6%') do if exist "%%b\OSPP.VBS" set _OMSI=1
+)
+if %winbuild% GEQ 9200 (
+set _spp=SoftwareLicensingProduct
+set _sps=SoftwareLicensingService
+set "_vbsi=%_SLMGR% /ilc "
+) else (
+set _spp=OfficeSoftwareProtectionProduct
+set _sps=OfficeSoftwareProtectionService
+set _vbsi="!_OSPP15VBS!" /inslic:
+)
+set "_wmi="
+set "_qr=%_zz7% %_sps% %_zz3% Version %_zz8%"
+for /f "tokens=2 delims==" %%# in ('%_qr%') do set _wmi=%%#
+if "%_wmi%"=="" (
+goto :%_fC2R%
+)
+set _Identity=0
+set _vNext=0
+set sub_O365=0
+set sub_proj=0
+set sub_vis=0
+dir /b /s /a:-d "!_Local!\Microsoft\Office\Licenses\*1*" %_Nul3% && set _Identity=1
+dir /b /s /a:-d "!ProgramData!\Microsoft\Office\Licenses\*1*" %_Nul3% && set _Identity=1
+set kNext=HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext
+if %_Identity% EQU 1 reg query %kNext% /v MigrationToV5Done %_Nul2% | find /i "0x1" %_Nul1% && set _vNext=1
+if %_vNext% EQU 1 (
+reg query %kNext% | findstr /i /r ".*retail" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x2" %_Nul1% && (set sub_O365=1)
+reg query %kNext% | findstr /i /r ".*retail" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x3" %_Nul1% && (set sub_O365=1)
+reg query %kNext% | findstr /i /r ".*volume" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x2" %_Nul1% && (set sub_O365=1)
+reg query %kNext% | findstr /i /r ".*volume" %_Nul2% | findstr /i /v "project visio" %_Nul2% | find /i "0x3" %_Nul1% && (set sub_O365=1)
+reg query %kNext% | findstr /i /r "project.*" %_Nul2% | find /i "0x2" %_Nul1% && set sub_proj=1
+reg query %kNext% | findstr /i /r "project.*" %_Nul2% | find /i "0x3" %_Nul1% && set sub_proj=1
+reg query %kNext% | findstr /i /r "visio.*" %_Nul2% | find /i "0x2" %_Nul1% && set sub_vis=1
+reg query %kNext% | findstr /i /r "visio.*" %_Nul2% | find /i "0x3" %_Nul1% && set sub_vis=1
+)
+set _Retail=0
+set "_ocq=ApplicationID='%_oApp%' AND LicenseStatus='1' AND PartialProductKey is not NULL"
+if %WMI_VBS% EQU 0 wmic path %_spp% where (%_ocq%) get Description %_Nul2% |findstr /V /R "^$" >"!_temp!\crvRetail.txt"
+set "_qr=%_csq% %_spp% "%_ocq%" Description"
+if %WMI_VBS% NEQ 0 %_qr% %_Nul2% >"!_temp!\crvRetail.txt"
+find /i "RETAIL channel" "!_temp!\crvRetail.txt" %_Nul1% && set _Retail=1
+find /i "RETAIL(MAK) channel" "!_temp!\crvRetail.txt" %_Nul1% && set _Retail=1
+find /i "TIMEBASED_SUB channel" "!_temp!\crvRetail.txt" %_Nul1% && set _Retail=1
+set "_copp="
+if exist "%SysPath%\msvcr100.dll" (
+set _copp=1
+) else if exist "!_InstallRoot!\vfs\System\msvcr100.dll" (
+set _copp="!_InstallRoot!\vfs\System"
+) else if exist "!_Install15Root!\vfs\System\msvcr100.dll" (
+set _copp="!_Install15Root!\vfs\System"
+) else if exist "%SystemRoot%\SysWOW64\msvcr100.dll" (
+set _copp=1
+set xBit=x86
+) else if exist "!_InstallRoot!\vfs\SystemX86\msvcr100.dll" (
+set _copp="!_InstallRoot!\vfs\SystemX86"
+set xBit=x86
+) else if exist "!_Install15Root!\vfs\SystemX86\msvcr100.dll" (
+set _copp="!_Install15Root!\vfs\SystemX86"
+set xBit=x86
+)
+if not exist "!_work!\bin\cleanospp%xBit%.exe" (
+set "_copp="
+)
+if %_Identity% EQU 0 if %_Retail% EQU 0 if %_OMSI% EQU 0 if defined _copp (
+if "!_copp!"=="1" (
+%_Nul3% "!_work!\bin\cleanospp%xBit%.exe" -Licenses
+) else (
+pushd %_copp%
+%_Nul3% copy /y "!_work!\bin\cleanospp%xBit%.exe" cleanospp.exe
+%_Nul3% cleanospp.exe -Licenses
+%_Nul3% del /f /q cleanospp.exe
+popd
+ )
+)
+set _O16O365=0
+set _C16Msg=0
+set _C15Msg=0
+set "_qr=%_csq% %_spp% "%_ocq%" LicenseFamily"
+if %_Retail% EQU 1 if %WMI_VBS% EQU 0 wmic path %_spp% where (%_ocq%) get LicenseFamily %_Nul2% |findstr /V /R "^$" >"!_temp!\crvRetail.txt"
+if %_Retail% EQU 1 if %WMI_VBS% NEQ 0 %_qr% %_Nul2% >"!_temp!\crvRetail.txt"
+set "_qr=%_csq% %_spp% "ApplicationID='%_oApp%'" LicenseFamily"
+if %WMI_VBS% EQU 0 wmic path %_spp% where "ApplicationID='%_oApp%'" get LicenseFamily %_Nul2% |findstr /V /R "^$" >"!_temp!\crvVolume.txt" 2>&1
+if %WMI_VBS% NEQ 0 %_qr% %_Nul2% >"!_temp!\crvVolume.txt" 2>&1
+
+if %_Office16% EQU 0 goto :R15V
+
+set _O21Ids=ProPlus2021,ProjectPro2021,VisioPro2021,Standard2021,ProjectStd2021,VisioStd2021,Access2021,SkypeforBusiness2021
+set _O19Ids=ProPlus2019,ProjectPro2019,VisioPro2019,Standard2019,ProjectStd2019,VisioStd2019,Access2019,SkypeforBusiness2019
+set _O16Ids=ProjectPro,VisioPro,Standard,ProjectStd,VisioStd,Access,SkypeforBusiness
+set _A21Ids=Excel2021,Outlook2021,PowerPoint2021,Publisher2021,Word2021
+set _A19Ids=Excel2019,Outlook2019,PowerPoint2019,Publisher2019,Word2019
+set _A16Ids=Excel,Outlook,PowerPoint,Publisher,Word
+set _V21Ids=%_O21Ids%,%_A21Ids%
+set _V19Ids=%_O19Ids%,%_A19Ids%
+set _V16Ids=Mondo,%_O16Ids%,%_A16Ids%,OneNote
+set _R16Ids=%_V16Ids%,Professional,HomeBusiness,HomeStudent,O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud
+set _RetIds=%_V21Ids%,Professional2021,HomeBusiness2021,HomeStudent2021,%_V19Ids%,Professional2019,HomeBusiness2019,HomeStudent2019,%_R16Ids%
+set _Suites=Mondo,O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud,ProPlus,Standard,Professional,HomeBusiness,HomeStudent,ProPlus2019,Standard2019,Professional2019,HomeBusiness2019,HomeStudent2019,ProPlus2021,Standard2021,Professional2021,HomeBusiness2021,HomeStudent2021
+set _PrjSKU=ProjectPro,ProjectStd,ProjectPro2019,ProjectStd2019,ProjectPro2021,ProjectStd2021
+set _VisSKU=VisioPro,VisioStd,VisioPro2019,VisioStd2019,VisioPro2021,VisioStd2021
+
+echo %_ProductIds%>"!_temp!\crvProductIds.txt"
+for %%a in (%_RetIds%,ProPlus) do (
+set _%%a=0
+)
+for %%a in (%_RetIds%) do (
+findstr /I /C:"%%aRetail" "!_temp!\crvProductIds.txt" %_Nul1% && set _%%a=1
+)
+if !_LTSC! EQU 0 for %%a in (%_V21Ids%) do (
+set _%%a=0
+)
+if !_LTSC! EQU 1 for %%a in (%_V21Ids%) do (
+findstr /I /C:"%%aVolume" "!_temp!\crvProductIds.txt" %_Nul1% && (
+ find /i "Office21%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1)
+ )
+)
+for %%a in (%_V19Ids%) do (
+findstr /I /C:"%%aVolume" "!_temp!\crvProductIds.txt" %_Nul1% && (
+ find /i "Office19%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1)
+ )
+)
+for %%a in (%_V16Ids%) do (
+findstr /I /C:"%%aVolume" "!_temp!\crvProductIds.txt" %_Nul1% && (
+ find /i "Office16%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1)
+ )
+)
+reg query %_PRIDs%\ProPlusRetail.16 %_Nul3% && (
+ find /i "Office16ProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1)
+)
+reg query %_PRIDs%\ProPlusVolume.16 %_Nul3% && (
+ find /i "Office16ProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1)
+)
+if %_Retail% EQU 1 for %%a in (%_RetIds%) do (
+findstr /I /C:"%%aRetail" "!_temp!\crvProductIds.txt" %_Nul1% && (
+ find /i "Office16%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aR_Sub" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aR_PIN" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aE5R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aEDUR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aCO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office16%%aXC2RVL_MAKC2R" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R16=1)
+ find /i "Office19%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1)
+ find /i "Office19%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1)
+ find /i "Office19%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1)
+ find /i "Office19%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R19=1)
+ find /i "Office21%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1)
+ find /i "Office21%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1)
+ find /i "Office21%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1)
+ find /i "Office21%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R21=1)
+ )
+)
+if %_Retail% EQU 1 reg query %_PRIDs%\ProPlusRetail.16 %_Nul3% && (
+ find /i "Office16ProPlusR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1)
+ find /i "Office16ProPlusR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1)
+ find /i "Office16ProPlusMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1)
+ find /i "Office16ProPlusVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R16=1)
+)
+set "_qr=%_zz1% %_spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'Office16O365%%'" %_zz3% LicenseFamily %_zz4%"
+find /i "Office16MondoVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (
+%_qr% %_Nul2% | find /i "O365" %_Nul1% && (
+ for %%a in (O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem,O365EduCloud) do set _%%a=0
+ )
+)
+if %sub_O365% EQU 1 (
+ for %%a in (%_Suites%) do set _%%a=0
+echo.
+echo Microsoft 365 product is activated with a subscription.
+)
+if %sub_proj% EQU 1 (
+ for %%a in (%_PrjSKU%) do set _%%a=0
+echo.
+echo Microsoft Project is activated with a subscription.
+)
+if %sub_vis% EQU 1 (
+ for %%a in (%_VisSKU%) do set _%%a=0
+echo.
+echo Microsoft Visio is activated with a subscription.
+)
+
+for %%a in (%_RetIds%,ProPlus) do if !_%%a! EQU 1 (
+set _C16Msg=1
+)
+if %_C16Msg% EQU 1 (
+echo.
+echo Converting Office C2R Retail-to-Volume:
+)
+if %_C16Msg% EQU 0 (if %_Office15% EQU 1 (goto :R15V) else (goto :GVLKC2R))
+
+if !_Mondo! EQU 1 (
+call :InsLic Mondo
+)
+if !_O365ProPlus! EQU 1 (
+echo O365ProPlus 2016 Suite ^<-^> Mondo 2016 Licenses
+call :InsLic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK
+if !_Mondo! EQU 0 call :InsLic Mondo
+)
+if !_O365Business! EQU 1 if !_O365ProPlus! EQU 0 (
+set _O365ProPlus=1
+echo O365Business 2016 Suite ^<-^> Mondo 2016 Licenses
+call :InsLic O365Business NCHRJ-3VPGW-X73DM-6B36K-3RQ6B
+if !_Mondo! EQU 0 call :InsLic Mondo
+)
+if !_O365SmallBusPrem! EQU 1 if !_O365Business! EQU 0 if !_O365ProPlus! EQU 0 (
+set _O365ProPlus=1
+echo O365SmallBusPrem 2016 Suite ^<-^> Mondo 2016 Licenses
+call :InsLic O365SmallBusPrem 3FBRX-NFP7C-6JWVK-F2YGK-H499R
+if !_Mondo! EQU 0 call :InsLic Mondo
+)
+if !_O365HomePrem! EQU 1 if !_O365SmallBusPrem! EQU 0 if !_O365Business! EQU 0 if !_O365ProPlus! EQU 0 (
+set _O365ProPlus=1
+echo O365HomePrem 2016 Suite ^<-^> Mondo 2016 Licenses
+call :InsLic O365HomePrem 9FNY8-PWWTY-8RY4F-GJMTV-KHGM9
+if !_Mondo! EQU 0 call :InsLic Mondo
+)
+if !_O365EduCloud! EQU 1 if !_O365HomePrem! EQU 0 if !_O365SmallBusPrem! EQU 0 if !_O365Business! EQU 0 if !_O365ProPlus! EQU 0 (
+set _O365ProPlus=1
+echo O365EduCloud 2016 Suite ^<-^> Mondo 2016 Licenses
+call :InsLic O365EduCloud 8843N-BCXXD-Q84H8-R4Q37-T3CPT
+if !_Mondo! EQU 0 call :InsLic Mondo
+)
+if !_O365ProPlus! EQU 1 set _O16O365=1
+if !_Mondo! EQU 1 if !_O365ProPlus! EQU 0 (
+echo Mondo 2016 Suite
+call :InsLic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK
+if %_Office15% EQU 1 (goto :R15V) else (goto :GVLKC2R)
+)
+if !_ProPlus2021! EQU 1 if !_O365ProPlus! EQU 0 (
+echo ProPlus 2021 Suite
+call :InsLic ProPlus2021
+)
+if !_ProPlus2019! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 (
+echo ProPlus 2019 Suite -^> ProPlus%_ons% Licenses
+call :InsLic ProPlus%_tag%
+)
+if !_ProPlus! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 (
+echo ProPlus 2016 Suite -^> ProPlus%_ons% Licenses
+call :InsLic ProPlus%_tag%
+)
+if !_Professional2021! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 (
+echo Professional 2021 Suite -^> ProPlus 2021 Licenses
+call :InsLic ProPlus2021
+)
+if !_Professional2019! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 (
+echo Professional 2019 Suite -^> ProPlus%_ons% Licenses
+call :InsLic ProPlus%_tag%
+)
+if !_Professional! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 (
+echo Professional 2016 Suite -^> ProPlus%_ons% Licenses
+call :InsLic ProPlus%_tag%
+)
+if !_Standard2021! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 (
+echo Standard 2021 Suite
+call :InsLic Standard2021
+)
+if !_Standard2019! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 (
+echo Standard 2019 Suite -^> Standard%_ons% Licenses
+call :InsLic Standard%_tag%
+)
+if !_Standard! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 (
+echo Standard 2016 Suite -^> Standard%_ons% Licenses
+call :InsLic Standard%_tag%
+)
+for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a2021! EQU 1 (
+ echo %%a 2021 SKU
+ call :InsLic %%a2021
+)
+for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a2019! EQU 1 (
+if !_%%a2021! EQU 0 (
+ echo %%a 2019 SKU -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a! EQU 1 (
+if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 (
+ echo %%a 2016 SKU -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+for %%a in (HomeBusiness,HomeStudent) do if !_%%a2021! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 (
+ set _Standard2021=1
+ echo %%a 2021 Suite -^> Standard 2021 Licenses
+ call :InsLic Standard2021
+ )
+)
+for %%a in (HomeBusiness,HomeStudent) do if !_%%a2019! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 (
+ set _Standard2019=1
+ echo %%a 2019 Suite -^> Standard%_ons% Licenses
+ call :InsLic Standard%_tag%
+ )
+)
+for %%a in (HomeBusiness,HomeStudent) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 (
+ set _Standard=1
+ echo %%a 2016 Suite -^> Standard%_ons% Licenses
+ call :InsLic Standard%_tag%
+ )
+)
+for %%a in (%_A21Ids%,OneNote) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 (
+ echo %%a App
+ call :InsLic %%a
+ )
+)
+for %%a in (%_A16Ids%) do if !_%%a2019! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 (
+ echo %%a 2019 App -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+for %%a in (%_A16Ids%) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_Standard2021! EQU 0 if !_Standard2019! EQU 0 if !_Standard! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 (
+ echo %%a 2016 App -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+for %%a in (Access) do if !_%%a2021! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 (
+ echo %%a 2021 App
+ call :InsLic %%a2021
+ )
+)
+for %%a in (Access) do if !_%%a2019! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_%%a2021! EQU 0 (
+ echo %%a 2019 App -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+for %%a in (Access) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_Professional2021! EQU 0 if !_Professional2019! EQU 0 if !_Professional! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 (
+ echo %%a 2016 App -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+for %%a in (SkypeforBusiness) do if !_%%a2021! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 (
+ echo %%a 2021 App
+ call :InsLic %%a2021
+ )
+)
+for %%a in (SkypeforBusiness) do if !_%%a2019! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_%%a2021! EQU 0 (
+ echo %%a 2019 App -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+for %%a in (SkypeforBusiness) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus2021! EQU 0 if !_ProPlus2019! EQU 0 if !_ProPlus! EQU 0 if !_%%a2021! EQU 0 if !_%%a2019! EQU 0 (
+ echo %%a 2016 App -^> %%a%_ons% Licenses
+ call :InsLic %%a%_tag%
+ )
+)
+if %_Office15% EQU 1 (goto :R15V) else (goto :GVLKC2R)
+
+:R15V
+for %%# in ("!_Licenses15Path!\client-issuance-*.xrm-ms") do (
+%_cscript% %_vbsi%"!_Licenses15Path!\%%~nx#"
+)
+%_cscript% %_vbsi%"!_Licenses15Path!\pkeyconfig-office.xrm-ms"
+
+set _O15Ids=Standard,ProjectPro,VisioPro,ProjectStd,VisioStd,Access,Lync
+set _A15Ids=Excel,Groove,InfoPath,OneNote,Outlook,PowerPoint,Publisher,Word
+set _R15Ids=SPD,Mondo,%_O15Ids%,%_A15Ids%,Professional,HomeBusiness,HomeStudent,O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem
+set _V15Ids=Mondo,%_O15Ids%,%_A15Ids%
+
+echo %_Product15Ids%>"!_temp!\crvProduct15s.txt"
+for %%a in (%_R15Ids%,ProPlus) do (
+set _%%a=0
+)
+for %%a in (%_R15Ids%) do (
+findstr /I /C:"%%aRetail" "!_temp!\crvProduct15s.txt" %_Nul1% && set _%%a=1
+)
+for %%a in (%_V15Ids%) do (
+findstr /I /C:"%%aVolume" "!_temp!\crvProduct15s.txt" %_Nul1% && (
+ find /i "Office%%aVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _%%a=0) || (set _%%a=1)
+ )
+)
+reg query %_PR15IDs%\Active\ProPlusRetail\x-none %_Nul3% && (
+ find /i "OfficeProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1)
+)
+reg query %_PR15IDs%\Active\ProPlusVolume\x-none %_Nul3% && (
+ find /i "OfficeProPlusVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (set _ProPlus=0) || (set _ProPlus=1)
+)
+if %_Retail% EQU 1 for %%a in (%_R15Ids%) do (
+findstr /I /C:"%%aRetail" "!_temp!\crvProduct15s.txt" %_Nul1% && (
+ find /i "Office%%aR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ find /i "Office%%aR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ find /i "Office%%aR_Sub" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ find /i "Office%%aR_PIN" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ find /i "Office%%aMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ find /i "Office%%aO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ find /i "Office%%aCO365R_" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ find /i "Office%%aVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _%%a=0 & set aC2R15=1)
+ )
+)
+if %_Retail% EQU 1 reg query %_PR15IDs%\Active\ProPlusRetail\x-none %_Nul3% && (
+ find /i "OfficeProPlusR_Retail" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1)
+ find /i "OfficeProPlusR_OEM" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1)
+ find /i "OfficeProPlusMSDNR_" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1)
+ find /i "OfficeProPlusVL_MAK" "!_temp!\crvRetail.txt" %_Nul1% && (set _ProPlus=0 & set aC2R15=1)
+)
+set "_qr=%_zz1% %_spp% %_zz2% "ApplicationID='%_oApp%' AND LicenseFamily like 'OfficeO365%%'" %_zz3% LicenseFamily %_zz4%"
+find /i "OfficeMondoVL_KMS_Client" "!_temp!\crvVolume.txt" %_Nul1% && (
+%_qr% %_Nul2% | find /i "O365" %_Nul1% && (
+ for %%a in (O365ProPlus,O365Business,O365SmallBusPrem,O365HomePrem) do set _%%a=0
+ )
+)
+
+for %%a in (%_R15Ids%,ProPlus) do if !_%%a! EQU 1 (
+set _C15Msg=1
+)
+if %_C15Msg% EQU 1 if %_C16Msg% EQU 0 (
+echo.
+echo Converting Office C2R Retail-to-Volume:
+)
+if %_C15Msg% EQU 0 goto :GVLKC2R
+
+if !_Mondo! EQU 1 (
+call :Ins15Lic Mondo
+)
+if !_O365ProPlus! EQU 1 if !_O16O365! EQU 0 (
+echo O365ProPlus 2013 Suite ^<-^> Mondo 2013 Licenses
+call :Ins15Lic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK
+if !_Mondo! EQU 0 call :Ins15Lic Mondo
+)
+if !_O365SmallBusPrem! EQU 1 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 (
+set _O365ProPlus=1
+echo O365SmallBusPrem 2013 Suite ^<-^> Mondo 2013 Licenses
+call :Ins15Lic O365SmallBusPrem 3FBRX-NFP7C-6JWVK-F2YGK-H499R
+if !_Mondo! EQU 0 call :Ins15Lic Mondo
+)
+if !_O365HomePrem! EQU 1 if !_O365SmallBusPrem! EQU 0 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 (
+set _O365ProPlus=1
+echo O365HomePrem 2013 Suite ^<-^> Mondo 2013 Licenses
+call :Ins15Lic O365HomePrem 9FNY8-PWWTY-8RY4F-GJMTV-KHGM9
+if !_Mondo! EQU 0 call :Ins15Lic Mondo
+)
+if !_O365Business! EQU 1 if !_O365HomePrem! EQU 0 if !_O365SmallBusPrem! EQU 0 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 (
+set _O365ProPlus=1
+echo O365Business 2013 Suite ^<-^> Mondo 2013 Licenses
+call :Ins15Lic O365Business MCPBN-CPY7X-3PK9R-P6GTT-H8P8Y
+if !_Mondo! EQU 0 call :Ins15Lic Mondo
+)
+if !_Mondo! EQU 1 if !_O365ProPlus! EQU 0 if !_O16O365! EQU 0 (
+echo Mondo 2013 Suite
+call :Ins15Lic O365ProPlus DRNV7-VGMM2-B3G9T-4BF84-VMFTK
+goto :GVLKC2R
+)
+if !_SPD! EQU 1 if !_Mondo! EQU 0 if !_O365ProPlus! EQU 0 (
+echo SharePoint Designer 2013 App -^> Mondo 2013 Licenses
+call :Ins15Lic Mondo
+goto :GVLKC2R
+)
+if !_ProPlus! EQU 1 if !_O365ProPlus! EQU 0 (
+echo ProPlus 2013 Suite
+call :Ins15Lic ProPlus
+)
+if !_Professional! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 (
+echo Professional 2013 Suite -^> ProPlus 2013 Licenses
+call :Ins15Lic ProPlus
+)
+if !_Standard! EQU 1 if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 (
+echo Standard 2013 Suite
+call :Ins15Lic Standard
+)
+for %%a in (ProjectPro,VisioPro,ProjectStd,VisioStd) do if !_%%a! EQU 1 (
+echo %%a 2013 SKU
+call :Ins15Lic %%a
+)
+for %%a in (HomeBusiness,HomeStudent) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 if !_Standard! EQU 0 (
+ set _Standard=1
+ echo %%a 2013 Suite -^> Standard 2013 Licenses
+ call :Ins15Lic Standard
+ )
+)
+for %%a in (%_A15Ids%) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 if !_Standard! EQU 0 (
+ echo %%a 2013 App
+ call :Ins15Lic %%a
+ )
+)
+for %%a in (Access) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 if !_Professional! EQU 0 (
+ echo %%a 2013 App
+ call :Ins15Lic %%a
+ )
+)
+for %%a in (Lync) do if !_%%a! EQU 1 (
+if !_O365ProPlus! EQU 0 if !_ProPlus! EQU 0 (
+ echo SkypeforBusiness 2015 App
+ call :Ins15Lic %%a
+ )
+)
+goto :GVLKC2R
+
+:InsLic
+set "_ID=%1Volume"
+set "_pkey="
+if not "%2"=="" (
+set "_ID=%1Retail"
+set "_pkey=PidKey=%2"
+)
+reg delete %_Config% /f /v %_ID%.OSPPReady %_Nul3%
+"!_Integrator!" /I /License PRIDName=%_ID%.16 %_pkey% PackageGUID="%_GUID%" PackageRoot="!_InstallRoot!" %_Nul1%
+reg add %_Config% /f /v %_ID%.OSPPReady /t REG_SZ /d 1 %_Nul1%
+reg query %_Config% /v ProductReleaseIds | findstr /I "%_ID%" %_Nul1%
+if %errorlevel% NEQ 0 (
+for /f "skip=2 tokens=2*" %%a in ('reg query %_Config% /v ProductReleaseIds') do reg add %_Config% /v ProductReleaseIds /t REG_SZ /d "%%b,%_ID%" /f %_Nul1%
+)
+exit /b
+
+:Ins15Lic
+set "_ID=%1Volume"
+set "_patt=%1VL_"
+set "_pkey="
+if not "%2"=="" (
+set "_ID=%1Retail"
+set "_patt=%1R_"
+set "_pkey=%2"
+)
+reg delete %_OSPP15Ready% /f /v %_ID%.OSPPReady %_Nul3%
+for %%# in ("!_Licenses15Path!\%_patt%*.xrm-ms") do (
+%_cscript% %_vbsi%"!_Licenses15Path!\%%~nx#"
+)
+set "_qr=wmic path %_sps% where Version='%_wmi%' call InstallProductKey ProductKey="%_pkey%""
+if %WMI_VBS% NEQ 0 set "_qr=%_csp% %_sps% "%_pkey%""
+if defined _pkey %_qr% %_Nul3%
+reg add %_OSPP15Ready% /f /v %_ID%.OSPPReady /t %_OSPP15ReadT% /d 1 %_Nul1%
+reg query %_Con15fig% %_Nul2% | findstr /I "%_ID%" %_Nul1%
+if %errorlevel% NEQ 0 (
+for /f "skip=2 tokens=2*" %%a in ('reg query %_Con15fig% %_Nul6%') do reg add %_Con15fig% /t REG_SZ /d "%%b,%_ID%" /f %_Nul1%
+)
+exit /b
+
+:GVLKC2R
+if %_Office16% EQU 1 (
+for %%a in (%_RetIds%,ProPlus) do set "_%%a="
+)
+if %_Office15% EQU 1 (
+for %%a in (%_R15Ids%,ProPlus) do set "_%%a="
+)
+set "_qr=wmic path %_sps% where version='%_wmi%' call RefreshLicenseStatus"
+if %WMI_VBS% NEQ 0 set "_qr=%_csm% "%_sps%.Version='%_wmi%'" RefreshLicenseStatus"
+if %winbuild% GEQ 9200 %_qr% %_Nul3%
+if exist "%SysPath%\spp\store_test\2.0\tokens.dat" if defined _copp (
+%_cscript% %_SLMGR% /rilc
+)
+goto :%_sC2R%
+
+:keys
+if "%~1"=="" exit /b
+goto :%1 %_Nul2%
+
+:: Windows 11 [Co]
+:ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69
+set "_key=37D7F-N49CB-WQR8W-TBJ73-FM8RX" &:: SE {Cloud}
+exit /b
+
+:d30136fc-cb4b-416e-a23d-87207abc44a9
+set "_key=6XN7V-PCBDC-BDBRH-8DQY7-G6R44" &:: SE N {Cloud N}
+exit /b
+
+:: Windows 10 [RS5]
+:32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee
+set "_key=M7XTQ-FN8P6-TTKYV-9D4CC-J462D" &:: Enterprise LTSC 2019
+exit /b
+
+:7103a333-b8c8-49cc-93ce-d37c09687f92
+set "_key=92NFX-8DJQP-P6BBQ-THF9C-7CG2H" &:: Enterprise LTSC 2019 N
+exit /b
+
+:ec868e65-fadf-4759-b23e-93fe37f2cc29
+set "_key=CPWHC-NT2C7-VYW78-DHDB2-PG3GK" &:: Enterprise for Virtual Desktops
+exit /b
+
+:0df4f814-3f57-4b8b-9a9d-fddadcd69fac
+set "_key=NBTWJ-3DR69-3C4V8-C26MC-GQ9M6" &:: Lean
+exit /b
+
+:: Windows 10 [RS3]
+:82bbc092-bc50-4e16-8e18-b74fc486aec3
+set "_key=NRG8B-VKK3Q-CXVCJ-9G2XF-6Q84J" &:: Pro Workstation
+exit /b
+
+:4b1571d3-bafb-4b40-8087-a961be2caf65
+set "_key=9FNHH-K3HBT-3W4TD-6383H-6XYWF" &:: Pro Workstation N
+exit /b
+
+:e4db50ea-bda1-4566-b047-0ca50abc6f07
+set "_key=7NBT4-WGBQX-MP4H7-QXFF8-YP3KX" &:: Enterprise Remote Server
+exit /b
+
+:: Windows 10 [RS2]
+:e0b2d383-d112-413f-8a80-97f373a5820c
+set "_key=YYVX9-NTFWV-6MDM3-9PT4T-4M68B" &:: Enterprise G
+exit /b
+
+:e38454fb-41a4-4f59-a5dc-25080e354730
+set "_key=44RPN-FTY23-9VTTB-MP9BX-T84FV" &:: Enterprise G N
+exit /b
+
+:: Windows 10 [RS1]
+:2d5a5a60-3040-48bf-beb0-fcd770c20ce0
+set "_key=DCPHK-NFMTC-H88MJ-PFHPY-QJ4BJ" &:: Enterprise 2016 LTSB
+exit /b
+
+:9f776d83-7156-45b2-8a5c-359b9c9f22a3
+set "_key=QFFDN-GRT3P-VKWWX-X7T3R-8B639" &:: Enterprise 2016 LTSB N
+exit /b
+
+:3f1afc82-f8ac-4f6c-8005-1d233e606eee
+set "_key=6TP4R-GNPTD-KYYHQ-7B7DP-J447Y" &:: Pro Education
+exit /b
+
+:5300b18c-2e33-4dc2-8291-47ffcec746dd
+set "_key=YVWGF-BXNMC-HTQYQ-CPQ99-66QFC" &:: Pro Education N
+exit /b
+
+:: Windows 10 [TH]
+:58e97c99-f377-4ef1-81d5-4ad5522b5fd8
+set "_key=TX9XD-98N7V-6WMQ6-BX7FG-H8Q99" &:: Home
+exit /b
+
+:7b9e1751-a8da-4f75-9560-5fadfe3d8e38
+set "_key=3KHY7-WNT83-DGQKR-F7HPR-844BM" &:: Home N
+exit /b
+
+:cd918a57-a41b-4c82-8dce-1a538e221a83
+set "_key=7HNRX-D7KGG-3K4RQ-4WPJ4-YTDFH" &:: Home Single Language
+exit /b
+
+:a9107544-f4a0-4053-a96a-1479abdef912
+set "_key=PVMJN-6DFY6-9CCP6-7BKTT-D3WVR" &:: Home China
+exit /b
+
+:2de67392-b7a7-462a-b1ca-108dd189f588
+set "_key=W269N-WFGWX-YVC9B-4J6C9-T83GX" &:: Pro
+exit /b
+
+:a80b5abf-76ad-428b-b05d-a47d2dffeebf
+set "_key=MH37W-N47XK-V7XM9-C7227-GCQG9" &:: Pro N
+exit /b
+
+:e0c42288-980c-4788-a014-c080d2e1926e
+set "_key=NW6C2-QMPVW-D7KKK-3GKT6-VCFB2" &:: Education
+exit /b
+
+:3c102355-d027-42c6-ad23-2e7ef8a02585
+set "_key=2WH4N-8QGBV-H22JP-CT43Q-MDWWJ" &:: Education N
+exit /b
+
+:73111121-5638-40f6-bc11-f1d7b0d64300
+set "_key=NPPR9-FWDCX-D2C8J-H872K-2YT43" &:: Enterprise
+exit /b
+
+:e272e3e2-732f-4c65-a8f0-484747d0d947
+set "_key=DPH2V-TTNVB-4X9Q3-TJR4H-KHJW4" &:: Enterprise N
+exit /b
+
+:7b51a46c-0c04-4e8f-9af4-8496cca90d5e
+set "_key=WNMTR-4C88C-JK8YV-HQ7T2-76DF9" &:: Enterprise 2015 LTSB
+exit /b
+
+:87b838b7-41b6-4590-8318-5797951d8529
+set "_key=2F77B-TNFGY-69QQF-B8YKP-D69TJ" &:: Enterprise 2015 LTSB N
+exit /b
+
+:: Windows Server 2022 [Fe]
+:9bd77860-9b31-4b7b-96ad-2564017315bf
+set "_key=VDYBN-27WPP-V4HQT-9VMD4-VMK7H" &:: Standard
+exit /b
+
+:ef6cfc9f-8c5d-44ac-9aad-de6a2ea0ae03
+set "_key=WX4NM-KYWYW-QJJR4-XV3QB-6VM33" &:: Datacenter
+exit /b
+
+:8c8f0ad3-9a43-4e05-b840-93b8d1475cbc
+set "_key=6N379-GGTMK-23C6M-XVVTC-CKFRQ" &:: Azure Core
+exit /b
+
+:f5e9429c-f50b-4b98-b15c-ef92eb5cff39
+set "_key=67KN8-4FYJW-2487Q-MQ2J7-4C4RG" &:: Standard ACor
+exit /b
+
+:39e69c41-42b4-4a0a-abad-8e3c10a797cc
+set "_key=QFND9-D3Y9C-J3KKY-6RPVP-2DPYV" &:: Datacenter ACor
+exit /b
+
+:: Windows Server 2019 [RS5]
+:de32eafd-aaee-4662-9444-c1befb41bde2
+set "_key=N69G4-B89J2-4G8F4-WWYCC-J464C" &:: Standard
+exit /b
+
+:34e1ae55-27f8-4950-8877-7a03be5fb181
+set "_key=WMDGN-G9PQG-XVVXX-R3X43-63DFG" &:: Datacenter
+exit /b
+
+:a99cc1f0-7719-4306-9645-294102fbff95
+set "_key=FDNH6-VW9RW-BXPJ7-4XTYG-239TB" &:: Azure Core
+exit /b
+
+:73e3957c-fc0c-400d-9184-5f7b6f2eb409
+set "_key=N2KJX-J94YW-TQVFB-DG9YT-724CC" &:: Standard ACor
+exit /b
+
+:90c362e5-0da1-4bfd-b53b-b87d309ade43
+set "_key=6NMRW-2C8FM-D24W7-TQWMY-CWH2D" &:: Datacenter ACor
+exit /b
+
+:034d3cbb-5d4b-4245-b3f8-f84571314078
+set "_key=WVDHN-86M7X-466P6-VHXV7-YY726" &:: Essentials
+exit /b
+
+:8de8eb62-bbe0-40ac-ac17-f75595071ea3
+set "_key=GRFBW-QNDC4-6QBHG-CCK3B-2PR88" &:: ServerARM64
+exit /b
+
+:19b5e0fb-4431-46bc-bac1-2f1873e4ae73
+set "_key=NTBV8-9K7Q8-V27C6-M2BTV-KHMXV" &:: Azure Datacenter - ServerTurbine
+exit /b
+
+:: Windows Server 2016 [RS4]
+:43d9af6e-5e86-4be8-a797-d072a046896c
+set "_key=K9FYF-G6NCK-73M32-XMVPY-F9DRR" &:: ServerARM64
+exit /b
+
+:: Windows Server 2016 [RS3]
+:61c5ef22-f14f-4553-a824-c4b31e84b100
+set "_key=PTXN8-JFHJM-4WC78-MPCBR-9W4KR" &:: Standard ACor
+exit /b
+
+:e49c08e7-da82-42f8-bde2-b570fbcae76c
+set "_key=2HXDN-KRXHB-GPYC7-YCKFJ-7FVDG" &:: Datacenter ACor
+exit /b
+
+:: Windows Server 2016 [RS1]
+:8c1c5410-9f39-4805-8c9d-63a07706358f
+set "_key=WC2BQ-8NRM3-FDDYY-2BFGV-KHKQY" &:: Standard
+exit /b
+
+:21c56779-b449-4d20-adfc-eece0e1ad74b
+set "_key=CB7KF-BWN84-R7R2Y-793K2-8XDDG" &:: Datacenter
+exit /b
+
+:3dbf341b-5f6c-4fa7-b936-699dce9e263f
+set "_key=VP34G-4NPPG-79JTQ-864T4-R3MQX" &:: Azure Core
+exit /b
+
+:2b5a1b0f-a5ab-4c54-ac2f-a6d94824a283
+set "_key=JCKRF-N37P4-C2D82-9YXRT-4M63B" &:: Essentials
+exit /b
+
+:7b4433f4-b1e7-4788-895a-c45378d38253
+set "_key=QN4C6-GBJD2-FB422-GHWJK-GJG2R" &:: Cloud Storage
+exit /b
+
+:: Windows 8.1
+:fe1c3238-432a-43a1-8e25-97e7d1ef10f3
+set "_key=M9Q9P-WNJJT-6PXPY-DWX8H-6XWKK" &:: Core
+exit /b
+
+:78558a64-dc19-43fe-a0d0-8075b2a370a3
+set "_key=7B9N3-D94CG-YTVHR-QBPX3-RJP64" &:: Core N
+exit /b
+
+:c72c6a1d-f252-4e7e-bdd1-3fca342acb35
+set "_key=BB6NG-PQ82V-VRDPW-8XVD2-V8P66" &:: Core Single Language
+exit /b
+
+:db78b74f-ef1c-4892-abfe-1e66b8231df6
+set "_key=NCTT7-2RGK8-WMHRF-RY7YQ-JTXG3" &:: Core China
+exit /b
+
+:ffee456a-cd87-4390-8e07-16146c672fd0
+set "_key=XYTND-K6QKT-K2MRH-66RTM-43JKP" &:: Core ARM
+exit /b
+
+:c06b6981-d7fd-4a35-b7b4-054742b7af67
+set "_key=GCRJD-8NW9H-F2CDX-CCM8D-9D6T9" &:: Pro
+exit /b
+
+:7476d79f-8e48-49b4-ab63-4d0b813a16e4
+set "_key=HMCNV-VVBFX-7HMBH-CTY9B-B4FXY" &:: Pro N
+exit /b
+
+:096ce63d-4fac-48a9-82a9-61ae9e800e5f
+set "_key=789NJ-TQK6T-6XTH8-J39CJ-J8D3P" &:: Pro with Media Center
+exit /b
+
+:81671aaf-79d1-4eb1-b004-8cbbe173afea
+set "_key=MHF9N-XY6XB-WVXMC-BTDCT-MKKG7" &:: Enterprise
+exit /b
+
+:113e705c-fa49-48a4-beea-7dd879b46b14
+set "_key=TT4HM-HN7YT-62K67-RGRQJ-JFFXW" &:: Enterprise N
+exit /b
+
+:0ab82d54-47f4-4acb-818c-cc5bf0ecb649
+set "_key=NMMPB-38DD4-R2823-62W8D-VXKJB" &:: Embedded Industry Pro
+exit /b
+
+:cd4e2d9f-5059-4a50-a92d-05d5bb1267c7
+set "_key=FNFKF-PWTVT-9RC8H-32HB2-JB34X" &:: Embedded Industry Enterprise
+exit /b
+
+:f7e88590-dfc7-4c78-bccb-6f3865b99d1a
+set "_key=VHXM3-NR6FT-RY6RT-CK882-KW2CJ" &:: Embedded Industry Automotive
+exit /b
+
+:e9942b32-2e55-4197-b0bd-5ff58cba8860
+set "_key=3PY8R-QHNP9-W7XQD-G6DPH-3J2C9" &:: with Bing
+exit /b
+
+:c6ddecd6-2354-4c19-909b-306a3058484e
+set "_key=Q6HTR-N24GM-PMJFP-69CD8-2GXKR" &:: with Bing N
+exit /b
+
+:b8f5e3a3-ed33-4608-81e1-37d6c9dcfd9c
+set "_key=KF37N-VDV38-GRRTV-XH8X6-6F3BB" &:: with Bing Single Language
+exit /b
+
+:ba998212-460a-44db-bfb5-71bf09d1c68b
+set "_key=R962J-37N87-9VVK2-WJ74P-XTMHR" &:: with Bing China
+exit /b
+
+:e58d87b5-8126-4580-80fb-861b22f79296
+set "_key=MX3RK-9HNGX-K3QKC-6PJ3F-W8D7B" &:: Pro for Students
+exit /b
+
+:cab491c7-a918-4f60-b502-dab75e334f40
+set "_key=TNFGH-2R6PB-8XM3K-QYHX2-J4296" &:: Pro for Students N
+exit /b
+
+:: Windows Server 2012 R2
+:b3ca044e-a358-4d68-9883-aaa2941aca99
+set "_key=D2N9P-3P6X9-2R39C-7RTCD-MDVJX" &:: Standard
+exit /b
+
+:00091344-1ea4-4f37-b789-01750ba6988c
+set "_key=W3GGN-FT8W3-Y4M27-J84CP-Q3VJ9" &:: Datacenter
+exit /b
+
+:21db6ba4-9a7b-4a14-9e29-64a60c59301d
+set "_key=KNC87-3J2TX-XB4WP-VCPJV-M4FWM" &:: Essentials
+exit /b
+
+:b743a2be-68d4-4dd3-af32-92425b7bb623
+set "_key=3NPTF-33KPT-GGBPR-YX76B-39KDD" &:: Cloud Storage
+exit /b
+
+:: Windows 8
+:c04ed6bf-55c8-4b47-9f8e-5a1f31ceee60
+set "_key=BN3D2-R7TKB-3YPBD-8DRP2-27GG4" &:: Core
+exit /b
+
+:197390a0-65f6-4a95-bdc4-55d58a3b0253
+set "_key=8N2M2-HWPGY-7PGT9-HGDD8-GVGGY" &:: Core N
+exit /b
+
+:8860fcd4-a77b-4a20-9045-a150ff11d609
+set "_key=2WN2H-YGCQR-KFX6K-CD6TF-84YXQ" &:: Core Single Language
+exit /b
+
+:9d5584a2-2d85-419a-982c-a00888bb9ddf
+set "_key=4K36P-JN4VD-GDC6V-KDT89-DYFKP" &:: Core China
+exit /b
+
+:af35d7b7-5035-4b63-8972-f0b747b9f4dc
+set "_key=DXHJF-N9KQX-MFPVR-GHGQK-Y7RKV" &:: Core ARM
+exit /b
+
+:a98bcd6d-5343-4603-8afe-5908e4611112
+set "_key=NG4HW-VH26C-733KW-K6F98-J8CK4" &:: Pro
+exit /b
+
+:ebf245c1-29a8-4daf-9cb1-38dfc608a8c8
+set "_key=XCVCF-2NXM9-723PB-MHCB7-2RYQQ" &:: Pro N
+exit /b
+
+:a00018a3-f20f-4632-bf7c-8daa5351c914
+set "_key=GNBB8-YVD74-QJHX6-27H4K-8QHDG" &:: Pro with Media Center
+exit /b
+
+:458e1bec-837a-45f6-b9d5-925ed5d299de
+set "_key=32JNW-9KQ84-P47T8-D8GGY-CWCK7" &:: Enterprise
+exit /b
+
+:e14997e7-800a-4cf7-ad10-de4b45b578db
+set "_key=JMNMF-RHW7P-DMY6X-RF3DR-X2BQT" &:: Enterprise N
+exit /b
+
+:10018baf-ce21-4060-80bd-47fe74ed4dab
+set "_key=RYXVT-BNQG7-VD29F-DBMRY-HT73M" &:: Embedded Industry Pro
+exit /b
+
+:18db1848-12e0-4167-b9d7-da7fcda507db
+set "_key=NKB3R-R2F8T-3XCDP-7Q2KW-XWYQ2" &:: Embedded Industry Enterprise
+exit /b
+
+:: Windows Server 2012
+:f0f5ec41-0d55-4732-af02-440a44a3cf0f
+set "_key=XC9B7-NBPP2-83J2H-RHMBY-92BT4" &:: Standard
+exit /b
+
+:d3643d60-0c42-412d-a7d6-52e6635327f6
+set "_key=48HP8-DN98B-MYWDG-T2DCC-8W83P" &:: Datacenter
+exit /b
+
+:7d5486c7-e120-4771-b7f1-7b56c6d3170c
+set "_key=HM7DN-YVMH3-46JC3-XYTG7-CYQJJ" &:: MultiPoint Standard
+exit /b
+
+:95fd1c83-7df5-494a-be8b-1300e1c9d1cd
+set "_key=XNH6W-2V9GX-RGJ4K-Y8X6F-QGJ2G" &:: MultiPoint Premium
+exit /b
+
+:: Windows 7
+:b92e9980-b9d5-4821-9c94-140f632f6312
+set "_key=FJ82H-XT6CR-J8D7P-XQJJ2-GPDD4" &:: Professional
+exit /b
+
+:54a09a0d-d57b-4c10-8b69-a842d6590ad5
+set "_key=MRPKT-YTG23-K7D7T-X2JMM-QY7MG" &:: Professional N
+exit /b
+
+:5a041529-fef8-4d07-b06f-b59b573b32d2
+set "_key=W82YF-2Q76Y-63HXB-FGJG9-GF7QX" &:: Professional E
+exit /b
+
+:ae2ee509-1b34-41c0-acb7-6d4650168915
+set "_key=33PXH-7Y6KF-2VJC9-XBBR8-HVTHH" &:: Enterprise
+exit /b
+
+:1cb6d605-11b3-4e14-bb30-da91c8e3983a
+set "_key=YDRBP-3D83W-TY26F-D46B2-XCKRJ" &:: Enterprise N
+exit /b
+
+:46bbed08-9c7b-48fc-a614-95250573f4ea
+set "_key=C29WB-22CC8-VJ326-GHFJW-H9DH4" &:: Enterprise E
+exit /b
+
+:db537896-376f-48ae-a492-53d0547773d0
+set "_key=YBYF6-BHCR3-JPKRB-CDW7B-F9BK4" &:: Embedded POSReady 7
+exit /b
+
+:e1a8296a-db37-44d1-8cce-7bc961d59c54
+set "_key=XGY72-BRBBT-FF8MH-2GG8H-W7KCW" &:: Embedded Standard
+exit /b
+
+:aa6dd3aa-c2b4-40e2-a544-a6bbb3f5c395
+set "_key=73KQT-CD9G6-K7TQG-66MRP-CQ22C" &:: Embedded ThinPC
+exit /b
+
+:: Windows Server 2008 R2
+:a78b8bd9-8017-4df5-b86a-09f756affa7c
+set "_key=6TPJF-RBVHG-WBW2R-86QPH-6RTM4" &:: Web
+exit /b
+
+:cda18cf3-c196-46ad-b289-60c072869994
+set "_key=TT8MH-CG224-D3D7Q-498W2-9QCTX" &:: HPC
+exit /b
+
+:68531fb9-5511-4989-97be-d11a0f55633f
+set "_key=YC6KT-GKW9T-YTKYR-T4X34-R7VHC" &:: Standard
+exit /b
+
+:7482e61b-c589-4b7f-8ecc-46d455ac3b87
+set "_key=74YFP-3QFB3-KQT8W-PMXWJ-7M648" &:: Datacenter
+exit /b
+
+:620e2b3d-09e7-42fd-802a-17a13652fe7a
+set "_key=489J6-VHDMP-X63PK-3K798-CPX3Y" &:: Enterprise
+exit /b
+
+:8a26851c-1c7e-48d3-a687-fbca9b9ac16b
+set "_key=GT63C-RJFQ3-4GMB6-BRFB9-CB83V" &:: Itanium
+exit /b
+
+:f772515c-0e87-48d5-a676-e6962c3e1195
+set "_key=736RG-XDKJK-V34PF-BHK87-J6X3K" &:: MultiPoint Server - ServerEmbeddedSolution
+exit /b
+
+:: Office 2021
+:fbdb3e18-a8ef-4fb3-9183-dffd60bd0984
+set "_key=FXYTK-NJJ8C-GB6DW-3DYQT-6F7TH" &:: Professional Plus
+exit /b
+
+:080a45c5-9f9f-49eb-b4b0-c3c610a5ebd3
+set "_key=KDX7X-BNVR8-TXXGX-4Q7Y8-78VT3" &:: Standard
+exit /b
+
+:76881159-155c-43e0-9db7-2d70a9a3a4ca
+set "_key=FTNWT-C6WBT-8HMGF-K9PRX-QV9H8" &:: Project Professional
+exit /b
+
+:6dd72704-f752-4b71-94c7-11cec6bfc355
+set "_key=J2JDC-NJCYY-9RGQ4-YXWMH-T3D4T" &:: Project Standard
+exit /b
+
+:fb61ac9a-1688-45d2-8f6b-0674dbffa33c
+set "_key=KNH8D-FGHT4-T8RK3-CTDYJ-K2HT4" &:: Visio Professional
+exit /b
+
+:72fce797-1884-48dd-a860-b2f6a5efd3ca
+set "_key=MJVNY-BYWPY-CWV6J-2RKRT-4M8QG" &:: Visio Standard
+exit /b
+
+:1fe429d8-3fa7-4a39-b6f0-03dded42fe14
+set "_key=WM8YG-YNGDD-4JHDC-PG3F4-FC4T4" &:: Access
+exit /b
+
+:ea71effc-69f1-4925-9991-2f5e319bbc24
+set "_key=NWG3X-87C9K-TC7YY-BC2G7-G6RVC" &:: Excel
+exit /b
+
+:a5799e4c-f83c-4c6e-9516-dfe9b696150b
+set "_key=C9FM6-3N72F-HFJXB-TM3V9-T86R9" &:: Outlook
+exit /b
+
+:6e166cc3-495d-438a-89e7-d7c9e6fd4dea
+set "_key=TY7XF-NFRBR-KJ44C-G83KF-GX27K" &:: PowerPoint
+exit /b
+
+:aa66521f-2370-4ad8-a2bb-c095e3e4338f
+set "_key=2MW9D-N4BXM-9VBPG-Q7W6M-KFBGQ" &:: Publisher
+exit /b
+
+:1f32a9af-1274-48bd-ba1e-1ab7508a23e8
+set "_key=HWCXN-K3WBT-WJBKY-R8BD9-XK29P" &:: Skype for Business
+exit /b
+
+:abe28aea-625a-43b1-8e30-225eb8fbd9e5
+set "_key=TN8H9-M34D3-Y64V9-TR72V-X79KV" &:: Word
+exit /b
+
+:: Office 2019
+:85dd8b5f-eaa4-4af3-a628-cce9e77c9a03
+set "_key=NMMKJ-6RK4F-KMJVX-8D9MJ-6MWKP" &:: Professional Plus
+exit /b
+
+:6912a74b-a5fb-401a-bfdb-2e3ab46f4b02
+set "_key=6NWWJ-YQWMR-QKGCB-6TMB3-9D9HK" &:: Standard
+exit /b
+
+:2ca2bf3f-949e-446a-82c7-e25a15ec78c4
+set "_key=B4NPR-3FKK7-T2MBV-FRQ4W-PKD2B" &:: Project Professional
+exit /b
+
+:1777f0e3-7392-4198-97ea-8ae4de6f6381
+set "_key=C4F7P-NCP8C-6CQPT-MQHV9-JXD2M" &:: Project Standard
+exit /b
+
+:5b5cf08f-b81a-431d-b080-3450d8620565
+set "_key=9BGNQ-K37YR-RQHF2-38RQ3-7VCBB" &:: Visio Professional
+exit /b
+
+:e06d7df3-aad0-419d-8dfb-0ac37e2bdf39
+set "_key=7TQNQ-K3YQQ-3PFH7-CCPPM-X4VQ2" &:: Visio Standard
+exit /b
+
+:9e9bceeb-e736-4f26-88de-763f87dcc485
+set "_key=9N9PT-27V4Y-VJ2PD-YXFMF-YTFQT" &:: Access
+exit /b
+
+:237854e9-79fc-4497-a0c1-a70969691c6b
+set "_key=TMJWT-YYNMB-3BKTF-644FC-RVXBD" &:: Excel
+exit /b
+
+:c8f8a301-19f5-4132-96ce-2de9d4adbd33
+set "_key=7HD7K-N4PVK-BHBCQ-YWQRW-XW4VK" &:: Outlook
+exit /b
+
+:3131fd61-5e4f-4308-8d6d-62be1987c92c
+set "_key=RRNCX-C64HY-W2MM7-MCH9G-TJHMQ" &:: PowerPoint
+exit /b
+
+:9d3e4cca-e172-46f1-a2f4-1d2107051444
+set "_key=G2KWX-3NW6P-PY93R-JXK2T-C9Y9V" &:: Publisher
+exit /b
+
+:734c6c6e-b0ba-4298-a891-671772b2bd1b
+set "_key=NCJ33-JHBBY-HTK98-MYCV8-HMKHJ" &:: Skype for Business
+exit /b
+
+:059834fe-a8ea-4bff-b67b-4d006b5447d3
+set "_key=PBX3G-NWMT6-Q7XBW-PYJGG-WXD33" &:: Word
+exit /b
+
+:0bc88885-718c-491d-921f-6f214349e79c
+set "_key=VQ9DP-NVHPH-T9HJC-J9PDT-KTQRG" &:: Pro Plus 2019 Preview
+exit /b
+
+:fc7c4d0c-2e85-4bb9-afd4-01ed1476b5e9
+set "_key=XM2V9-DN9HH-QB449-XDGKC-W2RMW" &:: Project Pro 2019 Preview
+exit /b
+
+:500f6619-ef93-4b75-bcb4-82819998a3ca
+set "_key=N2CG9-YD3YK-936X4-3WR82-Q3X4H" &:: Visio Pro 2019 Preview
+exit /b
+
+:f3fb2d68-83dd-4c8b-8f09-08e0d950ac3b
+set "_key=HFPBN-RYGG8-HQWCW-26CH6-PDPVF" &:: Pro Plus 2021 Preview
+exit /b
+
+:76093b1b-7057-49d7-b970-638ebcbfd873
+set "_key=WDNBY-PCYFY-9WP6G-BXVXM-92HDV" &:: Project Pro 2021 Preview
+exit /b
+
+:a3b44174-2451-4cd6-b25f-66638bfb9046
+set "_key=2XYX7-NXXBK-9CK7W-K2TKW-JFJ7G" &:: Visio Pro 2021 Preview
+exit /b
+
+:: Office 2016
+:829b8110-0e6f-4349-bca4-42803577788d
+set "_key=WGT24-HCNMF-FQ7XH-6M8K7-DRTW9" &:: Project Professional C2R-P
+exit /b
+
+:cbbaca45-556a-4416-ad03-bda598eaa7c8
+set "_key=D8NRQ-JTYM3-7J2DX-646CT-6836M" &:: Project Standard C2R-P
+exit /b
+
+:b234abe3-0857-4f9c-b05a-4dc314f85557
+set "_key=69WXN-MBYV6-22PQG-3WGHK-RM6XC" &:: Visio Professional C2R-P
+exit /b
+
+:361fe620-64f4-41b5-ba77-84f8e079b1f7
+set "_key=NY48V-PPYYH-3F4PX-XJRKJ-W4423" &:: Visio Standard C2R-P
+exit /b
+
+:e914ea6e-a5fa-4439-a394-a9bb3293ca09
+set "_key=DMTCJ-KNRKX-26982-JYCKT-P7KB6" &:: MondoR
+exit /b
+
+:9caabccb-61b1-4b4b-8bec-d10a3c3ac2ce
+set "_key=HFTND-W9MK4-8B7MJ-B6C4G-XQBR2" &:: Mondo
+exit /b
+
+:d450596f-894d-49e0-966a-fd39ed4c4c64
+set "_key=XQNVK-8JYDB-WJ9W3-YJ8YR-WFG99" &:: Professional Plus
+exit /b
+
+:dedfa23d-6ed1-45a6-85dc-63cae0546de6
+set "_key=JNRGM-WHDWX-FJJG3-K47QV-DRTFM" &:: Standard
+exit /b
+
+:4f414197-0fc2-4c01-b68a-86cbb9ac254c
+set "_key=YG9NW-3K39V-2T3HJ-93F3Q-G83KT" &:: Project Professional
+exit /b
+
+:da7ddabc-3fbe-4447-9e01-6ab7440b4cd4
+set "_key=GNFHQ-F6YQM-KQDGJ-327XX-KQBVC" &:: Project Standard
+exit /b
+
+:6bf301c1-b94a-43e9-ba31-d494598c47fb
+set "_key=PD3PC-RHNGV-FXJ29-8JK7D-RJRJK" &:: Visio Professional
+exit /b
+
+:aa2a7821-1827-4c2c-8f1d-4513a34dda97
+set "_key=7WHWN-4T7MP-G96JF-G33KR-W8GF4" &:: Visio Standard
+exit /b
+
+:67c0fc0c-deba-401b-bf8b-9c8ad8395804
+set "_key=GNH9Y-D2J4T-FJHGG-QRVH7-QPFDW" &:: Access
+exit /b
+
+:c3e65d36-141f-4d2f-a303-a842ee756a29
+set "_key=9C2PK-NWTVB-JMPW8-BFT28-7FTBF" &:: Excel
+exit /b
+
+:d8cace59-33d2-4ac7-9b1b-9b72339c51c8
+set "_key=DR92N-9HTF2-97XKM-XW2WJ-XW3J6" &:: OneNote
+exit /b
+
+:ec9d9265-9d1e-4ed0-838a-cdc20f2551a1
+set "_key=R69KK-NTPKF-7M3Q4-QYBHW-6MT9B" &:: Outlook
+exit /b
+
+:d70b1bba-b893-4544-96e2-b7a318091c33
+set "_key=J7MQP-HNJ4Y-WJ7YM-PFYGF-BY6C6" &:: Powerpoint
+exit /b
+
+:041a06cb-c5b8-4772-809f-416d03d16654
+set "_key=F47MM-N3XJP-TQXJ9-BP99D-8K837" &:: Publisher
+exit /b
+
+:83e04ee1-fa8d-436d-8994-d31a862cab77
+set "_key=869NQ-FJ69K-466HW-QYCP2-DDBV6" &:: Skype for Business
+exit /b
+
+:bb11badf-d8aa-470e-9311-20eaf80fe5cc
+set "_key=WXY84-JN2Q9-RBCCQ-3Q3J3-3PFJ6" &:: Word
+exit /b
+
+:: Office 2013
+:dc981c6b-fc8e-420f-aa43-f8f33e5c0923
+set "_key=42QTK-RN8M7-J3C4G-BBGYM-88CYV" &:: Mondo
+exit /b
+
+:b322da9c-a2e2-4058-9e4e-f59a6970bd69
+set "_key=YC7DK-G2NP3-2QQC3-J6H88-GVGXT" &:: Professional Plus
+exit /b
+
+:b13afb38-cd79-4ae5-9f7f-eed058d750ca
+set "_key=KBKQT-2NMXY-JJWGP-M62JB-92CD4" &:: Standard
+exit /b
+
+:4a5d124a-e620-44ba-b6ff-658961b33b9a
+set "_key=FN8TT-7WMH6-2D4X9-M337T-2342K" &:: Project Professional
+exit /b
+
+:427a28d1-d17c-4abf-b717-32c780ba6f07
+set "_key=6NTH3-CW976-3G3Y2-JK3TX-8QHTT" &:: Project Standard
+exit /b
+
+:e13ac10e-75d0-4aff-a0cd-764982cf541c
+set "_key=C2FG9-N6J68-H8BTJ-BW3QX-RM3B3" &:: Visio Professional
+exit /b
+
+:ac4efaf0-f81f-4f61-bdf7-ea32b02ab117
+set "_key=J484Y-4NKBF-W2HMG-DBMJC-PGWR7" &:: Visio Standard
+exit /b
+
+:6ee7622c-18d8-4005-9fb7-92db644a279b
+set "_key=NG2JY-H4JBT-HQXYP-78QH9-4JM2D" &:: Access
+exit /b
+
+:f7461d52-7c2b-43b2-8744-ea958e0bd09a
+set "_key=VGPNG-Y7HQW-9RHP7-TKPV3-BG7GB" &:: Excel
+exit /b
+
+:fb4875ec-0c6b-450f-b82b-ab57d8d1677f
+set "_key=H7R7V-WPNXQ-WCYYC-76BGV-VT7GH" &:: Groove
+exit /b
+
+:a30b8040-d68a-423f-b0b5-9ce292ea5a8f
+set "_key=DKT8B-N7VXH-D963P-Q4PHY-F8894" &:: InfoPath
+exit /b
+
+:1b9f11e3-c85c-4e1b-bb29-879ad2c909e3
+set "_key=2MG3G-3BNTT-3MFW9-KDQW3-TCK7R" &:: Lync
+exit /b
+
+:efe1f3e6-aea2-4144-a208-32aa872b6545
+set "_key=TGN6P-8MMBC-37P2F-XHXXK-P34VW" &:: OneNote
+exit /b
+
+:771c3afa-50c5-443f-b151-ff2546d863a0
+set "_key=QPN8Q-BJBTJ-334K3-93TGY-2PMBT" &:: Outlook
+exit /b
+
+:8c762649-97d1-4953-ad27-b7e2c25b972e
+set "_key=4NT99-8RJFH-Q2VDH-KYG2C-4RD4F" &:: Powerpoint
+exit /b
+
+:00c79ff1-6850-443d-bf61-71cde0de305f
+set "_key=PN2WF-29XG2-T9HJ7-JQPJR-FCXK4" &:: Publisher
+exit /b
+
+:d9f5b1c6-5386-495a-88f9-9ad6b41ac9b3
+set "_key=6Q7VD-NX8JD-WJ2VH-88V73-4GBJ7" &:: Word
+exit /b
+
+:: Office 2010
+:09ed9640-f020-400a-acd8-d7d867dfd9c2
+set "_key=YBJTT-JG6MD-V9Q7P-DBKXJ-38W9R" &:: Mondo
+exit /b
+
+:ef3d4e49-a53d-4d81-a2b1-2ca6c2556b2c
+set "_key=7TC2V-WXF6P-TD7RT-BQRXR-B8K32" &:: Mondo2
+exit /b
+
+:6f327760-8c5c-417c-9b61-836a98287e0c
+set "_key=VYBBJ-TRJPB-QFQRF-QFT4D-H3GVB" &:: Professional Plus
+exit /b
+
+:9da2a678-fb6b-4e67-ab84-60dd6a9c819a
+set "_key=V7QKV-4XVVR-XYV4D-F7DFM-8R6BM" &:: Standard
+exit /b
+
+:df133ff7-bf14-4f95-afe3-7b48e7e331ef
+set "_key=YGX6F-PGV49-PGW3J-9BTGG-VHKC6" &:: Project Professional
+exit /b
+
+:5dc7bf61-5ec9-4996-9ccb-df806a2d0efe
+set "_key=4HP3K-88W3F-W2K3D-6677X-F9PGB" &:: Project Standard
+exit /b
+
+:92236105-bb67-494f-94c7-7f7a607929bd
+set "_key=D9DWC-HPYVV-JGF4P-BTWQB-WX8BJ" &:: Visio Premium
+exit /b
+
+:e558389c-83c3-4b29-adfe-5e4d7f46c358
+set "_key=7MCW8-VRQVK-G677T-PDJCM-Q8TCP" &:: Visio Professional
+exit /b
+
+:9ed833ff-4f92-4f36-b370-8683a4f13275
+set "_key=767HD-QGMWX-8QTDB-9G3R2-KHFGJ" &:: Visio Standard
+exit /b
+
+:8ce7e872-188c-4b98-9d90-f8f90b7aad02
+set "_key=V7Y44-9T38C-R2VJK-666HK-T7DDX" &:: Access
+exit /b
+
+:cee5d470-6e3b-4fcc-8c2b-d17428568a9f
+set "_key=H62QG-HXVKF-PP4HP-66KMR-CW9BM" &:: Excel
+exit /b
+
+:8947d0b8-c33b-43e1-8c56-9b674c052832
+set "_key=QYYW6-QP4CB-MBV6G-HYMCJ-4T3J4" &:: Groove - SharePoint Workspace
+exit /b
+
+:ca6b6639-4ad6-40ae-a575-14dee07f6430
+set "_key=K96W8-67RPQ-62T9Y-J8FQJ-BT37T" &:: InfoPath
+exit /b
+
+:ab586f5c-5256-4632-962f-fefd8b49e6f4
+set "_key=Q4Y4M-RHWJM-PY37F-MTKWH-D3XHX" &:: OneNote
+exit /b
+
+:ecb7c192-73ab-4ded-acf4-2399b095d0cc
+set "_key=7YDC2-CWM8M-RRTJC-8MDVC-X3DWQ" &:: Outlook
+exit /b
+
+:45593b1d-dfb1-4e91-bbfb-2d5d0ce2227a
+set "_key=RC8FX-88JRY-3PF7C-X8P67-P4VTT" &:: Powerpoint
+exit /b
+
+:b50c4f75-599b-43e8-8dcd-1081a7967241
+set "_key=BFK7F-9MYHM-V68C7-DRQ66-83YTP" &:: Publisher
+exit /b
+
+:2d0882e7-a4e7-423b-8ccc-70d91e0158b1
+set "_key=HVHB3-C6FV7-KQX9W-YQG79-CRY7T" &:: Word
+exit /b
+
+:ea509e87-07a1-4a45-9edc-eba5a39f36af
+set "_key=D6QFG-VBYP2-XQHM7-J97RH-VVRCK" &:: Small Business Basics
+exit /b
+
+:TheEnd
+
+if %act_failed% EQU 1 (
+echo __________________________________________________________________
+echo.
+call :_errorinfo
+)
+
+echo.
+if not defined _tskinstalled if not defined _oldtsk (
+if %winbuild% GEQ 9200 (
+call :leavenonexistentkms %nul%
+echo Keeping the non-existent IP address 0.0.0.0 as KMS Server.
+) else (
+call :Clear-KMS-Cache
+)
+)
+
+if defined _tskinstalled echo Renewal Task found, keeping the online KMS IP in the system.
+if defined _oldtsk echo Renewal Task found, keeping the online KMS IP in the system.
+
+if defined _unattended exit /b
+
+echo ___________________________________________________________________
+echo.
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:_errorinfo
+
+(set msg1=echo Try again and if the issue still persist then either use a^
+&echo different Internet connection or use this offline KMS activator^
+&echo KMS_VL_ALL by @abbodi1406 pastebin.com/raw/cpdmr6HZ
+)
+
+call :CheckFR
+
+if !server_num! GTR %max_servers% (
+ping -n 1 one.one.one.one 1>nul || ping -n 1 resolver1.opendns.com 1>nul || (
+call :_color %_Red% "Unable to test KMS servers due to restricted or no Internet."
+echo.
+%msg1%
+exit /b
+)
+)
+
+echo Restart the system and try again.
+echo KMS server is not an issue in this case.
+echo Check Troubleshooting steps in the ReadMe.
+exit /b
+
+::========================================================================================================================================
+
+:setserv
+
+:: Multi KMS servers integration and servers randomization
+
+set srvlist=
+set -=
+
+set "srvlist=kms.kure%-%tru.com xincheng213%-%618.cn kms.six%-%yin.com kms.moec%-%lub.org kms.cgts%-%oft.com"
+set "srvlist=%srvlist% kms.hen%-%g07.com kms.moey%-%uuko.com kms.lol%-%i.best kms.zhuxi%-%aole.org kms.ca%-%tqu.com"
+set "srvlist=%srvlist% kms.lol%-%i.beer kms.ca%-%ry.tech kms.wx%-%lost.com kms.moeyu%-%uko.top kms.ghp%-%ym.com"
+
+set n=1
+for %%a in (%srvlist%) do (set %%a=&set server!n!=%%a&set /a n+=1)
+set max_servers=15
+set /a server_num=0
+exit /b
+
+:getserv
+
+if %server_num% equ %max_servers% set /a server_num+=1&set KMS_IP=222.184.9.98&exit /b
+set /a rand=%Random%%%(15+1-1)+1
+if defined !server%rand%! goto :getserv
+set KMS_IP=!server%rand%!
+set !server%rand%!=1
+
+:: Get IPv4 address of KMS server to use for the activation, works even if ICMP echo is disabled.
+:: Microsoft and Antivirus's may flag the issue if public KMS server host name is directly used for the activation.
+
+set /a server_num+=1
+(for /f "delims=[] tokens=2" %%a in ('ping -4 -n 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%a"
+if [%KMS_IP%]==[!KMS_IP!] for /f "delims=[] tokens=2" %%# in ('pathping -4 -h 1 -n -p 1 -q 1 -w 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%#"
+if not [%KMS_IP%]==[!KMS_IP!] exit /b
+goto :getserv
+)
+
+:==========================================================================================================================================
+
+:Clear-KMS-Cache
+
+set OPPk=SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform
+set SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform
+
+set _wApp=55c92734-d682-4d71-983e-d6ec3f16059f
+set _oApp=0ff1ce15-a989-479d-af46-f275c6370663
+set _oA14=59a52881-a989-479d-af46-f275c6370663
+
+%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServiceName
+%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServicePort
+%nul% reg delete "HKLM\%SPPk%" /f /v DisableDnsPublishing
+%nul% reg delete "HKLM\%SPPk%" /f /v DisableKeyManagementServiceHostCaching
+%nul% reg delete "HKLM\%SPPk%\%_wApp%" /f
+if %winbuild% GEQ 9200 (
+if defined notx86 (
+%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServiceName /reg:32
+%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServicePort /reg:32
+%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32
+)
+%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f
+)
+if %winbuild% GEQ 9600 (
+%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_wApp%" /f
+%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_oApp%" /f
+)
+%nul% reg delete "HKLM\%OPPk%" /f /v KeyManagementServiceName
+%nul% reg delete "HKLM\%OPPk%" /f /v KeyManagementServicePort
+%nul% reg delete "HKLM\%OPPk%" /f /v DisableDnsPublishing
+%nul% reg delete "HKLM\%OPPk%" /f /v DisableKeyManagementServiceHostCaching
+%nul% reg delete "HKLM\%OPPk%\%_oA14%" /f
+%nul% reg delete "HKLM\%OPPk%\%_oApp%" /f
+
+:: check KMS38 lock
+
+%nul% reg query "HKLM\%SPPk%\%_wApp%" && (
+set error_=9
+echo Failed to completely clear KMS Cache.
+reg query "HKLM\%SPPk%\%_wApp%" /s 2>nul | findstr /i "127.0.0.2" >nul && echo Most likely, the KMS38 activation is locked.
+) || (
+echo Cleared KMS Cache successfully.
+)
+exit /b
+
+:=========================================================================================================================================
+
+:leavenonexistentkms
+
+reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "0.0.0.0"
+reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688"
+reg delete "HKLM\%SPPk%" /f /v DisableDnsPublishing
+reg delete "HKLM\%SPPk%" /f /v DisableKeyManagementServiceHostCaching
+if not defined _keepkms38 reg delete "HKLM\%SPPk%\%_wApp%" /f
+if %winbuild% GEQ 9200 (
+if not %xOS%==x86 (
+reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "0.0.0.0" /reg:32
+reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32
+reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "0.0.0.0" /reg:32
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32
+)
+reg delete "HKLM\%SPPk%\%_oApp%" /f
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "0.0.0.0"
+reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688"
+)
+if %winbuild% GEQ 9600 (
+reg delete "HKU\S-1-5-20\%SPPk%\%_wApp%" /f
+reg delete "HKU\S-1-5-20\%SPPk%\%_oApp%" /f
+)
+reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "0.0.0.0"
+reg delete "HKLM\%OPPk%" /f /v KeyManagementServicePort
+reg delete "HKLM\%OPPk%" /f /v DisableDnsPublishing
+reg delete "HKLM\%OPPk%" /f /v DisableKeyManagementServiceHostCaching
+reg delete "HKLM\%OPPk%\%_oA14%" /f
+reg delete "HKLM\%OPPk%\%_oApp%" /f
+goto :eof
+
+:=========================================================================================================================================
+
+:_Complete_Uninstall
+
+cls
+mode con: cols=91 lines=30
+title Online KMS Complete Uninstall
+
+if "!_batf!"=="%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd" if not defined _unattended (
+echo.
+echo Are you sure?
+echo.
+choice /C:CG /N /M "[C] Complete uninstall [G] Go back : "
+if errorlevel 2 exit /b
+)
+cls
+
+set "key=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks"
+
+set "_C16R="
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" set "_C16R=1"
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath /reg:32" 2^>nul') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" set "_C16R=1"
+if %winbuild% GEQ 9200 if defined _C16R (
+echo.
+echo ## Notice ##
+echo.
+echo To make sure Office programs do not show a non-genuine banner,
+echo please run the activation option once, and don't uninstall afterward.
+echo __________________________________________________________________________________________
+)
+
+set error_=
+echo.
+call :Clear-KMS-Cache
+
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && (
+echo Deleting [Task] Online_KMS_Activation_Script-Renewal
+schtasks /delete /tn Online_KMS_Activation_Script-Renewal /f %nul%
+)
+
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && (
+echo Deleting [Task] Online_KMS_Activation_Script-Run_Once
+schtasks /delete /tn Online_KMS_Activation_Script-Run_Once /f %nul%
+)
+
+If exist "%windir%\Online_KMS_Activation_Script\" (
+echo Deleting [Folder] %windir%\Online_KMS_Activation_Script\
+rmdir /s /q "%windir%\Online_KMS_Activation_Script\" %nul%
+)
+
+if exist "%ProgramData%\Online_KMS_Activation.cmd" (
+echo Deleting [File] %ProgramData%\Online_KMS_Activation.cmd
+del /f /q "%ProgramData%\Online_KMS_Activation.cmd" %nul%
+)
+
+reg query "HKCR\DesktopBackground\shell\Activate Windows - Office" %nul% && (
+echo Deleting [Registry] HKCR\DesktopBackground\shell\Activate Windows - Office
+Reg delete "HKCR\DesktopBackground\shell\Activate Windows - Office" /f %nul%
+)
+
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && (set error_=1)
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && (set error_=1)
+If exist "%windir%\Online_KMS_Activation_Script\" (set error_=1)
+reg query "HKCR\DesktopBackground\shell\Activate Windows - Office" >nul 2>&1 && (set error_=1)
+if exist "%ProgramData%\Online_KMS_Activation.cmd" (set error_=1)
+
+If exist "%ProgramData%\Online_KMS_Activation\" (
+echo Deleting [Folder] %ProgramData%\Online_KMS_Activation\
+
+if "!_batf!"=="%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd" (
+call :_color %_Yellow% "__________________________________________________________________________________"
+echo.
+echo This script is a part of 'Microsoft Activation Scripts' ^(MAS^) project.
+echo.
+echo Homepage: windowsaddict.ml
+echo Email: [email protected]
+call :_color %_Yellow% "__________________________________________________________________________________"
+echo.
+call :_color %_Yellow% "Press [9] key to exit..."
+echo.
+pushd \
+rmdir /s /q "%ProgramData%\Online_KMS_Activation\" %nul%
+if exist "%ProgramData%\Online_KMS_Activation\" (set error_=1)
+
+if defined error_ (
+if [!error_!]==[1] powershell write-host -back 'Red' -fore 'White' 'Error found in complete uninstall.'
+) else (
+echo Online KMS Complete Uninstall was done successfully.
+)
+choice /c 9 /n
+if not errorlevel 1 rem.
+exit
+) else (
+rmdir /s /q "%ProgramData%\Online_KMS_Activation\" %nul%
+if exist "%ProgramData%\Online_KMS_Activation\" (set error_=1)
+)
+)
+
+if defined error_ (
+if [%error_%]==[1] (
+echo __________________________________________________________________________________________
+%eline%
+echo Try Again / Restart the System
+echo __________________________________________________________________________________________
+)
+) else (
+echo __________________________________________________________________________________________
+echo.
+call :_color %Green% "Online KMS Complete Uninstall was done successfully."
+echo __________________________________________________________________________________________
+)
+
+if defined _unattended exit /b
+
+echo.
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+exit /b
+
+:=========================================================================================================================================
+
+:RenTask
+
+cls
+mode con cols=91 lines=30
+title Install Activation Auto-Renewal
+
+set error_=
+set "_dest=%ProgramData%\Online_KMS_Activation"
+set "key=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks"
+
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && (
+schtasks /delete /tn Online_KMS_Activation_Script-Renewal /f %nul%
+)
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && (
+schtasks /delete /tn Online_KMS_Activation_Script-Run_Once /f %nul%
+)
+
+if exist "%_dest%\Activate_tsk.cmd" del /f /q "%_dest%\Activate_tsk.cmd" %nul%
+if exist "%_dest%\Info.txt" del /f /q "%_dest%\Info.txt" %nul%
+if exist "%_dest%\Info.html" del /f /q "%_dest%\Info.html" %nul%
+if exist "%_dest%\Logs.txt" del /f /q "%_dest%\Logs.txt" %nul%
+
+If exist "%windir%\Online_KMS_Activation_Script\" (
+rmdir /s /q "%windir%\Online_KMS_Activation_Script\" %nul%
+)
+
+set DelDeskCont=
+If exist "%ProgramData%\Online_KMS_Activation.cmd" (
+reg delete "HKCR\DesktopBackground\shell\Activate Windows - Office" /f %nul%
+del /f /q "%ProgramData%\Online_KMS_Activation.cmd" %nul%
+if exist "%_dest%\Activate.cmd" del /f /q "%_dest%\Activate.cmd" %nul%
+set DelDeskCont=1
+)
+
+if not exist "%_dest%\" md "%_dest%\" %nul%
+
+set "_temp=%SystemRoot%\Temp\_KMS_Task_Work"
+if exist "%_temp%\.*" rmdir /s /q "%_temp%\" %nul%
+md "%_temp%\" %nul%
+
+call :RenExport renewal "%_temp%\Renewal.xml" Unicode
+if defined ActTask (call :RenExport run_once "%_temp%\Run_Once.xml" Unicode)
+call :createinfo.html
+call :RenExport _extracttask "%_dest%\Activate_tsk.cmd" ASCII
+title Install Activation Auto-Renewal
+
+schtasks /create /tn "Online_KMS_Activation_Script-Renewal" /ru "SYSTEM" /xml "%_temp%\Renewal.xml" %nul%
+if defined ActTask (schtasks /create /tn "Online_KMS_Activation_Script-Run_Once" /ru "SYSTEM" /xml "%_temp%\Run_Once.xml" %nul%)
+
+if exist "%_temp%\.*" rmdir /s /q "%_temp%\" %nul%
+
+::========================================================================================================================================
+
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul || (set error_=1)
+if defined ActTask reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul || (set error_=1)
+
+If not exist "%_dest%\Activate_tsk.cmd" (set error_=1)
+If not exist "%_dest%\Info.html" (set error_=1)
+
+if defined error_ (
+
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Renewal" >nul && (
+schtasks /delete /tn Online_KMS_Activation_Script-Renewal /f %nul%
+)
+reg query "%key%" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && (
+schtasks /delete /tn Online_KMS_Activation_Script-Run_Once /f %nul%
+)
+
+if exist "%_dest%\Activate_tsk.cmd" del /f /q "%_dest%\Activate_tsk.cmd" %nul%
+
+echo _________________________________________________________________
+%eline%
+echo Run the Online KMS Complete Uninstall option and then try again.
+echo _________________________________________________________________
+) else (
+echo __________________________________________________________________________________________
+echo.
+if defined DelDeskCont (
+call :_color %_Yellow% "Previous desktop context menu entry for Online KMS Activation was deleted."
+echo.
+)
+
+echo Files created:
+echo %_dest%\Activate_tsk.cmd
+echo %_dest%\Info.html
+echo.
+(if defined ActTask (echo Scheduled Tasks created:) else (echo Scheduled Task created:))
+echo \Online_KMS_Activation_Script-Renewal [Weekly]
+if defined ActTask (echo \Online_KMS_Activation_Script-Run_Once)
+echo __________________________________________________________________________________________
+echo.
+echo Info:
+echo Activation will be renewed every week if the Internet connection is found.
+echo __________________________________________________________________________________________
+echo.
+if defined ActTask (
+call :_color %Green% "Online KMS Activation - Renewal and Activation Tasks were successfully created."
+) else (
+call :_color %Green% "Online KMS Activation - Renewal Task was successfully created."
+)
+echo.
+call :_color %Gray% "Now, make sure to run the Activation option from the previous Menu."
+echo __________________________________________________________________________________________
+)
+
+goto :RenDone
+
+::========================================================================================================================================
+
+:RenContextMenu
+
+cls
+mode con cols=91 lines=30
+title Add Desktop Context Menu
+
+if "!_batf!"=="%ProgramData%\Online_KMS_Activation\Activate_dcm.cmd" (
+%eline%
+echo Desktop context menu for Online KMS is already installed.
+goto :RenDone
+)
+
+set error_=
+set "_dest=%ProgramData%\Online_KMS_Activation"
+set "key=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks"
+
+call :Rencheck cleanosppx64.exe cleanosppx86.exe
+if defined _miss goto :RenDone
+
+If exist "%ProgramData%\Online_KMS_Activation.cmd" del /f /q "%ProgramData%\Online_KMS_Activation.cmd" %nul%
+
+reg delete "HKCR\DesktopBackground\shell\Activate Windows - Office" /f %nul%
+
+if not exist "%_dest%\BIN\" md "%_dest%\BIN\" %nul%
+
+if not exist "%_dest%\BIN\cleanosppx64.exe" copy /y /b "!_work!\BIN\cleanosppx64.exe" "%_dest%\BIN\cleanosppx64.exe" %nul%
+if not exist "%_dest%\BIN\cleanosppx86.exe" copy /y /b "!_work!\BIN\cleanosppx86.exe" "%_dest%\BIN\cleanosppx86.exe" %nul%
+
+if exist "%_dest%\Activate_dcm.cmd" del /f /q "%_dest%\Activate_dcm.cmd" %nul%
+if exist "%_dest%\Info.txt" del /f /q "%_dest%\Info.txt" %nul%
+if exist "%_dest%\Info.html" del /f /q "%_dest%\Info.html" %nul%
+
+copy /y /b "!_batf!" "%_dest%\Activate_dcm.cmd" %nul%
+call :createinfo.html
+title Add Desktop Context Menu
+
+reg add "HKCR\DesktopBackground\shell\Activate Windows - Office" /v "Icon" /t REG_SZ /d "%SystemRoot%%\System32\shell32.dll,71" /f >nul 2>&1 || (set error_=1)
+reg add "HKCR\DesktopBackground\shell\Activate Windows - Office\command" /ve /d "%_dest%\Activate_dcm.cmd" /f %nul% || (set error_=1)
+
+If not exist "%_dest%\Activate_dcm.cmd" (set error_=1)
+If not exist "%_dest%\Info.html" (set error_=1)
+If not exist "%_dest%\BIN\cleanosppx64.exe" (set error_=1)
+If not exist "%_dest%\BIN\cleanosppx86.exe" (set error_=1)
+
+reg query "HKCR\DesktopBackground\shell\Activate Windows - Office" %nul% || (set error_=1)
+
+if defined error_ (
+reg delete "HKCR\DesktopBackground\shell\Activate Windows - Office" /f %nul%
+if exist "%_dest%\Activate_dcm.cmd" del /f /q "%_dest%\Activate_dcm.cmd" %nul%
+echo _________________________________________________________________
+%eline%
+echo Run the Online KMS Complete Uninstall option and then try again.
+echo _________________________________________________________________
+) else (
+echo __________________________________________________________________________________________
+echo.
+echo Files created:
+echo %_dest%\BIN\cleanosppx64.exe
+echo %_dest%\BIN\cleanosppx86.exe
+echo %_dest%\Activate_dcm.cmd
+echo %_dest%\Info.html
+echo.
+echo Registry entry added:
+echo HKCR\DesktopBackground\shell\Activate Windows - Office
+echo __________________________________________________________________________________________
+echo.
+call :_color %Green% "Desktop context menu entry for Online KMS Activation is successfully created."
+echo __________________________________________________________________________________________
+)
+
+::========================================================================================================================================
+
+:RenDone
+
+if defined _unattended exit /b
+
+echo.
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:createinfo.html
+
+(
+echo ^<html^>
+echo ^<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-programdata-online-kms-files.html"^>
+echo ^</html^>
+)>"%_dest%\Info.html"
+exit /b
+
+::========================================================================================================================================
+
+:renewal:
+<?xml version="1.0" encoding="UTF-16"?>
+<Task version="1.3" xmlns="http://schemas.microsoft.com/windows/2004/02/mit/task">
+ <RegistrationInfo>
+ <Source>Microsoft Corporation</Source>
+ <Date>1999-01-01T12:00:00.34375</Date>
+ <Author>RPO/WindowsAddict</Author>
+ <Version>1.0</Version>
+ <Description>Online_KMS_Activation_Script-Renewal - Weekly Activation Renewal Task</Description>
+ <URI>\Online_KMS_Activation_Script-Renewal</URI>
+ <SecurityDescriptor>D:P(A;;FA;;;SY)(A;;FA;;;BA)(A;;FRFX;;;LS)(A;;FRFW;;;S-1-5-80-123231216-2592883651-3715271367-3753151631-4175906628)(A;;FR;;;S-1-5-4)</SecurityDescriptor>
+ </RegistrationInfo>
+ <Triggers>
+ <CalendarTrigger>
+ <StartBoundary>1999-01-01T12:00:00</StartBoundary>
+ <Enabled>true</Enabled>
+ <ScheduleByWeek>
+ <DaysOfWeek>
+ <Sunday />
+ </DaysOfWeek>
+ <WeeksInterval>1</WeeksInterval>
+ </ScheduleByWeek>
+ </CalendarTrigger>
+ </Triggers>
+ <Principals>
+ <Principal id="LocalSystem">
+ <UserId>S-1-5-18</UserId>
+ <RunLevel>HighestAvailable</RunLevel>
+ </Principal>
+ </Principals>
+ <Settings>
+ <MultipleInstancesPolicy>IgnoreNew</MultipleInstancesPolicy>
+ <DisallowStartIfOnBatteries>false</DisallowStartIfOnBatteries>
+ <StopIfGoingOnBatteries>false</StopIfGoingOnBatteries>
+ <AllowHardTerminate>true</AllowHardTerminate>
+ <StartWhenAvailable>true</StartWhenAvailable>
+ <RunOnlyIfNetworkAvailable>true</RunOnlyIfNetworkAvailable>
+ <IdleSettings>
+ <StopOnIdleEnd>false</StopOnIdleEnd>
+ <RestartOnIdle>false</RestartOnIdle>
+ </IdleSettings>
+ <AllowStartOnDemand>true</AllowStartOnDemand>
+ <Enabled>true</Enabled>
+ <Hidden>true</Hidden>
+ <RunOnlyIfIdle>false</RunOnlyIfIdle>
+ <DisallowStartOnRemoteAppSession>false</DisallowStartOnRemoteAppSession>
+ <UseUnifiedSchedulingEngine>true</UseUnifiedSchedulingEngine>
+ <WakeToRun>false</WakeToRun>
+ <ExecutionTimeLimit>PT10M</ExecutionTimeLimit>
+ <Priority>7</Priority>
+ <RestartOnFailure>
+ <Interval>PT2M</Interval>
+ <Count>3</Count>
+ </RestartOnFailure>
+ </Settings>
+ <Actions Context="LocalSystem">
+ <Exec>
+ <Command>%ProgramData%\Online_KMS_Activation\Activate_tsk.cmd</Command>
+ <Arguments>Task</Arguments>
+ </Exec>
+ </Actions>
+</Task>
+:renewal:
+
+:run_once:
+<?xml version="1.0" encoding="UTF-16"?>
+<Task version="1.3" xmlns="http://schemas.microsoft.com/windows/2004/02/mit/task">
+ <RegistrationInfo>
+ <Source>Microsoft Corporation</Source>
+ <Date>1999-01-01T12:00:00.34375</Date>
+ <Author>RPO/WindowsAddict</Author>
+ <Version>1.0</Version>
+ <Description>Online_KMS_Activation_Script-Run_Once - Run and Delete itself on first Internet Contact</Description>
+ <URI>\Online_KMS_Activation_Script-Run_Once</URI>
+ <SecurityDescriptor>D:P(A;;FA;;;SY)(A;;FA;;;BA)(A;;FRFX;;;LS)(A;;FRFW;;;S-1-5-80-123231216-2592883651-3715271367-3753151631-4175906628)(A;;FR;;;S-1-5-4)</SecurityDescriptor>
+ </RegistrationInfo>
+ <Triggers>
+ <LogonTrigger>
+ <Enabled>true</Enabled>
+ </LogonTrigger>
+ </Triggers>
+ <Principals>
+ <Principal id="LocalSystem">
+ <UserId>S-1-5-18</UserId>
+ <RunLevel>HighestAvailable</RunLevel>
+ </Principal>
+ </Principals>
+ <Settings>
+ <MultipleInstancesPolicy>IgnoreNew</MultipleInstancesPolicy>
+ <DisallowStartIfOnBatteries>false</DisallowStartIfOnBatteries>
+ <StopIfGoingOnBatteries>false</StopIfGoingOnBatteries>
+ <AllowHardTerminate>true</AllowHardTerminate>
+ <StartWhenAvailable>true</StartWhenAvailable>
+ <RunOnlyIfNetworkAvailable>true</RunOnlyIfNetworkAvailable>
+ <IdleSettings>
+ <StopOnIdleEnd>false</StopOnIdleEnd>
+ <RestartOnIdle>false</RestartOnIdle>
+ </IdleSettings>
+ <AllowStartOnDemand>true</AllowStartOnDemand>
+ <Enabled>true</Enabled>
+ <Hidden>true</Hidden>
+ <RunOnlyIfIdle>false</RunOnlyIfIdle>
+ <DisallowStartOnRemoteAppSession>false</DisallowStartOnRemoteAppSession>
+ <UseUnifiedSchedulingEngine>true</UseUnifiedSchedulingEngine>
+ <WakeToRun>false</WakeToRun>
+ <ExecutionTimeLimit>PT10M</ExecutionTimeLimit>
+ <Priority>7</Priority>
+ <RestartOnFailure>
+ <Interval>PT2M</Interval>
+ <Count>3</Count>
+ </RestartOnFailure>
+ </Settings>
+ <Actions Context="LocalSystem">
+ <Exec>
+ <Command>%ProgramData%\Online_KMS_Activation\Activate_tsk.cmd</Command>
+ <Arguments>Task</Arguments>
+ </Exec>
+ </Actions>
+</Task>
+:run_once:
+
+::========================================================================================================================================
+
+:: Echo all the missing files.
+
+:Rencheck
+
+set _miss=
+for %%# in (%1 %2) do (if not exist "!_work!\BIN\%%#" (if defined _miss (set "_miss=!_miss! %%#") else (set "_miss=%%#")))
+if defined _miss (
+%eline%
+echo Following required file^(s^) is missing in 'BIN' folder. Aborting...
+echo.
+echo !_miss!
+)
+exit /b
+
+::========================================================================================================================================
+
+:: Extract the text from batch script without character and file encoding issue
+
+:RenExport
+
+%nul% %_psc% "$f=[io.file]::ReadAllText('!_batp!') -split \":%~1\:.*`r`n\"; [io.file]::WriteAllText('%~2',$f[1].Trim(),[System.Text.Encoding]::%~3);"
+exit /b
+
+::========================================================================================================================================
+
+:_extracttask:
+@echo off
+
+:: Renew KMS activation with Online KMS servers via scheduled task
+
+::============================================================================
+::
+:: This script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::============================================================================
+
+
+if not "%~1"=="Task" (
+echo.
+echo ====== Error ======
+echo.
+echo This file is supposed to be run only by the scheduled task.
+echo.
+echo Press any key to exit
+pause >nul
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+::========================================================================================================================================
+
+set _tserror=
+set "nul=>nul 2>&1"
+for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+
+set run_once=
+set t_name=Renewal Task
+reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" /f Path /s | find /i "\Online_KMS_Activation_Script-Run_Once" >nul && (
+set run_once=1
+set t_name=Run Once Task
+)
+
+setlocal EnableDelayedExpansion
+if exist "%ProgramData%\Online_KMS_Activation\" call :_taskstart>>"%ProgramData%\Online_KMS_Activation\Logs.txt" & exit
+
+::========================================================================================================================================
+
+:_taskstart
+
+echo.
+echo %date%, %time%
+
+set /a loop=1
+set /a max_loop=4
+
+call :_tasksetserv
+
+:_intrepeat
+
+:: Check Internet connection. Works even if ICMP echo is disabled.
+
+for %%a in (%srvlist%) do (
+for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do (
+if not [%%#]==[] goto _taskIntConnected
+)
+)
+
+nslookup dns.msftncsi.com 2>nul | find "131.107.255.255" 1>nul
+if [%errorlevel%]==[0] goto _taskIntConnected
+
+if %loop%==%max_loop% (
+set _tserror=1
+goto _taskend
+)
+
+echo.
+echo Error: Internet is not connected
+echo Waiting 30 seconds
+
+timeout /t 30 >nul
+set /a loop=%loop%+1
+goto _intrepeat
+
+:_taskIntConnected
+
+::========================================================================================================================================
+
+:: Check not x86 Windows
+
+set notx86=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set arch=%%b
+if /i not "%arch%"=="x86" set notx86=1
+
+::========================================================================================================================================
+
+set "OPPk=SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform"
+set "SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform"
+
+set "slp=SoftwareLicensingProduct"
+set "ospp=OfficeSoftwareProtectionProduct"
+
+set "_wApp=55c92734-d682-4d71-983e-d6ec3f16059f"
+set "_oApp=0ff1ce15-a989-479d-af46-f275c6370663"
+set "_oA14=59a52881-a989-479d-af46-f275c6370663"
+
+::========================================================================================================================================
+
+:: Clean existing KMS cache from the registry / Set port value to 1688
+
+%nul% reg delete "HKLM\%SPPk%" /f /v KeyManagementServiceName
+%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688"
+%nul% reg delete "HKLM\%SPPk%\%_wApp%" /f
+if %winbuild% GEQ 9200 (
+if defined notx86 (
+%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32
+%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f /reg:32
+%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32
+)
+%nul% reg delete "HKLM\%SPPk%\%_oApp%" /f
+%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServicePort /t REG_SZ /d "1688"
+)
+if %winbuild% GEQ 9600 (
+%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_wApp%" /f
+%nul% reg delete "HKU\S-1-5-20\%SPPk%\%_oApp%" /f
+)
+%nul% reg add "HKLM\%OPPk%" /f /v KeyManagementServicePort /t REG_SZ /d "1688"
+%nul% reg delete "HKLM\%OPPk%\%_oA14%" /f
+%nul% reg delete "HKLM\%OPPk%\%_oApp%" /f
+
+::========================================================================================================================================
+
+:: Check WMI and sppsvc Errors
+
+set applist=
+net start sppsvc /y %nul%
+if %winbuild% LSS 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%_wApp%') get ID /VALUE" 2^>nul')"
+if %winbuild% GEQ 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%_wApp%''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')"
+%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a"))
+
+if not defined applist (
+set _tserror=1
+echo.
+echo Failed running WMI query check, verify that these services are working correctly
+echo Windows Management Instrumentation [WinMgmt], Software Protection [sppsvc]
+echo.
+echo Script will try to enable these services.
+for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\WinMgmt /v Start 2^>nul') do if /i %%b equ 0x4 (sc config WinMgmt start= auto %nul%)
+net start WinMgmt /y %nul%
+net stop sppsvc /y %nul%
+net start sppsvc /y %nul%
+)
+
+::========================================================================================================================================
+
+:: Check installed volume products activation ID's
+
+call :_taskgetids sppwid %slp% windows
+call :_taskgetids sppoid %slp% office
+call :_taskgetids osppid %ospp% office
+
+::========================================================================================================================================
+
+echo.
+echo Renewing KMS activation for all installed Volume products
+
+if not defined sppwid if not defined sppoid if not defined osppid (
+echo.
+echo No installed Volume Windows / Office product found
+echo.
+echo Renewing KMS server
+call :_taskgetserv
+call :_taskregserv
+goto :_skipact
+)
+
+::========================================================================================================================================
+
+:: Check KMS38 activation
+
+set gpr=0
+set _kms38=0
+if defined sppwid if %winbuild% GEQ 14393 (
+set _path=%slp%
+set _actid=%sppwid%
+call :_taskgetgrace
+)
+
+if %gpr% NEQ 0 if %gpr% GTR 259200 (
+set _kms38=1
+call :_taskchkEnterpriseG _kms38
+)
+
+:: Set specific KMS host to Local Host so that global KMS IP can not replace KMS38 activation but can be used with Office and other Windows Editions.
+
+if %_kms38% EQU 1 (
+%nul% reg add "HKLM\%SPPk%\%_wApp%\%sppwid%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2"
+%nul% reg add "HKLM\%SPPk%\%_wApp%\%sppwid%" /f /v KeyManagementServicePort /t REG_SZ /d "1688"
+)
+
+::========================================================================================================================================
+
+echo.
+if defined sppwid (
+set _path=%slp%
+set _actid=%sppwid%
+call :_actprod
+call :_act act_win
+call :_actinfo act_win
+) else (
+echo Checking: Volume version of Windows is not installed
+)
+
+if defined sppoid (
+set _path=%slp%
+for %%# in (%sppoid%) do (
+echo.
+set _actid=%%#
+call :_actprod
+call :_act
+call :_actinfo
+)
+)
+
+if defined osppid (
+set _path=%ospp%
+for %%# in (%osppid%) do (
+echo.
+set _actid=%%#
+call :_actprod
+call :_act
+call :_actinfo
+)
+)
+
+if not defined sppoid if not defined osppid (
+echo.
+echo Checking: Volume version of Office is not installed
+)
+
+:_skipact
+
+::========================================================================================================================================
+
+if defined run_once (
+echo.
+echo Deleting Scheduled Task Online_KMS_Activation_Script-Run_Once
+schtasks /delete /tn Online_KMS_Activation_Script-Run_Once /f %nul%
+)
+
+::========================================================================================================================================
+
+:_taskend
+
+echo.
+echo Exiting
+echo ______________________________________________________________________
+
+if defined _tserror (exit /b 123456789) else (exit /b 0)
+
+::========================================================================================================================================
+
+:_act
+
+set errorcode=12345
+set /a act_attempt=0
+
+:_act2
+
+if %act_attempt% GTR 4 exit /b
+
+if not [%act_ok%]==[1] (
+call :_taskgetserv
+call :_taskregserv
+)
+
+if not !server_num! GTR %max_servers% (
+
+if [%1]==[act_win] if %_kms38% EQU 1 (
+set act_ok=1
+exit /b
+)
+
+if %winbuild% LSS 22483 wmic path !_path! where ID='!_actid!' call Activate %nul%
+if %winbuild% GEQ 22483 %_psc% "try {$null=(([WMISEARCHER]'SELECT ID FROM !_path! where ID=''!_actid!''').Get()).Activate(); exit 0} catch { exit $_.Exception.InnerException.HResult }"
+
+call set errorcode=!errorlevel!
+
+if !errorcode! EQU 0 (
+set act_ok=1
+exit /b
+)
+if [%1]==[act_win] if !errorcode! EQU -1073418187 if %winbuild% LSS 9200 (
+set act_ok=1
+exit /b
+)
+
+set act_ok=0
+set /a act_attempt+=1
+goto _act2
+)
+exit /b
+
+:_actprod
+
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%x in ('"wmic path !_path! where ID='!_actid!' get Name /VALUE" 2^>nul') do call echo Activating: %%x
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%x in ('%_psc% "(([WMISEARCHER]'SELECT Name FROM !_path! WHERE ID=''!_actid!''').Get()).Name | %% {echo ('Name='+$_)}" 2^>nul') do call echo Activating: %%x
+exit /b
+
+::========================================================================================================================================
+
+:_actinfo
+
+if [%1]==[act_win] if %_kms38% EQU 1 (
+echo Windows is activated with KMS38
+exit /b
+)
+
+if %errorcode% EQU 12345 (
+echo Product Activation Failed
+echo Unable to test KMS servers due to restricted or no Internet
+set _tserror=1
+exit /b
+)
+
+if %errorcode% EQU -1073418187 (
+echo Product Activation Failed: 0xC004F035
+if [%1]==[act_win] if %winbuild% LSS 9200 echo Windows 7 cannot be KMS-activated on this computer due to unqualified OEM BIOS
+exit /b
+)
+
+if %errorcode% EQU -1073417728 (
+echo Product Activation Failed: 0xC004F200
+echo Windows needs to rebuild the activation-related files.
+echo See KB2736303 for details.
+set _tserror=1
+exit /b
+)
+
+set gpr=0
+set gpr2=0
+call :_taskgetgrace
+set /a "gpr2=(%gpr%+1440-1)/1440"
+
+if %errorcode% EQU 0 if %gpr% EQU 0 (
+echo Product Activation succeeded, but Remaining Period failed to increase.
+if [%1]==[act_win] if %winbuild% LSS 9200 echo This could be related to the error described in KB4487266
+set _tserror=1
+exit /b
+)
+
+set _actpass=1
+if %gpr% EQU 43200 if [%1]==[act_win] if %winbuild% GEQ 9200 set _actpass=0
+if %gpr% EQU 64800 set _actpass=0
+if %gpr% GTR 259200 if [%1]==[act_win] call :_taskchkEnterpriseG _actpass
+if %gpr% EQU 259200 set _actpass=0
+
+if %errorcode% EQU 0 if %_actpass% EQU 0 (
+echo Product Activation Successful
+echo Remaining Period: %gpr2% days ^(%gpr% minutes^)
+exit /b
+)
+
+cmd /c exit /b %errorcode%
+if %errorcode% NEQ 0 (
+echo Product Activation Failed: 0x!=ExitCode!
+) else (
+echo Product Activation Failed
+)
+echo Remaining Period: %gpr2% days ^(%gpr% minutes^)
+set _tserror=1
+exit /b
+
+::========================================================================================================================================
+
+:_taskgetids
+
+set %1=
+if %winbuild% LSS 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %2 where (Name like '%%%3%%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get ID /VALUE" 2^>nul')"
+if %winbuild% GEQ 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %2 WHERE Name like ''%%%3%%'' and Description like ''%%KMSCLIENT%%'' and PartialProductKey is not NULL').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')"
+%chkapp% do (if defined %1 (call set "%1=!%1! %%a") else (call set "%1=%%a"))
+exit /b
+
+:_taskgetgrace
+
+set gpr=0
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%# in ('"wmic path !_path! where ID='!_actid!' get GracePeriodRemaining /VALUE" 2^>nul') do call set "gpr=%%#"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%# in ('%_psc% "(([WMISEARCHER]'SELECT GracePeriodRemaining FROM !_path! where ID=''!_actid!''').Get()).GracePeriodRemaining | %% {echo ('GracePeriodRemaining='+$_)}" 2^>nul') do call set "gpr=%%#"
+exit /b
+
+:_taskchkEnterpriseG
+
+for %%# in (e0b2d383-d112-413f-8a80-97f373a5820c e38454fb-41a4-4f59-a5dc-25080e354730) do (if %sppwid%==%%# set %1=0)
+exit /b
+
+::========================================================================================================================================
+
+:_taskregserv
+
+%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%"
+%nul% reg add "HKLM\%OPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%"
+
+:: Thanks to @dialmak for Office non-genuine banner solution
+:: forum.ru-board.com/topic.cgi?forum=35&topic=81283&start=6080#19
+
+if %winbuild% GEQ 9200 (
+%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%"
+if defined notx86 (
+%nul% reg add "HKLM\%SPPk%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32
+%nul% reg add "HKLM\%SPPk%\%_oApp%" /f /v KeyManagementServiceName /t REG_SZ /d "%KMS_IP%" /reg:32
+)
+)
+exit /b
+
+::========================================================================================================================================
+
+:_tasksetserv
+
+:: Multi KMS servers integration and servers randomization
+
+set srvlist=
+set -=
+
+set "srvlist=kms.kure%-%tru.com xincheng213%-%618.cn kms.six%-%yin.com kms.moec%-%lub.org kms.cgts%-%oft.com"
+set "srvlist=%srvlist% kms.hen%-%g07.com kms.moey%-%uuko.com kms.lol%-%i.best kms.zhuxi%-%aole.org kms.ca%-%tqu.com"
+set "srvlist=%srvlist% kms.lol%-%i.beer kms.ca%-%ry.tech kms.wx%-%lost.com kms.moeyu%-%uko.top kms.ghp%-%ym.com"
+
+set n=1
+for %%a in (%srvlist%) do (set %%a=&set server!n!=%%a&set /a n+=1)
+set max_servers=15
+set /a server_num=0
+exit /b
+
+:_taskgetserv
+
+if %server_num% geq %max_servers% (set /a server_num+=1&set KMS_IP=222.184.9.98&exit /b)
+set /a rand=%Random%%%(15+1-1)+1
+if defined !server%rand%! goto :_taskgetserv
+set KMS_IP=!server%rand%!
+set !server%rand%!=1
+
+:: Get IPv4 address of KMS server to use for the activation, works even if ICMP echo is disabled.
+:: Microsoft and Antivirus's may flag the issue if public KMS server host name is directly used for the activation.
+
+set /a server_num+=1
+(for /f "delims=[] tokens=2" %%a in ('ping -4 -n 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%a"
+if [%KMS_IP%]==[!KMS_IP!] for /f "delims=[] tokens=2" %%# in ('pathping -4 -h 1 -n -p 1 -q 1 -w 1 %KMS_IP% 2^>nul') do set "KMS_IP=%%#"
+if not [%KMS_IP%]==[!KMS_IP!] exit /b
+goto :_taskgetserv
+)
+
+:: Ver:1.5
+::========================================================================================================================================
+:_extracttask:
+
+:======================================================================================================================================================
+
+:_Check_Status_wmi
+<!-- : Begin batch script
+
+@setlocal DisableDelayedExpansion
+@echo off
+@cls
+mode con cols=100 lines=32
+>nul 2>&1 powershell "&{$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=31;$B.Height=300;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}"
+title Check Activation Status [wmi]
+
+:: change to 1 to use VBScript instead wmic.exe to access WMI
+:: this option is automatically enabled for Windows 11 build 22483 and later
+set WMI_VBS=0
+
+set "_cmdf=%~f0"
+if exist "%SystemRoot%\Sysnative\cmd.exe" (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" "
+exit /b
+)
+if exist "%SystemRoot%\SysArm32\cmd.exe" if /i %PROCESSOR_ARCHITECTURE%==AMD64 (
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" "
+exit /b
+)
+color 07
+title Check Activation Status [wmi]
+set wspp=SoftwareLicensingProduct
+set wsps=SoftwareLicensingService
+set ospp=OfficeSoftwareProtectionProduct
+set osps=OfficeSoftwareProtectionService
+set winApp=55c92734-d682-4d71-983e-d6ec3f16059f
+set o14App=59a52881-a989-479d-af46-f275c6370663
+set o15App=0ff1ce15-a989-479d-af46-f275c6370663
+for %%# in (spp_get,ospp_get,cW1nd0ws,sppw,c0ff1ce15,sppo,osppsvc,ospp14,ospp15) do set "%%#="
+for /f "tokens=6 delims=[]. " %%# in ('ver') do set winbuild=%%#
+set "spp_get=Description, DiscoveredKeyManagementServiceMachineName, DiscoveredKeyManagementServiceMachinePort, EvaluationEndDate, GracePeriodRemaining, ID, KeyManagementServiceMachine, KeyManagementServicePort, KeyManagementServiceProductKeyID, LicenseStatus, LicenseStatusReason, Name, PartialProductKey, ProductKeyID, VLActivationInterval, VLRenewalInterval"
+set "ospp_get=%spp_get%"
+if %winbuild% GEQ 9200 set "spp_get=%spp_get%, KeyManagementServiceLookupDomain, VLActivationTypeEnabled"
+if %winbuild% GEQ 9600 set "spp_get=%spp_get%, DiscoveredKeyManagementServiceMachineIpAddress, ProductKeyChannel"
+set "_work=%~dp0"
+set "_batf=%~f0"
+set "_batp=%_batf:'=''%"
+set "_Local=%LocalAppData%"
+set _Identity=0
+setlocal EnableDelayedExpansion
+dir /b /s /a:-d "!_Local!\Microsoft\Office\Licenses\*1*" 1>nul 2>nul && set _Identity=1
+dir /b /s /a:-d "!ProgramData!\Microsoft\Office\Licenses\*1*" 1>nul 2>nul && set _Identity=1
+pushd "!_work!"
+setlocal DisableDelayedExpansion
+if %winbuild% LSS 9200 if not exist "%SystemRoot%\servicing\Packages\Microsoft-Windows-PowerShell-WTR-Package~*.mum" set _Identity=0
+set _pwrsh=1
+if not exist "%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe" set _pwrsh=0
+set "_csg=cscript.exe //NoLogo //Job:WmiMulti "%~nx0?.wsf""
+set "_csq=cscript.exe //NoLogo //Job:WmiQuery "%~nx0?.wsf""
+set "_csx=cscript.exe //NoLogo //Job:XPDT "%~nx0?.wsf""
+if %winbuild% GEQ 22483 set WMI_VBS=1
+if %WMI_VBS% EQU 0 (
+set "_zz1=wmic path"
+set "_zz2=where"
+set "_zz3=get"
+set "_zz4=/value"
+set "_zz5=("
+set "_zz6=)"
+set "_zz7="wmic path"
+set "_zz8=/value""
+) else (
+set "_zz1=%_csq%"
+set "_zz2="
+set "_zz3="
+set "_zz4="
+set "_zz5=""
+set "_zz6=""
+set "_zz7=%_csq%"
+set "_zz8="
+)
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+set "line2=************************************************************"
+set "line3=____________________________________________________________"
+
+set _WSH=1
+reg query "HKCU\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0)
+reg query HKU\S-1-5-19 1>nul 2>nul && (
+reg query "HKLM\SOFTWARE\Microsoft\Windows Script Host\Settings" /v Enabled 2>nul | find /i "0x0" 1>nul && (set _WSH=0)
+)
+if %_WSH% EQU 0 if %WMI_VBS% NEQ 0 goto :E_VBS
+
+set OsppHook=1
+sc query osppsvc >nul 2>&1
+if %errorlevel% EQU 1060 set OsppHook=0
+
+net start sppsvc /y >nul 2>&1
+call :casWpkey %wspp% %winApp% cW1nd0ws sppw
+if %winbuild% GEQ 9200 call :casWpkey %wspp% %o15App% c0ff1ce15 sppo
+if %OsppHook% NEQ 0 (
+net start osppsvc /y >nul 2>&1
+call :casWpkey %ospp% %o14App% osppsvc ospp14
+if %winbuild% LSS 9200 call :casWpkey %ospp% %o15App% osppsvc ospp15
+)
+
+echo %line2%
+echo *** Windows Status ***
+echo %line2%
+if not defined cW1nd0ws (
+echo.
+echo Error: product key not found.
+goto :casWcon
+)
+set winID=1
+set "_qr=%_zz7% %wspp% %_zz2% %_zz5%ApplicationID='%winApp%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%wspp%" "%wsps%" "%spp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+
+:casWcon
+set winID=0
+set verbose=1
+if not defined c0ff1ce15 (
+if defined osppsvc goto :casWospp
+goto :casWend
+)
+echo %line2%
+echo *** Office Status ***
+echo %line2%
+set "_qr=%_zz7% %wspp% %_zz2% %_zz5%ApplicationID='%o15App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%wspp%" "%wsps%" "%spp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+set verbose=0
+if defined osppsvc goto :casWospp
+goto :casWend
+
+:casWospp
+if %verbose% EQU 1 (
+echo %line2%
+echo *** Office Status ***
+echo %line2%
+)
+set "_qr=%_zz7% %ospp% %_zz2% %_zz5%ApplicationID='%o15App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+if defined ospp15 for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%ospp%" "%osps%" "%ospp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+set "_qr=%_zz7% %ospp% %_zz2% %_zz5%ApplicationID='%o14App%' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz8%"
+if defined ospp14 for /f "tokens=2 delims==" %%# in ('%_qr%') do (
+ set "chkID=%%#"
+ call :casWdet "%ospp%" "%osps%" "%ospp_get%"
+ call :casWout
+ echo %line3%
+ echo.
+)
+goto :casWend
+
+:casWpkey
+set "_qr=%_zz1% %1 %_zz2% %_zz5%ApplicationID='%2' and PartialProductKey is not null%_zz6% %_zz3% ID %_zz4%"
+%_qr% 2>nul | findstr /i ID 1>nul && (set %3=1&set %4=1)
+exit /b
+
+:casWdet
+for %%# in (%~3) do set "%%#="
+if /i %~1==%ospp% for %%# in (DiscoveredKeyManagementServiceMachineIpAddress, KeyManagementServiceLookupDomain, ProductKeyChannel, VLActivationTypeEnabled) do set "%%#="
+set "cKmsClient="
+set "cTblClient="
+set "cAvmClient="
+set "ExpireMsg="
+set "_xpr="
+set "_qr="wmic path %~1 where ID='%chkID%' get %~3 /value" ^| findstr ^="
+if %WMI_VBS% NEQ 0 set "_qr=%_csg% %~1 "ID='%chkID%'" "%~3""
+for /f "tokens=* delims=" %%# in ('%_qr%') do set "%%#"
+
+set /a _gpr=(GracePeriodRemaining+1440-1)/1440
+echo %Description%| findstr /i VOLUME_KMSCLIENT 1>nul && (set cKmsClient=1&set _mTag=Volume)
+echo %Description%| findstr /i TIMEBASED_ 1>nul && (set cTblClient=1&set _mTag=Timebased)
+echo %Description%| findstr /i VIRTUAL_MACHINE_ACTIVATION 1>nul && (set cAvmClient=1&set _mTag=Automatic VM)
+cmd /c exit /b %LicenseStatusReason%
+set "LicenseReason=%=ExitCode%"
+set "LicenseMsg=Time remaining: %GracePeriodRemaining% minute(s) (%_gpr% day(s))"
+if %_gpr% GEQ 1 if %_WSH% EQU 1 (
+for /f "tokens=* delims=" %%# in ('%_csx% %GracePeriodRemaining%') do set "_xpr=%%#"
+)
+if %_gpr% GEQ 1 if %_pwrsh% EQU 1 if not defined _xpr (
+for /f "tokens=* delims=" %%# in ('powershell "$([DateTime]::Now.addMinutes(%GracePeriodRemaining%)).ToString('yyyy-MM-dd HH:mm:ss')" 2^>nul') do set "_xpr=%%#"
+title Check Activation Status [wmi]
+)
+
+if %LicenseStatus% EQU 0 (
+set "License=Unlicensed"
+set "LicenseMsg="
+)
+if %LicenseStatus% EQU 1 (
+set "License=Licensed"
+set "LicenseMsg="
+if %GracePeriodRemaining% EQU 0 (
+ if %winID% EQU 1 (set "ExpireMsg=The machine is permanently activated.") else (set "ExpireMsg=The product is permanently activated.")
+ ) else (
+ set "LicenseMsg=%_mTag% activation expiration: %GracePeriodRemaining% minute(s) (%_gpr% day(s))"
+ if defined _xpr set "ExpireMsg=%_mTag% activation will expire %_xpr%"
+ )
+)
+if %LicenseStatus% EQU 2 (
+set "License=Initial grace period"
+if defined _xpr set "ExpireMsg=Initial grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 3 (
+set "License=Additional grace period (KMS license expired or hardware out of tolerance)"
+if defined _xpr set "ExpireMsg=Additional grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 4 (
+set "License=Non-genuine grace period."
+if defined _xpr set "ExpireMsg=Non-genuine grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 6 (
+set "License=Extended grace period"
+if defined _xpr set "ExpireMsg=Extended grace period ends %_xpr%"
+)
+if %LicenseStatus% EQU 5 (
+set "License=Notification"
+ if "%LicenseReason%"=="C004F200" (set "LicenseMsg=Notification Reason: 0xC004F200 (non-genuine)."
+ ) else if "%LicenseReason%"=="C004F009" (set "LicenseMsg=Notification Reason: 0xC004F009 (grace time expired)."
+ ) else (set "LicenseMsg=Notification Reason: 0x%LicenseReason%"
+ )
+)
+if %LicenseStatus% GTR 6 (
+set "License=Unknown"
+set "LicenseMsg="
+)
+if not defined cKmsClient exit /b
+
+if %KeyManagementServicePort%==0 set KeyManagementServicePort=1688
+set "KmsReg=Registered KMS machine name: %KeyManagementServiceMachine%:%KeyManagementServicePort%"
+if "%KeyManagementServiceMachine%"=="" set "KmsReg=Registered KMS machine name: KMS name not available"
+
+if %DiscoveredKeyManagementServiceMachinePort%==0 set DiscoveredKeyManagementServiceMachinePort=1688
+set "KmsDns=KMS machine name from DNS: %DiscoveredKeyManagementServiceMachineName%:%DiscoveredKeyManagementServiceMachinePort%"
+if "%DiscoveredKeyManagementServiceMachineName%"=="" set "KmsDns=DNS auto-discovery: KMS name not available"
+
+set "_qr="wmic path %~2 get ClientMachineID, KeyManagementServiceHostCaching /value" ^| findstr ^="
+if %WMI_VBS% NEQ 0 set "_qr=%_csg% %~2 "ClientMachineID, KeyManagementServiceHostCaching""
+for /f "tokens=* delims=" %%# in ('%_qr%') do set "%%#"
+if /i %KeyManagementServiceHostCaching%==True (set KeyManagementServiceHostCaching=Enabled) else (set KeyManagementServiceHostCaching=Disabled)
+
+if %winbuild% LSS 9200 exit /b
+if /i %~1==%ospp% exit /b
+
+if "%KeyManagementServiceLookupDomain%"=="" set "KeyManagementServiceLookupDomain="
+
+if %VLActivationTypeEnabled% EQU 3 (
+set VLActivationType=Token
+) else if %VLActivationTypeEnabled% EQU 2 (
+set VLActivationType=KMS
+) else if %VLActivationTypeEnabled% EQU 1 (
+set VLActivationType=AD
+) else (
+set VLActivationType=All
+)
+
+if %winbuild% LSS 9600 exit /b
+if "%DiscoveredKeyManagementServiceMachineIpAddress%"=="" set "DiscoveredKeyManagementServiceMachineIpAddress=not available"
+exit /b
+
+:casWout
+echo.
+echo Name: %Name%
+echo Description: %Description%
+echo Activation ID: %ID%
+echo Extended PID: %ProductKeyID%
+if defined ProductKeyChannel echo Product Key Channel: %ProductKeyChannel%
+echo Partial Product Key: %PartialProductKey%
+echo License Status: %License%
+if defined LicenseMsg echo %LicenseMsg%
+if not %LicenseStatus%==0 if not %EvaluationEndDate:~0,8%==16010101 echo Evaluation End Date: %EvaluationEndDate:~0,4%-%EvaluationEndDate:~4,2%-%EvaluationEndDate:~6,2% %EvaluationEndDate:~8,2%:%EvaluationEndDate:~10,2% UTC
+if not defined cKmsClient (
+if defined ExpireMsg echo.&echo. %ExpireMsg%
+exit /b
+)
+if defined VLActivationTypeEnabled echo Configured Activation Type: %VLActivationType%
+echo.
+if not %LicenseStatus%==1 (
+echo Please activate the product in order to update KMS client information values.
+exit /b
+)
+echo Most recent activation information:
+echo Key Management Service client information
+echo. Client Machine ID (CMID): %ClientMachineID%
+echo. %KmsDns%
+echo. %KmsReg%
+if defined DiscoveredKeyManagementServiceMachineIpAddress echo. KMS machine IP address: %DiscoveredKeyManagementServiceMachineIpAddress%
+echo. KMS machine extended PID: %KeyManagementServiceProductKeyID%
+echo. Activation interval: %VLActivationInterval% minutes
+echo. Renewal interval: %VLRenewalInterval% minutes
+echo. KMS host caching: %KeyManagementServiceHostCaching%
+if defined KeyManagementServiceLookupDomain echo. KMS SRV record lookup domain: %KeyManagementServiceLookupDomain%
+if defined ExpireMsg echo.&echo. %ExpireMsg%
+exit /b
+
+:casWend
+if %_Identity% EQU 1 if %_pwrsh% EQU 1 (
+echo %line2%
+echo *** Office vNext Status ***
+echo %line2%
+setlocal EnableDelayedExpansion
+powershell "$f=[IO.File]::ReadAllText('!_batp!') -split ':vNextDiag\:.*';iex ($f[1])"
+title Check Activation Status [wmi]
+echo %line3%
+echo.
+)
+echo.
+echo Press any key to go back...
+pause >nul
+exit /b
+
+:E_VBS
+echo ==== ERROR ====
+echo Windows Script Host is disabled.
+echo It is required for this script to work.
+echo.
+echo Press any key to go back...
+pause >nul
+exit /b
+
+:vNextDiag:
+function PrintModePerPridFromRegistry
+{
+ $vNextRegkey = "HKCU:\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext"
+ $vNextPrids = Get-Item -Path $vNextRegkey -ErrorAction Ignore | Select-Object -ExpandProperty 'property' | Where-Object -FilterScript {$_ -Ne 'InstalledGraceKey' -And $_ -Ne 'MigrationToV5Done' -And $_ -Ne 'test' -And $_ -Ne 'unknown'}
+ If ($vNextPrids -Eq $null)
+ {
+ Write-Host "No registry keys found."
+ Return
+ }
+ $vNextPrids | ForEach `
+ {
+ $mode = (Get-ItemProperty -Path $vNextRegkey -Name $_).$_
+ Switch ($mode)
+ {
+ 2 { $mode = "vNext"; Break }
+ 3 { $mode = "Device"; Break }
+ Default { $mode = "Legacy"; Break }
+ }
+ Write-Host $_ = $mode
+ }
+}
+function PrintSharedComputerLicensing
+{
+ $scaRegKey = "HKLM:\SOFTWARE\Microsoft\Office\ClickToRun\Configuration"
+ $scaValue = Get-ItemProperty -Path $scaRegKey -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore
+ $scaRegKey2 = "HKLM:\SOFTWARE\Microsoft\Office\16.0\Common\Licensing"
+ $scaValue2 = Get-ItemProperty -Path $scaRegKey2 -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore
+ $scaPolicyKey = "HKLM:\SOFTWARE\Policies\Microsoft\Office\16.0\Common\Licensing"
+ $scaPolicyValue = Get-ItemProperty -Path $scaPolicyKey -ErrorAction Ignore | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction Ignore
+ If ($scaValue -Eq $null -And $scaValue2 -Eq $null -And $scaPolicyValue -Eq $null)
+ {
+ Write-Host "No registry keys found."
+ Return
+ }
+ $scaModeValue = $scaValue -Or $scaValue2 -Or $scaPolicyValue
+ If ($scaModeValue -Eq 0)
+ {
+ $scaMode = "Disabled"
+ }
+ If ($scaModeValue -Eq 1)
+ {
+ $scaMode = "Enabled"
+ }
+ Write-Host "SharedComputerLicensing" = $scaMode
+ Write-Host
+ $tokenFiles = $null
+ $tokenPath = "${env:LOCALAPPDATA}\Microsoft\Office\16.0\Licensing"
+ If (Test-Path $tokenPath)
+ {
+ $tokenFiles = Get-ChildItem -Path $tokenPath -Recurse -File -Filter "*authString*"
+ }
+ If ($tokenFiles.length -Eq 0)
+ {
+ Write-Host "No tokens found."
+ Return
+ }
+ $tokenFiles | ForEach `
+ {
+ $tokenParts = (Get-Content -Encoding Unicode -Path $_.FullName).Split('_')
+ $output = [PSCustomObject] `
+ @{
+ ACID = $tokenParts[0];
+ User = $tokenParts[3]
+ NotBefore = $tokenParts[4];
+ NotAfter = $tokenParts[5];
+ } | ConvertTo-Json
+ Write-Host $output
+ }
+}
+function PrintLicensesInformation
+{
+ Param(
+ [ValidateSet("NUL", "Device")]
+ [String]$mode
+ )
+ If ($mode -Eq "NUL")
+ {
+ $licensePath = "${env:LOCALAPPDATA}\Microsoft\Office\Licenses"
+ }
+ ElseIf ($mode -Eq "Device")
+ {
+ $licensePath = "${env:PROGRAMDATA}\Microsoft\Office\Licenses"
+ }
+ $licenseFiles = $null
+ If (Test-Path $licensePath)
+ {
+ $licenseFiles = Get-ChildItem -Path $licensePath -Recurse -File
+ }
+ If ($licenseFiles.length -Eq 0)
+ {
+ Write-Host "No licenses found."
+ Return
+ }
+ $licenseFiles | ForEach `
+ {
+ $license = (Get-Content -Encoding Unicode $_.FullName | ConvertFrom-Json).License
+ $decodedLicense = [System.Text.Encoding]::UTF8.GetString([System.Convert]::FromBase64String($license)) | ConvertFrom-Json
+ $licenseType = $decodedLicense.LicenseType
+ $userId = $decodedLicense.Metadata.UserId
+ $identitiesRegkey = Get-ItemProperty -Path "HKCU:\SOFTWARE\Microsoft\Office\16.0\Common\Identity\Identities\${userId}*" -ErrorAction Ignore
+ $licenseState = $null
+ If ((Get-Date) -Gt (Get-Date $decodedLicense.MetaData.NotAfter))
+ {
+ $licenseState = "RFM"
+ }
+ ElseIf (($decodedLicense.ExpiresOn -Eq $null) -Or
+ ((Get-Date) -Lt (Get-Date $decodedLicense.ExpiresOn)))
+ {
+ $licenseState = "Licensed"
+ }
+ Else
+ {
+ $licenseState = "Grace"
+ }
+ if ($mode -Eq "NUL")
+ {
+ $output = [PSCustomObject] `
+ @{
+ Version = $_.Directory.Name
+ Type = "User|${licenseType}";
+ Product = $decodedLicense.ProductReleaseId;
+ Acid = $decodedLicense.Acid;
+ LicenseState = $licenseState;
+ EntitlementStatus = $decodedLicense.Status;
+ ReasonCode = $decodedLicense.ReasonCode;
+ NotBefore = $decodedLicense.Metadata.NotBefore;
+ NotAfter = $decodedLicense.Metadata.NotAfter;
+ NextRenewal = $decodedLicense.Metadata.RenewAfter;
+ Expiration = $decodedLicense.ExpiresOn;
+ TenantId = $decodedLicense.Metadata.TenantId;
+ } | ConvertTo-Json
+ }
+ ElseIf ($mode -Eq "Device")
+ {
+ $output = [PSCustomObject] `
+ @{
+ Version = $_.Directory.Name
+ Type = "Device|${licenseType}";
+ Product = $decodedLicense.ProductReleaseId;
+ Acid = $decodedLicense.Acid;
+ DeviceId = $decodedLicense.Metadata.DeviceId;
+ LicenseState = $licenseState;
+ EntitlementStatus = $decodedLicense.Status;
+ ReasonCode = $decodedLicense.ReasonCode;
+ NotBefore = $decodedLicense.Metadata.NotBefore;
+ NotAfter = $decodedLicense.Metadata.NotAfter;
+ NextRenewal = $decodedLicense.Metadata.RenewAfter;
+ Expiration = $decodedLicense.ExpiresOn;
+ TenantId = $decodedLicense.Metadata.TenantId;
+ } | ConvertTo-Json
+ }
+ Write-Output $output
+ }
+}
+ Write-Host
+ Write-Host "========== Mode per ProductReleaseId =========="
+ Write-Host
+PrintModePerPridFromRegistry
+ Write-Host
+ Write-Host "========== Shared Computer Licensing =========="
+ Write-Host
+PrintSharedComputerLicensing
+ Write-Host
+ Write-Host "========== vNext licenses =========="
+ Write-Host
+PrintLicensesInformation -Mode "NUL"
+ Write-Host
+ Write-Host "========== Device licenses =========="
+ Write-Host
+PrintLicensesInformation -Mode "Device"
+:vNextDiag:
+
+:======================================================================================================================================================
+
+:_Check_Status_vbs
+
+setlocal DisableDelayedExpansion
+mode con cols=100 lines=32
+>nul 2>&1 powershell "&{$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=31;$B.Height=300;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}"
+title Check Activation Status [vbs]
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+set "_bit=64"
+set "_wow=1"
+if /i "%PROCESSOR_ARCHITECTURE%"=="x86" if "%PROCESSOR_ARCHITEW6432%"=="" set "_wow=0"&set "_bit=32"
+set "_utemp=%TEMP%"
+set "line2=************************************************************"
+set "line3=____________________________________________________________"
+set _sO16vbs=0
+set _sO15vbs=0
+if exist "%ProgramFiles%\Microsoft Office\Office15\ospp.vbs" (
+ set _sO15vbs=1
+) else if exist "%ProgramW6432%\Microsoft Office\Office15\ospp.vbs" (
+ set _sO15vbs=1
+) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\ospp.vbs" (
+ set _sO15vbs=1
+)
+setlocal EnableDelayedExpansion
+echo %line2%
+echo *** Windows Status ***
+echo %line2%
+pushd "!_utemp!"
+copy /y %SystemRoot%\System32\slmgr.vbs . >nul 2>&1
+net start sppsvc /y >nul 2>&1
+cscript //nologo slmgr.vbs /dli || (echo Error executing slmgr.vbs&del /f /q slmgr.vbs&popd&goto :casVend)
+cscript //nologo slmgr.vbs /xpr
+del /f /q slmgr.vbs >nul 2>&1
+popd
+echo %line3%
+
+:casVo16
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016 %_bit%-bit Status ***
+) else (
+echo *** Office 2013/2016 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVo13
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016 32-bit Status ***
+) else (
+echo *** Office 2013/2016 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVo13
+if %_sO16vbs% EQU 1 goto :casVo10
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2013 %_bit%-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVo10
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\15.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2013 32-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVo10
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2010 %_bit%-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVc16
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot /v Path" 2^>nul') do (set "office=%%b")
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2010 32-bit Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVc16
+reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath >nul 2>&1 || (
+reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath >nul 2>&1 || goto :casVc13
+)
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do (set "office=%%b\Office16")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016-2021 C2R Status ***
+) else (
+echo *** Office 2013-2021 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+if %_wow%==0 goto :casVc13
+set office=
+for /f "skip=2 tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do (set "office=%%b\Office16")
+if exist "!office!\ospp.vbs" (
+set _sO16vbs=1
+echo.
+echo %line2%
+if %_sO15vbs% EQU 0 (
+echo *** Office 2016-2021 C2R Status ***
+) else (
+echo *** Office 2013-2021 Status ***
+)
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVc13
+if %_sO16vbs% EQU 1 goto :casVc10
+reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath >nul 2>&1 || (
+reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\ClickToRun /v InstallPath >nul 2>&1 || goto :casVc10
+)
+set office=
+if exist "%ProgramFiles%\Microsoft Office\Office15\ospp.vbs" (
+ set "office=%ProgramFiles%\Microsoft Office\Office15"
+) else if exist "%ProgramW6432%\Microsoft Office\Office15\ospp.vbs" (
+ set "office=%ProgramW6432%\Microsoft Office\Office15"
+) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office15\ospp.vbs" (
+ set "office=%ProgramFiles(x86)%\Microsoft Office\Office15"
+)
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2013 C2R Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVc10
+if %_wow%==0 reg query HKLM\SOFTWARE\Microsoft\Office\14.0\CVH /f Click2run /k >nul 2>&1 || goto :casVend
+if %_wow%==1 reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\CVH /f Click2run /k >nul 2>&1 || goto :casVend
+set office=
+if exist "%ProgramFiles%\Microsoft Office\Office14\ospp.vbs" (
+ set "office=%ProgramFiles%\Microsoft Office\Office14"
+) else if exist "%ProgramW6432%\Microsoft Office\Office14\ospp.vbs" (
+ set "office=%ProgramW6432%\Microsoft Office\Office14"
+) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office14\ospp.vbs" (
+ set "office=%ProgramFiles(x86)%\Microsoft Office\Office14"
+)
+if exist "!office!\ospp.vbs" (
+echo.
+echo %line2%
+echo *** Office 2010 C2R Status ***
+echo %line2%
+cscript //nologo "!office!\ospp.vbs" /dstatus
+)
+
+:casVend
+echo.
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+exit /b
+
+:======================================================================================================================================================
+
+:_color
+
+if %_NCS% EQU 1 (
+if defined _unattended (echo %~2) else (echo %esc%[%~1%~2%esc%[0m)
+) else (
+if defined _unattended (echo %~2) else (call :batcol %~1 "%~2")
+)
+exit /b
+
+:_color2
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m
+) else (
+call :batcol %~1 "%~2" %~3 "%~4"
+)
+exit /b
+
+::=======================================
+
+:: Colored text with pure batch method
+:: Thanks to @dbenham and @jeb
+:: stackoverflow.com/a/10407642
+
+:batcol
+
+pushd %_coltemp%
+if not exist "'" (<nul >"'" set /p "=.")
+setlocal
+set "s=%~2"
+set "t=%~4"
+call :_batcol %1 s %3 t
+del /f /q "'"
+del /f /q "`.txt"
+popd
+exit /b
+
+:_batcol
+
+setlocal EnableDelayedExpansion
+set "s=!%~2!"
+set "t=!%~4!"
+for /f delims^=^ eol^= %%i in ("!s!") do (
+ if "!" equ "" setlocal DisableDelayedExpansion
+ >`.txt (echo %%i\..\')
+ findstr /a:%~1 /f:`.txt "."
+ <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%"
+)
+if "%~4"=="" echo(&exit /b
+setlocal EnableDelayedExpansion
+for /f delims^=^ eol^= %%i in ("!t!") do (
+ if "!" equ "" setlocal DisableDelayedExpansion
+ >`.txt (echo %%i\..\')
+ findstr /a:%~3 /f:`.txt "."
+ <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%"
+)
+echo(
+exit /b
+
+::=======================================
+
+:_colorprep
+
+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 "Black="30m""
+set "Green="42;97m""
+set "Blue="44;97m""
+set "Yellow="43;97m""
+set "Magenta="45;97m""
+
+set "_Red="40;91m""
+set "_Green="40;92m""
+set "_Blue="40;94m""
+set "_White="40;37m""
+set "_Yellow="40;93m""
+
+exit /b
+)
+
+for /f %%A in ('"prompt $H&for %%B in (1) do rem"') do set "_BS=%%A %%A"
+set "_coltemp=%SystemRoot%\Temp"
+
+set "Red="CF""
+set "Gray="8F""
+set "Black="00""
+set "Green="2F""
+set "Blue="1F""
+set "Yellow="6F""
+set "Magenta="5F""
+
+set "_Red="0C""
+set "_Green="0A""
+set "_Blue="09""
+set "_White="07""
+set "_Yellow="0E""
+
+exit /b
+
+::========================================================================================================================================
+
+----- Begin wsf script --->
+<package>
+ <job id="WmiQuery">
+ <script language="VBScript">
+ If WScript.Arguments.Count = 3 Then
+ wExc = "Select " & WScript.Arguments.Item(2) & " from " & WScript.Arguments.Item(0) & " where " & WScript.Arguments.Item(1)
+ wGet = WScript.Arguments.Item(2)
+ Else
+ wExc = "Select " & WScript.Arguments.Item(1) & " from " & WScript.Arguments.Item(0)
+ wGet = WScript.Arguments.Item(1)
+ End If
+ Set objCol = GetObject("winmgmts:\\.\root\CIMV2").ExecQuery(wExc,,48)
+ For Each objItm in objCol
+ For each Prop in objItm.Properties_
+ If LCase(Prop.Name) = LCase(wGet) Then
+ WScript.Echo Prop.Name & "=" & Prop.Value
+ Exit For
+ End If
+ Next
+ Next
+ </script>
+ </job>
+ <job id="WmiMethod">
+ <script language="VBScript">
+ On Error Resume Next
+ wPath = WScript.Arguments.Item(0)
+ wMethod = WScript.Arguments.Item(1)
+ Set objCol = GetObject("winmgmts:\\.\root\CIMV2:" & wPath)
+ objCol.ExecMethod_(wMethod)
+ WScript.Quit Err.Number
+ </script>
+ </job>
+ <job id="WmiPKey">
+ <script language="VBScript">
+ On Error Resume Next
+ wExc = "SELECT Version FROM " & WScript.Arguments.Item(0)
+ wKey = WScript.Arguments.Item(1)
+ Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2").ExecQuery(wExc,,48)
+ For each colService in objWMIService
+ Exit For
+ Next
+ set objService = colService
+ objService.InstallProductKey(wKey)
+ WScript.Quit Err.Number
+ </script>
+ </job>
+ <job id="XPDT">
+ <script language="VBScript">
+ WScript.Echo DateAdd("n", WScript.Arguments.Item(0), Now)
+ </script>
+ </job>
+ <job id="WmiMulti">
+ <script language="VBScript">
+ If WScript.Arguments.Count = 3 Then
+ wExc = "Select " & WScript.Arguments.Item(2) & " from " & WScript.Arguments.Item(0) & " where " & WScript.Arguments.Item(1)
+ Else
+ wExc = "Select " & WScript.Arguments.Item(1) & " from " & WScript.Arguments.Item(0)
+ End If
+ Set objCol = GetObject("winmgmts:\\.\root\CIMV2").ExecQuery(wExc,,48)
+ For Each objItm in objCol
+ For each Prop in objItm.Properties_
+ WScript.Echo Prop.Name & "=" & Prop.Value
+ Next
+ Next
+ </script>
+ </job>
+</package>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/BIN/_Info.html b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/BIN/_Info.html new file mode 100644 index 0000000..5e0f421 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/BIN/_Info.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-online-kms-files.html">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx64.exe b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/BIN/cleanosppx64.exe Binary files differindex ad19905..ad19905 100644 --- a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx64.exe +++ b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/BIN/cleanosppx64.exe diff --git a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx86.exe b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/BIN/cleanosppx86.exe Binary files differindex 248bf4a..248bf4a 100644 --- a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx86.exe +++ b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/BIN/cleanosppx86.exe diff --git a/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/ReadMe.html b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/ReadMe.html new file mode 100644 index 0000000..8dbde63 --- /dev/null +++ b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation/ReadMe.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-online-kms.html">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Change_Edition.cmd b/MAS/Separate-Files-Version/Change_Edition.cmd deleted file mode 100644 index 34fc6c4..0000000 --- a/MAS/Separate-Files-Version/Change_Edition.cmd +++ /dev/null @@ -1,726 +0,0 @@ -@setlocal DisableDelayedExpansion -@echo off - - - -::============================================================================ -:: -:: This script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::============================================================================ - - - - -::======================================================================================================================================== - -:: 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 - -set "_cmdf=%~f0" -for %%# in (%*) do ( -if /i "%%#"=="r1" set r1=1 -if /i "%%#"=="r2" set r2=1 -) - -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 Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -::======================================================================================================================================== - -cls -color 07 -title Change Windows Edition - -set _elev= -if /i "%~1"=="-el" set _elev=1 - -set winbuild=1 -set "nul=>nul 2>&1" -set psc=powershell.exe -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 2>nul | find /i "0x0" 1>nul && (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 "Magenta="45;97m"" -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 "Magenta="Darkmagenta" "white"" -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:" -set "line=echo ___________________________________________________________________________________________" - -::======================================================================================================================================== - -if %winbuild% LSS 10240 ( -%eline% -echo Unsupported OS version detected. -echo Project is supported for Windows 10/11/Server Build 10240 and later. -goto ced_done -) - -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find powershell.exe in the system. -goto ced_done -) - -::======================================================================================================================================== - -:: Fix for the special characters limitation 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 "_ttemp=%temp%" - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -echo "!_batf!" | find /i "!_ttemp!" 1>nul && ( -if /i not "!_work!"=="!_ttemp!" ( -%eline% -echo Script is launched from the temp folder, -echo Most likely you are running the script directly from the archive file. -echo: -echo Extract the archive file and launch the script from the extracted folder. -goto ced_done -) -) - -::======================================================================================================================================== - -:: Elevate script as admin and pass arguments and preventing loop - -%nul% reg query HKU\S-1-5-19 || ( -if not defined _elev %nul% %psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b -%eline% -echo This script require administrator privileges. -echo To do so, right click on this script and select 'Run as administrator'. -goto ced_done -) - -::======================================================================================================================================== - -cls -mode 98, 30 - -call :dk_initial - -if not defined applist ( -cls -%eline% -echo Not Respoding: !e_wmispp! -goto ced_done -) - -::======================================================================================================================================== - -:: Check Windows Edition - -set osedition= -for /f "tokens=3 delims=: " %%a in ('DISM /English /Online /Get-CurrentEdition 2^>nul ^| find /i "Current Edition :"') do set "osedition=%%a" - -cls -if "%osedition%"=="" ( -%eline% -DISM /English /Online /Get-CurrentEdition %nul% -cmd /c exit /b !errorlevel! -echo DISM command failed [Error Code - 0x!=ExitCode!] -echo OS Edition was not detected properly. Aborting... -goto ced_done -) - -:: Check product name - -call :dk_product - -:: Check SKU value - -set osSKU= -set regSKU= -set wmiSKU= - -for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "regSKU=%%a" -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic Path Win32_OperatingSystem Get OperatingSystemSKU /format:LIST" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" -if %_wmic% EQU 0 for /f "tokens=1" %%a in ('%psc% "([WMI]'Win32_OperatingSystem=@').OperatingSystemSKU" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" - -set osSKU=%wmiSKU% -if not defined osSKU set osSKU=%regSKU% - -if not defined osSKU ( -%eline% -echo SKU value was not detected properly. Aborting... -goto ced_done -) - -:: Check PowerShell - -%psc% $ExecutionContext.SessionState.LanguageMode 2>nul | find /i "Full" 1>nul || ( -%eline% -echo PowerShell is not responding properly. Aborting... -goto ced_done -) - -:: Check slmgr /dlv - -cscript //nologo %windir%\system32\slmgr.vbs /dlv %nul% -set error_code=%errorlevel% -cmd /c exit /b %error_code% -if %error_code% NEQ 0 set "error_code=[0x%=ExitCode%]" -if %error_code% NEQ 0 ( -%eline% -echo slmgr /dlv is not responding %error_code% -goto ced_done -) - -::======================================================================================================================================== - -:: Get Target editions list - -set _target= -set _ntarget= -for /f "tokens=4" %%a in ('dism /online /english /Get-TargetEditions ^| findstr /i /c:"Target Edition : "') do (if defined _target (set "_target=!_target! %%a") else (set "_target=%%a")) - -::======================================================================================================================================== - -:: Block the change to/from CountrySpecific and CloudEdition editions - -for %%# in (99 139 202 203) do if %osSKU%==%%# ( -%eline% -echo [%winos% ^| SKU:%osSKU% ^| %winbuild%] -echo It's not recommended to change this installed edition to any other. -echo Aborting... -goto ced_done -) - -if defined _target ( -for %%# in (%_target%) do ( -echo %%# | findstr /i "CountrySpecific CloudEdition" %nul% || (if defined _ntarget (set "_ntarget=!_ntarget! %%#") else (set "_ntarget=%%#")) -) -) - -if not defined _ntarget ( -%line% -echo: -call :dk_color %Gray% "Target Edition not found." -echo Current Edition [%osedition% ^| %winbuild%] can not be changed to any other Edition. -%line% -goto ced_done -) - -::======================================================================================================================================== - -:cedmenu2 - -cls -mode 98, 30 -set inpt= -set counter=0 -set verified=0 -set targetedition= - -%line% -echo: -call :dk_color %Gray% "You can change the Current Edition [%osedition%] to one of the following." -%line% -echo: - -for %%A in (%_ntarget%) do ( -set /a counter+=1 -echo [!counter!] %%A -set targetedition!counter!=%%A -) - -%line% -echo: -echo [0] Exit -echo: -call :dk_color %_Green% "Enter option number in keyboard, and press "Enter":" -set /p inpt= -if "%inpt%"=="" goto cedmenu2 -if "%inpt%"=="0" exit /b -for /l %%i in (1,1,%counter%) do (if "%inpt%"=="%%i" set verified=1) -set targetedition=!targetedition%inpt%! -if %verified%==0 goto cedmenu2 - -::======================================================================================================================================== - -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" ( -goto :ced_change_server -) - -cls -set key= -set _chan= -set _changepk=0 -set "keyflow=Retail Volume:MAK Volume:GVLK OEM:NONSLP OEM:DM" - -:: Check if changepk.exe or slmgr.vbs is required for edition upgrade - -if not exist "%SystemRoot%\System32\spp\tokens\skus\%targetedition%\" ( -set _changepk=1 -) - -if /i "%osedition:~0,4%"=="Core" ( -if /i not "%targetedition:~0,4%"=="Core" ( -set _changepk=1 -) -) - -if %winbuild% LEQ 19044 call :changeeditiondata - -if not defined key call :ced_targetSKU %targetedition% -if not defined key if defined targetSKU call :ced_windowskey -if defined key if defined pkeychannel set _chan=%pkeychannel% - -if not defined key ( -%eline% -echo [%targetedition% ^| %winbuild%] -echo Unable to get product key from pkeyhelper.dll -echo Make sure you are using updated version of the script -goto ced_done -) - -::======================================================================================================================================== - -%line% - -:: Changing from Core to Non-Core & Changing editions in Windows build older than 17134 requires "changepk /productkey" method and restart -:: In other cases, editions can be changed instantly with "slmgr /ipk" - -:ced_loop - -cls -if %_changepk%==1 ( -echo "%_chan%" | find /i "OEM" >NUL && ( -%eline% -echo [%osedition%] can not be changed to [%targetedition%] Edition due to lack of non OEM keys. -echo Non-OEM keys are required to change from Core to Non-Core Editions. -goto ced_done -) -for %%a in (dns.msftncsi.com,www.microsoft.com,one.one.one.one,resolver1.opendns.com) do ( -for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do ( -if not [%%#]==[] ( -%eline% -echo Disconnect the Internet and then press any key... -pause >nul -goto ced_loop -) -) -) -) - -echo: -echo Changing the Current Edition [%osedition%] to [%targetedition%] -echo: - -if %_changepk%==1 ( -call :dk_color %Green% "You can safely ignore if error appears in the upgrade Window." -call :dk_color %Red% "But in that case you must manually reboot the system." -echo: -call :dk_color %Magenta% "Important - Save your work before continue, system will auto reboot." -echo: -choice /C:21 /N /M "[1] Continue [2] Exit : " -if !errorlevel!==1 exit /b -) - -::======================================================================================================================================== - -if %_changepk%==0 ( -echo Installing %_chan% Key [%key%] -echo: -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call InstallProductKey ProductKey="%key%" %nul% -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT Version FROM SoftwareLicensingService').Get()).InstallProductKey('%key%')" %nul% -if not !errorlevel!==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul% - -set error_code=!errorlevel! -cmd /c exit /b !error_code! -if !error_code! NEQ 0 set "error_code=[0x!=ExitCode!]" - -if !error_code! EQU 0 ( -call :dk_refresh -call :dk_color %Green% "[Successful]" -echo: -call :dk_color %Gray% "Reboot is required to properly change the Edition." -) else ( -call :dk_color %Red% "[Unsuccessful] [Error Code: 0x!=ExitCode!]" -) -) - -if %_changepk%==1 ( -echo: -echo Applying the command with %_chan% Key -echo start changepk.exe /ProductKey %key% -start changepk.exe /ProductKey %key% -) -%line% - -goto ced_done - -::======================================================================================================================================== - -:ced_change_server - -cls -mode con cols=105 lines=32 -%nul% %psc% "&{$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=31;$B.Height=200;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}" - -set key= -set pkeychannel= -set "keyflow=Volume:GVLK Retail Volume:MAK OEM:NONSLP OEM:DM" -call :changeeditionserverdata - -if not defined key call :ced_targetSKU %targetedition% -if not defined key if defined targetSKU call :ced_windowskey -if defined key if not defined pkeychannel call :dk_pkeychannel %key% - -if not defined key ( -%eline% -echo [%targetedition% ^| %winbuild%] -echo Unable to get product key from pkeyhelper.dll -echo Make sure you are using updated version of the script -goto ced_done -) - -::======================================================================================================================================== - -cls -echo: -echo Changing the Current Edition [%osedition%] to [%targetedition%] -echo: -echo Applying the command with %pkeychannel% Key -echo DISM /online /Set-Edition:%targetedition% /ProductKey:%key% /AcceptEula -DISM /online /Set-Edition:%targetedition% /ProductKey:%key% /AcceptEula - -call :dk_color %Magenta% "Make sure to restart the system." - -::======================================================================================================================================== - -:ced_done - -echo: -call :dk_color %_Yellow% "Press any key to exit..." -pause >nul -exit /b - -::======================================================================================================================================== - -:: Refresh license status - -:dk_refresh - -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call RefreshLicenseStatus %nul% -if %_wmic% EQU 0 %psc% "$null=(([WMICLASS]'SoftwareLicensingService').GetInstances()).RefreshLicenseStatus()" %nul% -exit /b - -:: Get Windows Activation IDs - -:dk_actids - -set applist= -if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path SoftwareLicensingProduct where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f') get ID /VALUE" 2^>nul')" -if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')" -%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a")) -exit /b - -:: Get Product name (WMI/REG methods are not reliable in all conditions, hence winbrand.dll method is used) - -:dk_product - -set winos= -set d1=[DllImport(\"winbrand\",CharSet=CharSet.Unicode)]public static extern string BrandingFormatString(string s); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $AP::BrandingFormatString('%%WINDOWS_LONG%%') -for /f "delims=" %%s in ('"%psc% %d2%"') do if not errorlevel 1 (set winos=%%s) -echo "%winos%" | find /i "Windows" 1>nul || ( -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b" -if %winbuild% GEQ 22000 ( -set winos=!winos:Windows 10=Windows 11! -) -) -exit /b - -:: Check wmic.exe - -:dk_ckeckwmic - -set _wmic=0 -for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" ( -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul && set _wmic=1 -) -exit /b - -:dk_initial - -echo: -echo Initializing... - -:: Check and enable WinMgmt, sppsvc services if required - -for %%# in (WinMgmt sppsvc) do ( -for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start 2^>nul') do if /i %%b NEQ 0x2 ( -echo: -echo Enabling %%# service... -if /i %%#==sppsvc sc config %%# start= delayed-auto %nul% || echo Failed -if /i %%#==WinMgmt sc config %%# start= auto %nul% || echo Failed -) -sc start %%# %nul% -if !errorlevel! NEQ 1056 if !errorlevel! NEQ 0 ( -echo: -echo Starting %%# service... -sc start %%# -echo: -call :dk_color %Red% "Failed to start [%%#] service, rest of the process may take a long time..." -) -) - -:: Check WMI and SPP Errors - -call :dk_ckeckwmic - -set e_wmi= -set e_wmispp= -call :dk_actids - -if not defined applist ( -net stop sppsvc /y %nul% -cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -if !errorlevel! NEQ 0 cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -call :dk_refresh - -if %_wmic% EQU 1 wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul -if %_wmic% EQU 0 %psc% "Get-CIMInstance -Class Win32_ComputerSystem | Select-Object -Property CreationClassName" 2>nul | find /i "computersystem" 1>nul -if !errorlevel! NEQ 0 set e_wmi=1 - -if defined e_wmi (set e_wmispp=WMI, SPP) else (set e_wmispp=SPP) -call :dk_actids -) -exit /b - -::======================================================================================================================================== - -:: Get Product Key from pkeyhelper.dll for future new editions -:: It works on Windows 10 1803 (17134) and later builds. - -:dk_pkey - -set pkey= -set d1=[DllImport(\"pkeyhelper.dll\",CharSet=CharSet.Unicode)]public static extern int SkuGetProductKeyForEdition(int e, string c, out string k, out string p); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k=''; $null=$AP::SkuGetProductKeyForEdition(%1, %2, [ref]$k, [ref]$null); $k -for /f %%a in ('%psc% "%d2%"') do if not errorlevel 1 (set pkey=%%a) -exit /b - -:: Get channel name for the key which was extracted from pkeyhelper.dll - -:dk_pkeychannel - -set k=%1 -set pkeychannel= -set p=%SystemRoot%\System32\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms -set m=[System.Runtime.InteropServices.Marshal] -set d1=[DllImport(\"PidGenX.dll\",CharSet=CharSet.Unicode)]public static extern int PidGenX(string k,string p,string m,int u,IntPtr i,IntPtr d,IntPtr f); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k='%k%'; $p='%p%'; $r=[byte[]]::new(0x04F8); $r[0]=0xF8; $r[1]=0x04; $f=%m%::AllocHGlobal(1272); %m%::Copy($r,0,$f,1272); -set d3=%d2% [void]$AP::PidGenX($k,$p,\"00000\",0,0,0,$f); %m%::Copy($f,$r,0,1272); %m%::FreeHGlobal($f); [System.Text.Encoding]::Unicode.GetString($r, 1016, 128).Replace('0','') -for /f %%a in ('%psc% "%d3%"') do if not errorlevel 1 (set pkeychannel=%%a) -exit /b - -:ced_windowskey - -for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b -for %%# in (%keyflow%) do ( -call :dk_pkey %targetSKU% '%%#' -if defined pkey call :dk_pkeychannel !pkey! -if /i [!pkeychannel!]==[%%#] ( -set key=!pkey! -exit /b -) -) -exit /b - -::======================================================================================================================================== - -:ced_targetSKU - -set k=%1 -set targetSKU= -for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b -set d1=[DllImport(\"pkeyhelper.dll\",CharSet=CharSet.Unicode)]public static extern int GetEditionIdFromName(string e, out int s); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $s=0; $null=$AP::GetEditionIdFromName('%k%', [ref]$s); $s -for /f %%a in ('%psc% "%d2%"') do if not errorlevel 1 (set targetSKU=%%a) -if "%targetSKU%"=="0" set targetSKU= -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 - -::======================================================================================================================================== - -:: 1st column = Generic Retail/OEM/MAK/GVLK Key -:: 2nd column = Key Type -:: 3rd column = WMI Edition ID -:: 4th column = Version name incase same Edition ID is used in different OS versions with different key -:: Separator = _ - -:: Key preference is in the following order. Retail > Volume:MAK > Volume:GVLK > OEM:NONSLP > OEM:DM -:: OEM keys are in last because they can't be used in edition change if "changepk /productkey" method is needed instead of "slmgr /ipk" -:: OEM keys are listed here because we don't have other keys for that edition - -:changeeditiondata - -for %%# in ( -44NYX-TKR9D-CCM2D-V6B8F-HQWWR_Volume:MAK_Enterprise -D6RD9-D4N8T-RT9QX-YW6YT-FCWWJ_____Retail_Starter -3V6Q6-NQXCX-V8YXR-9QCYV-QPFCT_Volume:MAK_EnterpriseN -3NFXW-2T27M-2BDW6-4GHRV-68XRX_____Retail_StarterN -VK7JG-NPHTM-C97JM-9MPGT-3V66T_____Retail_Professional -2B87N-8KFHP-DKV6R-Y2C8J-PKCKT_____Retail_ProfessionalN -4CPRK-NM3K3-X6XXQ-RXX86-WXCHW_____Retail_CoreN -N2434-X9D7W-8PF6X-8DV9T-8TYMD_____Retail_CoreCountrySpecific -BT79Q-G7N6G-PGBYW-4YWX6-6F4BT_____Retail_CoreSingleLanguage -YTMG3-N6DKC-DKB77-7M9GH-8HVX7_____Retail_Core -XKCNC-J26Q9-KFHD2-FKTHY-KD72Y_OEM:NONSLP_PPIPro -YNMGQ-8RYV3-4PGQ3-C8XTP-7CFBY_____Retail_Education -84NGF-MHBT6-FXBX8-QWJK7-DRR8H_____Retail_EducationN -KCNVH-YKWX8-GJJB9-H9FDT-6F7W2_Volume:MAK_EnterpriseS_2021 -VBX36-N7DDY-M9H62-83BMJ-CPR42_Volume:MAK_EnterpriseS_2019 -PN3KR-JXM7T-46HM4-MCQGK-7XPJQ_Volume:MAK_EnterpriseS_2016 -DVWKN-3GCMV-Q2XF4-DDPGM-VQWWY_Volume:MAK_EnterpriseS_2015 -RQFNW-9TPM3-JQ73T-QV4VQ-DV9PT_Volume:MAK_EnterpriseSN_2021 -M33WV-NHY3C-R7FPM-BQGPT-239PG_Volume:MAK_EnterpriseSN_2019 -2DBW3-N2PJG-MVHW3-G7TDK-9HKR4_Volume:MAK_EnterpriseSN_2016 -NTX6B-BRYC2-K6786-F6MVQ-M7V2X_Volume:MAK_EnterpriseSN_2015 -G3KNM-CHG6T-R36X3-9QDG6-8M8K9_____Retail_ProfessionalSingleLanguage -HNGCC-Y38KG-QVK8D-WMWRK-X86VK_____Retail_ProfessionalCountrySpecific -DXG7C-N36C4-C4HTG-X4T3X-2YV77_____Retail_ProfessionalWorkstation -WYPNQ-8C467-V2W6J-TX4WX-WT2RQ_____Retail_ProfessionalWorkstationN -8PTT6-RNW4C-6V7J2-C2D3X-MHBPB_____Retail_ProfessionalEducation -GJTYN-HDMQY-FRR76-HVGC7-QPF8P_____Retail_ProfessionalEducationN -C4NTJ-CX6Q2-VXDMR-XVKGM-F9DJC_Volume:MAK_EnterpriseG -46PN6-R9BK9-CVHKB-HWQ9V-MBJY8_Volume:MAK_EnterpriseGN -NJCF7-PW8QT-3324D-688JX-2YV66_____Retail_ServerRdsh -V3WVW-N2PV2-CGWC3-34QGF-VMJ2C_____Retail_Cloud -NH9J3-68WK7-6FB93-4K3DF-DJ4F6_____Retail_CloudN -2HN6V-HGTM8-6C97C-RK67V-JQPFD_____Retail_CloudE -XQQYW-NFFMW-XJPBH-K8732-CKFFD_____OEM:DM_IoTEnterprise -QPM6N-7J2WJ-P88HH-P3YRH-YY74H_OEM:NONSLP_IoTEnterpriseS -K9VKN-3BGWV-Y624W-MCRMQ-BHDCD_____Retail_CloudEditionN -KY7PN-VR6RX-83W6Y-6DDYQ-T6R4W_____Retail_CloudEdition -) do ( -for /f "tokens=1-4 delims=_" %%A in ("%%#") do if /i %targetedition%==%%C ( - -if not defined key ( -set 4th=%%D -if not defined 4th ( -set "key=%%A" & set "_chan=%%B" -) else ( -echo "%winos%" | find "%%D" 1>nul && (set "key=%%A" & set "_chan=%%B") -) -) -) -) -exit /b - -::======================================================================================================================================== - -:changeeditionserverdata - -if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*CorEdition~*.mum" (set Cor=Cor) else (set Cor=) -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v BuildBranch 2^>nul') do set "branch=%%b" - -:: Only RS3 and older version keys (GVLK/Generic Retail) are stored here, later ones are extracted from the system itself - -for %%# in ( -WC2BQ-8NRM3-FDDYY-2BFGV-KHKQY_RS1_ServerStandard%Cor% -CB7KF-BWN84-R7R2Y-793K2-8XDDG_RS1_ServerDatacenter%Cor% -JCKRF-N37P4-C2D82-9YXRT-4M63B_RS1_ServerSolution -QN4C6-GBJD2-FB422-GHWJK-GJG2R_RS1_ServerCloudStorage -VP34G-4NPPG-79JTQ-864T4-R3MQX_RS1_ServerAzureCor -9JQNQ-V8HQ6-PKB8H-GGHRY-R62H6_RS1_ServerAzureNano -VN8D3-PR82H-DB6BJ-J9P4M-92F6J_RS1_ServerStorageStandard -48TQX-NVK3R-D8QR3-GTHHM-8FHXC_RS1_ServerStorageWorkgroup -2HXDN-KRXHB-GPYC7-YCKFJ-7FVDG_RS3_ServerDatacenterACor -PTXN8-JFHJM-4WC78-MPCBR-9W4KR_RS3_ServerStandardACor -) do ( -for /f "tokens=1-3 delims=_" %%A in ("%%#") do if /i %targetedition%==%%C ( -echo "%branch%" | find /i "%%B" 1>nul && (set "key=%%A") -) -) -exit /b - -::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Extras/Activation_Troubleshoot.cmd b/MAS/Separate-Files-Version/Extras/Activation_Troubleshoot.cmd new file mode 100644 index 0000000..1353809 --- /dev/null +++ b/MAS/Separate-Files-Version/Extras/Activation_Troubleshoot.cmd @@ -0,0 +1,830 @@ +@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+::============================================================================
+::
+:: This script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::============================================================================
+
+
+
+
+::========================================================================================================================================
+
+:: 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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %*"
+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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %*"
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+::========================================================================================================================================
+
+cls
+color 07
+title Activation Troubleshoot
+
+set _elev=
+if /i "%~1"=="-el" set _elev=1
+
+set winbuild=1
+set "nul=>nul 2>&1"
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+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 2>nul | find /i "0x0" 1>nul && (set _NCS=0)
+
+call :_colorprep
+
+set slp=SoftwareLicensingProduct
+set sls=SoftwareLicensingService
+set ospp=OfficeSoftwareProtectionProduct
+set wApp=55c92734-d682-4d71-983e-d6ec3f16059f
+set cbs_log=%SystemRoot%\logs\cbs\cbs.log
+set "nceline=echo: &echo ==== ERROR ==== &echo:"
+set "eline=echo: &call :_color %Red% "==== ERROR ====" &echo:"
+set "line=_________________________________________________________________________________________________"
+
+::========================================================================================================================================
+
+if %winbuild% LSS 7600 (
+%nceline%
+echo Unsupported OS version detected.
+echo Project is supported only for Windows 7/8/8.1/10/11 and their Server equivalent.
+goto at_done
+)
+
+if not exist %_psc% (
+%nceline%
+echo Powershell is not installed in the system.
+echo Aborting...
+goto at_done
+)
+
+::========================================================================================================================================
+
+:: Fix for the special characters limitation in path name
+
+set "_batf=%~f0"
+set "_batp=%_batf:'=''%"
+
+set "_PSarg="""%~f0""" -el %_args%"
+
+set "_ttemp=%temp%"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" 1>nul && (
+%nceline%
+echo Script is launched from the temp folder,
+echo Most likely you are running the script directly from the archive file.
+echo:
+echo Extract the archive file and launch the script from the extracted folder.
+goto at_done
+)
+
+::========================================================================================================================================
+
+:: Elevate script as admin and pass arguments and preventing loop
+
+%nul% reg query HKU\S-1-5-19 || (
+if not defined _elev %nul% %_psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b
+%nceline%
+echo This script require administrator privileges.
+echo To do so, right click on this script and select 'Run as administrator'.
+goto at_done
+)
+
+::========================================================================================================================================
+
+setlocal DisableDelayedExpansion
+
+:: Check desktop location
+
+set desktop=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v Desktop') do call set "desktop=%%b"
+if not defined desktop for /f "delims=" %%a in ('%_psc% "& {write-host $([Environment]::GetFolderPath('Desktop'))}"') do call set "desktop=%%a"
+
+if not defined desktop (
+%eline%
+echo Desktop location was not detected, aborting...
+goto at_done
+)
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+:at_menu
+
+cls
+color 07
+title Activation Troubleshoot
+mode con cols=77 lines=30
+
+echo:
+echo:
+echo:
+echo: _______________________________________________________________
+echo:
+echo: [1] Troubleshoot ReadMe - HWID
+echo: [2] Troubleshoot ReadMe - KMS38
+echo: [3] Troubleshoot ReadMe - Online KMS
+echo: ___________________________________________________
+echo:
+echo: [4] Dism RestoreHealth
+echo: [5] SFC Scannow
+echo:
+echo: [6] Windows Rearm - Specific SKU ID
+echo: [7] Office Rearm - Specific KMS SKU ID
+echo:
+echo: [8] Clean ClipSVC Licences
+echo: [9] Rebuild Licensing Tokens
+echo:
+echo: [F] Office License Is Not Genuine - Notification
+echo:
+echo: [0] Exit
+echo: _______________________________________________________________
+echo:
+call :_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard :"
+choice /C:123456789F0 /N
+set _erl=%errorlevel%
+
+if %_erl%==11 exit /b
+if %_erl%==10 start https://windowsaddict.ml/office-license-is-not-genuine &goto at_menu
+if %_erl%==9 goto:retokens
+if %_erl%==8 goto:cleanclipsvc
+if %_erl%==7 goto:officerearm
+if %_erl%==6 goto:rearmwin
+if %_erl%==5 goto:sfcscan
+if %_erl%==4 goto:dism_rest
+if %_erl%==3 start https://windowsaddict.ml/readme-troubleshoot-onlinekms.html &goto at_menu
+if %_erl%==2 start https://windowsaddict.ml/readme-troubleshoot-kms38.html &goto at_menu
+if %_erl%==1 start https://windowsaddict.ml/readme-troubleshoot-hwid.html &goto at_menu
+goto :at_menu
+
+::========================================================================================================================================
+
+:dism_rest
+
+cls
+mode 98, 30
+title Dism /Online /Cleanup-Image /RestoreHealth
+
+if %winbuild% LSS 9200 (
+%eline%
+echo Unsupported OS version Detected.
+echo This command is supported only for Windows 8/8.1/10/11 and their Server equivalent.
+goto :at_back
+)
+
+set _int=
+for %%a in (dns.msftncsi.com,www.microsoft.com,one.one.one.one,resolver1.opendns.com) do (
+if not defined _int (for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do if not [%%#]==[] set _int=1))
+
+echo:
+if defined _int (
+echo Checking Internet Connection [Connected]
+) else (
+call :_color2 %_White% " " %Red% "Checking Internet Connection [Not connected]"
+)
+
+echo %line%
+echo:
+echo Dism uses Windows Update to provide the files required to fix corruption.
+echo This will take 5-15 minutes or more..
+echo %line%
+echo:
+echo Notes:
+echo:
+call :_color2 %_White% " - " %Gray% "Make sure the Internet is connected."
+call :_color2 %_White% " - " %Gray% "Make sure the Windows update is properly working."
+echo:
+echo %line%
+echo:
+choice /C:29 /N /M "> [9] Continue [2] Go back : "
+if %errorlevel%==1 goto at_menu
+
+cls
+mode 110, 30
+echo:
+
+call :_stopservice TrustedInstaller
+del /s /f /q "%SystemRoot%\logs\cbs\*.*"
+
+set _time=
+for /f %%a in ('%_psc% "Get-Date -format HH_mm_ss"') do set _time=%%a
+echo:
+echo Applying the command,
+echo dism /online /cleanup-image /restorehealth /Logpath:"%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" /loglevel:4
+echo:
+dism /online /cleanup-image /restorehealth /Logpath:"%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" /loglevel:4
+
+if not exist "!desktop!\AT_Logs\" md "!desktop!\AT_Logs\" %nul%
+copy /y /b "%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" "!desktop!\AT_Logs\RHealth_DISM_%_time%.txt" %nul%
+copy /y /b "%cbs_log%" "!desktop!\AT_Logs\RHealth_CBS_%_time%.txt" %nul%
+del /f /q "%SystemRoot%\Temp\RHealth_DISM_%_time%.txt" %nul%
+
+echo:
+call :_color %Gray% "CBS and DISM logs are copied to the AT_Logs folder on the dekstop."
+goto :at_back
+
+::========================================================================================================================================
+
+:sfcscan
+
+cls
+mode 98, 30
+title sfc /scannow
+
+echo:
+echo %line%
+echo:
+echo System File Checker will repair missing or corrupted system files.
+echo This will take 10-15 minutes or more..
+echo:
+echo If SFC could not fix something, then run the command again to see if it may be able
+echo to the next time. Sometimes it may take running the sfc /scannow command 3 times
+echo restarting the PC after each time to completely fix everything that it's able to.
+echo:
+echo %line%
+echo:
+choice /C:29 /N /M "> [9] Continue [2] Go back : "
+if %errorlevel%==1 goto at_menu
+
+cls
+echo:
+
+call :_stopservice TrustedInstaller
+del /s /f /q "%SystemRoot%\logs\cbs\*.*"
+
+set _time=
+for /f %%a in ('%_psc% "Get-Date -format HH_mm_ss"') do set _time=%%a
+echo:
+echo Applying the command,
+echo sfc /scannow
+echo:
+sfc /scannow
+
+if not exist "!desktop!\AT_Logs\" md "!desktop!\AT_Logs\" %nul%
+
+copy /y /b "%cbs_log%" "!desktop!\AT_Logs\SFC_CBS_%_time%.txt" %nul%
+findstr /i /c:"[SR]" %cbs_log% | findstr /i /v /c:verify >"!desktop!\AT_Logs\SFC_Main_%_time%.txt"
+
+echo:
+call :_color %Gray% "CBS and main extracted logs are copied to the AT_Logs folder on the dekstop."
+goto :at_back
+
+::========================================================================================================================================
+
+:rearmwin
+
+cls
+mode 98, 30
+title Windows Rearm - Specific SKU ID
+
+if %winbuild% LSS 9600 (
+%eline%
+echo Unsupported OS version Detected.
+echo This command is supported only for Windows 8/8.1/10/11 and their Server equivalent.
+goto :at_back
+)
+
+echo:
+echo %line%
+echo:
+echo Notes:
+echo:
+echo - Rearm helps in troubleshooting activation issues.
+echo:
+echo - Windows KMS activation will reset.
+echo:
+echo %line%
+echo:
+choice /C:29 /N /M "> [9] Continue [2] Go back : "
+if %errorlevel%==1 goto at_menu
+
+cls
+mode 105, 30
+echo:
+echo:
+set app=
+net start sppsvc /y %nul%
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%wApp%' and PartialProductKey is not NULL) get ID /VALUE" 2^>nul') do call set "app=%%a"
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%'' AND PartialProductKey IS NOT NULL').Get()).ID | %% {echo ('ID='+$_)}" 2^>nul') do call set "app=%%a"
+
+if defined app (
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%x in ('"wmic path %slp% where ID='%app%' get Name /VALUE" 2^>nul') do echo Rearming: %%x
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%x in ('%_psc% "(([WMISEARCHER]'SELECT Name FROM %slp% WHERE ID=''%app%''').Get()).Name | %% {echo ('Name='+$_)}" 2^>nul') do echo Rearming: %%x
+echo:
+echo Applying the command,
+if %winbuild% LSS 22483 (
+echo wmic path %slp% where ID='%app%' call ReArmsku
+wmic path %slp% where ID='%app%' call ReArmsku %nul%
+)
+if %winbuild% GEQ 22483 (
+echo Powershell "$null=([WMI]'%slp%=''%app%''').ReArmsku()"
+%_psc% "$null=([WMI]'%slp%=''%app%''').ReArmsku()" %nul%
+)
+if !errorlevel!==0 (
+call :_color %Green% "[Successful]"
+) else (
+call :_color %Red% "[Failed]"
+)
+) else (
+call :_color %Red% "Error- Activation ID not found"
+)
+
+goto :at_back
+
+::========================================================================================================================================
+
+:officerearm
+
+cls
+mode 98, 30
+title Office Rearm - Specific KMS SKU ID
+
+if %winbuild% LSS 9600 (
+%eline%
+echo Unsupported OS version Detected.
+echo This command is supported only for Windows 8/8.1/10/11 and their Server equivalent.
+goto :at_back
+)
+
+echo:
+echo %line%
+echo:
+echo Notes:
+echo:
+echo - Rearm helps in troubleshooting activation issues.
+echo:
+echo - Office KMS activation will reset.
+echo:
+call :_color2 %_White% " - " %Gray% "Office rearm can be applied only a certain number of times."
+echo:
+echo %line%
+echo:
+choice /C:29 /N /M "> [9] Continue [2] Go back : "
+if %errorlevel%==1 goto at_menu
+
+cls
+mode 105, 30
+echo:
+
+net start sppsvc /y %nul%
+call :getapplist %slp%
+
+if defined applist (
+for %%# in (%applist%) do (
+echo:
+if %winbuild% LSS 22483 for /f "tokens=2 delims==" %%x in ('"wmic path %slp% where ID='%%#' get Name /VALUE" 2^>nul') do echo Rearming: %%x
+if %winbuild% GEQ 22483 for /f "tokens=2 delims==" %%x in ('%_psc% "(([WMISEARCHER]'SELECT Name FROM %slp% WHERE ID=''%%#''').Get()).Name | %% {echo ('Name='+$_)}" 2^>nul') do echo Rearming: %%x
+echo:
+echo Applying the command,
+if %winbuild% LSS 22483 (
+echo wmic path %slp% where ID='%%#' call ReArmsku
+wmic path %slp% where ID='%%#' call ReArmsku %nul%
+)
+if %winbuild% GEQ 22483 (
+echo Powershell "$null=([WMI]'%slp%=''%%#''').ReArmsku()"
+%_psc% "$null=([WMI]'%slp%=''%%#''').ReArmsku()" %nul%
+)
+if !errorlevel!==0 (
+call :_color %Green% "[Successful]"
+) else (
+call :_color %Red% "[Failed]"
+)
+)
+) else (
+echo:
+echo Checking: Volume version of Office 2013-2021 is not found.
+)
+
+call :getapplist %ospp%
+
+if defined applist (
+if %winbuild% LSS 9200 (set _off=Office) else (set _off=Office 2010)
+echo:
+echo Skipping the Rearm of OSPP based '!_off!'
+)
+
+goto :at_back
+
+:getapplist
+
+set applist=
+if %winbuild% LSS 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %1 where (Name like '%%office%%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get ID /VALUE" 2^>nul')"
+if %winbuild% GEQ 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %1 WHERE Name like ''%%office%%'' and Description like ''%%KMSCLIENT%%'' and PartialProductKey is not NULL').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')"
+%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a"))
+exit /b
+
+::========================================================================================================================================
+
+:retokens
+
+cls
+mode 98, 30
+title Rebuild Licensing Tokens ^& Re-install System License Files
+
+echo:
+echo %line%
+echo:
+echo Notes:
+echo:
+echo - Rebuild Licensing Tokens ^& Re-install System License Files
+echo It helps in troubleshooting activation issues.
+echo:
+call :_color2 %_White% " - " %Gray% "Windows and Office activation may reset, you may need to activate them again."
+echo:
+call :_color2 %_White% " - " %Magenta% "This option will uninstall Office licenses and keys."
+call :_color2 %_White% " " %Magenta% "Installed Office will need to repair itself ones upon opening an office app,"
+call :_color2 %_White% " " %Magenta% "you may also need to repair Office from Apps and Features in Windows Settings."
+echo:
+call :_color2 %_White% " - " %Gray% "Script is designed to skip rebuilding tokens where products may not be able to"
+call :_color2 %_White% " " %Gray% "restore their license."
+echo:
+call :_color2 %_White% " - " %Red% "Apply it only when it is necessary."
+echo:
+echo %line%
+echo:
+choice /C:24 /N /M "> [4] Continue [2] Go back : "
+if %errorlevel%==1 goto at_menu
+
+cls
+mode 98, 30
+
+set nosup=
+set 68=HKLM\SOFTWARE\Microsoft\Office
+set 86=HKLM\SOFTWARE\Wow6432Node\Microsoft\Office
+
+%nul% reg query %68%\16.0\Common\InstallRoot /v Path && set nosup=1 REM Office 2016 MSI x86-x64
+%nul% reg query %86%\16.0\Common\InstallRoot /v Path && set nosup=1 REM Office 2016 MSI x86
+%nul% reg query %68%\15.0\Common\InstallRoot /v Path && set nosup=1 REM Office 2013 MSI x86-x64
+%nul% reg query %86%\15.0\Common\InstallRoot /v Path && set nosup=1 REM Office 2013 MSI x86
+%nul% reg query %68%\14.0\Common\InstallRoot /v Path && set nosup=1 REM Office 2010 MSI x86-x64
+%nul% reg query %86%\14.0\Common\InstallRoot /v Path && set nosup=1 REM Office 2010 MSI x86
+%nul% reg query %68%\14.0\CVH /f Click2run /k && set nosup=1 REM Office 2010 C2R x86-x64
+%nul% reg query %86%\14.0\CVH /f Click2run /k && set nosup=1 REM Office 2010 C2R x86
+
+if %winbuild% GEQ 10240 reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msoxmled.exe" %nul% && (
+dir /b "%ProgramFiles%\WindowsApps\Microsoft.Office.Desktop*" %nul% && set nosup=1 REM Office UWP x86-x64
+dir /b "%ProgramW6432%\WindowsApps\Microsoft.Office.Desktop*" %nul% && set nosup=1 REM Office UWP x86
+)
+
+sc qc osppsvc %nul% && (
+if %winbuild% LSS 9200 (set _off=Office) else (set _off=Office 2010)
+echo:
+echo Skipping rebuilding OSPP tokens for detected '!_off!'
+)
+
+echo:
+if defined nosup (
+echo Detected Office may not be able to repair itself, hence skipping SPP tokens rebuilding...
+goto :at_back
+)
+
+net start sppsvc /y %nul%
+
+call :at_permcheck Office
+if defined _perm (
+echo Office is permanently activated, token rebuilding may deactivate it, hence skipping...
+goto :at_back
+)
+
+if %winbuild% LSS 10240 (
+call :at_permcheck Windows
+if defined _perm (
+echo Windows is permanently activated, token rebuilding may deactivate it, hence skipping...
+goto :at_back
+)
+)
+
+set token=
+for %%# in (
+%Systemdrive%\Windows\System32\spp\store_test\2.0\tokens.dat
+%Systemdrive%\Windows\System32\spp\store\tokens.dat
+%Systemdrive%\Windows\System32\spp\store\2.0\tokens.dat
+%Systemdrive%\Windows\ServiceProfiles\NetworkService\AppData\Roaming\Microsoft\SoftwareProtectionPlatform\tokens.dat
+) do if exist %%# set token=%%#
+
+echo %line%
+echo:
+call :_color %Gray% "Rebuilding SoftwareProtectionPlatform tokens.dat"
+echo %line%
+echo:
+
+if not exist "%token%" (
+%eline%
+echo tokens.dat file not found.
+echo Restart the system and try again.
+goto :at_back
+) else (
+echo Detected tokens.dat file [%token%]
+)
+
+echo Stopping sppsvc service...
+call :_stopservice sppsvc
+
+:: data.dat and cache files are not deleted since doing that may corrupt the office license in a way that only reinstallation can fix
+
+del /f /q %token% %nul%
+if exist %token% (
+call :_stopservice sppsvc
+del /f /q %token% %nul%
+)
+
+echo:
+if exist %token% (
+call :_color %Red% "Failed to delete the tokens.dat file."
+) else (
+echo tokens.dat file was successfully deleted.
+)
+
+echo:
+echo Reinstalling System Licenses [slmgr /rilc]...
+cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% && (
+echo [Successful]
+) || (
+call :_color %Red% "[Failed]"
+)
+
+echo:
+if exist %token% (
+call :_color %Green% "tokens.dat file was rebuilt successfully."
+) else (
+call :_color %Red% "Failed to rebuilt tokens.dat file."
+)
+
+goto :at_back
+
+:at_permcheck
+
+set _perm=
+if %winbuild% LSS 22483 wmic path %slp% where (LicenseStatus='1' and GracePeriodRemaining='0' and PartialProductKey is not NULL) get Name /value 2>nul | findstr /i "%1" 1>nul && set _perm=1||set _perm=
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT Name FROM %slp% WHERE LicenseStatus=1 AND GracePeriodRemaining=0 AND PartialProductKey IS NOT NULL').Get()).Name | %% {echo ('Name='+$_)}" 2>nul | findstr /i "%1" 1>nul && set _perm=1||set _perm=
+exit /b
+
+::========================================================================================================================================
+
+:cleanclipsvc
+
+cls
+mode 98, 30
+title Clean ClipSVC Licences
+
+if %winbuild% LSS 10240 (
+%eline%
+echo Unsupported OS version Detected.
+echo This command is supported only for Windows 10/11 and their Server equivalent..
+goto :at_back
+)
+
+echo:
+echo %line%
+echo:
+echo Notes:
+echo:
+echo - Cleaning ClipSVC Licences helps in troubleshooting HWID-KMS38 activation issues.
+echo:
+call :_color2 %_White% " - " %Gray% "All installed HWID-KMS38 licences will be cleaned from the system."
+echo This will remove KMS38 license from the system but HWID license can't be removed.
+echo:
+echo - System restart is recommended after applying it.
+echo:
+echo %line%
+echo:
+choice /C:29 /N /M "> [9] Continue [2] Go back : "
+if %errorlevel%==1 goto at_menu
+
+cls
+echo:
+
+echo Stopping ClipSVC service...
+call :_stopservice ClipSVC
+timeout /t 2 %nul%
+
+:: Thanks to @mspaintmsi for informing this command info
+
+echo:
+echo Applying the command to Clean ClipSVC Licences...
+echo rundll32 clipc.dll,ClipCleanUpState
+
+rundll32 clipc.dll,ClipCleanUpState
+
+if exist "%ProgramData%\Microsoft\Windows\ClipSVC\*.dat" del /f /q "%ProgramData%\Microsoft\Windows\ClipSVC\*.dat" %nul%
+
+if exist "%ProgramData%\Microsoft\Windows\ClipSVC\tokens.dat" (
+call :_color %Red% "[Failed]"
+) else (
+call :_color %Green% "[Successful]"
+)
+
+:: Below registry key (Volatile & Protected) gets created after the ClipSVC License cleanup command, and gets automatically deleted after
+:: system restart. It needs to be deleted to activate the system without restart.
+
+set "RegKey=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState"
+
+call :regown "%RegKey%" %nul%
+reg delete "%RegKey%" /f %nul%
+
+echo:
+echo Deleting a Volatile ^& Protected Registry Key...
+echo [%RegKey%]
+reg query "%RegKey%" %nul% && (
+call :_color %Red% "[Failed]"
+echo Restart the system, that will delete this registry key automatically.
+) || (
+call :_color %Green% "[Successful]"
+)
+
+echo:
+echo Restarting [ClipSVC wlidsvc LicenseManager sppsvc] services...
+for %%# in (ClipSVC wlidsvc LicenseManager sppsvc) do (net stop %%# /y %nul% & net start %%# /y %nul%)
+
+::========================================================================================================================================
+
+:at_back
+
+echo:
+echo %line%
+echo:
+call :_color %_Yellow% "Press any key to go back..."
+pause >nul
+goto :at_menu
+
+::========================================================================================================================================
+
+:at_done
+
+echo:
+echo Press any key to exit...
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:_stopservice
+
+for %%# in (%1) do (
+sc query %%# | find /i "STOPPED" %nul% || net stop %%# /y %nul%
+sc query %%# | find /i "STOPPED" %nul% || sc stop %%# %nul%
+)
+exit /b
+
+::========================================================================================================================================\
+
+:: A lean and mean snippet to set registry ownership and permission recursively
+:: Written by @AveYo aka @BAU
+:: pastebin.com/XTPt0JSC
+
+:: Modified by @abbodi1406 to make it work in ARM64 Windows 10 (builds older than 21277) where only x86 version of PowerShell is installed.
+
+:regown
+
+%_psc% $A='%~1','%~2','%~3','%~4','%~5','%~6';iex(([io.file]::ReadAllText('!_batp!')-split':Own1\:.*')[1])&exit/b:Own1:
+$D1=[uri].module.gettype('System.Diagnostics.Process')."GetM`ethods"(42) |where {$_.Name -eq 'SetPrivilege'} #`:no-ev-warn
+'SeSecurityPrivilege','SeTakeOwnershipPrivilege','SeBackupPrivilege','SeRestorePrivilege'|foreach {$D1.Invoke($null, @("$_",2))}
+$path=$A[0]; $rk=$path-split'\\',2; switch -regex ($rk[0]){'[mM]'{$hv=2147483650};'[uU]'{$hv=2147483649};default{$hv=2147483648};}
+$HK=[Microsoft.Win32.RegistryKey]::OpenBaseKey($hv, 256); $s=$A[1]; $sps=[Security.Principal.SecurityIdentifier]
+$u=($A[2],'S-1-5-32-544')[!$A[2]];$o=($A[3],$u)[!$A[3]];$w=$u,$o |% {new-object $sps($_)}; $old=!$A[3];$own=!$old; $y=$s-eq'all'
+$rar=new-object Security.AccessControl.RegistryAccessRule( $w[0], ($A[5],'FullControl')[!$A[5]], 1, 0, ($A[4],'Allow')[!$A[4]] )
+$x=$s-eq'none';function Own1($k){$t=$HK.OpenSubKey($k,2,'TakeOwnership');if($t){0,4|%{try{$o=$t.GetAccessControl($_)}catch{$old=0}
+};if($old){$own=1;$w[1]=$o.GetOwner($sps)};$o.SetOwner($w[0]);$t.SetAccessControl($o); $c=$HK.OpenSubKey($k,2,'ChangePermissions')
+$p=$c.GetAccessControl(2);if($y){$p.SetAccessRuleProtection(1,1)};$p.ResetAccessRule($rar);if($x){$p.RemoveAccessRuleAll($rar)}
+$c.SetAccessControl($p);if($own){$o.SetOwner($w[1]);$t.SetAccessControl($o)};if($s){$($subkeys=$HK.OpenSubKey($k).GetSubKeyNames()) 2>$null;
+foreach($n in $subkeys){Own1 "$k\$n"}}}};Own1 $rk[1];if($env:VO){get-acl Registry::$path|fl} #:Own1: lean & mean snippet by AveYo
+
+::========================================================================================================================================
+
+:_color
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[0m
+) else (
+call :batcol %~1 "%~2"
+)
+exit /b
+
+:_color2
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m
+) else (
+call :batcol %~1 "%~2" %~3 "%~4"
+)
+exit /b
+
+::=======================================
+
+:: Colored text with pure batch method
+:: Thanks to @dbenham and @jeb
+:: stackoverflow.com/a/10407642
+
+:batcol
+
+pushd %_coltemp%
+if not exist "'" (<nul >"'" set /p "=.")
+setlocal
+set "s=%~2"
+set "t=%~4"
+call :_batcol %1 s %3 t
+del /f /q "'"
+del /f /q "`.txt"
+popd
+exit /b
+
+:_batcol
+
+setlocal EnableDelayedExpansion
+set "s=!%~2!"
+set "t=!%~4!"
+for /f delims^=^ eol^= %%i in ("!s!") do (
+ if "!" equ "" setlocal DisableDelayedExpansion
+ >`.txt (echo %%i\..\')
+ findstr /a:%~1 /f:`.txt "."
+ <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%"
+)
+if "%~4"=="" echo(&exit /b
+setlocal EnableDelayedExpansion
+for /f delims^=^ eol^= %%i in ("!t!") do (
+ if "!" equ "" setlocal DisableDelayedExpansion
+ >`.txt (echo %%i\..\')
+ findstr /a:%~3 /f:`.txt "."
+ <nul set /p "=%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%%_BS%"
+)
+echo(
+exit /b
+
+::=======================================
+
+:_colorprep
+
+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 "Black="30m""
+set "Green="42;97m""
+set "Blue="44;97m""
+set "Yellow="43;97m""
+set "Magenta="45;97m""
+
+set "_Red="40;91m""
+set "_Green="40;92m""
+set "_Blue="40;94m""
+set "_White="40;37m""
+set "_Yellow="40;93m""
+
+exit /b
+)
+
+for /f %%A in ('"prompt $H&for %%B in (1) do rem"') do set "_BS=%%A %%A"
+set "_coltemp=%SystemRoot%\Temp"
+
+set "Red="CF""
+set "Gray="8F""
+set "Black="00""
+set "Green="2F""
+set "Blue="1F""
+set "Yellow="6F""
+set "Magenta="5F""
+
+set "_Red="0C""
+set "_Green="0A""
+set "_Blue="09""
+set "_White="07""
+set "_Yellow="0E""
+
+exit /b
+
+::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Extras/Change_W10_11_Edition.cmd b/MAS/Separate-Files-Version/Extras/Change_W10_11_Edition.cmd new file mode 100644 index 0000000..26d9b83 --- /dev/null +++ b/MAS/Separate-Files-Version/Extras/Change_W10_11_Edition.cmd @@ -0,0 +1,434 @@ +@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+::============================================================================
+::
+:: This script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::============================================================================
+
+
+
+
+::========================================================================================================================================
+
+:: 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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %*"
+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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %*"
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+::========================================================================================================================================
+
+cls
+color 07
+title Change Windows 10-11 Edition
+
+set _elev=
+if /i "%~1"=="-el" set _elev=1
+
+set winbuild=1
+set "nul=>nul 2>&1"
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+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 2>nul | find /i "0x0" 1>nul && (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 "Magenta="45;97m""
+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 "Magenta="Darkmagenta" "white""
+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:"
+set slp=SoftwareLicensingProduct
+set sls=SoftwareLicensingService
+set wApp=55c92734-d682-4d71-983e-d6ec3f16059f
+set "line=echo ___________________________________________________________________________________________"
+
+::========================================================================================================================================
+
+if %winbuild% LSS 10240 (
+%eline%
+echo Unsupported OS version detected.
+echo Project is supported for Windows 10/11.
+goto ced_done
+)
+
+if %winbuild% GEQ 22483 if not exist %_psc% (
+%nceline%
+echo Powershell is not installed in the system.
+goto ced_done
+)
+
+::========================================================================================================================================
+
+:: Fix for the special characters limitation in path name
+
+set "_batf=%~f0"
+set "_batp=%_batf:'=''%"
+
+set "_PSarg="""%~f0""" -el %_args%"
+
+set "_ttemp=%temp%"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" 1>nul && (
+%eline%
+echo Script is launched from the temp folder,
+echo Most likely you are running the script directly from the archive file.
+echo:
+echo Extract the archive file and launch the script from the extracted folder.
+goto ced_done
+)
+
+::========================================================================================================================================
+
+:: Elevate script as admin and pass arguments and preventing loop
+
+%nul% reg query HKU\S-1-5-19 || (
+if not defined _elev %nul% %_psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b
+%eline%
+echo This script require administrator privileges.
+echo To do so, right click on this script and select 'Run as administrator'.
+goto ced_done
+)
+
+::========================================================================================================================================
+
+mode 98, 30
+echo:
+echo Initializing...
+
+:: Check WMI and sppsvc Errors
+
+set applist=
+net start sppsvc /y %nul%
+if %winbuild% LSS 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%wApp%') get ID /VALUE" 2^>nul')"
+if %winbuild% GEQ 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')"
+%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a"))
+
+if not defined applist (
+%eline%
+echo Failed running WMI query check, verify that these services are working correctly
+echo Windows Management Instrumentation [WinMgmt], Software Protection [sppsvc]
+echo:
+echo Script will try to enable these services.
+echo:
+call :dk_color %_Yellow% "Press any key to continue..."
+pause >nul
+for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\WinMgmt /v Start 2^>nul') do if /i %%b equ 0x4 (sc config WinMgmt start= auto %nul%)
+net start WinMgmt /y %nul%
+net stop sppsvc /y %nul%
+net start sppsvc /y %nul%
+cls
+)
+
+::========================================================================================================================================
+
+:: Check Windows Server version
+
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" (
+%eline%
+echo Windows Server version is not supported.
+goto ced_done
+)
+
+:: Refresh license status, it helps to get correct product name in Windows 17134 and later builds
+
+call :dk_refresh
+
+:: Check Windows Edition
+
+set osedition=
+for /f "tokens=3 delims=: " %%a in ('DISM /English /Online /Get-CurrentEdition 2^>nul ^| find /i "Current Edition :"') do set "osedition=%%a"
+
+cls
+if "%osedition%"=="" (
+%eline%
+echo OS Edition was not detected properly. Aborting...
+goto ced_done
+)
+
+:: Check product name
+
+set winos=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+
+::========================================================================================================================================
+
+set _target=
+for /f "tokens=4" %%a in ('dism /online /english /Get-TargetEditions ^| findstr /i /c:"Target Edition : "') do (if defined _target (set "_target=!_target! %%a") else (set "_target=%%a"))
+
+if not defined _target (
+%line%
+echo:
+call :dk_color %Gray% "Target Edition not found."
+echo Current Edition [%osedition% ^| %winbuild%] can not be changed to any other Edition.
+%line%
+goto ced_done
+)
+
+::========================================================================================================================================
+
+%line%
+echo:
+call :dk_color %Gray% "You can change the Current Edition [%osedition%] to one of the following."
+%line%
+echo:
+for %%# in (%_target%) do echo %%#
+%line%
+echo:
+call :dk_color %_Green% "Press [1] to Continue or [2] to Exit"
+choice /C:21 /N
+
+if %errorlevel%==1 exit /b
+cls
+
+::========================================================================================================================================
+
+%line%
+echo:
+call :dk_color %Gray% "Current Edition - [%osedition%]"
+echo:
+for %%# in (%_target%) do (
+choice /C:NY /N /M "Do you want to change to the [%%#] edition? [Y,N] : "
+if [!errorlevel!]==[2] (
+set targetedition=%%#
+goto ced_change
+)
+)
+
+%line%
+goto ced_done
+
+::========================================================================================================================================
+
+:ced_change
+
+cls
+set key=
+set _changepk=1
+
+call :changeeditiondata
+
+if not defined key (
+%eline%
+echo [%targetedition% ^| %winbuild%]
+echo Unable to find this product key in the supported product list.
+if %winbuild% GTR 19044 echo Make sure you are using updated version of the script
+goto ced_done
+)
+
+::========================================================================================================================================
+
+%line%
+
+:: Changing from Core to Non-Core & Changing editions in Windows build older than 17134 requires "changepk /productkey" method and restart
+:: In other cases, editions can be changed instantly with "slmgr /ipk"
+
+if %_changepk%==1 (
+echo %_chan% | find /i "OEM" >NUL && (
+%eline%
+echo [%osedition%] can not be changed to [%targetedition%] Edition due to lack of non OEM keys.
+echo Non-OEM keys are required to change from Core to Non-Core Editions.
+goto ced_done
+)
+for %%a in (dns.msftncsi.com,www.microsoft.com,one.one.one.one,resolver1.opendns.com) do (
+for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do (
+if not [%%#]==[] (
+%eline%
+echo Disconnect the Internet and then try again.
+goto ced_done
+)
+)
+)
+
+echo:
+echo The system will automatically reboot to complete the process.
+echo:
+call :dk_color %Gray% "If the upgrade Window shows an error then you can safely ignore it."
+call :dk_color %Gray% "However you will need to manually reboot the system in that case."
+echo:
+call :dk_color %Magenta% "Important - Save your work before continue."
+echo:
+choice /C:21 /N /M "[1] Continue [2] Exit : "
+if !errorlevel!==1 exit /b
+)
+
+::========================================================================================================================================
+
+echo:
+echo Changing the Current Edition [%osedition%] to [%targetedition%]
+echo:
+
+if %_changepk%==0 (
+echo Installing %_chan% Key [%key%]
+echo:
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call InstallProductKey ProductKey="%key%" %nul%
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT Version FROM %sls%').Get()).InstallProductKey('%key%')" %nul%
+if not !errorlevel!==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul%
+
+if !errorlevel!==0 (
+call :dk_refresh
+call :dk_color %Green% "[Successful]"
+echo:
+call :dk_color %Gray% "Reboot is required to properly change the Edition."
+) else (
+%eline%
+echo [Unsuccessful]
+)
+)
+
+if %_changepk%==1 (
+echo Applying the command with %_chan% Key
+echo start changepk /productkey %key%
+start changepk /productkey %key%
+)
+%line%
+
+::========================================================================================================================================
+
+:ced_done
+
+echo:
+call :dk_color %_Yellow% "Press any key to exit..."
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:: Refresh license status
+
+:dk_refresh
+
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call RefreshLicenseStatus %nul%
+if %winbuild% GEQ 22483 %_psc% "$null=(([WMICLASS]'%sls%').GetInstances()).RefreshLicenseStatus()" %nul%
+exit /b
+
+::========================================================================================================================================
+
+:dk_color
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[0m
+) else (
+if not exist %_psc% (echo %~3) else (%_psc% write-host -back '%1' -fore '%2' '%3')
+)
+exit /b
+
+::========================================================================================================================================
+
+:: 1st column = Activation ID
+:: 2nd column = Generic Retail/OEM/MAK/GVLK Key
+:: 3rd column = SKU ID
+:: 4th column = 1 = activation is not working (at the time of writing this), 0 = activation is working
+:: 5th column = Key Type
+:: 6th column = WMI Edition ID
+:: 7th column = Version name incase same Edition ID is used in different OS versions with different key
+:: Separator = _
+
+:: Key preference is in the following order. Retail > Volume:MAK > Volume:GVLK > OEM:NONSLP > OEM:DM
+:: OEM keys are in last because they can't be used in edition change if "changepk /productkey" method is needed instead of "slmgr /ipk"
+:: OEM keys are listed here because we don't have other keys for that edition
+
+:changeeditiondata
+
+for %%# in (
+2ffd8952-423e-4903-b993-72a1aa44cf82_44NYX-TKR9D-CCM2D-V6B8F-HQWWR___4_0_Volume:MAK_Enterprise
+23505d51-32d6-41f0-8ca7-e78ad0f16e71_D6RD9-D4N8T-RT9QX-YW6YT-FCWWJ__11_1_____Retail_Starter
+c83cef07-6b72-4bbc-a28f-a00386872839_3V6Q6-NQXCX-V8YXR-9QCYV-QPFCT__27_0_Volume:MAK_EnterpriseN
+211b80cc-7f64-482c-89e9-4ba21ff827ad_3NFXW-2T27M-2BDW6-4GHRV-68XRX__47_1_____Retail_StarterN
+4de7cb65-cdf1-4de9-8ae8-e3cce27b9f2c_VK7JG-NPHTM-C97JM-9MPGT-3V66T__48_0_____Retail_Professional
+9fbaf5d6-4d83-4422-870d-fdda6e5858aa_2B87N-8KFHP-DKV6R-Y2C8J-PKCKT__49_0_____Retail_ProfessionalN
+f742e4ff-909d-4fe9-aacb-3231d24a0c58_4CPRK-NM3K3-X6XXQ-RXX86-WXCHW__98_0_____Retail_CoreN
+1d1bac85-7365-4fea-949a-96978ec91ae0_N2434-X9D7W-8PF6X-8DV9T-8TYMD__99_0_____Retail_CoreCountrySpecific
+3ae2cc14-ab2d-41f4-972f-5e20142771dc_BT79Q-G7N6G-PGBYW-4YWX6-6F4BT_100_0_____Retail_CoreSingleLanguage
+2b1f36bb-c1cd-4306-bf5c-a0367c2d97d8_YTMG3-N6DKC-DKB77-7M9GH-8HVX7_101_0_____Retail_Core
+2a6137f3-75c0-4f26-8e3e-d83d802865a4_XKCNC-J26Q9-KFHD2-FKTHY-KD72Y_119_0_OEM:NONSLP_PPIPro
+e558417a-5123-4f6f-91e7-385c1c7ca9d4_YNMGQ-8RYV3-4PGQ3-C8XTP-7CFBY_121_0_____Retail_Education
+c5198a66-e435-4432-89cf-ec777c9d0352_84NGF-MHBT6-FXBX8-QWJK7-DRR8H_122_0_____Retail_EducationN
+cce9d2de-98ee-4ce2-8113-222620c64a27_KCNVH-YKWX8-GJJB9-H9FDT-6F7W2_125_1_Volume:MAK_EnterpriseS_2021
+97348f2f-bebc-4653-a4bd-18a895d316d9_VBX36-N7DDY-M9H62-83BMJ-CPR42_125_0_Volume:MAK_EnterpriseS_2019
+2782d615-3249-495b-8260-15a4c2295448_PN3KR-JXM7T-46HM4-MCQGK-7XPJQ_125_0_Volume:MAK_EnterpriseS_2016
+6366a32b-72e4-4212-bf11-c22b0e98a435_DVWKN-3GCMV-Q2XF4-DDPGM-VQWWY_125_0_Volume:MAK_EnterpriseS_2015
+2c060131-0e43-4e01-adc1-cf5ad1100da8_RQFNW-9TPM3-JQ73T-QV4VQ-DV9PT_126_1_Volume:MAK_EnterpriseSN_2021
+e8f74caa-03fb-4839-8bcc-2e442b317e53_M33WV-NHY3C-R7FPM-BQGPT-239PG_126_1_Volume:MAK_EnterpriseSN_2019
+3d1022d8-969f-4222-b54b-327f5a5af4c9_2DBW3-N2PJG-MVHW3-G7TDK-9HKR4_126_0_Volume:MAK_EnterpriseSN_2016
+60c243e1-f90b-4a1b-ba89-387294948fb6_NTX6B-BRYC2-K6786-F6MVQ-M7V2X_126_0_Volume:MAK_EnterpriseSN_2015
+a48938aa-62fa-4966-9d44-9f04da3f72f2_G3KNM-CHG6T-R36X3-9QDG6-8M8K9_138_1_____Retail_ProfessionalSingleLanguage
+f7af7d09-40e4-419c-a49b-eae366689ebd_HNGCC-Y38KG-QVK8D-WMWRK-X86VK_139_1_____Retail_ProfessionalCountrySpecific
+eb6d346f-1c60-4643-b960-40ec31596c45_DXG7C-N36C4-C4HTG-X4T3X-2YV77_161_0_____Retail_ProfessionalWorkstation
+89e87510-ba92-45f6-8329-3afa905e3e83_WYPNQ-8C467-V2W6J-TX4WX-WT2RQ_162_0_____Retail_ProfessionalWorkstationN
+62f0c100-9c53-4e02-b886-a3528ddfe7f6_8PTT6-RNW4C-6V7J2-C2D3X-MHBPB_164_0_____Retail_ProfessionalEducation
+13a38698-4a49-4b9e-8e83-98fe51110953_GJTYN-HDMQY-FRR76-HVGC7-QPF8P_165_0_____Retail_ProfessionalEducationN
+5f87a508-7e1c-4fab-9d45-2356c6002081_C4NTJ-CX6Q2-VXDMR-XVKGM-F9DJC_171_1_Volume:MAK_EnterpriseG
+1681ae34-3080-4bfa-a1b5-6d792342e692_46PN6-R9BK9-CVHKB-HWQ9V-MBJY8_172_1_Volume:MAK_EnterpriseGN
+df96023b-dcd9-4be2-afa0-c6c871159ebe_NJCF7-PW8QT-3324D-688JX-2YV66_175_0_____Retail_ServerRdsh
+d4ef7282-3d2c-4cf0-9976-8854e64a8d1e_V3WVW-N2PV2-CGWC3-34QGF-VMJ2C_178_0_____Retail_Cloud
+af5c9381-9240-417d-8d35-eb40cd03e484_NH9J3-68WK7-6FB93-4K3DF-DJ4F6_179_0_____Retail_CloudN
+c7051f63-3a76-4992-bce5-731ec0b1e825_2HN6V-HGTM8-6C97C-RK67V-JQPFD_183_1_____Retail_CloudE
+8ab9bdd1-1f67-4997-82d9-8878520837d9_XQQYW-NFFMW-XJPBH-K8732-CKFFD_188_0_____OEM:DM_IoTEnterprise
+ed655016-a9e8-4434-95d9-4345352c2552_QPM6N-7J2WJ-P88HH-P3YRH-YY74H_191_0_OEM:NONSLP_IoTEnterpriseS
+d4bdc678-0a4b-4a32-a5b3-aaa24c3b0f24_K9VKN-3BGWV-Y624W-MCRMQ-BHDCD_202_0_____Retail_CloudEditionN
+92fb8726-92a8-4ffc-94ce-f82e07444653_KY7PN-VR6RX-83W6Y-6DDYQ-T6R4W_203_0_____Retail_CloudEdition
+) do (
+for /f "tokens=1-7 delims=_" %%A in ("%%#") do if /i %targetedition%==%%F (
+
+if not defined key (
+set 7th=%%G
+if not defined 7th (
+set "key=%%B" & set "_chan=%%E"
+echo "!applist!" | find /i "%%A" 1>nul && set _changepk=0
+) else (
+echo "%winos%" | find "%%G" 1>nul && (set "key=%%B" & set "_chan=%%E" & echo "!applist!" | find /i "%%A" 1>nul && set _changepk=0)
+)
+)
+)
+)
+exit /b
+
+::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Extract_OEM_Folder.cmd b/MAS/Separate-Files-Version/Extras/Extract_OEM_Folder/Extract_OEM_Folder.cmd index cb34033..dc57c6d 100644 --- a/MAS/Separate-Files-Version/Extract_OEM_Folder.cmd +++ b/MAS/Separate-Files-Version/Extras/Extract_OEM_Folder/Extract_OEM_Folder.cmd @@ -1,524 +1,698 @@ -@setlocal DisableDelayedExpansion -@echo off - - - -::============================================================================ -:: -:: This script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::============================================================================ - - - - -::======================================================================================================================================== - -:: 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 - -set "_cmdf=%~f0" -for %%# in (%*) do ( -if /i "%%#"=="r1" set r1=1 -if /i "%%#"=="r2" set r2=1 -) - -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 Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -::======================================================================================================================================== - -cls -color 07 -title Extract $OEM$ Folder - -set winbuild=1 -set "nul=>nul 2>&1" -set psc=powershell.exe -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 2>nul | find /i "0x0" 1>nul && (set _NCS=0) - -if %_NCS% EQU 1 ( -for /F %%a in ('echo prompt $E ^| cmd') do set "esc=%%a" -set "Red="41;97m"" -set "Green="42;97m"" -set "Magenta="45;97m"" -set "_White="40;37m"" -set "_Green="40;92m"" -set "_Yellow="40;93m"" -) else ( -set "Red="Red" "white"" -set "Green="DarkGreen" "white"" -set "Magenta="Darkmagenta" "white"" -set "_White="Black" "Gray"" -set "_Green="Black" "Green"" -set "_Yellow="Black" "Yellow"" -) - -set "nceline=echo: &echo ==== ERROR ==== &echo:" -set "eline=echo: &call :ex_color %Red% "==== ERROR ====" &echo:" - -::======================================================================================================================================== - -if %winbuild% LSS 7600 ( -%nceline% -echo Unsupported OS version detected. -echo Project is supported only for Windows 7/8/8.1/10/11 and their Server equivalent. -goto done2 -) - -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find powershell.exe in the system. -goto done2 -) - -::======================================================================================================================================== - -:: Check desktop location - -set desktop= -for /f "skip=2 tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v Desktop') do call set "desktop=%%b" -if not defined desktop for /f "delims=" %%a in ('%psc% "& {write-host $([Environment]::GetFolderPath('Desktop'))}"') do call set "desktop=%%a" - -if not defined desktop ( -%eline% -echo Desktop location was not detected, aborting... -goto done2 -) - -::======================================================================================================================================== - -:: Fix for the special characters limitation in path name - -set "_work=%~dp0" -if "%_work:~-1%"=="\" set "_work=%_work:~0,-1%" - -set "_batf=%~f0" -set "_batp=%_batf:'=''%" -set "_pdesk=%desktop:'=''%" - -set "_ttemp=%temp%" - -set "_dir=%desktop%\$OEM$\$$\Setup\Scripts" - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -if not exist "!desktop!\" ( -%eline% -echo Desktop location was not detected, aborting... -goto done2 -) - -::======================================================================================================================================== - -echo "!_batf!" | find /i "!_ttemp!" 1>nul && ( -if /i not "!_work!"=="!_ttemp!" ( -%eline% -echo Script is launched from the temp folder, -echo Most likely you are running the script directly from the archive file. -echo: -echo Extract the archive file and launch the script from the extracted folder. -goto done2 -) -) - -::======================================================================================================================================== - -mode 66, 26 - -if exist "!desktop!\$OEM$\" ( -echo _____________________________________________________ -%eline% -echo $OEM$ folder already exists on the Desktop. -echo _____________________________________________________ -goto done2 -) - -set HWID_Activation.cmd=HWID-KMS38_Activation\HWID_Activation.cmd -set KMS38_Activation.cmd=HWID-KMS38_Activation\KMS38_Activation.cmd -set ClipUp.exe=HWID-KMS38_Activation\BIN\ClipUp.exe -set gatherosstate.exe=HWID-KMS38_Activation\BIN\gatherosstate.exe - -set Activate.cmd=Online_KMS_Activation\Activate.cmd -set cleanosppx64.exe=Online_KMS_Activation\BIN\cleanosppx64.exe -set cleanosppx86.exe=Online_KMS_Activation\BIN\cleanosppx86.exe - -pushd "!_work!" - -set _nofile= -for %%# in ( -%HWID_Activation.cmd% -%KMS38_Activation.cmd% -%ClipUp.exe% -%gatherosstate.exe% -%Activate.cmd% -%cleanosppx64.exe% -%cleanosppx86.exe% -) do ( -if not exist "%%#" set _nofile=1 -) - -popd - -if defined _nofile ( -echo _____________________________________________________ -%eline% -echo Some files are missing in the 'Activators' folder. -echo _____________________________________________________ -goto done2 -) - -::======================================================================================================================================== - -:Menu - -cls -echo: -echo: -echo: -echo: -echo: Extract $OEM$ folder on the desktop -echo: ________________________________________________________ -echo: -echo: [1] HWID -echo: [2] KMS38 -echo: [3] Online KMS -echo: -echo: [4] HWID ^(Windows^) ^+ Online KMS ^(Office^) -echo: [5] KMS38 ^(Windows^) ^+ Online KMS ^(Office^) -echo: -echo: [6] Exit -echo: ________________________________________________________ -echo: -call :ex_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard [1,2,3,4,5,6]" -choice /C:123456 /N -set _erl=%errorlevel% - -if %_erl%==6 exit /b -if %_erl%==5 goto:kms38_kms -if %_erl%==4 goto:hwid_kms -if %_erl%==3 goto:kms -if %_erl%==2 goto:kms38 -if %_erl%==1 goto:hwid -goto :Menu - -::======================================================================================================================================== - -:hwid - -cls -call :prep -call :hwidprep -call :pop_d -call :export hwid_setup -call :hwidprep2 - -if defined _error goto errorfound -set "_oem=HWID" -goto done - -:hwid_setup: -@echo off - -fltmc >nul || exit /b - -start /b /wait cmd /c "%~dp0HWID_Activation.cmd" /a - -cd \ -(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0") -:hwid_setup: - -::======================================================================================================================================== - -:kms38 - -cls -call :prep -call :kms38prep -call :pop_d -call :export kms38_setup -call :kms38prep2 - -if defined _error goto errorfound -set "_oem=KMS38" -goto done - -:kms38_setup: -@echo off - -fltmc >nul || exit /b - -start /b /wait cmd /c "%~dp0KMS38_Activation.cmd" /a - -cd \ -(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0") -:kms38_setup: - -::======================================================================================================================================== - -:kms - -cls -call :prep -call :kmsprep -call :pop_d -call :export kms_setup -call :kmsprep2 - -if defined _kerror goto errorfound -set "_oem=Online KMS" -goto done - -:kms_setup: -@echo off - -fltmc >nul || exit /b - -start /b /wait cmd /c "%~dp0Activate.cmd" /rat -start /b /wait cmd /c "%~dp0Activate.cmd" /wo - -cd \ -(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0") -:kms_setup: - -::======================================================================================================================================== - -:hwid_kms - -cls -call :prep -call :hwidprep -call :kmsprep -call :pop_d -call :export hwid_kms_setup -call :hwidprep2 -call :kmsprep2 - -if defined _error goto errorfound -if defined _kerror goto errorfound -set "_oem=HWID [Windows] + Online KMS [Office]" -goto done - -:hwid_kms_setup: -@echo off - -fltmc >nul || exit /b - -start /b /wait cmd /c "%~dp0HWID_Activation.cmd" /a - -start /b /wait cmd /c "%~dp0Activate.cmd" /rat -start /b /wait cmd /c "%~dp0Activate.cmd" /o - -cd \ -(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0") -:hwid_kms_setup: - -::======================================================================================================================================== - -:kms38_kms - -cls -call :prep -call :kms38prep -call :kmsprep -call :pop_d -call :export kms38_kms_setup -call :kms38prep2 -call :kmsprep2 - -if defined _error goto errorfound -if defined _kerror goto errorfound -set "_oem=KMS38 [Windows] + Online KMS [Office]" -goto done - -:kms38_kms_setup: -@echo off - -fltmc >nul || exit /b - -start /b /wait cmd /c "%~dp0KMS38_Activation.cmd" /a - -start /b /wait cmd /c "%~dp0Activate.cmd" /rat -start /b /wait cmd /c "%~dp0Activate.cmd" /o - -cd \ -(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0") -:kms38_kms_setup: - -::======================================================================================================================================== - -:errorfound - -%eline% -echo $OEM$ Folder was not created successfully... -goto :done2 - -:done - -echo _______________________________________________________ -echo: -call :ex_color %Magenta% "%_oem%" -call :ex_color %Green% "$OEM$ folder is successfully created on the Desktop." -echo _______________________________________________________ - -:done2 - -echo: -call :ex_color %_Yellow% "Press any key to exit..." -pause >nul -exit /b - -::======================================================================================================================================== - -:prep - -pushd "!desktop!" -md "!desktop!\$OEM$\$$\Setup\Scripts\BIN" -pushd "!_work!" -exit /b - -:hwidprep - -copy /y /b "%HWID_Activation.cmd%" "!_dir!\HWID_Activation.cmd" %nul% -copy /y /b "%gatherosstate.exe%" "!_dir!\BIN\gatherosstate.exe" %nul% -exit /b - -:kms38prep - -copy /y /b "%KMS38_Activation.cmd%" "!_dir!\KMS38_Activation.cmd" %nul% -copy /y /b "%ClipUp.exe%" "!_dir!\BIN\ClipUp.exe" %nul% -copy /y /b "%gatherosstate.exe%" "!_dir!\BIN\gatherosstate.exe" %nul% -exit /b - -:kmsprep - -copy /y /b "%Activate.cmd%" "!_dir!\Activate.cmd" %nul% -copy /y /b "%cleanosppx64.exe%" "!_dir!\BIN\cleanosppx64.exe" %nul% -copy /y /b "%cleanosppx86.exe%" "!_dir!\BIN\cleanosppx86.exe" %nul% -exit /b - -:hwidprep2 - -set _error= -pushd "!_dir!\" - -for %%# in ( -HWID_Activation.cmd -BIN\gatherosstate.exe -SetupComplete.cmd -) do ( -if not exist "%%#" set _error=1 -) -popd -exit /b - -:kms38prep2 - -set _error= -pushd "!_dir!\" - -for %%# in ( -KMS38_Activation.cmd -BIN\ClipUp.exe -BIN\gatherosstate.exe -SetupComplete.cmd -) do ( -if not exist "%%#" set _error=1 -) -popd -exit /b - -:kmsprep2 - -set _kerror= -pushd "!_dir!\" - -for %%# in ( -Activate.cmd -BIN\cleanosppx64.exe -BIN\cleanosppx86.exe -SetupComplete.cmd -) do ( -if not exist "%%#" set _kerror=1 -) -popd -exit /b - -:pop_d - -popd -popd -exit /b - -::======================================================================================================================================== - -:: Extract the text from batch script without character and file encoding issue - -:export - -%nul% %psc% "$f=[io.file]::ReadAllText('!_batp!') -split \":%~1\:.*`r`n\"; [io.file]::WriteAllText('!_pdesk!\$OEM$\$$\Setup\Scripts\SetupComplete.cmd',$f[1].Trim(),[System.Text.Encoding]::ASCII);" -exit /b - -::======================================================================================================================================== - -:ex_color - -if %_NCS% EQU 1 ( -echo %esc%[%~1%~2%esc%[0m -) else ( -if not exist %psc% (echo %~3) else (%psc% write-host -back '%1' -fore '%2' '%3') -) -exit /b - -:ex_color2 - -if %_NCS% EQU 1 ( -echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m -) else ( -if not exist %psc% (echo %~3%~6) else (%psc% write-host -back '%1' -fore '%2' '%3' -NoNewline; write-host -back '%4' -fore '%5' '%6') -) -exit /b - +@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+::============================================================================
+::
+:: This script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::============================================================================
+
+
+
+
+::========================================================================================================================================
+
+:: 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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %*"
+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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %*"
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+::========================================================================================================================================
+
+cls
+color 07
+title Extract $OEM$ Folder
+
+set winbuild=1
+set "nul=>nul 2>&1"
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+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 2>nul | find /i "0x0" 1>nul && (set _NCS=0)
+
+if %_NCS% EQU 1 (
+for /F %%a in ('echo prompt $E ^| cmd') do set "esc=%%a"
+set "Red="41;97m""
+set "Green="42;97m""
+set "Magenta="45;97m""
+set "_White="40;37m""
+set "_Green="40;92m""
+set "_Yellow="40;93m""
+) else (
+set "Red="Red" "white""
+set "Green="DarkGreen" "white""
+set "Magenta="Darkmagenta" "white""
+set "_White="Black" "Gray""
+set "_Green="Black" "Green""
+set "_Yellow="Black" "Yellow""
+)
+
+set "nceline=echo: &echo ==== ERROR ==== &echo:"
+set "eline=echo: &call :ex_color %Red% "==== ERROR ====" &echo:"
+
+::========================================================================================================================================
+
+if %winbuild% LSS 7600 (
+%nceline%
+echo Unsupported OS version Detected.
+echo Project is supported only for Windows 7/8/8.1/10/11 and their Server equivalent.
+goto done2
+)
+
+if not exist "%_psc%" (
+%nceline%
+echo Powershell is not installed in the system.
+echo Aborting...
+goto done2
+)
+
+::========================================================================================================================================
+
+:: Check desktop location
+
+set desktop=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v Desktop') do call set "desktop=%%b"
+if not defined desktop for /f "delims=" %%a in ('%_psc% "& {write-host $([Environment]::GetFolderPath('Desktop'))}"') do call set "desktop=%%a"
+
+if not defined desktop (
+%eline%
+echo Desktop location was not detected, aborting...
+goto done2
+)
+
+::========================================================================================================================================
+
+:: Fix for the special characters limitation in path name
+
+set "_work=%~dp0"
+if "%_work:~-1%"=="\" set "_work=%_work:~0,-1%"
+
+set "_batf=%~f0"
+set "_batp=%_batf:'=''%"
+set "_pdesk=%desktop:'=''%"
+
+set "_ttemp=%temp%"
+
+set "_dir=%desktop%\$OEM$\$$\Setup\Scripts"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" 1>nul && (
+%eline%
+echo Script is launched from the temp folder,
+echo Most likely you are running the script directly from the archive file.
+echo:
+echo Extract the archive file and launch the script from the extracted folder.
+goto done2
+)
+
+::========================================================================================================================================
+
+mode 66, 25
+
+if exist "!desktop!\$OEM$\" (
+echo _____________________________________________________
+%eline%
+echo $OEM$ folder already exists on the Desktop.
+echo _____________________________________________________
+goto done2
+)
+
+set HWID_Activation.cmd=Activators\HWID-KMS38_Activation\HWID_Activation.cmd
+set KMS38_Activation.cmd=Activators\HWID-KMS38_Activation\KMS38_Activation.cmd
+set ClipUp.exe=Activators\HWID-KMS38_Activation\BIN\ClipUp.exe
+set gatherosstate.exe=Activators\HWID-KMS38_Activation\BIN\gatherosstate.exe
+set slc.dll=Activators\HWID-KMS38_Activation\BIN\slc.dll
+set arm64_gatherosstate.exe=Activators\HWID-KMS38_Activation\BIN\arm64_gatherosstate.exe
+set arm64_slc.dll=Activators\HWID-KMS38_Activation\BIN\arm64_slc.dll
+
+set Activate.cmd=Activators\Online_KMS_Activation\Activate.cmd
+set cleanosppx64.exe=Activators\Online_KMS_Activation\BIN\cleanosppx64.exe
+set cleanosppx86.exe=Activators\Online_KMS_Activation\BIN\cleanosppx86.exe
+
+pushd "!_work!"
+pushd ..
+pushd ..
+
+set _nofile=
+for %%# in (
+%HWID_Activation.cmd%
+%KMS38_Activation.cmd%
+%ClipUp.exe%
+%gatherosstate.exe%
+%slc.dll%
+%arm64_gatherosstate.exe%
+%arm64_slc.dll%
+%Activate.cmd%
+%cleanosppx64.exe%
+%cleanosppx86.exe%
+) do (
+if not exist "%%#" set _nofile=1
+)
+
+popd
+popd
+popd
+
+if defined _nofile (
+echo _____________________________________________________
+%eline%
+echo Some files are missing in the 'Activators' folder.
+echo _____________________________________________________
+goto done2
+)
+
+::========================================================================================================================================
+
+:Menu
+
+cls
+echo:
+echo:
+echo: Extract $OEM$ folder on the desktop
+echo: For more details use Read me
+echo: Here ^> means Fallback to
+echo: ________________________________________________________
+echo:
+echo: [1] HWID
+echo: [2] KMS38
+echo: [3] Online KMS
+echo:
+echo: [4] HWID ^> KMS38
+echo: [5] HWID ^> Online KMS
+echo: [6] KMS38 ^> Online KMS
+echo: [7] HWID ^> KMS38 ^> Online KMS
+echo:
+echo: [8] Exit
+echo: ________________________________________________________
+echo:
+call :ex_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard [1,2,3,4,5,6,7,8]"
+choice /C:12345678 /N
+set _erl=%errorlevel%
+
+if %_erl%==8 exit /b
+if %_erl%==7 goto:hwid_kms38_kms
+if %_erl%==6 goto:kms38_kms
+if %_erl%==5 goto:hwid_kms
+if %_erl%==4 goto:hwid_kms38
+if %_erl%==3 goto:kms
+if %_erl%==2 goto:kms38
+if %_erl%==1 goto:hwid
+goto :Menu
+
+::========================================================================================================================================
+
+:hwid
+
+cls
+call :prep
+call :hwidprep
+call :pop_d
+call :export hwid_setup
+call :hwidprep2
+
+if defined _error goto errorfound
+set "_oem=HWID"
+goto done
+
+:hwid_setup:
+@echo off
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+start /b /wait cmd /c "%~dp0HWID_Activation.cmd" /a
+
+cd \
+(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")
+:hwid_setup:
+
+::========================================================================================================================================
+
+:kms38
+
+cls
+call :prep
+call :kms38prep
+call :pop_d
+call :export kms38_setup
+call :kms38prep2
+
+if defined _error goto errorfound
+set "_oem=KMS38"
+goto done
+
+:kms38_setup:
+@echo off
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+start /b /wait cmd /c "%~dp0KMS38_Activation.cmd" /a
+
+cd \
+(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")
+:kms38_setup:
+
+::========================================================================================================================================
+
+:kms
+
+cls
+call :prep
+call :kmsprep
+call :pop_d
+call :export kms_setup
+call :kmsprep2
+
+if defined _kerror goto errorfound
+set "_oem=Online KMS"
+goto done
+
+:kms_setup:
+@echo off
+
+============================================================================
+
+:: Change value from 1 to 0 to disable KMS Renewal And Activation Task
+set Renewal_And_Activation_Task=1
+
+:: Change value from 1 to 0 to disable KMS activation desktop context menu
+set Desktop_context_menu=1
+
+============================================================================
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+start /b /wait cmd /c "%~dp0Activate.cmd" /wo
+if %Renewal_And_Activation_Task% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /rat
+if %Desktop_context_menu% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /dcm
+
+cd \
+(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")
+:kms_setup:
+
+::========================================================================================================================================
+
+:hwid_kms38
+
+cls
+call :prep
+copy /y /b "%HWID_Activation.cmd%" "!_dir!\HWID_Activation.cmd" %nul%
+call :kms38prep
+call :pop_d
+call :export hwid_kms38_setup
+call :kms38prep2
+If not exist "!_dir!\HWID_Activation.cmd" set _error=1
+
+if defined _error goto errorfound
+set "_oem=HWID [Fallback to] KMS38"
+goto done
+
+:hwid_kms38_setup:
+@echo off
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+set KMS38=
+set osSKU=0
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "osSKU=%%a"
+
+:: Check Windows Server version
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" set KMS38=1
+
+:: 171=EnterpriseG, 172=EnterpriseGN, 183=CloudE
+for %%# in (171 172 183) do (if %osSKU%==%%# set KMS38=1)
+
+:: Check Enterprise LTSC 2019/2021 N
+if %osSKU%==126 (echo %winos% | findstr /i "2019 2021" 1>nul && set KMS38=1)
+
+if defined KMS38 (
+start /b /wait cmd /c "%~dp0KMS38_Activation.cmd" /a
+) else (
+start /b /wait cmd /c "%~dp0HWID_Activation.cmd" /a
+)
+
+cd \
+(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")
+:hwid_kms38_setup:
+
+::========================================================================================================================================
+
+:hwid_kms
+
+cls
+call :prep
+call :hwidprep
+call :kmsprep
+call :pop_d
+call :export hwid_kms_setup
+call :hwidprep2
+call :kmsprep2
+
+if defined _error goto errorfound
+if defined _kerror goto errorfound
+set "_oem=HWID [Fallback to] Online KMS"
+goto done
+
+:hwid_kms_setup:
+@echo off
+
+============================================================================
+
+:: Change value from 1 to 0 to disable KMS Renewal And Activation Task
+set Renewal_And_Activation_Task=1
+
+:: Change value from 1 to 0 to disable KMS activation desktop context menu
+set Desktop_context_menu=1
+
+============================================================================
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+set KMS=
+set osSKU=0
+for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "osSKU=%%a"
+
+:: Check Windows 10 install
+if %winbuild% LSS 10240 set KMS=1
+
+:: Check Windows Server version
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" set KMS=1
+
+:: 171=EnterpriseG, 172=EnterpriseGN, 183=CloudE
+for %%# in (171 172 183) do (if %osSKU%==%%# set KMS=1)
+
+:: Check Enterprise LTSC 2019/2021 N
+if %osSKU%==126 (echo %winos% | findstr /i "2019 2021" 1>nul && set KMS=1)
+
+if defined KMS (
+start /b /wait cmd /c "%~dp0Activate.cmd" /wo
+) else (
+start /b /wait cmd /c "%~dp0HWID_Activation.cmd" /a
+start /b /wait cmd /c "%~dp0Activate.cmd" /o
+)
+
+if %Renewal_And_Activation_Task% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /rat
+if %Desktop_context_menu% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /dcm
+
+cd \
+(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")
+:hwid_kms_setup:
+
+::========================================================================================================================================
+
+:kms38_kms
+
+cls
+call :prep
+call :kms38prep
+call :kmsprep
+call :pop_d
+call :export kms38_kms_setup
+call :kms38prep2
+call :kmsprep2
+
+if defined _error goto errorfound
+if defined _kerror goto errorfound
+set "_oem=KMS38 [Fallback to] Online KMS"
+goto done
+
+:kms38_kms_setup:
+@echo off
+
+============================================================================
+
+:: Change value from 1 to 0 to disable KMS Renewal And Activation Task
+set Renewal_And_Activation_Task=1
+
+:: Change value from 1 to 0 to disable KMS activation desktop context menu
+set Desktop_context_menu=1
+
+============================================================================
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+start /b /wait cmd /c "%~dp0KMS38_Activation.cmd" /a
+
+start /b /wait cmd /c "%~dp0Activate.cmd" /wo
+if %Renewal_And_Activation_Task% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /rat
+if %Desktop_context_menu% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /dcm
+
+cd \
+(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")
+:kms38_kms_setup:
+
+::========================================================================================================================================
+
+:hwid_kms38_kms
+
+cls
+call :prep
+copy /y /b "%HWID_Activation.cmd%" "!_dir!\HWID_Activation.cmd" %nul%
+call :kms38prep
+call :kmsprep
+call :pop_d
+call :export hwid_kms38_kms_setup
+
+call :kms38prep2
+call :kmsprep2
+If not exist "!_dir!\HWID_Activation.cmd" set _error=1
+
+if defined _error goto errorfound
+if defined _kerror goto errorfound
+set "_oem=HWID [Fallback to] KMS38 [Fallback to] Online KMS"
+goto done
+
+:hwid_kms38_kms_setup:
+@echo off
+
+============================================================================
+
+:: Change value from 1 to 0 to disable KMS Renewal And Activation Task
+set Renewal_And_Activation_Task=1
+
+:: Change value from 1 to 0 to disable KMS activation desktop context menu
+set Desktop_context_menu=1
+
+============================================================================
+
+reg query HKU\S-1-5-19 1>nul 2>nul || exit /b
+
+set KMS=
+set KMS38=
+set osSKU=0
+for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "osSKU=%%a"
+
+:: Check Windows 10 install
+if %winbuild% LSS 10240 set KMS=1
+
+:: Check Windows Server version
+if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" set KMS38=1
+
+:: 171=EnterpriseG, 172=EnterpriseGN, 183=CloudE
+for %%# in (171 172 183) do (if %osSKU%==%%# set KMS38=1)
+
+:: Check Enterprise LTSC 2019/2021 N
+if %osSKU%==126 (echo %winos% | findstr /i "2019 2021" 1>nul && set KMS38=1)
+
+if defined KMS38 set KMS=1
+
+if defined KMS (
+if defined KMS38 (start /b /wait cmd /c "%~dp0KMS38_Activation.cmd" /a)
+start /b /wait cmd /c "%~dp0Activate.cmd" /wo
+) else (
+start /b /wait cmd /c "%~dp0HWID_Activation.cmd" /a
+start /b /wait cmd /c "%~dp0Activate.cmd" /o
+)
+
+if %Renewal_And_Activation_Task% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /rat
+if %Desktop_context_menu% EQU 1 start /b /wait cmd /c "%~dp0Activate.cmd" /dcm
+
+cd \
+(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")
+:hwid_kms38_kms_setup:
+
+::========================================================================================================================================
+
+:errorfound
+
+%eline%
+echo $OEM$ Folder was not created successfully...
+goto :done2
+
+:done
+
+echo _______________________________________________________
+echo:
+call :ex_color %Magenta% "%_oem%"
+call :ex_color %Green% "$OEM$ folder is successfully created on the Desktop."
+echo _______________________________________________________
+
+:done2
+
+echo:
+call :ex_color %_Yellow% "Press any key to exit..."
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:prep
+
+pushd "!desktop!"
+md "!desktop!\$OEM$\$$\Setup\Scripts\BIN"
+pushd "!_work!"
+pushd ..
+pushd ..
+exit /b
+
+:hwidprep
+
+copy /y /b "%HWID_Activation.cmd%" "!_dir!\HWID_Activation.cmd" %nul%
+copy /y /b "%gatherosstate.exe%" "!_dir!\BIN\gatherosstate.exe" %nul%
+copy /y /b "%slc.dll%" "!_dir!\BIN\slc.dll" %nul%
+copy /y /b "%arm64_gatherosstate.exe%" "!_dir!\BIN\arm64_gatherosstate.exe" %nul%
+copy /y /b "%arm64_slc.dll%" "!_dir!\BIN\arm64_slc.dll" %nul%
+exit /b
+
+:kms38prep
+
+copy /y /b "%KMS38_Activation.cmd%" "!_dir!\KMS38_Activation.cmd" %nul%
+copy /y /b "%ClipUp.exe%" "!_dir!\BIN\ClipUp.exe" %nul%
+copy /y /b "%gatherosstate.exe%" "!_dir!\BIN\gatherosstate.exe" %nul%
+copy /y /b "%slc.dll%" "!_dir!\BIN\slc.dll" %nul%
+copy /y /b "%arm64_gatherosstate.exe%" "!_dir!\BIN\arm64_gatherosstate.exe" %nul%
+copy /y /b "%arm64_slc.dll%" "!_dir!\BIN\arm64_slc.dll" %nul%
+exit /b
+
+:kmsprep
+
+copy /y /b "%Activate.cmd%" "!_dir!\Activate.cmd" %nul%
+copy /y /b "%cleanosppx64.exe%" "!_dir!\BIN\cleanosppx64.exe" %nul%
+copy /y /b "%cleanosppx86.exe%" "!_dir!\BIN\cleanosppx86.exe" %nul%
+exit /b
+
+:hwidprep2
+
+set _error=
+pushd "!_dir!\"
+
+for %%# in (
+HWID_Activation.cmd
+BIN\gatherosstate.exe
+BIN\slc.dll
+BIN\arm64_gatherosstate.exe
+BIN\arm64_slc.dll
+SetupComplete.cmd
+) do (
+if not exist "%%#" set _error=1
+)
+popd
+exit /b
+
+:kms38prep2
+
+set _error=
+pushd "!_dir!\"
+
+for %%# in (
+KMS38_Activation.cmd
+BIN\ClipUp.exe
+BIN\gatherosstate.exe
+BIN\slc.dll
+BIN\arm64_gatherosstate.exe
+BIN\arm64_slc.dll
+SetupComplete.cmd
+) do (
+if not exist "%%#" set _error=1
+)
+popd
+exit /b
+
+:kmsprep2
+
+set _kerror=
+pushd "!_dir!\"
+
+for %%# in (
+Activate.cmd
+BIN\cleanosppx64.exe
+BIN\cleanosppx86.exe
+SetupComplete.cmd
+) do (
+if not exist "%%#" set _kerror=1
+)
+popd
+exit /b
+
+:pop_d
+
+popd
+popd
+popd
+popd
+exit /b
+
+::========================================================================================================================================
+
+:: Extract the text from batch script without character and file encoding issue
+
+:export
+
+%nul% %_psc% "$f=[io.file]::ReadAllText('!_batp!') -split \":%~1\:.*`r`n\"; [io.file]::WriteAllText('!_pdesk!\$OEM$\$$\Setup\Scripts\SetupComplete.cmd',$f[1].Trim(),[System.Text.Encoding]::ASCII);"
+exit /b
+
+::========================================================================================================================================
+
+:ex_color
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[0m
+) else (
+if not exist %_psc% (echo %~3) else (%_psc% write-host -back '%1' -fore '%2' '%3')
+)
+exit /b
+
+:ex_color2
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m
+) else (
+if not exist %_psc% (echo %~3%~6) else (%_psc% write-host -back '%1' -fore '%2' '%3' -NoNewline; write-host -back '%4' -fore '%5' '%6')
+)
+exit /b
+
::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Extras/Extract_OEM_Folder/ReadMe.html b/MAS/Separate-Files-Version/Extras/Extract_OEM_Folder/ReadMe.html new file mode 100644 index 0000000..a42522e --- /dev/null +++ b/MAS/Separate-Files-Version/Extras/Extract_OEM_Folder/ReadMe.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/readme-oem-folder.html">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Install_HWID_Key.cmd b/MAS/Separate-Files-Version/Extras/Install_W10_11_HWID_Key.cmd index 49c168f..9c1c3bf 100644 --- a/MAS/Separate-Files-Version/Install_HWID_Key.cmd +++ b/MAS/Separate-Files-Version/Extras/Install_W10_11_HWID_Key.cmd @@ -1,523 +1,367 @@ -@setlocal DisableDelayedExpansion -@echo off - - - -::============================================================================ -:: -:: This script is a part of 'Microsoft Activation Scripts' (MAS) project. -:: -:: Homepage: massgrave.dev -:: Email: [email protected] -:: -::============================================================================ - - - -:: For unattended mode, run the script with /u parameter. - - - -::======================================================================================================================================== - -:: 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 - -set "_cmdf=%~f0" -for %%# in (%*) do ( -if /i "%%#"=="r1" set r1=1 -if /i "%%#"=="r2" set r2=1 -) - -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 Path variable, it helps if it is misconfigured in the system - -set "PATH=%SystemRoot%\System32;%SystemRoot%\System32\wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\" -if exist "%SystemRoot%\Sysnative\reg.exe" ( -set "PATH=%SystemRoot%\Sysnative;%SystemRoot%\Sysnative\wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%PATH%" -) - -:: Check LF line ending - -pushd "%~dp0" ->nul findstr /rxc:".*" "%~nx0" -if not %errorlevel%==0 ( -echo: -echo Error: This is not a correct file. It has LF line ending issue. -echo: -echo Press any key to exit... -pause >nul -popd -exit /b -) -popd - -::======================================================================================================================================== - -cls -color 07 -title Install Windows Retail/OEM/MAK Key - -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 -if /i "%%A"=="/u" set _unattended=1 -) -) - -::======================================================================================================================================== - -set winbuild=1 -set "nul=>nul 2>&1" -set psc=powershell.exe -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 2>nul | find /i "0x0" 1>nul && (set _NCS=0) - -if %_NCS% EQU 1 ( -for /F %%a in ('echo prompt $E ^| cmd') do set "esc=%%a" -set "Red="41;97m"" -set "Green="42;97m"" -set "_Green="40;92m"" -set "_Yellow="40;93m"" -) else ( -set "Red="Red" "white"" -set "Green="DarkGreen" "white"" -set "_Green="Black" "Green"" -set "_Yellow="Black" "Yellow"" -) - -set "nceline=echo: &echo ==== ERROR ==== &echo:" -set "eline=echo: &call :dk_color %Red% "==== ERROR ====" &echo:" -set "line=echo ___________________________________________________________________________________________" - -::======================================================================================================================================== - -if %winbuild% LSS 10240 ( -%eline% -echo Unsupported OS version detected. -echo Project is supported for Windows 10/11. -goto ins_done -) - -for %%# in (powershell.exe) do @if "%%~$PATH:#"=="" ( -%nceline% -echo Unable to find powershell.exe in the system. -goto ins_done -) - -::======================================================================================================================================== - -:: Fix for the special characters limitation 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 "_ttemp=%temp%" - -setlocal EnableDelayedExpansion - -::======================================================================================================================================== - -echo "!_batf!" | find /i "!_ttemp!" 1>nul && ( -if /i not "!_work!"=="!_ttemp!" ( -%eline% -echo Script is launched from the temp folder, -echo Most likely you are running the script directly from the archive file. -echo: -echo Extract the archive file and launch the script from the extracted folder. -goto ins_done -) -) - -::======================================================================================================================================== - -:: Elevate script as admin and pass arguments and preventing loop - -%nul% reg query HKU\S-1-5-19 || ( -if not defined _elev %nul% %psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b -%eline% -echo This script require administrator privileges. -echo To do so, right click on this script and select 'Run as administrator'. -goto ins_done -) - -::======================================================================================================================================== - -cls -mode 98, 30 - -call :dk_initial - -:: Check product name - -cls -call :dk_product - -::======================================================================================================================================== - -:: Check SKU value / Check in multiple places to find Edition change corruption - -set osSKU= -set regSKU= -set wmiSKU= - -for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "regSKU=%%a" -if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic Path Win32_OperatingSystem Get OperatingSystemSKU /format:LIST" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" -if %_wmic% EQU 0 for /f "tokens=1" %%a in ('%psc% "([WMI]'Win32_OperatingSystem=@').OperatingSystemSKU" 2^>nul') do if not errorlevel 1 set "wmiSKU=%%a" - -set osSKU=%wmiSKU% -if not defined osSKU set osSKU=%regSKU% - -if not defined osSKU ( -%eline% -echo SKU value was not detected properly. Aborting... -goto ins_done -) - -::======================================================================================================================================== - -:: Detect key - -set key= -set pkey= -set _chan= - -if defined applist call :hwiddata attempt1 -if not defined key call :hwiddata attempt2 - -set pkey= -if not defined key call :dk_hwidkey %nul% - -if not defined key ( -%eline% -%psc% $ExecutionContext.SessionState.LanguageMode 2>nul | find /i "Full" 1>nul || ( -echo PowerShell is not responding properly. -echo: -) -echo Unable to find HWID key for [%winos% ^| SKU:%osSKU% ^| %winbuild%] -echo Make sure you are using updated version of the script -echo: -if not "%regSKU%"=="%wmiSKU%" ( -echo Difference Found In SKU Value- WMI:%wmiSKU% Reg:%regSKU% -echo Restart the system and try again. -) -goto ins_done -) - -if defined key call :dk_pkeychannel %key% -if defined pkeychannel set _chan=%pkeychannel% Key - -::======================================================================================================================================== - -if %_unattended%==1 goto insertkey - -cls -%line% -echo: -echo Install [%winos% ^| SKU:%osSKU% ^| %winbuild%] %_chan% -echo [%key%] -%line% -echo: -if not "%regSKU%"=="%wmiSKU%" ( -echo Note: Difference Found In SKU Value- WMI:%wmiSKU% Reg:%regSKU% -echo Restart the system to resolve it -echo: -) -call :dk_color %_Green% "Press [1] to Continue or [2] to Exit" -choice /C:21 /N -if %errorlevel%==1 exit /b -cls - -::======================================================================================================================================== - -:insertkey - -cls -%line% - -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call InstallProductKey ProductKey="%key%" %nul% -if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT Version FROM SoftwareLicensingService').Get()).InstallProductKey('%key%')" %nul% -if not %errorlevel%==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul% - -set error_code=%errorlevel% -cmd /c exit /b %error_code% -if %error_code% NEQ 0 set "error_code=[0x%=ExitCode%]" - -if %error_code% EQU 0 ( -call :dk_refresh -echo: -echo [%winos% ^| SKU:%osSKU% ^| %winbuild%] -echo Installing %_chan% [%key%] -echo: -call :dk_color %Green% "[Successful]" -) else ( -%eline% -echo [%winos% ^| SKU:%osSKU% ^| %winbuild%] -echo Installing %_chan% [%key%] -echo: -call :dk_color %Red% "[Unsuccessful] %error_code%" -if not defined applist echo Not Respoding: %e_wmispp% -) -%line% - -::======================================================================================================================================== - -:ins_done - -echo: -if %_unattended%==1 timeout /t 2 & exit /b -call :dk_color %_Yellow% "Press any key to exit..." -pause >nul -exit /b - -::======================================================================================================================================== - -:: Refresh license status - -:dk_refresh - -if %_wmic% EQU 1 wmic path SoftwareLicensingService where __CLASS='SoftwareLicensingService' call RefreshLicenseStatus %nul% -if %_wmic% EQU 0 %psc% "$null=(([WMICLASS]'SoftwareLicensingService').GetInstances()).RefreshLicenseStatus()" %nul% -exit /b - -:: Get Windows Activation IDs - -:dk_actids - -set applist= -if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path SoftwareLicensingProduct where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f') get ID /VALUE" 2^>nul')" -if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM SoftwareLicensingProduct WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')" -%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a")) -exit /b - -:: Get Product name (WMI/REG methods are not reliable in all conditions, hence winbrand.dll method is used) - -:dk_product - -set winos= -set d1=[DllImport(\"winbrand\",CharSet=CharSet.Unicode)]public static extern string BrandingFormatString(string s); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $AP::BrandingFormatString('%%WINDOWS_LONG%%') -for /f "delims=" %%s in ('"%psc% %d2%"') do if not errorlevel 1 (set winos=%%s) -echo "%winos%" | find /i "Windows" 1>nul || ( -for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b" -if %winbuild% GEQ 22000 ( -set winos=!winos:Windows 10=Windows 11! -) -) -exit /b - -:: Check wmic.exe - -:dk_ckeckwmic - -set _wmic=0 -for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" ( -wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul && set _wmic=1 -) -exit /b - -:dk_initial - -echo: -echo Initializing... - -:: Check and enable WinMgmt, sppsvc services if required - -for %%# in (WinMgmt sppsvc) do ( -for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v Start 2^>nul') do if /i %%b NEQ 0x2 ( -echo: -echo Enabling %%# service... -if /i %%#==sppsvc sc config %%# start= delayed-auto %nul% || echo Failed -if /i %%#==WinMgmt sc config %%# start= auto %nul% || echo Failed -) -sc start %%# %nul% -if !errorlevel! NEQ 1056 if !errorlevel! NEQ 0 ( -echo: -echo Starting %%# service... -sc start %%# -echo: -call :dk_color %Red% "Failed to start [%%#] service, rest of the process may take a long time..." -) -) - -:: Check WMI and SPP Errors - -call :dk_ckeckwmic - -set e_wmi= -set e_wmispp= -call :dk_actids - -if not defined applist ( -net stop sppsvc /y %nul% -cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -if !errorlevel! NEQ 0 cscript //nologo %windir%\system32\slmgr.vbs /rilc %nul% -call :dk_refresh - -if %_wmic% EQU 1 wmic path Win32_ComputerSystem get CreationClassName /value 2>nul | find /i "computersystem" 1>nul -if %_wmic% EQU 0 %psc% "Get-CIMInstance -Class Win32_ComputerSystem | Select-Object -Property CreationClassName" 2>nul | find /i "computersystem" 1>nul -if !errorlevel! NEQ 0 set e_wmi=1 - -if defined e_wmi (set e_wmispp=WMI, SPP) else (set e_wmispp=SPP) -call :dk_actids -) -exit /b - -::======================================================================================================================================== - -:: Get Product Key from pkeyhelper.dll for future new editions -:: It works on Windows 10 1803 (17134) and later builds. (Partially on 1803 & 1809, fully on 1903 and later) - -:dk_pkey - -set pkey= -set d1=[DllImport(\"pkeyhelper.dll\",CharSet=CharSet.Unicode)]public static extern int SkuGetProductKeyForEdition(int e, string c, out string k, out string p); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k=''; $null=$AP::SkuGetProductKeyForEdition(%1, %2, [ref]$k, [ref]$null); $k -for /f %%a in ('%psc% "%d2%"') do if not errorlevel 1 (set pkey=%%a) -exit /b - -:: Get channel name for the key which was extracted from pkeyhelper.dll - -:dk_pkeychannel - -set k=%1 -set pkeychannel= -set p=%SystemRoot%\System32\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms -set m=[System.Runtime.InteropServices.Marshal] -set d1=[DllImport(\"PidGenX.dll\",CharSet=CharSet.Unicode)]public static extern int PidGenX(string k,string p,string m,int u,IntPtr i,IntPtr d,IntPtr f); -set d2=$AP=Add-Type -Member '%d1%' -Name D1 -PassThru; $k='%k%'; $p='%p%'; $r=[byte[]]::new(0x04F8); $r[0]=0xF8; $r[1]=0x04; $f=%m%::AllocHGlobal(1272); %m%::Copy($r,0,$f,1272); -set d3=%d2% [void]$AP::PidGenX($k,$p,\"00000\",0,0,0,$f); %m%::Copy($f,$r,0,1272); %m%::FreeHGlobal($f); [System.Text.Encoding]::Unicode.GetString($r, 1016, 128).Replace('0','') -for /f %%a in ('%psc% "%d3%"') do if not errorlevel 1 (set pkeychannel=%%a) -exit /b - -:dk_hwidkey - -for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b -for %%# in (Retail OEM:NONSLP OEM:DM Volume:MAK) do ( -call :dk_pkey %osSKU% '%%#' -if defined pkey call :dk_pkeychannel !pkey! -if /i [!pkeychannel!]==[%%#] ( -set key=!pkey! -exit /b -) -) -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 - -::======================================================================================================================================== - -:: 1st column = Activation ID -:: 2nd column = Generic Retail/OEM/MAK Key -:: 3rd column = SKU ID -:: 4th column = 1 = activation is not working (at the time of writing this), 0 = activation is working -:: 5th column = Key Type -:: 6th column = WMI Edition ID -:: 7th column = Version name incase same Edition ID is used in different OS versions with different key -:: Separator = _ - -:: Key preference is in the following order. Retail > OEM:NONSLP > OEM:DM > Volume:MAK - - -:hwiddata - -for %%# in ( -8b351c9c-f398-4515-9900-09df49427262_XGVPP-NMH47-7TTHJ-W3FW7-8HV2C___4_0_OEM:NONSLP_Enterprise -23505d51-32d6-41f0-8ca7-e78ad0f16e71_D6RD9-D4N8T-RT9QX-YW6YT-FCWWJ__11_1_____Retail_Starter -c83cef07-6b72-4bbc-a28f-a00386872839_3V6Q6-NQXCX-V8YXR-9QCYV-QPFCT__27_0_Volume:MAK_EnterpriseN -211b80cc-7f64-482c-89e9-4ba21ff827ad_3NFXW-2T27M-2BDW6-4GHRV-68XRX__47_1_____Retail_StarterN -4de7cb65-cdf1-4de9-8ae8-e3cce27b9f2c_VK7JG-NPHTM-C97JM-9MPGT-3V66T__48_0_____Retail_Professional -9fbaf5d6-4d83-4422-870d-fdda6e5858aa_2B87N-8KFHP-DKV6R-Y2C8J-PKCKT__49_0_____Retail_ProfessionalN -f742e4ff-909d-4fe9-aacb-3231d24a0c58_4CPRK-NM3K3-X6XXQ-RXX86-WXCHW__98_0_____Retail_CoreN -1d1bac85-7365-4fea-949a-96978ec91ae0_N2434-X9D7W-8PF6X-8DV9T-8TYMD__99_0_____Retail_CoreCountrySpecific -3ae2cc14-ab2d-41f4-972f-5e20142771dc_BT79Q-G7N6G-PGBYW-4YWX6-6F4BT_100_0_____Retail_CoreSingleLanguage -2b1f36bb-c1cd-4306-bf5c-a0367c2d97d8_YTMG3-N6DKC-DKB77-7M9GH-8HVX7_101_0_____Retail_Core -2a6137f3-75c0-4f26-8e3e-d83d802865a4_XKCNC-J26Q9-KFHD2-FKTHY-KD72Y_119_0_OEM:NONSLP_PPIPro -e558417a-5123-4f6f-91e7-385c1c7ca9d4_YNMGQ-8RYV3-4PGQ3-C8XTP-7CFBY_121_0_____Retail_Education -c5198a66-e435-4432-89cf-ec777c9d0352_84NGF-MHBT6-FXBX8-QWJK7-DRR8H_122_0_____Retail_EducationN -cce9d2de-98ee-4ce2-8113-222620c64a27_KCNVH-YKWX8-GJJB9-H9FDT-6F7W2_125_1_Volume:MAK_EnterpriseS_2021 -d06934ee-5448-4fd1-964a-cd077618aa06_43TBQ-NH92J-XKTM7-KT3KK-P39PB_125_0_OEM:NONSLP_EnterpriseS_2019 -706e0cfd-23f4-43bb-a9af-1a492b9f1302_NK96Y-D9CD8-W44CQ-R8YTK-DYJWX_125_0_OEM:NONSLP_EnterpriseS_2016 -faa57748-75c8-40a2-b851-71ce92aa8b45_FWN7H-PF93Q-4GGP8-M8RF3-MDWWW_125_0_OEM:NONSLP_EnterpriseS_2015 -2c060131-0e43-4e01-adc1-cf5ad1100da8_RQFNW-9TPM3-JQ73T-QV4VQ-DV9PT_126_1_Volume:MAK_EnterpriseSN_2021 -e8f74caa-03fb-4839-8bcc-2e442b317e53_M33WV-NHY3C-R7FPM-BQGPT-239PG_126_1_Volume:MAK_EnterpriseSN_2019 -3d1022d8-969f-4222-b54b-327f5a5af4c9_2DBW3-N2PJG-MVHW3-G7TDK-9HKR4_126_0_Volume:MAK_EnterpriseSN_2016 -60c243e1-f90b-4a1b-ba89-387294948fb6_NTX6B-BRYC2-K6786-F6MVQ-M7V2X_126_0_Volume:MAK_EnterpriseSN_2015 -a48938aa-62fa-4966-9d44-9f04da3f72f2_G3KNM-CHG6T-R36X3-9QDG6-8M8K9_138_1_____Retail_ProfessionalSingleLanguage -f7af7d09-40e4-419c-a49b-eae366689ebd_HNGCC-Y38KG-QVK8D-WMWRK-X86VK_139_1_____Retail_ProfessionalCountrySpecific -eb6d346f-1c60-4643-b960-40ec31596c45_DXG7C-N36C4-C4HTG-X4T3X-2YV77_161_0_____Retail_ProfessionalWorkstation -89e87510-ba92-45f6-8329-3afa905e3e83_WYPNQ-8C467-V2W6J-TX4WX-WT2RQ_162_0_____Retail_ProfessionalWorkstationN -62f0c100-9c53-4e02-b886-a3528ddfe7f6_8PTT6-RNW4C-6V7J2-C2D3X-MHBPB_164_0_____Retail_ProfessionalEducation -13a38698-4a49-4b9e-8e83-98fe51110953_GJTYN-HDMQY-FRR76-HVGC7-QPF8P_165_0_____Retail_ProfessionalEducationN -1ca0bfa8-d96b-4815-a732-7756f30c29e2_FV469-WGNG4-YQP66-2B2HY-KD8YX_171_1_OEM:NONSLP_EnterpriseG -8d6f6ffe-0c30-40ec-9db2-aad7b23bb6e3_FW7NV-4T673-HF4VX-9X4MM-B4H4T_172_1_OEM:NONSLP_EnterpriseGN -df96023b-dcd9-4be2-afa0-c6c871159ebe_NJCF7-PW8QT-3324D-688JX-2YV66_175_0_____Retail_ServerRdsh -d4ef7282-3d2c-4cf0-9976-8854e64a8d1e_V3WVW-N2PV2-CGWC3-34QGF-VMJ2C_178_0_____Retail_Cloud -af5c9381-9240-417d-8d35-eb40cd03e484_NH9J3-68WK7-6FB93-4K3DF-DJ4F6_179_0_____Retail_CloudN -c7051f63-3a76-4992-bce5-731ec0b1e825_2HN6V-HGTM8-6C97C-RK67V-JQPFD_183_1_____Retail_CloudE -8ab9bdd1-1f67-4997-82d9-8878520837d9_XQQYW-NFFMW-XJPBH-K8732-CKFFD_188_0_____OEM:DM_IoTEnterprise -ed655016-a9e8-4434-95d9-4345352c2552_QPM6N-7J2WJ-P88HH-P3YRH-YY74H_191_0_OEM:NONSLP_IoTEnterpriseS -d4bdc678-0a4b-4a32-a5b3-aaa24c3b0f24_K9VKN-3BGWV-Y624W-MCRMQ-BHDCD_202_0_____Retail_CloudEditionN -92fb8726-92a8-4ffc-94ce-f82e07444653_KY7PN-VR6RX-83W6Y-6DDYQ-T6R4W_203_0_____Retail_CloudEdition -) do ( -for /f "tokens=1-8 delims=_" %%A in ("%%#") do if %osSKU%==%%C ( - -if %1==attempt1 if not defined key ( -echo "!applist!" | find /i "%%A" 1>nul && ( -set key=%%B -) -) - -if %1==attempt2 if not defined key ( -set 7th=%%G -if not defined 7th ( -if %winbuild% GTR 19044 call :dk_hwidkey %nul% -if not defined key set key=%%B -) else ( -echo "%winos%" | find /i "%%G" 1>nul && ( -if %winbuild% GTR 19044 call :dk_hwidkey %nul% -if not defined key set key=%%B -) -) -) -) -) -exit /b - +@setlocal DisableDelayedExpansion
+@echo off
+
+
+
+::============================================================================
+::
+:: This script is a part of 'Microsoft Activation Scripts' (MAS) project.
+::
+:: Homepage: windowsaddict.ml
+:: Email: [email protected]
+::
+::============================================================================
+
+
+
+:: For unattended mode, run the script with /u parameter.
+
+
+
+::========================================================================================================================================
+
+:: 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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %*"
+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 (
+set "_cmdf=%~f0"
+setlocal EnableDelayedExpansion
+start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %*"
+exit /b
+)
+
+:: Set Path variable, it helps if it is misconfigured in the system
+
+set "SysPath=%SystemRoot%\System32"
+if exist "%SystemRoot%\Sysnative\reg.exe" (set "SysPath=%SystemRoot%\Sysnative")
+set "Path=%SysPath%;%SystemRoot%;%SysPath%\Wbem;%SysPath%\WindowsPowerShell\v1.0\"
+
+::========================================================================================================================================
+
+cls
+color 07
+title Install Windows 10-11 Retail/MAK/OEM Key
+
+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
+if /i "%%A"=="/u" set _unattended=1
+)
+)
+
+::========================================================================================================================================
+
+set winbuild=1
+set "nul=>nul 2>&1"
+set "_psc=%SystemRoot%\System32\WindowsPowerShell\v1.0\powershell.exe"
+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 2>nul | find /i "0x0" 1>nul && (set _NCS=0)
+
+if %_NCS% EQU 1 (
+for /F %%a in ('echo prompt $E ^| cmd') do set "esc=%%a"
+set "Red="41;97m""
+set "Green="42;97m""
+set "_Green="40;92m""
+set "_Yellow="40;93m""
+) else (
+set "Red="Red" "white""
+set "Green="DarkGreen" "white""
+set "_Green="Black" "Green""
+set "_Yellow="Black" "Yellow""
+)
+
+set "nceline=echo: &echo ==== ERROR ==== &echo:"
+set "eline=echo: &call :dk_color %Red% "==== ERROR ====" &echo:"
+set slp=SoftwareLicensingProduct
+set sls=SoftwareLicensingService
+set wApp=55c92734-d682-4d71-983e-d6ec3f16059f
+set "line=echo ___________________________________________________________________________________________"
+
+::========================================================================================================================================
+
+if %winbuild% LSS 10240 (
+%eline%
+echo Unsupported OS version detected.
+echo Project is supported for Windows 10/11.
+goto ins_done
+)
+
+if %winbuild% GEQ 22483 if not exist %_psc% (
+%nceline%
+echo Powershell is not installed in the system.
+goto ins_done
+)
+
+::========================================================================================================================================
+
+:: Fix for the special characters limitation in path name
+
+set "_batf=%~f0"
+set "_batp=%_batf:'=''%"
+
+set "_PSarg="""%~f0""" -el %_args%"
+
+set "_ttemp=%temp%"
+
+setlocal EnableDelayedExpansion
+
+::========================================================================================================================================
+
+echo "!_batf!" | find /i "!_ttemp!" 1>nul && (
+%eline%
+echo Script is launched from the temp folder,
+echo Most likely you are running the script directly from the archive file.
+echo:
+echo Extract the archive file and launch the script from the extracted folder.
+goto ins_done
+)
+
+::========================================================================================================================================
+
+:: Elevate script as admin and pass arguments and preventing loop
+
+%nul% reg query HKU\S-1-5-19 || (
+if not defined _elev %nul% %_psc% "start cmd.exe -arg '/c \"!_PSarg:'=''!\"' -verb runas" && exit /b
+%eline%
+echo This script require administrator privileges.
+echo To do so, right click on this script and select 'Run as administrator'.
+goto ins_done
+)
+
+::========================================================================================================================================
+
+mode 98, 30
+echo:
+echo Initializing...
+
+:: Check WMI and sppsvc Errors
+
+set applist=
+net start sppsvc /y %nul%
+if %winbuild% LSS 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %slp% where (ApplicationID='%wApp%') get ID /VALUE" 2^>nul')"
+if %winbuild% GEQ 22483 set "chkapp=for /f "tokens=2 delims==" %%a in ('%_psc% "(([WMISEARCHER]'SELECT ID FROM %slp% WHERE ApplicationID=''%wApp%''').Get()).ID ^| %% {echo ('ID='+$_)}" 2^>nul')"
+%chkapp% do (if defined applist (call set "applist=!applist! %%a") else (call set "applist=%%a"))
+
+if not defined applist (
+%eline%
+echo Failed running WMI query check, verify that these services are working correctly
+echo Windows Management Instrumentation [WinMgmt], Software Protection [sppsvc]
+echo:
+echo Script will try to enable these services.
+echo:
+if %_unattended%==0 (
+call :dk_color %_Yellow% "Press any key to continue..."
+pause >nul
+)
+for /f "skip=2 tokens=2*" %%a in ('reg query HKLM\SYSTEM\CurrentControlSet\Services\WinMgmt /v Start 2^>nul') do if /i %%b equ 0x4 (sc config WinMgmt start= auto %nul%)
+net start WinMgmt /y %nul%
+net stop sppsvc /y %nul%
+net start sppsvc /y %nul%
+cls
+)
+
+::========================================================================================================================================
+
+:: Refresh license status, it helps to get correct product name in Windows 17134 and later builds
+
+call :dk_refresh
+
+:: Check product name
+
+set winos=
+for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName 2^>nul') do set "winos=%%b"
+
+::========================================================================================================================================
+
+:: Check SKU value
+
+set osSKU=
+for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn 2^>nul') do set "osSKU=%%a"
+
+if not defined osSKU (
+%eline%
+echo SKU value was not detected properly. Aborting...
+goto ins_done
+)
+
+::========================================================================================================================================
+
+:: Detect key
+
+set key=
+set _chan=
+
+if defined applist call :hwiddata attempt1
+if not defined key call :hwiddata attempt2
+
+if not defined key (
+%eline%
+echo Unable to find Key for [%winos% ^| SKU:%osSKU% ^| %winbuild%]
+if %winbuild% GTR 19044 echo Make sure you are using updated version of the script
+goto ins_done
+)
+
+::========================================================================================================================================
+
+if %_unattended%==1 goto insertkey
+
+cls
+%line%
+echo:
+echo Install [%winos% ^| SKU:%osSKU% ^| %winbuild%] %_chan% Key
+echo [%key%]
+%line%
+echo:
+call :dk_color %_Green% "Press [1] to Continue or [2] to Exit"
+choice /C:21 /N
+if %errorlevel%==1 exit /b
+cls
+
+::========================================================================================================================================
+
+:insertkey
+
+cls
+%line%
+
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call InstallProductKey ProductKey="%key%" %nul%
+if %winbuild% GEQ 22483 %_psc% "(([WMISEARCHER]'SELECT Version FROM %sls%').Get()).InstallProductKey('%key%')" %nul%
+if not %errorlevel%==0 cscript //nologo %windir%\system32\slmgr.vbs /ipk %key% %nul%
+
+if %errorlevel%==0 (
+call :dk_refresh
+echo:
+echo [%winos% ^| SKU:%osSKU% ^| %winbuild%]
+echo Installing %_chan% Key [%key%]
+echo:
+call :dk_color %Green% "[Successful]"
+) else (
+%eline%
+echo [%winos% ^| SKU:%osSKU% ^| %winbuild%]
+echo Installing %_chan% Key [%key%]
+echo:
+call :dk_color %Red% "[Unsuccessful]%actidnotfound%"
+)
+%line%
+
+::========================================================================================================================================
+
+:ins_done
+
+echo:
+if %_unattended%==1 timeout /t 2 & exit /b
+call :dk_color %_Yellow% "Press any key to exit..."
+pause >nul
+exit /b
+
+::========================================================================================================================================
+
+:: Refresh license status
+
+:dk_refresh
+
+if %winbuild% LSS 22483 wmic path %sls% where __CLASS='%sls%' call RefreshLicenseStatus %nul%
+if %winbuild% GEQ 22483 %_psc% "$null=(([WMICLASS]'%sls%').GetInstances()).RefreshLicenseStatus()" %nul%
+exit /b
+
+::========================================================================================================================================
+
+:dk_color
+
+if %_NCS% EQU 1 (
+echo %esc%[%~1%~2%esc%[0m
+) else (
+if not exist %_psc% (echo %~3) else (%_psc% write-host -back '%1' -fore '%2' '%3')
+)
+exit /b
+
+::========================================================================================================================================
+
+:: 1st column = Activation ID
+:: 2nd column = Generic Retail/OEM/MAK Key
+:: 3rd column = SKU ID
+:: 4th column = 1 = activation is not working (at the time of writing this), 0 = activation is working
+:: 5th column = Key Type
+:: 6th column = WMI Edition ID
+:: 7th column = Version name incase same Edition ID is used in different OS versions with different key
+:: Separator = _
+
+:: Key preference is in the following order. Retail > OEM:NONSLP > OEM:DM > Volume:MAK
+
+:hwiddata
+
+for %%# in (
+8b351c9c-f398-4515-9900-09df49427262_XGVPP-NMH47-7TTHJ-W3FW7-8HV2C___4_0_OEM:NONSLP_Enterprise
+23505d51-32d6-41f0-8ca7-e78ad0f16e71_D6RD9-D4N8T-RT9QX-YW6YT-FCWWJ__11_1_____Retail_Starter
+c83cef07-6b72-4bbc-a28f-a00386872839_3V6Q6-NQXCX-V8YXR-9QCYV-QPFCT__27_0_Volume:MAK_EnterpriseN
+211b80cc-7f64-482c-89e9-4ba21ff827ad_3NFXW-2T27M-2BDW6-4GHRV-68XRX__47_1_____Retail_StarterN
+4de7cb65-cdf1-4de9-8ae8-e3cce27b9f2c_VK7JG-NPHTM-C97JM-9MPGT-3V66T__48_0_____Retail_Professional
+9fbaf5d6-4d83-4422-870d-fdda6e5858aa_2B87N-8KFHP-DKV6R-Y2C8J-PKCKT__49_0_____Retail_ProfessionalN
+f742e4ff-909d-4fe9-aacb-3231d24a0c58_4CPRK-NM3K3-X6XXQ-RXX86-WXCHW__98_0_____Retail_CoreN
+1d1bac85-7365-4fea-949a-96978ec91ae0_N2434-X9D7W-8PF6X-8DV9T-8TYMD__99_0_____Retail_CoreCountrySpecific
+3ae2cc14-ab2d-41f4-972f-5e20142771dc_BT79Q-G7N6G-PGBYW-4YWX6-6F4BT_100_0_____Retail_CoreSingleLanguage
+2b1f36bb-c1cd-4306-bf5c-a0367c2d97d8_YTMG3-N6DKC-DKB77-7M9GH-8HVX7_101_0_____Retail_Core
+2a6137f3-75c0-4f26-8e3e-d83d802865a4_XKCNC-J26Q9-KFHD2-FKTHY-KD72Y_119_0_OEM:NONSLP_PPIPro
+e558417a-5123-4f6f-91e7-385c1c7ca9d4_YNMGQ-8RYV3-4PGQ3-C8XTP-7CFBY_121_0_____Retail_Education
+c5198a66-e435-4432-89cf-ec777c9d0352_84NGF-MHBT6-FXBX8-QWJK7-DRR8H_122_0_____Retail_EducationN
+cce9d2de-98ee-4ce2-8113-222620c64a27_KCNVH-YKWX8-GJJB9-H9FDT-6F7W2_125_1_Volume:MAK_EnterpriseS_2021
+d06934ee-5448-4fd1-964a-cd077618aa06_43TBQ-NH92J-XKTM7-KT3KK-P39PB_125_0_OEM:NONSLP_EnterpriseS_2019
+706e0cfd-23f4-43bb-a9af-1a492b9f1302_NK96Y-D9CD8-W44CQ-R8YTK-DYJWX_125_0_OEM:NONSLP_EnterpriseS_2016
+faa57748-75c8-40a2-b851-71ce92aa8b45_FWN7H-PF93Q-4GGP8-M8RF3-MDWWW_125_0_OEM:NONSLP_EnterpriseS_2015
+2c060131-0e43-4e01-adc1-cf5ad1100da8_RQFNW-9TPM3-JQ73T-QV4VQ-DV9PT_126_1_Volume:MAK_EnterpriseSN_2021
+e8f74caa-03fb-4839-8bcc-2e442b317e53_M33WV-NHY3C-R7FPM-BQGPT-239PG_126_1_Volume:MAK_EnterpriseSN_2019
+3d1022d8-969f-4222-b54b-327f5a5af4c9_2DBW3-N2PJG-MVHW3-G7TDK-9HKR4_126_0_Volume:MAK_EnterpriseSN_2016
+60c243e1-f90b-4a1b-ba89-387294948fb6_NTX6B-BRYC2-K6786-F6MVQ-M7V2X_126_0_Volume:MAK_EnterpriseSN_2015
+a48938aa-62fa-4966-9d44-9f04da3f72f2_G3KNM-CHG6T-R36X3-9QDG6-8M8K9_138_1_____Retail_ProfessionalSingleLanguage
+f7af7d09-40e4-419c-a49b-eae366689ebd_HNGCC-Y38KG-QVK8D-WMWRK-X86VK_139_1_____Retail_ProfessionalCountrySpecific
+eb6d346f-1c60-4643-b960-40ec31596c45_DXG7C-N36C4-C4HTG-X4T3X-2YV77_161_0_____Retail_ProfessionalWorkstation
+89e87510-ba92-45f6-8329-3afa905e3e83_WYPNQ-8C467-V2W6J-TX4WX-WT2RQ_162_0_____Retail_ProfessionalWorkstationN
+62f0c100-9c53-4e02-b886-a3528ddfe7f6_8PTT6-RNW4C-6V7J2-C2D3X-MHBPB_164_0_____Retail_ProfessionalEducation
+13a38698-4a49-4b9e-8e83-98fe51110953_GJTYN-HDMQY-FRR76-HVGC7-QPF8P_165_0_____Retail_ProfessionalEducationN
+1ca0bfa8-d96b-4815-a732-7756f30c29e2_FV469-WGNG4-YQP66-2B2HY-KD8YX_171_1_OEM:NONSLP_EnterpriseG
+8d6f6ffe-0c30-40ec-9db2-aad7b23bb6e3_FW7NV-4T673-HF4VX-9X4MM-B4H4T_172_1_OEM:NONSLP_EnterpriseGN
+df96023b-dcd9-4be2-afa0-c6c871159ebe_NJCF7-PW8QT-3324D-688JX-2YV66_175_0_____Retail_ServerRdsh
+d4ef7282-3d2c-4cf0-9976-8854e64a8d1e_V3WVW-N2PV2-CGWC3-34QGF-VMJ2C_178_0_____Retail_Cloud
+af5c9381-9240-417d-8d35-eb40cd03e484_NH9J3-68WK7-6FB93-4K3DF-DJ4F6_179_0_____Retail_CloudN
+c7051f63-3a76-4992-bce5-731ec0b1e825_2HN6V-HGTM8-6C97C-RK67V-JQPFD_183_1_____Retail_CloudE
+8ab9bdd1-1f67-4997-82d9-8878520837d9_XQQYW-NFFMW-XJPBH-K8732-CKFFD_188_0_____OEM:DM_IoTEnterprise
+ed655016-a9e8-4434-95d9-4345352c2552_QPM6N-7J2WJ-P88HH-P3YRH-YY74H_191_0_OEM:NONSLP_IoTEnterpriseS
+d4bdc678-0a4b-4a32-a5b3-aaa24c3b0f24_K9VKN-3BGWV-Y624W-MCRMQ-BHDCD_202_0_____Retail_CloudEditionN
+92fb8726-92a8-4ffc-94ce-f82e07444653_KY7PN-VR6RX-83W6Y-6DDYQ-T6R4W_203_0_____Retail_CloudEdition
+) do (
+for /f "tokens=1-7 delims=_" %%A in ("%%#") do if %osSKU%==%%C (
+
+if %1==attempt1 if not defined key echo "!applist!" | find /i "%%A" 1>nul && (set "key=%%B" & set "_chan=%%E" & if %%D==1 set notworking=1)
+
+if %1==attempt2 if not defined key (
+set "actidnotfound= [Mismatched Act-ID]"
+set 7th=%%G
+if not defined 7th (
+set "key=%%B" & set "_chan=%%E" & if %%D==1 set notworking=1
+) else (
+echo "%winos%" | find "%%G" 1>nul && (set "key=%%B" & set "_chan=%%E" & if %%D==1 set notworking=1)
+)
+)
+)
+)
+exit /b
+
::========================================================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Extras/_Homepage.html b/MAS/Separate-Files-Version/Extras/_Homepage.html new file mode 100644 index 0000000..1286096 --- /dev/null +++ b/MAS/Separate-Files-Version/Extras/_Homepage.html @@ -0,0 +1,3 @@ +<html>
+<meta http-equiv="refresh" content="0; url=https://windowsaddict.ml/">
+</html>
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/HWID-KMS38_Activation/BIN/Info.txt b/MAS/Separate-Files-Version/HWID-KMS38_Activation/BIN/Info.txt deleted file mode 100644 index 58a0573..0000000 --- a/MAS/Separate-Files-Version/HWID-KMS38_Activation/BIN/Info.txt +++ /dev/null @@ -1,22 +0,0 @@ -================================================================================= - File Details: -================================================================================= - - - ClipUp.exe (x64) - SHA-1: 48D928B1BEC25A56FE896C430C2C034B7866AA7A - - Taken from Windows server 2016 x64 ISO - https://www.microsoft.com/en-us/evalcenter/ - - - gatherosstate.exe (x86) - SHA-1: FABB5A0FC1E6A372219711152291339AF36ED0B5 - - Taken from Windows 10 Version 1607 ADK (Section: User State Migration Tool) - https://go.microsoft.com/fwlink/p/?LinkId=526740 - -_________________________________________________________________________________ - - - All files are original Microsoft's files. - - ClipUp.exe is required for KMS38 activation of Server Cor/Acor editions. - -=================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/Info.txt b/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/Info.txt deleted file mode 100644 index 82e9fed..0000000 --- a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/Info.txt +++ /dev/null @@ -1,15 +0,0 @@ -==================================================================================================== - File Details: -==================================================================================================== - - cleanosppx64.exe SHA-1: d30a0e4e5911d3ca705617d17225372731c770e2 - cleanosppx86.exe SHA-1: 39ed8659e7ca16aaccb86def94ce6cec4c847dd6 - - - These files are used in cleaning office license in C2R Retail office to VL conversion process. - - These files are taken from the old version of Microsoft official tool 'O15CTRRemove.diagcab'. - - File: O15CTRRemove.diagcab (Digitally Signed) - Link: app.box.com/s/n8qpb5ljmv6djp77w5p6fk043dm6s3r1 (Unofficial Link) - SHA-1: 56c6ca76993a96cf9a255463b90db96cb9d24464 - -====================================================================================================
\ No newline at end of file diff --git a/MAS/Separate-Files-Version/ReadMe.html b/MAS/Separate-Files-Version/ReadMe.html deleted file mode 100644 index 84c84bd..0000000 --- a/MAS/Separate-Files-Version/ReadMe.html +++ /dev/null @@ -1,3 +0,0 @@ -<html> -<meta http-equiv="refresh" content="0; url=https://massgrave.dev/"> -</html>
\ No newline at end of file |
