diff options
Diffstat (limited to 'MAS/Separate-Files-Version/Online_KMS_Activation')
| -rw-r--r-- | MAS/Separate-Files-Version/Online_KMS_Activation/Activate.cmd | 4105 | ||||
| -rw-r--r-- | MAS/Separate-Files-Version/Online_KMS_Activation/BIN/Info.txt | 15 | ||||
| -rw-r--r-- | MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx64.exe | bin | 19968 -> 0 bytes | |||
| -rw-r--r-- | MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx86.exe | bin | 17408 -> 0 bytes |
4 files changed, 0 insertions, 4120 deletions
diff --git a/MAS/Separate-Files-Version/Online_KMS_Activation/Activate.cmd b/MAS/Separate-Files-Version/Online_KMS_Activation/Activate.cmd deleted file mode 100644 index 2350009..0000000 --- a/MAS/Separate-Files-Version/Online_KMS_Activation/Activate.cmd +++ /dev/null @@ -1,4105 +0,0 @@ -@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:
-ping 127.0.0.1 -n 6 > nul
-popd
-exit /b
-)
-popd
-
-::========================================================================================================================================
-
-cls
-color 07
-title Online KMS Activation
-
-:: You are not supposed to edit anything below this.
-
-set WMI_VBS=0
-set _Debug=0
-set Silent=0
-set Logger=0
-set AutoR2V=1
-set SkipKMS38=1
-set vNextOverride=1
-set ActWindows=1
-set ActOffice=1
-
-set _uni=
-set _args=
-set _elev=
-set _renetask=
-set _renacttask=
-set _unattended=
-set _unattendedact=
-
-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"=="/KMS-RenewalTask" (set _renetask=1
-) else if /i "%%A"=="/KMS-ActAndRenewalTask" (set _renacttask=1
-) else if /i "%%A"=="/KMS-Uninstall" (set _uni=1
-) else if /i "%%A"=="/KMS-Windows" (set ActWindows=1&set ActOffice=0&set _unattendedact=1
-) else if /i "%%A"=="/KMS-Office" (set ActWindows=0&set ActOffice=1&set _unattendedact=1
-) else if /i "%%A"=="/KMS-WindowsOffice" (set ActWindows=1&set ActOffice=1&set _unattendedact=1
-) else if /i "%%A"=="/KMS-KeepvNext" (set vNextOverride=0
-) else if /i "%%A"=="/KMS-Debug" (set _Debug=1
-) else if /i "%%A"=="/KMS-Logger" (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%"
-set "_Local=%LocalAppData%"
-
-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 fltmc || (
-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
-)
-
-::========================================================================================================================================
-
-if %~z0 GEQ 300000 (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
-
-::========================================================================================================================================
-
-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 Check this page for help https://massgrave.dev/troubleshoot
-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 (
-reg add "HKLM\Software\Microsoft\Windows Script Host\Settings" /v Enabled /t REG_DWORD /d 1 /f %nul%
-reg add "HKCU\Software\Microsoft\Windows Script Host\Settings" /v Enabled /t REG_DWORD /d 1 /f %nul%
-if defined notx86 reg add "HKLM\Software\Microsoft\Windows Script Host\Settings" /v Enabled /t REG_DWORD /d 1 /f /reg:32 %nul%
-)
-
-::========================================================================================================================================
-
-if defined _uni goto _Complete_Uninstall
-
-if defined _renetask set ActTask=&call:RenTask&timeout /t 2
-cls
-if defined _renacttask set ActTask=1&call:RenTask&timeout /t 2
-cls
-if defined _unattended if not defined _unattendedact goto Done
-
-::========================================================================================================================================
-
-set "_title=Online KMS Activation"
-set _gui=
-
-:_KMS_Menu
-
-set sub_next=0
-set sub_o365=0
-set sub_proj=0
-set sub_vsio=0
-set _Identity=0
-set kNext=HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext
-dir /b /s /a:-d "!_Local!\Microsoft\Office\Licenses\*1*" %nul% && set _Identity=1
-dir /b /s /a:-d "!ProgramData!\Microsoft\Office\Licenses\*1*" %nul% && set _Identity=1
-if %_Identity% EQU 1 reg query %kNext% /v MigrationToV5Done 2>nul | find /i "0x1" %nul% && call :officeSub %nul%
-
-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
-timeout /t 2
-goto Done
-)
-
-cls
-set _gui=1
-title %_title%
-mode con: cols=76 lines=30
-
-echo.
-echo.
-echo.
-echo.
-echo. ______________________________________________________________
-echo.
-echo. [1] Activate - Windows
-echo. [2] Activate - Office
-echo. [3] Activate - All
-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.
-if %_Debug%==0 (
-echo. [6] Enable Debug Mode [No]
-) else (
-call :_color2 %_White% " [6] Enable Debug Mode " %_Red% "[Yes]"
-)
-if %vNextOverride% EQU 1 (
-if %sub_next% EQU 1 (
-call :_color2 %_White% " [7] Override Office vNext " %_Red% "[Yes]"
-) else (
-echo [7] Override Office vNext [Yes]
-)
-) else (
-if %sub_next% EQU 1 (
-call :_color2 %_White% " [7] Override Office vNext " %_Yellow% "[No]"
-) else (
-echo [7] Override Office vNext [No]
-)
-)
-echo. _______________________________________________
-echo.
-echo. [0] %_exitmsg%
-echo. ______________________________________________________________
-echo.
-call :_color2 %_White% " " %_Green% "Enter a menu option in the Keyboard [1,2,3,4,5,6,7,0]"
-choice /C:12345670 /N
-set _el=%errorlevel%
-
-if %_el%==8 exit /b
-if %_el%==7 (if %vNextOverride% EQU 0 (set vNextOverride=1) else (set vNextOverride=0))&goto _KMS_Menu
-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%)
-)
-
-call :Clear-KMS-Cache %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 this script"
-set "_mO14m=Detected Office 2010 MSI Retail is not supported by this script"
-set "_mO15m=Detected Office 2013 MSI Retail is not supported by this script"
-set "_mO16m=Detected Office 2016 MSI Retail is not supported by this script"
-set "_mOuwp=Detected Office 365/2016 UWP is not supported by this script"
-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 this page for help https://massgrave.dev/troubleshoot &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))
-)
-if %vNextOverride% EQU 1 if %AutoR2V% EQU 1 (
-set sub_o365=0
-set sub_proj=0
-set sub_vsio=0
-if %sub_next% EQU 1 reg delete HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing /f %_Nul3%
-)
-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_vsio% 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_vsio% 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_vsio% 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
-
-:officeSub
-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_vsio=1
-reg query %kNext% | findstr /i /r "visio.*" %_Nul2% | find /i "0x3" %_Nul1% && set sub_vsio=1
-if %sub_o365% EQU 1 set sub_next=1
-if %sub_proj% EQU 1 set sub_next=1
-if %sub_vsio% EQU 1 set sub_next=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 _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 vNext license.
-)
-if %sub_proj% EQU 1 (
- for %%a in (%_PrjSKU%) do set _%%a=0
-echo.
-echo Microsoft Project is activated with a vNext license.
-)
-if %sub_vsio% EQU 1 (
- for %%a in (%_VisSKU%) do set _%%a=0
-echo.
-echo Microsoft Visio is activated with a vNext license.
-)
-
-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
-
-call :CheckFR
-
-set _intcon=
-for %%a in (dns.msftncsi.com licensing.mp.microsoft.com) do (
-for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do (if not [%%#]==[] set _intcon=1)
-)
-
-if not defined _intcon (
-call :_color %_Red% "Internet is not connected."
-exit /b
-)
-
-set _portcon=
-for %%a in (%srvlist%) do if not defined _portcon (
-%psc% "$t = New-Object Net.Sockets.TcpClient;try{$t.Connect("""%%a""", 1688)}catch{};$t.Connected" | findstr /i true 1>nul && set _portcon=1
-)
-
-if not defined _portcon (
-echo Internet is found but failed to connect KMS servers on Port 1688.
-echo.
-echo Make sure restricted Internet [Office/College] is not connected,
-echo or Port 1688 is not blocked in the firewall.
-echo.
-echo Either use another Internet connection or use offline KMS activator
-echo https://github.com/abbodi1406/KMS_VL_ALL_AIO
-exit /b
-)
-
-if [%ERRORCODE%]==[-1073418124] (
-echo KMS server port 1688 test is passed.
-echo Make sure system files are not blocked in firewall.
-echo.
-echo If the issue persist, try offline KMS activator,
-echo https://github.com/abbodi1406/KMS_VL_ALL_AIO
-echo.
-)
-
-echo KMS server is not an issue in this case.
-call :_color2 %Magenta% "Check this page for help" %_Yellow% " https://massgrave.dev/troubleshoot"
-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 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 timeout /t 2 & 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.7
-::========================================================================================================================================
-:_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 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 30aab83..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/Online_KMS_Activation/BIN/cleanosppx64.exe b/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx64.exe Binary files differdeleted file mode 100644 index ad19905..0000000 --- a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx64.exe +++ /dev/null diff --git a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx86.exe b/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx86.exe Binary files differdeleted file mode 100644 index 248bf4a..0000000 --- a/MAS/Separate-Files-Version/Online_KMS_Activation/BIN/cleanosppx86.exe +++ /dev/null |