R.I.P. KMS38

CLiP licenses for KMS have been deprecated from build 26100.7019

5 files changed, 137 insertions, 3100 deletions

diff --git a/MAS/All-In-One-Version-KL/MAS_AIO.cmd b/MAS/All-In-One-Version-KL/MAS_AIO.cmd
index c648563..0689192 100644
--- a/MAS/All-In-One-Version-KL/MAS_AIO.cmd
+++ b/MAS/All-In-One-Version-KL/MAS_AIO.cmd
@@ -391,7 +391,6 @@ set _elev=
 if defined _args echo "%_args%" | find /i "/S" %nul% && (set "_silent=%nul%") || (set _silent=)

 if defined _args echo "%_args%" | find /i "/" %nul% && (

 echo "%_args%" | find /i "/HWID"   %nul% && (setlocal & cls & (call :HWIDActivation    %_args% %_silent%) & endlocal)

-echo "%_args%" | find /i "/KMS38"  %nul% && (setlocal & cls & (call :KMS38Activation   %_args% %_silent%) & endlocal)

 echo "%_args%" | find /i "/Z-"     %nul% && (setlocal & cls & (call :TSforgeActivation %_args% %_silent%) & endlocal)

 echo "%_args%" | find /i "/K-"     %nul% && (setlocal & cls & (call :KMSActivation     %_args% %_silent%) & endlocal)

 echo "%_args%" | find /i "/Ohook"  %nul% && (setlocal & cls & (call :OhookActivation   %_args% %_silent%) & endlocal)

@@ -473,34 +472,32 @@ call :dk_color3 %_White% "             [3] " %_Green% "TSforge" %_White% "
 ) else (

 echo:             [3] TSforge             - Windows / Office / ESU

 )

-echo:             [4] KMS38               - Windows

-echo:             [5] Online KMS          - Windows / Office

+echo:             [4] Online KMS          - Windows / Office

 echo:             __________________________________________________ 

 echo:

-echo:             [6] Check Activation Status

-echo:             [7] Change Windows Edition

-echo:             [8] Change Office Edition

+echo:             [5] Check Activation Status

+echo:             [6] Change Windows Edition

+echo:             [7] Change Office Edition

 echo:             __________________________________________________      

 echo:

-echo:             [9] Troubleshoot

+echo:             [8] Troubleshoot

 echo:             [E] Extras

 echo:             [H] Help

 echo:             [0] Exit

 echo:       ______________________________________________________________

 echo:

 call :dk_color2 %_White% "         " %_Green% "Choose a menu option using your keyboard [1,2,3...E,H,0] :"

-choice /C:123456789EH0 /N

+choice /C:12345678EH0 /N

 set _erl=%errorlevel%

 

-if %_erl%==12 exit /b

-if %_erl%==11 (start %selfgit% & start %github% & start %mas%troubleshoot & goto :MainMenu)

-if %_erl%==10 goto :Extras

-if %_erl%==9 setlocal & call :troubleshoot      & cls & endlocal & goto :MainMenu

-if %_erl%==8 setlocal & call :change_offedition & cls & endlocal & goto :MainMenu

-if %_erl%==7 setlocal & call :change_winedition & cls & endlocal & goto :MainMenu

-if %_erl%==6 setlocal & call :check_actstatus   & cls & endlocal & goto :MainMenu

-if %_erl%==5 setlocal & call :KMSActivation     & cls & endlocal & goto :MainMenu

-if %_erl%==4 setlocal & call :KMS38Activation   & cls & endlocal & goto :MainMenu

+if %_erl%==11 exit /b

+if %_erl%==10 (start %selfgit% & start %github% & start %mas%troubleshoot & goto :MainMenu)

+if %_erl%==9 goto :Extras

+if %_erl%==8 setlocal & call :troubleshoot      & cls & endlocal & goto :MainMenu

+if %_erl%==7 setlocal & call :change_offedition & cls & endlocal & goto :MainMenu

+if %_erl%==6 setlocal & call :change_winedition & cls & endlocal & goto :MainMenu

+if %_erl%==5 setlocal & call :check_actstatus   & cls & endlocal & goto :MainMenu

+if %_erl%==4 setlocal & call :KMSActivation     & cls & endlocal & goto :MainMenu

 if %_erl%==3 setlocal & call :TSforgeActivation & cls & endlocal & goto :MainMenu

 if %_erl%==2 setlocal & call :OhookActivation   & cls & endlocal & goto :MainMenu

 if %_erl%==1 setlocal & call :HWIDActivation    & cls & endlocal & goto :MainMenu

@@ -579,28 +576,26 @@ echo:
 echo:            [1] HWID             [Windows]

 echo:            [2] Ohook            [Office]

 echo:            [3] TSforge          [Windows / ESU / Office]

-echo:            [4] KMS38            [Windows]

-echo:            [5] Online KMS       [Windows / Office]

+echo:            [4] Online KMS       [Windows / Office]

 echo:

-echo:            [6] HWID    [Windows] ^+ Ohook [Office]

-echo:            [7] HWID    [Windows] ^+ Ohook [Office] ^+ TSforge [ESU]

-echo:            [8] TSforge [Windows] ^+ Online KMS [Office]

+echo:            [5] HWID    [Windows] ^+ Ohook [Office]

+echo:            [6] HWID    [Windows] ^+ Ohook [Office] ^+ TSforge [ESU]

+echo:            [7] TSforge [Windows] ^+ Online KMS [Office]

 echo:

 call :dk_color2 %_White% "            [R] " %_Green% "ReadMe"

 echo:            [0] Go Back

 echo:         ____________________________________________________________

 echo:  

 call :dk_color2 %_White% "             " %_Green% "Choose a menu option using your keyboard :"

-choice /C:12345678R0 /N

+choice /C:1234567R0 /N

 set _erl=%errorlevel%

 

-if %_erl%==10 goto:Extras

-if %_erl%==9 start %mas%oem-folder &goto:Extract$OEM$2

-if %_erl%==8 (set "_oem=TSforge [Windows] + Online KMS [Office]" & set "para=/Z-Windows /K-Office" &goto:Extract$OEM$3)

-if %_erl%==7 (set "_oem=HWID [Windows] + Ohook [Office] + TSforge [ESU]" & set "para=/HWID /Ohook /Z-ESU" &goto:Extract$OEM$3)

-if %_erl%==6 (set "_oem=HWID [Windows] + Ohook [Office]" & set "para=/HWID /Ohook" &goto:Extract$OEM$3)

-if %_erl%==5 (set "_oem=Online KMS" & set "para=/K-WindowsOffice" &goto:Extract$OEM$3)

-if %_erl%==4 (set "_oem=KMS38" & set "para=/KMS38" &goto:Extract$OEM$3)

+if %_erl%==9 goto:Extras

+if %_erl%==8 start %mas%oem-folder &goto:Extract$OEM$2

+if %_erl%==7 (set "_oem=TSforge [Windows] + Online KMS [Office]" & set "para=/Z-Windows /K-Office" &goto:Extract$OEM$3)

+if %_erl%==6 (set "_oem=HWID [Windows] + Ohook [Office] + TSforge [ESU]" & set "para=/HWID /Ohook /Z-ESU" &goto:Extract$OEM$3)

+if %_erl%==5 (set "_oem=HWID [Windows] + Ohook [Office]" & set "para=/HWID /Ohook" &goto:Extract$OEM$3)

+if %_erl%==4 (set "_oem=Online KMS" & set "para=/K-WindowsOffice" &goto:Extract$OEM$3)

 if %_erl%==3 (set "_oem=TSforge" & set "para=/Z-WindowsESUOffice" &goto:Extract$OEM$3)

 if %_erl%==2 (set "_oem=Ohook" & set "para=/Ohook" &goto:Extract$OEM$3)

 if %_erl%==1 (set "_oem=HWID" & set "para=/HWID" &goto:Extract$OEM$3)

@@ -638,11 +633,6 @@ echo:
 call :dk_color %Blue% "%_oem%"

 call :dk_color %Green% "$OEM$ folder was successfully created on your Desktop."

 )

-echo "%_oem%" | find /i "KMS38" 1>nul && (

-echo:

-echo To KMS38 activate Server Cor/Acor editions ^(No GUI Versions^),

-echo Check this page %mas%oem-folder

-)

 echo ___________________________________________________________________

 echo:

 call :dk_color %_Yellow% "Press [0] key to %_exitmsg%..."

@@ -12055,756 +12045,6 @@ exit /b
 

 :+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

 

-:KMS38Activation

-

-::  To activate, run the script with "/KMS38" parameter or change 0 to 1 in below line

-set _act=0

-

-::  To disable changing edition if current edition doesn't support KMS38 activation, change the value to 1 from 0 or run the script with "/KMS38-NoEditionChange" parameter

-set _NoEditionChange=0

-

-::  If value is changed in above lines or parameter is used then script will run in unattended mode

-

-::========================================================================================================================================

-

-cls

-color 07

-title  KMS38 Activation %masver%

-

-set _args=

-set _elev=

-set _unattended=0

-

-set _args=%*

-if defined _args set _args=%_args:"=%

-if defined _args (

-for %%A in (%_args%) do (

-if /i "%%A"=="/KMS38"                  set _act=1

-if /i "%%A"=="/KMS38-NoEditionChange"  set _NoEditionChange=1

-if /i "%%A"=="-el"                     set _elev=1

-)

-)

-

-for %%A in (%_act% %_NoEditionChange%) do (if "%%A"=="1" set _unattended=1)

-

-::========================================================================================================================================

-

-set _k38=

-call :dk_setvar

-set "specific_kms=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f"

-

-if %winbuild% LSS 14393 (

-%eline%

-echo Unsupported OS version detected [%winbuild%].

-echo KMS38 activation is only supported on Windows 10/11/Server, build 14393 and later.

-echo:

-if %winbuild% LSS 10240 (

-call :dk_color %Blue% "Use TSforge activation option from the main menu."

-) else (

-call :dk_color %Blue% "Use HWID activation option from the main menu."

-)

-goto dk_done

-)

-

-::========================================================================================================================================

-

-:k_menu

-

-if %_unattended%==0 (

-cls

-if not defined terminal mode 76, 25

-title  KMS38 Activation %masver%

-

-echo:

-echo:

-echo:

-echo:

-echo:           ______________________________________________________

-echo:

-echo                 [1] KMS38 Activation

-echo                 ____________________________________________

-echo:

-echo                 [2] Remove KMS38 Activation

-echo:

-echo                 [0] %_exitmsg%

-echo:           ______________________________________________________

-echo: 

-call :dk_color2 %_White% "              " %_Green% "Choose a menu option using your keyboard [1,2,0]"

-choice /C:120 /N

-set _el=!errorlevel!

-if !_el!==3  exit /b

-if !_el!==2  goto :k_uninstall

-if !_el!==1  goto :k_menu2

-goto :k_menu

-)

-

-::========================================================================================================================================

-

-:k_menu2

-

-cls

-if not defined terminal (

-mode 110, 34

-if exist "%SysPath%\spp\store_test\" mode 134, 34

-)

-title  KMS38 Activation %masver%

-

-echo:

-echo Initializing...

-call :dk_chkmal

-

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*CorEdition~*.mum" if not exist "%SysPath%\clipup.exe" set a_cor=1

-if not exist %SysPath%\sppsvc.exe (set _fmiss=sppsvc.exe)

-if not exist %SysPath%\ClipUp.exe if not defined a_cor (set _fmiss=%_fmiss%ClipUp.exe)

-

-if defined _fmiss (

-%eline%

-echo [%_fmiss%] file is missing, aborting...

-echo:

-if not defined results (

-call :dk_color %Blue% "Go back to Main Menu, select Troubleshoot and run DISM Restore and SFC Scan options."

-call :dk_color %Blue% "After that, restart system and try activation again."

-echo:

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-)

-goto dk_done

-)

-

-::========================================================================================================================================

-

-set spp=SoftwareLicensingProduct

-set sps=SoftwareLicensingService

-

-call :dk_ckeckwmic

-call :dk_checksku

-call :dk_product

-call :dk_sppissue

-

-::========================================================================================================================================

-

-::  Check if system is permanently activated or not

-

-call :dk_checkperm

-if defined _perm (

-cls

-echo ___________________________________________________________________________________________

-echo:

-call :dk_color2 %_White% "     " %Green% "%winos% is already permanently activated."

-call :dk_color2 %_White% "     " %Gray% "Activation is not required."

-echo ___________________________________________________________________________________________

-if %_unattended%==1 goto dk_done

-echo:

-choice /C:10 /N /M ">    [1] Activate Anyway [0] %_exitmsg% : "

-if errorlevel 2 exit /b

-)

-cls

-

-::========================================================================================================================================

-

-::  Check Evaluation version

-

-set _eval=

-set _evalserv=

-

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set _evalserv=1

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1 & set _evalserv=1

-

-if defined _eval (

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionID %nul2% | find /i "Eval" %nul1% && (

-%eline%

-echo [%winos% ^| %winbuild%]

-if defined _evalserv (

-echo Server Evaluation cannot be activated. Convert it to full Server OS.

-echo:

-call :dk_color %Blue% "Go Back to main menu and use [Change Edition] option."

-) else (

-echo Evaluation editions cannot be activated outside of their evaluation period.

-call :dk_color %Blue% "Use TSforge activation option from the main menu to reset evaluation period."

-echo:

-set fixes=%fixes% %mas%evaluation_editions

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%evaluation_editions"

-)

-goto dk_done

-)

-)

-

-::========================================================================================================================================

-

-:: Check clipup.exe for the detection and activation of server cor and acor editions

-

-if defined a_cor (

-if not exist "!_work!\clipup.exe" (

-%eline%

-echo clipup.exe doesn't exist in Server Cor/Acor [No GUI] versions.

-echo The file is required for KMS38 activation.

-echo Check the below page for instructions on how to activate it.

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%kms38"

-goto dk_done

-)

-)

-

-:: Check file signature

-

-if defined a_cor (

-%psc% "if (-not (Get-AuthenticodeSignature -FilePath '!_work!\clipup.exe').IsOSBinary) {Exit 3}" %nul%

-if !errorlevel!==3 (

-%eline%

-echo Valid digital signature not found in clipup.exe file.

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-goto dk_done

-)

-)

-

-::========================================================================================================================================

-

-set error=

-

-cls

-echo:

-call :dk_showosinfo

-

-::========================================================================================================================================

-

-echo Initiating Diagnostic Tests...

-

-set "_serv=ClipSVC sppsvc KeyIso Winmgmt"

-

-::  Client License Service (ClipSVC)

-::  Software Protection

-::  CNG Key Isolation

-::  Windows Management Instrumentation

-

-call :dk_errorcheck

-

-::========================================================================================================================================

-

-::  Check if GVLK (KMS key) is already installed or not

-

-call :k_channel

-

-::  Detect Key

-

-set key=

-set pkey=

-set altkey=

-set changekey=

-set altedition=

-

-call :dk_actids 55c92734-d682-4d71-983e-d6ec3f16059f

-if defined allapps call :kms38data key

-if not defined key call :k_gvlk %nul%

-if defined allapps if not defined key call :kms38fallback

-

-if defined altkey (set key=%altkey%&set changekey=1)

-

-set /a UBR=0

-if %osSKU%==191 if defined altkey if defined altedition (

-for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v UBR %nul6%') do if not errorlevel 1 set /a UBR=%%b

-if %winbuild% LSS 22598 if !UBR! LSS 2788 (

-call :dk_color %Blue% "Windows must be updated to build 19044.2788 or higher for IotEnterpriseS KMS38 activation."

-)

-)

-

-if not defined key if defined notfoundaltactID (

-call :dk_color %Red% "Checking Alternate Edition for KMS38    [%altedition% Activation ID Not Found]"

-)

-

-if not defined key if not defined _gvlk (

-echo:

-echo [%winos% ^| %winbuild% ^| SKU:%osSKU%]

-

-if exist "%SysPath%\spp\tokens\skus\%osedition%\*GVLK*.xrm-ms" set sppks=1

-

-if defined skunotfound (

-call :dk_color %Red% "Required license files not found in %SysPath%\spp\tokens\skus\"

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-)

-

-if defined sppks (

-call :dk_color %Red% "KMS38 activation is supported but failed to find the key."

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-)

-

-if not defined skunotfound if not defined sppks (

-call :dk_color %Red% "This product does not support KMS38 activation."

-call :dk_color %Blue% "Use TSforge activation option from the main menu."

-set fixes=%fixes% %mas%

-echo %mas%

-)

-echo:

-goto dk_done

-)

-

-::========================================================================================================================================

-

-::  Install key

-

-echo:

-if defined changekey (

-call :dk_color %Blue% "[%altedition%] edition product key will be used to enable KMS38 activation."

-echo:

-)

-

-if defined winsub (

-call :dk_color %Blue% "Windows Subscription edition [SKU ID-%slcSKU%] found. Script will activate the base edition [SKU ID-%regSKU%]."

-echo:

-)

-

-set _partial=

-if not defined key (

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path %spp% where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null AND LicenseDependsOn is NULL" Get PartialProductKey /value %nul6%') do set "_partial=%%#"

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT PartialProductKey FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL').Get()).PartialProductKey | %% {echo ('PartialProductKey='+$_)}" %nul6%') do set "_partial=%%#"

-call echo Checking Installed Product Key          [Partial Key - %%_partial%%] [Volume:GVLK]

-)

-

-if defined key (

-set generickey=1

-call :dk_inskey "[%key%]"

-)

-

-::========================================================================================================================================

-

-::  Check activation ID for setting specific KMS host

-

-set app=

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic path %spp% where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL AND LicenseDependsOn is NULL) get ID /VALUE" %nul6%') do call set "app=%%a"

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL').Get()).ID | %% {echo ('ID='+$_)}" %nul6%') do call set "app=%%a"

-

-if not defined app (

-call :dk_color %Red% "Checking Installed GVLK Activation ID   [Not Found] Aborting..."

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-goto :dk_done

-)

-

-::========================================================================================================================================

-

-::  Set specific KMS host to Local Host

-::  By doing this, global KMS IP can not replace KMS38 activation but can be used with Office and other Windows Editions

-

-echo:

-%nul% reg delete "HKLM\%specific_kms%" /f

-%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f

-

-%nul% reg query "HKLM\%specific_kms%" && (

-call :dk_color %Blue% "Specific KMS registry is locked. %_fixmsg%"

-)

-

-set k_error=

-%nul% reg add "HKLM\%specific_kms%\%app%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" || set k_error=1

-%nul% reg add "HKLM\%specific_kms%\%app%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" || set k_error=1

-

-if not defined k_error (

-echo Adding Specific KMS Host                [LocalHost] [Successful]

-) else (

-call :dk_color %Red% "Adding Specific KMS Host                [LocalHost] [Failed]"

-)

-

-::========================================================================================================================================

-

-::  Copy clipup.exe to System32 directory to activate Server Cor/Acor editions

-

-if defined a_cor (

-set "_clipup=%systemroot%\System32\clipup.exe"

-pushd "!_work!\"

-copy /y /b "ClipUp.exe" "!_clipup!" %nul%

-popd

-

-echo:

-if exist "!_clipup!" (

-echo Copying clipup.exe File to              [%systemroot%\System32\] [Successful]

-) else (

-call :dk_color %Red% "Copying clipup.exe File to              [%systemroot%\System32\] [Failed] Aborting..."

-goto :k_final

-)

-)

-

-::========================================================================================================================================

-

-::  Generate GenuineTicket.xml and apply

-::  In some cases clipup -v -o method fails and in some cases service restart method fails as well

-::  To maximize success rate and get better error details, script will install tickets two times (service restart + clipup -v -o)

-

-set "tdir=%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket"

-if not exist "%tdir%\" md "%tdir%\" %nul%

-

-if exist "%tdir%\Genuine*" del /f /q "%tdir%\Genuine*" %nul%

-if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%

-if exist "%ProgramData%\Microsoft\Windows\ClipSVC\Install\Migration\*" del /f /q "%ProgramData%\Microsoft\Windows\ClipSVC\Install\Migration\*" %nul%

-

-::  Generate ticket

-

-set "SessionIdStr=OSMajorVersion=5;OSMinorVersion=1;OSPlatformId=2;PP=0;GVLKExp=2038-01-19T03:14:07Z;DownlevelGenuineState=1;"

-%psc% "$f=[System.IO.File]::ReadAllText('!_batp!') -split ':sign\:.*';. ([scriptblock]::Create($f[1]))"

-

-copy /y /b "%tdir%\GenuineTicket" "%tdir%\GenuineTicket.xml" %nul%

-

-if not exist "%tdir%\GenuineTicket.xml" (

-call :dk_color %Red% "Generating GenuineTicket.xml            [Failed, aborting...]"

-if exist "%tdir%\Genuine*" del /f /q "%tdir%\Genuine*" %nul%

-goto :k_final

-) else (

-echo Generating GenuineTicket.xml            [Successful]

-)

-

-set "_xmlexist=if exist "%tdir%\GenuineTicket.xml""

-

-::  Stop sppsvc

-

-%psc% "Start-Job { Stop-Service sppsvc -force } | Wait-Job -Timeout 20 | Out-Null"

-

-%_xmlexist% (

-%psc% "Start-Job { Restart-Service ClipSVC } | Wait-Job -Timeout 20 | Out-Null"

-%_xmlexist% timeout /t 2 %nul%

-%_xmlexist% timeout /t 2 %nul%

-

-%_xmlexist% (

-set error=1

-if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%

-call :dk_color %Gray% "Installing GenuineTicket.xml            [Failed with ClipSVC service restart, wait...]"

-)

-)

-

-copy /y /b "%tdir%\GenuineTicket" "%tdir%\GenuineTicket.xml" %nul%

-clipup -v -o

-

-set rebuildinfo=

-

-if not exist %ProgramData%\Microsoft\Windows\ClipSVC\tokens.dat (

-set error=1

-set rebuildinfo=1

-call :dk_color %Red% "Checking ClipSVC tokens.dat             [Not Found]"

-)

-

-%_xmlexist% (

-set error=1

-set rebuildinfo=1

-call :dk_color %Red% "Installing GenuineTicket.xml            [Failed With clipup -v -o]"

-)

-

-if exist "%ProgramData%\Microsoft\Windows\ClipSVC\Install\Migration\*.xml" (

-set error=1

-set rebuildinfo=1

-call :dk_color %Red% "Checking Ticket Migration               [Failed]"

-)

-

-if not defined showfix if defined rebuildinfo (

-set showfix=1

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-echo:

-)

-

-if exist "%tdir%\Genuine*" del /f /q "%tdir%\Genuine*" %nul%

-

-::==========================================================================================================================================

-

-call :dk_product

-

-echo:

-echo Activating...

-echo:

-

-call :k_checkexp

-if defined _k38 (

-call :k_actinfo

-goto :k_final

-)

-

-::  Clear 180 Days KMS Activation lock with Windows SKU specific rearm and without the need to restart the system

-

-if %_wmic% EQU 1 wmic path %spp% where ID='%app%' call ReArmsku %nul%

-if %_wmic% EQU 0 %psc% "$null=([WMI]'%spp%=''%app%''').ReArmsku()" %nul%

-

-if %errorlevel%==0 (

-echo Applying SKU-ID Rearm                   [Successful]

-) else (

-call :dk_color %Red% "Applying SKU-ID Rearm                   [Failed]"

-)

-call :dk_refresh

-

-echo:

-call :k_checkexp

-if defined _k38 (

-call :k_actinfo

-goto :k_final

-)

-

-call :dk_color %Red% "Activation Failed"

-if not defined error call :dk_color %Blue% "%_fixmsg%"

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-

-::========================================================================================================================================

-

-:k_final

-

-::  Remove the specific KMS host (LocalHost) added by the script if activation is not completed

-

-echo:

-if not defined _k38 (

-%nul% reg delete "HKLM\%specific_kms%" /f

-%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f

-%nul% reg query "HKLM\%specific_kms%" && (

-call :dk_color %Red% "Removing the Added Specific KMS Host    [Failed]"

-) || (

-echo Removing the Added Specific KMS Host    [Successful]

-)

-)

-

-if defined _k38 if %winbuild% GEQ 26200 (

-call :dk_color %Gray% "In Windows settings, you may see a renewal notification for activation that can be ignored."

-call :dk_color %Gray% "To avoid this notification, please use the HWID or TSforge activation options in the main menu."

-)

-

-::  clipup.exe does not exist in server cor and acor editions by default, it was copied there with this script

-

-if defined a_cor if exist "%_clipup%" del /f /q "%_clipup%" %nul%

-

-if defined a_cor (

-if exist "%_clipup%" (

-call :dk_color %Red% "Deleting Copied clipup.exe File         [Failed]"

-) else (

-echo Deleting Copied clipup.exe File         [Successful]

-)

-)

-

-for %%# in (407) do if %osSKU%==%%# (

-call :dk_color %Red% "%winos% does not support activation on non-azure platforms."

-)

-

-::  Trigger reevaluation of SPP's Scheduled Tasks

-

-if defined _k38 (

-call :dk_reeval %nul%

-)

-goto :dk_done

-

-::========================================================================================================================================

-

-:k_uninstall

-

-cls

-if not defined terminal mode 99, 28

-title  Remove KMS38 Activation %masver%

-

-%nul% reg delete "HKLM\%specific_kms%" /f

-%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f

-

-echo:

-%nul% reg query "HKLM\%specific_kms%" && (

-call :dk_color %Red% "Failed to remove specific KMS Host."

-call :dk_color %Blue% "%_fixmsg%"

-) || (

-echo Successfully removed specific KMS Host.

-)

-

-echo:

-echo KMS38 activation doesn't modify any Windows components and doesn't install any new files.

-echo:

-call :dk_color %Gray% "If you want to reset the activation status,"

-call :dk_color %Blue% "%_fixmsg%"

-echo:

-

-goto :dk_done

-

-::========================================================================================================================================

-

-::  Check KMS activation status

-

-:k_actinfo

-

-set xpr=

-for /f "tokens=* delims=" %%# in ('%psc% "$([DateTime]::Now.addMinutes(%gpr%)).ToString('yyyy-MM-dd HH:mm:ss')" %nul6%') do set "xpr=%%#"

-call :dk_color %Green% "%winos% is activated till !xpr!"

-exit /b

-

-::  Check remaining KMS activation grace period

-

-:k_checkexp

-

-set gpr=0

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('"wmic path %spp% where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL AND LicenseDependsOn is NULL) get GracePeriodRemaining /VALUE" %nul6%') do set "gpr=%%#"

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT GracePeriodRemaining FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL').Get()).GracePeriodRemaining | %% {echo ('GracePeriodRemaining='+$_)}" %nul6%') do set "gpr=%%#"

-if %gpr% GTR 259200 (set _k38=1) else (set _k38=)

-exit /b

-

-::  Get Windows installed key channel

-

-:k_channel

-

-set _gvlk=

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path %spp% where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL and Description like '%%KMSCLIENT%%'" Get Name /value %nul6%') do (echo %%# findstr /i "Windows" %nul1% && set _gvlk=1)

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT Name FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL and Description like ''%%KMSCLIENT%%''').Get()).Name | %% {echo ('Name='+$_)}" %nul6%') do (echo %%# findstr /i "Windows" %nul1% && set _gvlk=1)

-exit /b

-

-::========================================================================================================================================

-

-::  Get Product Key from pkeyhelper.dll for future new editions

-::  It works on Windows 10 1803 (17134) and later builds.

-

-:k_pkey

-

-call :dk_reflection

-

-set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('SkuGetProductKeyForEdition', 'pkeyhelper.dll', 'Public, Static', 1, [int], @([int], [String], [String].MakeByRefType(), [String].MakeByRefType()), 1, 3);

-set d1=%d1% $out = ''; [void]$TypeBuilder.CreateType()::SkuGetProductKeyForEdition(%1, %2, [ref]$out, [ref]$null); $out

-

-set pkey=

-for /f %%a in ('%psc% "%d1%"') do if not errorlevel 1 (set pkey=%%a)

-exit /b

-

-::  Get channel name for the key which was extracted from pkeyhelper.dll

-

-:k_pkeychannel

-

-set k=%1

-set m=[Runtime.InteropServices.Marshal]

-set p=%SysPath%\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms

-

-set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('PidGenX', 'pidgenx.dll', 'Public, Static', 1, [int], @([String], [String], [String], [int], [IntPtr], [IntPtr], [IntPtr]), 1, 3);

-set d1=%d1% $r = [byte[]]::new(0x04F8); $r[0] = 0xF8; $r[1] = 0x04; $f = %m%::AllocHGlobal(0x04F8); %m%::Copy($r, 0, $f, 0x04F8);

-set d1=%d1% [void]$TypeBuilder.CreateType()::PidGenX('%k%', '%p%', '00000', 0, 0, 0, $f); %m%::Copy($f, $r, 0, 0x04F8); %m%::FreeHGlobal($f); [Text.Encoding]::Unicode.GetString($r, 1016, 128)

-

-set pkeychannel=

-for /f %%a in ('%psc% "%d1%"') do if not errorlevel 1 (set pkeychannel=%%a)

-exit /b

-

-:k_gvlk

-

-for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b

-for %%# in (Volume:GVLK) do (

-call :k_pkey %osSKU% '%%#'

-if defined pkey call :k_pkeychannel !pkey!

-if /i "!pkeychannel!"=="%%#" (

-set key=!pkey!

-exit /b

-)

-)

-exit /b

-

-::========================================================================================================================================

-

-::  1st column = Activation ID

-::  2nd column = GVLK (Generic volume licensing key)

-::  3rd column = SKU ID

-::  4th column = WMI Edition ID (For reference only)

-::  5th column = Build Branch name incase same Edition ID is used in different OS versions with different key (For reference only)

-::  Separator  = "_"

-

-:kms38data

-

-set f=

-for %%# in (

-:: Windows 10/11

-73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43___4_Enterprise

-e272e3e2-732f-4c65-a8f0-484747d0d947_DPH2V-TTNVB-4X9Q3-TJR4H-KH%f%JW4__27_EnterpriseN

-2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX__48_Professional

-a80b5abf-76ad-428b-b05d-a47d2dffeebf_MH37W-N47XK-V7XM9-C7227-GC%f%QG9__49_ProfessionalN

-7b9e1751-a8da-4f75-9560-5fadfe3d8e38_3KHY7-WNT83-DGQKR-F7HPR-84%f%4BM__98_CoreN

-a9107544-f4a0-4053-a96a-1479abdef912_PVMJN-6DFY6-9CCP6-7BKTT-D3%f%WVR__99_CoreCountrySpecific

-cd918a57-a41b-4c82-8dce-1a538e221a83_7HNRX-D7KGG-3K4RQ-4WPJ4-YT%f%DFH_100_CoreSingleLanguage

-58e97c99-f377-4ef1-81d5-4ad5522b5fd8_TX9XD-98N7V-6WMQ6-BX7FG-H8%f%Q99_101_Core

-e0c42288-980c-4788-a014-c080d2e1926e_NW6C2-QMPVW-D7KKK-3GKT6-VC%f%FB2_121_Education

-3c102355-d027-42c6-ad23-2e7ef8a02585_2WH4N-8QGBV-H22JP-CT43Q-MD%f%WWJ_122_EducationN

-32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee_M7XTQ-FN8P6-TTKYV-9D4CC-J4%f%62D_125_EnterpriseS_RS5,VB,Ge

-2d5a5a60-3040-48bf-beb0-fcd770c20ce0_DCPHK-NFMTC-H88MJ-PFHPY-QJ%f%4BJ_125_EnterpriseS_RS1

-7b51a46c-0c04-4e8f-9af4-8496cca90d5e_WNMTR-4C88C-JK8YV-HQ7T2-76%f%DF9_125_EnterpriseS_TH1

-7103a333-b8c8-49cc-93ce-d37c09687f92_92NFX-8DJQP-P6BBQ-THF9C-7C%f%G2H_126_EnterpriseSN_RS5,VB,Ge

-9f776d83-7156-45b2-8a5c-359b9c9f22a3_QFFDN-GRT3P-VKWWX-X7T3R-8B%f%639_126_EnterpriseSN_RS1

-87b838b7-41b6-4590-8318-5797951d8529_2F77B-TNFGY-69QQF-B8YKP-D6%f%9TJ_126_EnterpriseSN_TH1

-82bbc092-bc50-4e16-8e18-b74fc486aec3_NRG8B-VKK3Q-CXVCJ-9G2XF-6Q%f%84J_161_ProfessionalWorkstation

-4b1571d3-bafb-4b40-8087-a961be2caf65_9FNHH-K3HBT-3W4TD-6383H-6X%f%YWF_162_ProfessionalWorkstationN

-3f1afc82-f8ac-4f6c-8005-1d233e606eee_6TP4R-GNPTD-KYYHQ-7B7DP-J4%f%47Y_164_ProfessionalEducation

-5300b18c-2e33-4dc2-8291-47ffcec746dd_YVWGF-BXNMC-HTQYQ-CPQ99-66%f%QFC_165_ProfessionalEducationN

-e0b2d383-d112-413f-8a80-97f373a5820c_YYVX9-NTFWV-6MDM3-9PT4T-4M%f%68B_171_EnterpriseG

-e38454fb-41a4-4f59-a5dc-25080e354730_44RPN-FTY23-9VTTB-MP9BX-T8%f%4FV_172_EnterpriseGN

-ec868e65-fadf-4759-b23e-93fe37f2cc29_CPWHC-NT2C7-VYW78-DHDB2-PG%f%3GK_175_ServerRdsh_RS5

-e4db50ea-bda1-4566-b047-0ca50abc6f07_7NBT4-WGBQX-MP4H7-QXFF8-YP%f%3KX_175_ServerRdsh_RS3

-0df4f814-3f57-4b8b-9a9d-fddadcd69fac_NBTWJ-3DR69-3C4V8-C26MC-GQ%f%9M6_183_CloudE

-59eb965c-9150-42b7-a0ec-22151b9897c5_KBN8V-HFGQ4-MGXVD-347P6-PD%f%QGT_191_IoTEnterpriseS_VB,NI

-d30136fc-cb4b-416e-a23d-87207abc44a9_6XN7V-PCBDC-BDBRH-8DQY7-G6%f%R44_202_CloudEditionN

-ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69_37D7F-N49CB-WQR8W-TBJ73-FM%f%8RX_203_CloudEdition

-:: Windows 2016/19/22/25 LTSC/SAC

-7dc26449-db21-4e09-ba37-28f2958506a6_TVRH6-WHNXV-R9WG3-9XRFY-MY%f%832___7_ServerStandard_Ge

-9bd77860-9b31-4b7b-96ad-2564017315bf_VDYBN-27WPP-V4HQT-9VMD4-VM%f%K7H___7_ServerStandard_FE

-de32eafd-aaee-4662-9444-c1befb41bde2_N69G4-B89J2-4G8F4-WWYCC-J4%f%64C___7_ServerStandard_RS5

-8c1c5410-9f39-4805-8c9d-63a07706358f_WC2BQ-8NRM3-FDDYY-2BFGV-KH%f%KQY___7_ServerStandard_RS1

-c052f164-cdf6-409a-a0cb-853ba0f0f55a_D764K-2NDRG-47T6Q-P8T8W-YP%f%6DF___8_ServerDatacenter_Ge

-ef6cfc9f-8c5d-44ac-9aad-de6a2ea0ae03_WX4NM-KYWYW-QJJR4-XV3QB-6V%f%M33___8_ServerDatacenter_FE

-34e1ae55-27f8-4950-8877-7a03be5fb181_WMDGN-G9PQG-XVVXX-R3X43-63%f%DFG___8_ServerDatacenter_RS5

-21c56779-b449-4d20-adfc-eece0e1ad74b_CB7KF-BWN84-R7R2Y-793K2-8X%f%DDG___8_ServerDatacenter_RS1

-034d3cbb-5d4b-4245-b3f8-f84571314078_WVDHN-86M7X-466P6-VHXV7-YY%f%726__50_ServerSolution_RS5

-2b5a1b0f-a5ab-4c54-ac2f-a6d94824a283_JCKRF-N37P4-C2D82-9YXRT-4M%f%63B__50_ServerSolution_RS1

-7b4433f4-b1e7-4788-895a-c45378d38253_QN4C6-GBJD2-FB422-GHWJK-GJ%f%G2R_110_ServerCloudStorage

-8de8eb62-bbe0-40ac-ac17-f75595071ea3_GRFBW-QNDC4-6QBHG-CCK3B-2P%f%R88_120_ServerARM64_RS5

-43d9af6e-5e86-4be8-a797-d072a046896c_K9FYF-G6NCK-73M32-XMVPY-F9%f%DRR_120_ServerARM64_RS4

-39e69c41-42b4-4a0a-abad-8e3c10a797cc_QFND9-D3Y9C-J3KKY-6RPVP-2D%f%PYV_145_ServerDatacenterACor_FE

-90c362e5-0da1-4bfd-b53b-b87d309ade43_6NMRW-2C8FM-D24W7-TQWMY-CW%f%H2D_145_ServerDatacenterACor_RS5

-e49c08e7-da82-42f8-bde2-b570fbcae76c_2HXDN-KRXHB-GPYC7-YCKFJ-7F%f%VDG_145_ServerDatacenterACor_RS3

-f5e9429c-f50b-4b98-b15c-ef92eb5cff39_67KN8-4FYJW-2487Q-MQ2J7-4C%f%4RG_146_ServerStandardACor_FE

-73e3957c-fc0c-400d-9184-5f7b6f2eb409_N2KJX-J94YW-TQVFB-DG9YT-72%f%4CC_146_ServerStandardACor_RS5

-61c5ef22-f14f-4553-a824-c4b31e84b100_PTXN8-JFHJM-4WC78-MPCBR-9W%f%4KR_146_ServerStandardACor_RS3

-45b5aff2-60a0-42f2-bc4b-ec6e5f7b527e_FCNV3-279Q9-BQB46-FTKXX-9H%f%PRH_168_ServerAzureCor_Ge

-8c8f0ad3-9a43-4e05-b840-93b8d1475cbc_6N379-GGTMK-23C6M-XVVTC-CK%f%FRQ_168_ServerAzureCor_FE

-a99cc1f0-7719-4306-9645-294102fbff95_FDNH6-VW9RW-BXPJ7-4XTYG-23%f%9TB_168_ServerAzureCor_RS5

-3dbf341b-5f6c-4fa7-b936-699dce9e263f_VP34G-4NPPG-79JTQ-864T4-R3%f%MQX_168_ServerAzureCor_RS1

-c2e946d1-cfa2-4523-8c87-30bc696ee584_XGN3F-F394H-FD2MY-PP6FD-8M%f%CRC_407_ServerTurbine_Ge

-19b5e0fb-4431-46bc-bac1-2f1873e4ae73_NTBV8-9K7Q8-V27C6-M2BTV-KH%f%MXV_407_ServerTurbine_RS5

-) do (

-for /f "tokens=1-5 delims=_" %%A in ("%%#") do if %osSKU%==%%C (

-if %1==key if not defined key echo "!allapps!" | find /i "%%A" %nul1% && set key=%%B

-)

-)

-exit /b

-

-::========================================================================================================================================

-

-::  Below code is used to get alternate edition name and key if current edition doesn't support KMS38 activation

-

-::  1st column = Current SKU ID

-::  2nd column = Current Edition Name

-::  3rd column = Current Edition Activation ID

-::  4th column = Alternate Edition Activation ID

-::  5th column = Alternate Edition GVLK

-::  6th column = Alternate Edition Name

-::  Separator  = _

-

-

-:kms38fallback

-

-set notfoundaltactID=

-if %_NoEditionChange%==1 exit /b

-

-for %%# in (

-188_IoTEnterprise__________________8ab9bdd1-1f67-4997-82d9-8878520837d9_73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43_Enterprise

-206_IoTEnterpriseK_________________80083eae-7031-4394-9e88-4901973d56fe_73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43_Enterprise

-191_IoTEnterpriseS-2021____________ed655016-a9e8-4434-95d9-4345352c2552_32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee_M7XTQ-FN8P6-TTKYV-9D4CC-J4%f%62D_EnterpriseS-2021

-205_IoTEnterpriseSK________________d4f9b41f-205c-405e-8e08-3d16e88e02be_59eb965c-9150-42b7-a0ec-22151b9897c5_KBN8V-HFGQ4-MGXVD-347P6-PD%f%QGT_IoTEnterpriseS

-138_ProfessionalSingleLanguage_____a48938aa-62fa-4966-9d44-9f04da3f72f2_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

-139_ProfessionalCountrySpecific____f7af7d09-40e4-419c-a49b-eae366689ebd_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

-139_ProfessionalCountrySpecific-Zn_01eb852c-424d-4060-94b8-c10d799d7364_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

-) do (

-for /f "tokens=1-6 delims=_" %%A in ("%%#") do if %osSKU%==%%A (

-echo "!allapps!" | find /i "%%C" %nul1% && (

-echo "!allapps!" | find /i "%%D" %nul1% && (

-set altkey=%%E

-set altedition=%%F

-) || (

-set altedition=%%F

-set notfoundaltactID=1

-)

-)

-)

-)

-exit /b

-

-:+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

-

 :KMSActivation

 

 ::  To activate Windows with K-M-S activation, run the script with "/K-Windows" parameter or change 0 to 1 in below line

@@ -13080,7 +12320,7 @@ set altedition=
 call :dk_actids 55c92734-d682-4d71-983e-d6ec3f16059f

 if defined allapps call :ksdata winkey

 if not defined key call :k_gvlk %nul%

-if defined allapps if not defined key call :kms38fallback

+if defined allapps if not defined key call :kmsfallback

 

 if defined altkey (set key=%altkey%&set changekey=1)

 

@@ -14655,6 +13895,63 @@ exit /b
 

 ::========================================================================================================================================

 

+::  Get Windows installed key channel

+

+:k_channel

+

+set _gvlk=

+if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path %spp% where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL and Description like '%%KMSCLIENT%%'" Get Name /value %nul6%') do (echo %%# findstr /i "Windows" %nul1% && set _gvlk=1)

+if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT Name FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL and Description like ''%%KMSCLIENT%%''').Get()).Name | %% {echo ('Name='+$_)}" %nul6%') do (echo %%# findstr /i "Windows" %nul1% && set _gvlk=1)

+exit /b

+

+

+::========================================================================================================================================

+

+::  Get Product Key from pkeyhelper.dll for future new editions

+::  It works on Windows 10 1803 (17134) and later builds.

+

+:k_pkey

+

+call :dk_reflection

+

+set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('SkuGetProductKeyForEdition', 'pkeyhelper.dll', 'Public, Static', 1, [int], @([int], [String], [String].MakeByRefType(), [String].MakeByRefType()), 1, 3);

+set d1=%d1% $out = ''; [void]$TypeBuilder.CreateType()::SkuGetProductKeyForEdition(%1, %2, [ref]$out, [ref]$null); $out

+

+set pkey=

+for /f %%a in ('%psc% "%d1%"') do if not errorlevel 1 (set pkey=%%a)

+exit /b

+

+::  Get channel name for the key which was extracted from pkeyhelper.dll

+

+:k_pkeychannel

+

+set k=%1

+set m=[Runtime.InteropServices.Marshal]

+set p=%SysPath%\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms

+

+set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('PidGenX', 'pidgenx.dll', 'Public, Static', 1, [int], @([String], [String], [String], [int], [IntPtr], [IntPtr], [IntPtr]), 1, 3);

+set d1=%d1% $r = [byte[]]::new(0x04F8); $r[0] = 0xF8; $r[1] = 0x04; $f = %m%::AllocHGlobal(0x04F8); %m%::Copy($r, 0, $f, 0x04F8);

+set d1=%d1% [void]$TypeBuilder.CreateType()::PidGenX('%k%', '%p%', '00000', 0, 0, 0, $f); %m%::Copy($f, $r, 0, 0x04F8); %m%::FreeHGlobal($f); [Text.Encoding]::Unicode.GetString($r, 1016, 128)

+

+set pkeychannel=

+for /f %%a in ('%psc% "%d1%"') do if not errorlevel 1 (set pkeychannel=%%a)

+exit /b

+

+:k_gvlk

+

+for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b

+for %%# in (Volume:GVLK) do (

+call :k_pkey %osSKU% '%%#'

+if defined pkey call :k_pkeychannel !pkey!

+if /i "!pkeychannel!"=="%%#" (

+set key=!pkey!

+exit /b

+)

+)

+exit /b

+

+::========================================================================================================================================

+

 ::  1st column = Office version number

 ::  2nd column = Activation ID

 ::  3rd column = Product ID from branding.xml

@@ -15129,6 +14426,47 @@ set _allactid=!_allactid! %%A
 )

 exit /b

 

+::========================================================================================================================================

+

+::  Below code is used to get alternate edition name and key if current edition doesn't support K-M-S activation

+

+::  1st column = Current SKU ID

+::  2nd column = Current Edition Name

+::  3rd column = Current Edition Activation ID

+::  4th column = Alternate Edition Activation ID

+::  5th column = Alternate Edition GVLK

+::  6th column = Alternate Edition Name

+::  Separator  = _

+

+

+:kmsfallback

+

+set notfoundaltactID=

+if %_NoEditionChange%==1 exit /b

+

+for %%# in (

+188_IoTEnterprise__________________8ab9bdd1-1f67-4997-82d9-8878520837d9_73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43_Enterprise

+206_IoTEnterpriseK_________________80083eae-7031-4394-9e88-4901973d56fe_73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43_Enterprise

+191_IoTEnterpriseS-2021____________ed655016-a9e8-4434-95d9-4345352c2552_32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee_M7XTQ-FN8P6-TTKYV-9D4CC-J4%f%62D_EnterpriseS-2021

+205_IoTEnterpriseSK________________d4f9b41f-205c-405e-8e08-3d16e88e02be_59eb965c-9150-42b7-a0ec-22151b9897c5_KBN8V-HFGQ4-MGXVD-347P6-PD%f%QGT_IoTEnterpriseS

+138_ProfessionalSingleLanguage_____a48938aa-62fa-4966-9d44-9f04da3f72f2_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

+139_ProfessionalCountrySpecific____f7af7d09-40e4-419c-a49b-eae366689ebd_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

+139_ProfessionalCountrySpecific-Zn_01eb852c-424d-4060-94b8-c10d799d7364_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

+) do (

+for /f "tokens=1-6 delims=_" %%A in ("%%#") do if %osSKU%==%%A (

+echo "!allapps!" | find /i "%%C" %nul1% && (

+echo "!allapps!" | find /i "%%D" %nul1% && (

+set altkey=%%E

+set altedition=%%F

+) || (

+set altedition=%%F

+set notfoundaltactID=1

+)

+)

+)

+)

+exit /b

+

 :+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

 

 :check_actstatus

diff --git a/MAS/Separate-Files-Version/Activators/KMS38_Activation.cmd b/MAS/Separate-Files-Version/Activators/KMS38_Activation.cmd
deleted file mode 100644
index 7b0025e..0000000
--- a/MAS/Separate-Files-Version/Activators/KMS38_Activation.cmd
+++ /dev/null
@@ -1,2261 +0,0 @@
-@set masver=3.7

-@echo off

-

-

-

-::============================================================================

-::

-::   Homepage: mass()grave(dot)dev

-::      Email: [email protected]

-::

-::============================================================================

-

-

-

-::  To activate, run the script with "/KMS38" parameter or change 0 to 1 in below line

-set _act=0

-

-::  To disable changing edition if current edition doesn't support KMS38 activation, change the value to 1 from 0 or run the script with "/KMS38-NoEditionChange" parameter

-set _NoEditionChange=0

-

-::  To run the script in debug mode, change 0 to "/KMS38" in below line

-set "_debug=0"

-

-::  If value is changed in above lines or parameter is used then script will run in unattended mode

-

-

-

-::========================================================================================================================================

-

-::  Set environment variables, it helps if they are misconfigured in the system

-

-setlocal EnableExtensions

-setlocal DisableDelayedExpansion

-

-set "PathExt=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC"

-

-set "SysPath=%SystemRoot%\System32"

-set "Path=%SystemRoot%\System32;%SystemRoot%;%SystemRoot%\System32\Wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\"

-if exist "%SystemRoot%\Sysnative\reg.exe" (

-set "SysPath=%SystemRoot%\Sysnative"

-set "Path=%SystemRoot%\Sysnative;%SystemRoot%;%SystemRoot%\Sysnative\Wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%Path%"

-)

-

-set "ComSpec=%SysPath%\cmd.exe"

-set "PSModulePath=%ProgramFiles%\WindowsPowerShell\Modules;%SysPath%\WindowsPowerShell\v1.0\Modules"

-

-set re1=

-set re2=

-set "_cmdf=%~f0"

-for %%# in (%*) do (

-if /i "%%#"=="re1" set re1=1

-if /i "%%#"=="re2" set re2=1

-if /i "%%#"=="-qedit" (set re1=1&set re2=1)

-)

-

-:: Re-launch the script with x64 process if it was initiated by x86 process on x64 bit Windows

-:: or with ARM64 process if it was initiated by x86/ARM32 process on ARM64 Windows

-

-if exist %SystemRoot%\Sysnative\cmd.exe if not defined re1 (

-setlocal EnableDelayedExpansion

-start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %* re1"

-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 re2 (

-setlocal EnableDelayedExpansion

-start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %* re2"

-exit /b

-)

-

-::========================================================================================================================================

-

-::  Debug code

-

-if "%_debug%" EQU "0" (

-set "nul1=1>nul"

-set "nul2=2>nul"

-set "nul6=2^>nul"

-set "nul=>nul 2>&1"

-goto :_debug

-)

-

-set "nul1="

-set "nul2="

-set "nul6="

-set "nul="

-

-@echo on

-@prompt $G

-@call :_debug "%_debug%" >"%~dp0_tmp.log" 2>&1

-@cmd /u /c type "%~dp0_tmp.log">"%~dp0_Debug.log"

-@del "%~dp0_tmp.log"

-@echo off

-@exit /b

-

-:_debug

-

-::========================================================================================================================================

-

-set "blank="

-set "mas=ht%blank%tps%blank%://mass%blank%grave.dev/"

-set "github=ht%blank%tps%blank%://github.com/massgra%blank%vel/Micro%blank%soft-Acti%blank%vation-Scripts"

-set "selfgit=ht%blank%tps%blank%://git.acti%blank%vated.win/massg%blank%rave/Micr%blank%osoft-Act%blank%ivation-Scripts"

-

-::  Check if Null service is working, it's important for the batch script

-

-sc query Null | find /i "RUNNING"

-if %errorlevel% NEQ 0 (

-echo:

-echo Null service is not running, script may crash...

-echo:

-echo:

-echo Check this webpage for help - %mas%fix_service

-echo:

-echo:

-ping 127.0.0.1 -n 20

-)

-cls

-

-::  Check LF line ending

-

-pushd "%~dp0"

->nul findstr /v "$" "%~nx0" && (

-echo:

-echo Error - Script either has LF line ending issue or an empty line at the end of the script is missing.

-echo:

-echo:

-echo Check this webpage for help - %mas%troubleshoot

-echo:

-echo:

-ping 127.0.0.1 -n 20 >nul

-popd

-exit /b

-)

-popd

-

-::========================================================================================================================================

-

-cls

-color 07

-title  KMS38 Activation %masver%

-

-set _args=

-set _elev=

-set _unattended=0

-

-set _args=%*

-if defined _args set _args=%_args:"=%

-if defined _args set _args=%_args:re1=%

-if defined _args set _args=%_args:re2=%

-if defined _args (

-for %%A in (%_args%) do (

-if /i "%%A"=="/KMS38"                  set _act=1

-if /i "%%A"=="/KMS38-NoEditionChange"  set _NoEditionChange=1

-if /i "%%A"=="-el"                     set _elev=1

-)

-)

-

-for %%A in (%_act% %_NoEditionChange%) do (if "%%A"=="1" set _unattended=1)

-

-::========================================================================================================================================

-

-set _k38=

-call :dk_setvar

-set "specific_kms=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f"

-

-if %winbuild% EQU 1 (

-%eline%

-echo Failed to detect Windows build number.

-echo:

-setlocal EnableDelayedExpansion

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-goto dk_done

-)

-

-if exist "%Systemdrive%\Users\WDAGUtilityAccount" (

-sc query gcs | find /i "RUNNING" %nul% && (

-%eline%

-echo Windows Sandbox detected; activation is not supported.

-echo The script cannot run due to missing licensing components. Aborting...

-echo:

-goto dk_done

-)

-)

-

-if %winbuild% LSS 14393 (

-%eline%

-echo Unsupported OS version detected [%winbuild%].

-echo KMS38 activation is only supported on Windows 10/11/Server, build 14393 and later.

-echo:

-if %winbuild% LSS 10240 (

-call :dk_color %Blue% "Use TSforge activation option from the main menu."

-) else (

-call :dk_color %Blue% "Use HWID activation option from the main menu."

-)

-goto dk_done

-)

-

-::========================================================================================================================================

-

-::  Fix special character limitations in path name

-

-set "_work=%~dp0"

-if "%_work:~-1%"=="\" set "_work=%_work:~0,-1%"

-

-set "_batf=%~f0"

-set "_batp=%_batf:'=''%"

-

-set _PSarg="""%~f0""" -el %_args%

-set _PSarg=%_PSarg:'=''%

-

-set "_ttemp=%userprofile%\AppData\Local\Temp"

-

-setlocal EnableDelayedExpansion

-

-::========================================================================================================================================

-

-echo "!_batf!" | find /i "!_ttemp!" %nul1% && (

-if /i not "!_work!"=="!_ttemp!" (

-%eline%

-echo The script was launched from the temp folder.

-echo You are most likely running the script directly from the archive file.

-echo:

-echo Extract the archive file and launch the script from the extracted folder.

-goto dk_done

-)

-)

-

-::========================================================================================================================================

-

-::  Elevate script as admin and pass arguments and preventing loop

-

-%nul1% fltmc || (

-if not defined _elev %psc% "start cmd.exe -arg '/c \"!_PSarg!\"' -verb runas" && exit /b

-%eline%

-echo This script needs admin rights.

-echo Right click on this script and select 'Run as administrator'.

-goto dk_done

-)

-

-::========================================================================================================================================

-

-::  Check PowerShell

-

-::pstst $ExecutionContext.SessionState.LanguageMode :pstst

-

-for /f "delims=" %%a in ('%psc% "if ($PSVersionTable.PSEdition -ne 'Core') {$f=[System.IO.File]::ReadAllText('!_batp!') -split ':pstst';. ([scriptblock]::Create($f[1]))}" %nul6%') do (set tstresult=%%a)

-

-if /i not "%tstresult%"=="FullLanguage" (

-%eline%

-for /f "delims=" %%a in ('%psc% "$ExecutionContext.SessionState.LanguageMode" %nul6%') do (set tstresult2=%%a)

-echo Test 1 - %tstresult%

-echo Test 2 - !tstresult2!

-echo:

-

-REM check LanguageMode

-

-echo: !tstresult2! | findstr /i "ConstrainedLanguage RestrictedLanguage NoLanguage" %nul1% && (

-echo FullLanguage mode not found in PowerShell. Aborting...

-echo If you have applied restrictions on Powershell then undo those changes.

-echo:

-set fixes=%fixes% %mas%fix_powershell

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%fix_powershell"

-goto dk_done

-)

-

-REM check Powershell core version

-

-cmd /c "%psc% "$PSVersionTable.PSEdition"" | find /i "Core" %nul1% && (

-echo Windows Powershell is needed for MAS but it seems to be replaced with Powershell core. Aborting...

-echo:

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-goto dk_done

-)

-

-REM check for Mal-ware that may cause issues with Powershell

-

-for /r "%ProgramFiles%\" %%f in (secureboot.exe) do if exist "%%f" (

-echo "%%f"

-echo Mal%blank%ware found, PowerShell is not working properly.

-echo:

-set fixes=%fixes% %mas%remove_mal%w%ware

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%remove_mal%w%ware"

-goto dk_done

-)

-

-REM check if .NET is working properly

-

-if /i "!tstresult2!"=="FullLanguage" (

-cmd /c "%psc% ""try {[System.AppDomain]::CurrentDomain.GetAssemblies(); [System.Math]::Sqrt(144)} catch {Exit 3}""" %nul%

-if !errorlevel!==3 (

-echo Windows Powershell failed to load .NET command. Aborting...

-echo:

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-goto dk_done

-)

-)

-

-REM check antivirus and other errors

-

-echo PowerShell is not working properly. Aborting...

-

-if /i "!tstresult2!"=="FullLanguage" (

-echo:

-echo Your antivirus software might be blocking the script.

-echo:

-sc query sense | find /i "RUNNING" %nul% && (

-echo Installed Antivirus - Microsoft Defender for Endpoint

-)

-cmd /c "%psc% ""$av = Get-WmiObject -Namespace root\SecurityCenter2 -Class AntiVirusProduct; $n = @(); foreach ($i in $av) { $n += $i.displayName }; if ($n) { Write-Host ('Installed Antivirus - ' + ($n -join ', '))}"""

-)

-

-echo:

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-goto dk_done

-)

-

-::========================================================================================================================================

-

-::  Disable QuickEdit and launch from conhost.exe to avoid Terminal app

-

-if %winbuild% GEQ 17763 (

-set terminal=1

-) else (

-set terminal=

-)

-

-::  Check if script is running in Terminal app

-

-if defined terminal (

-set lines=0

-for /f "skip=3 tokens=* delims=" %%A in ('mode con') do if "!lines!"=="0" (

-for %%B in (%%A) do set lines=%%B

-)

-if !lines! GEQ 100 set terminal=

-)

-

-if %_unattended%==1 goto :skipQE

-for %%# in (%_args%) do (if /i "%%#"=="-qedit" goto :skipQE)

-

-::  Relaunch to disable QuickEdit in the current session and use conhost.exe instead of the Terminal app

-::  This code disables QuickEdit for the current cmd.exe session without making permanent registry changes

-::  It is included because clicking on the script window can pause execution, causing confusion that the script has stopped due to an error

-

-set resetQE=1

-reg query HKCU\Console /v QuickEdit %nul2% | find /i "0x0" %nul1% && set resetQE=0

-reg add HKCU\Console /v QuickEdit /t REG_DWORD /d 0 /f %nul1%

-

-if defined terminal (

-start conhost.exe "!_batf!" %_args% -qedit

-start reg add HKCU\Console /v QuickEdit /t REG_DWORD /d %resetQE% /f %nul1%

-exit /b

-) else if %resetQE% EQU 1 (

-start cmd.exe /c ""!_batf!" %_args% -qedit"

-start reg add HKCU\Console /v QuickEdit /t REG_DWORD /d %resetQE% /f %nul1%

-exit /b

-)

-

-:skipQE

-

-::========================================================================================================================================

-

-::  Check for updates

-

-set -=

-set old=

-set pingp=

-set upver=%masver:.=%

-

-for %%A in (

-activ%-%ated.win

-mass%-%grave.dev

-) do if not defined pingp (

-for /f "delims=[] tokens=2" %%B in ('ping -n 1 %%A') do (

-if not "%%B"=="" (set old=1& set pingp=1)

-for /f "delims=[] tokens=2" %%C in ('ping -n 1 updatecheck%upver%.%%A') do (

-if not "%%C"=="" set old=

-)

-)

-)

-

-if defined old (

-echo ________________________________________________

-%eline%

-echo Your version of MAS [%masver%] is outdated.

-echo ________________________________________________

-echo:

-if not %_unattended%==1 (

-echo [1] Get Latest MAS

-echo [0] Continue Anyway

-echo:

-call :dk_color %_Green% "Choose a menu option using your keyboard [1,0] :"

-choice /C:10 /N

-if !errorlevel!==2 rem

-if !errorlevel!==1 (start %selfgit% & start %github% & start %mas% & exit /b)

-)

-)

-cls

-

-::========================================================================================================================================

-

-:k_menu

-

-if %_unattended%==0 (

-cls

-if not defined terminal mode 76, 25

-title  KMS38 Activation %masver%

-

-echo:

-echo:

-echo:

-echo:

-echo:           ______________________________________________________

-echo:

-echo                 [1] KMS38 Activation

-echo                 ____________________________________________

-echo:

-echo                 [2] Remove KMS38 Activation

-echo:

-echo                 [0] %_exitmsg%

-echo:           ______________________________________________________

-echo: 

-call :dk_color2 %_White% "              " %_Green% "Choose a menu option using your keyboard [1,2,0]"

-choice /C:120 /N

-set _el=!errorlevel!

-if !_el!==3  exit /b

-if !_el!==2  goto :k_uninstall

-if !_el!==1  goto :k_menu2

-goto :k_menu

-)

-

-::========================================================================================================================================

-

-:k_menu2

-

-cls

-if not defined terminal (

-mode 110, 34

-if exist "%SysPath%\spp\store_test\" mode 134, 34

-)

-title  KMS38 Activation %masver%

-

-echo:

-echo Initializing...

-call :dk_chkmal

-

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*CorEdition~*.mum" if not exist "%SysPath%\clipup.exe" set a_cor=1

-if not exist %SysPath%\sppsvc.exe (set _fmiss=sppsvc.exe)

-if not exist %SysPath%\ClipUp.exe if not defined a_cor (set _fmiss=%_fmiss%ClipUp.exe)

-

-if defined _fmiss (

-%eline%

-echo [%_fmiss%] file is missing, aborting...

-echo:

-if not defined results (

-call :dk_color %Blue% "Go back to Main Menu, select Troubleshoot and run DISM Restore and SFC Scan options."

-call :dk_color %Blue% "After that, restart system and try activation again."

-echo:

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-)

-goto dk_done

-)

-

-::========================================================================================================================================

-

-set spp=SoftwareLicensingProduct

-set sps=SoftwareLicensingService

-

-call :dk_ckeckwmic

-call :dk_checksku

-call :dk_product

-call :dk_sppissue

-

-::========================================================================================================================================

-

-::  Check if system is permanently activated or not

-

-call :dk_checkperm

-if defined _perm (

-cls

-echo ___________________________________________________________________________________________

-echo:

-call :dk_color2 %_White% "     " %Green% "%winos% is already permanently activated."

-call :dk_color2 %_White% "     " %Gray% "Activation is not required."

-echo ___________________________________________________________________________________________

-if %_unattended%==1 goto dk_done

-echo:

-choice /C:10 /N /M ">    [1] Activate Anyway [0] %_exitmsg% : "

-if errorlevel 2 exit /b

-)

-cls

-

-::========================================================================================================================================

-

-::  Check Evaluation version

-

-set _eval=

-set _evalserv=

-

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set _evalserv=1

-if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1 & set _evalserv=1

-

-if defined _eval (

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionID %nul2% | find /i "Eval" %nul1% && (

-%eline%

-echo [%winos% ^| %winbuild%]

-if defined _evalserv (

-echo Server Evaluation cannot be activated. Convert it to full Server OS.

-echo:

-call :dk_color %Blue% "Go Back to main menu and use [Change Edition] option."

-) else (

-echo Evaluation editions cannot be activated outside of their evaluation period.

-call :dk_color %Blue% "Use TSforge activation option from the main menu to reset evaluation period."

-echo:

-set fixes=%fixes% %mas%evaluation_editions

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%evaluation_editions"

-)

-goto dk_done

-)

-)

-

-::========================================================================================================================================

-

-:: Check clipup.exe for the detection and activation of server cor and acor editions

-

-if defined a_cor (

-if not exist "!_work!\clipup.exe" (

-%eline%

-echo clipup.exe doesn't exist in Server Cor/Acor [No GUI] versions.

-echo The file is required for KMS38 activation.

-echo Check the below page for instructions on how to activate it.

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%kms38"

-goto dk_done

-)

-)

-

-:: Check file signature

-

-if defined a_cor (

-%psc% "if (-not (Get-AuthenticodeSignature -FilePath '!_work!\clipup.exe').IsOSBinary) {Exit 3}" %nul%

-if !errorlevel!==3 (

-%eline%

-echo Valid digital signature not found in clipup.exe file.

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-goto dk_done

-)

-)

-

-::========================================================================================================================================

-

-set error=

-

-cls

-echo:

-call :dk_showosinfo

-

-::========================================================================================================================================

-

-echo Initiating Diagnostic Tests...

-

-set "_serv=ClipSVC sppsvc KeyIso Winmgmt"

-

-::  Client License Service (ClipSVC)

-::  Software Protection

-::  CNG Key Isolation

-::  Windows Management Instrumentation

-

-call :dk_errorcheck

-

-::========================================================================================================================================

-

-::  Check if GVLK (KMS key) is already installed or not

-

-call :k_channel

-

-::  Detect Key

-

-set key=

-set pkey=

-set altkey=

-set changekey=

-set altedition=

-

-call :dk_actids 55c92734-d682-4d71-983e-d6ec3f16059f

-if defined allapps call :kms38data key

-if not defined key call :k_gvlk %nul%

-if defined allapps if not defined key call :kms38fallback

-

-if defined altkey (set key=%altkey%&set changekey=1)

-

-set /a UBR=0

-if %osSKU%==191 if defined altkey if defined altedition (

-for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v UBR %nul6%') do if not errorlevel 1 set /a UBR=%%b

-if %winbuild% LSS 22598 if !UBR! LSS 2788 (

-call :dk_color %Blue% "Windows must be updated to build 19044.2788 or higher for IotEnterpriseS KMS38 activation."

-)

-)

-

-if not defined key if defined notfoundaltactID (

-call :dk_color %Red% "Checking Alternate Edition for KMS38    [%altedition% Activation ID Not Found]"

-)

-

-if not defined key if not defined _gvlk (

-echo:

-echo [%winos% ^| %winbuild% ^| SKU:%osSKU%]

-

-if exist "%SysPath%\spp\tokens\skus\%osedition%\*GVLK*.xrm-ms" set sppks=1

-

-if defined skunotfound (

-call :dk_color %Red% "Required license files not found in %SysPath%\spp\tokens\skus\"

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-)

-

-if defined sppks (

-call :dk_color %Red% "KMS38 activation is supported but failed to find the key."

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-)

-

-if not defined skunotfound if not defined sppks (

-call :dk_color %Red% "This product does not support KMS38 activation."

-call :dk_color %Blue% "Use TSforge activation option from the main menu."

-set fixes=%fixes% %mas%

-echo %mas%

-)

-echo:

-goto dk_done

-)

-

-::========================================================================================================================================

-

-::  Install key

-

-echo:

-if defined changekey (

-call :dk_color %Blue% "[%altedition%] edition product key will be used to enable KMS38 activation."

-echo:

-)

-

-if defined winsub (

-call :dk_color %Blue% "Windows Subscription edition [SKU ID-%slcSKU%] found. Script will activate the base edition [SKU ID-%regSKU%]."

-echo:

-)

-

-set _partial=

-if not defined key (

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path %spp% where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey<>null AND LicenseDependsOn is NULL" Get PartialProductKey /value %nul6%') do set "_partial=%%#"

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT PartialProductKey FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL').Get()).PartialProductKey | %% {echo ('PartialProductKey='+$_)}" %nul6%') do set "_partial=%%#"

-call echo Checking Installed Product Key          [Partial Key - %%_partial%%] [Volume:GVLK]

-)

-

-if defined key (

-set generickey=1

-call :dk_inskey "[%key%]"

-)

-

-::========================================================================================================================================

-

-::  Check activation ID for setting specific KMS host

-

-set app=

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic path %spp% where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL AND LicenseDependsOn is NULL) get ID /VALUE" %nul6%') do call set "app=%%a"

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL').Get()).ID | %% {echo ('ID='+$_)}" %nul6%') do call set "app=%%a"

-

-if not defined app (

-call :dk_color %Red% "Checking Installed GVLK Activation ID   [Not Found] Aborting..."

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-goto :dk_done

-)

-

-::========================================================================================================================================

-

-::  Set specific KMS host to Local Host

-::  By doing this, global KMS IP can not replace KMS38 activation but can be used with Office and other Windows Editions

-

-echo:

-%nul% reg delete "HKLM\%specific_kms%" /f

-%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f

-

-%nul% reg query "HKLM\%specific_kms%" && (

-call :dk_color %Blue% "Specific KMS registry is locked. %_fixmsg%"

-)

-

-set k_error=

-%nul% reg add "HKLM\%specific_kms%\%app%" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" || set k_error=1

-%nul% reg add "HKLM\%specific_kms%\%app%" /f /v KeyManagementServicePort /t REG_SZ /d "1688" || set k_error=1

-

-if not defined k_error (

-echo Adding Specific KMS Host                [LocalHost] [Successful]

-) else (

-call :dk_color %Red% "Adding Specific KMS Host                [LocalHost] [Failed]"

-)

-

-::========================================================================================================================================

-

-::  Copy clipup.exe to System32 directory to activate Server Cor/Acor editions

-

-if defined a_cor (

-set "_clipup=%systemroot%\System32\clipup.exe"

-pushd "!_work!\"

-copy /y /b "ClipUp.exe" "!_clipup!" %nul%

-popd

-

-echo:

-if exist "!_clipup!" (

-echo Copying clipup.exe File to              [%systemroot%\System32\] [Successful]

-) else (

-call :dk_color %Red% "Copying clipup.exe File to              [%systemroot%\System32\] [Failed] Aborting..."

-goto :k_final

-)

-)

-

-::========================================================================================================================================

-

-::  Generate GenuineTicket.xml and apply

-::  In some cases clipup -v -o method fails and in some cases service restart method fails as well

-::  To maximize success rate and get better error details, script will install tickets two times (service restart + clipup -v -o)

-

-set "tdir=%ProgramData%\Microsoft\Windows\ClipSVC\GenuineTicket"

-if not exist "%tdir%\" md "%tdir%\" %nul%

-

-if exist "%tdir%\Genuine*" del /f /q "%tdir%\Genuine*" %nul%

-if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%

-if exist "%ProgramData%\Microsoft\Windows\ClipSVC\Install\Migration\*" del /f /q "%ProgramData%\Microsoft\Windows\ClipSVC\Install\Migration\*" %nul%

-

-::  Generate ticket

-

-set "SessionIdStr=OSMajorVersion=5;OSMinorVersion=1;OSPlatformId=2;PP=0;GVLKExp=2038-01-19T03:14:07Z;DownlevelGenuineState=1;"

-%psc% "$f=[System.IO.File]::ReadAllText('!_batp!') -split ':sign\:.*';. ([scriptblock]::Create($f[1]))"

-

-copy /y /b "%tdir%\GenuineTicket" "%tdir%\GenuineTicket.xml" %nul%

-

-if not exist "%tdir%\GenuineTicket.xml" (

-call :dk_color %Red% "Generating GenuineTicket.xml            [Failed, aborting...]"

-if exist "%tdir%\Genuine*" del /f /q "%tdir%\Genuine*" %nul%

-goto :k_final

-) else (

-echo Generating GenuineTicket.xml            [Successful]

-)

-

-set "_xmlexist=if exist "%tdir%\GenuineTicket.xml""

-

-::  Stop sppsvc

-

-%psc% "Start-Job { Stop-Service sppsvc -force } | Wait-Job -Timeout 20 | Out-Null"

-

-%_xmlexist% (

-%psc% "Start-Job { Restart-Service ClipSVC } | Wait-Job -Timeout 20 | Out-Null"

-%_xmlexist% timeout /t 2 %nul%

-%_xmlexist% timeout /t 2 %nul%

-

-%_xmlexist% (

-set error=1

-if exist "%tdir%\*.xml" del /f /q "%tdir%\*.xml" %nul%

-call :dk_color %Gray% "Installing GenuineTicket.xml            [Failed with ClipSVC service restart, wait...]"

-)

-)

-

-copy /y /b "%tdir%\GenuineTicket" "%tdir%\GenuineTicket.xml" %nul%

-clipup -v -o

-

-set rebuildinfo=

-

-if not exist %ProgramData%\Microsoft\Windows\ClipSVC\tokens.dat (

-set error=1

-set rebuildinfo=1

-call :dk_color %Red% "Checking ClipSVC tokens.dat             [Not Found]"

-)

-

-%_xmlexist% (

-set error=1

-set rebuildinfo=1

-call :dk_color %Red% "Installing GenuineTicket.xml            [Failed With clipup -v -o]"

-)

-

-if exist "%ProgramData%\Microsoft\Windows\ClipSVC\Install\Migration\*.xml" (

-set error=1

-set rebuildinfo=1

-call :dk_color %Red% "Checking Ticket Migration               [Failed]"

-)

-

-if not defined showfix if defined rebuildinfo (

-set showfix=1

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-echo:

-)

-

-if exist "%tdir%\Genuine*" del /f /q "%tdir%\Genuine*" %nul%

-

-::==========================================================================================================================================

-

-call :dk_product

-

-echo:

-echo Activating...

-echo:

-

-call :k_checkexp

-if defined _k38 (

-call :k_actinfo

-goto :k_final

-)

-

-::  Clear 180 Days KMS Activation lock with Windows SKU specific rearm and without the need to restart the system

-

-if %_wmic% EQU 1 wmic path %spp% where ID='%app%' call ReArmsku %nul%

-if %_wmic% EQU 0 %psc% "$null=([WMI]'%spp%=''%app%''').ReArmsku()" %nul%

-

-if %errorlevel%==0 (

-echo Applying SKU-ID Rearm                   [Successful]

-) else (

-call :dk_color %Red% "Applying SKU-ID Rearm                   [Failed]"

-)

-call :dk_refresh

-

-echo:

-call :k_checkexp

-if defined _k38 (

-call :k_actinfo

-goto :k_final

-)

-

-call :dk_color %Red% "Activation Failed"

-if not defined error call :dk_color %Blue% "%_fixmsg%"

-set fixes=%fixes% %mas%troubleshoot

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%troubleshoot"

-

-::========================================================================================================================================

-

-:k_final

-

-::  Remove the specific KMS host (LocalHost) added by the script if activation is not completed

-

-echo:

-if not defined _k38 (

-%nul% reg delete "HKLM\%specific_kms%" /f

-%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f

-%nul% reg query "HKLM\%specific_kms%" && (

-call :dk_color %Red% "Removing the Added Specific KMS Host    [Failed]"

-) || (

-echo Removing the Added Specific KMS Host    [Successful]

-)

-)

-

-if defined _k38 if %winbuild% GEQ 26200 (

-call :dk_color %Gray% "In Windows settings, you may see a renewal notification for activation that can be ignored."

-call :dk_color %Gray% "To avoid this notification, please use the HWID or TSforge activation options in the main menu."

-)

-

-::  clipup.exe does not exist in server cor and acor editions by default, it was copied there with this script

-

-if defined a_cor if exist "%_clipup%" del /f /q "%_clipup%" %nul%

-

-if defined a_cor (

-if exist "%_clipup%" (

-call :dk_color %Red% "Deleting Copied clipup.exe File         [Failed]"

-) else (

-echo Deleting Copied clipup.exe File         [Successful]

-)

-)

-

-for %%# in (407) do if %osSKU%==%%# (

-call :dk_color %Red% "%winos% does not support activation on non-azure platforms."

-)

-

-::  Trigger reevaluation of SPP's Scheduled Tasks

-

-if defined _k38 (

-call :dk_reeval %nul%

-)

-goto :dk_done

-

-::========================================================================================================================================

-

-:k_uninstall

-

-cls

-if not defined terminal mode 99, 28

-title  Remove KMS38 Activation %masver%

-

-%nul% reg delete "HKLM\%specific_kms%" /f

-%nul% reg delete "HKU\S-1-5-20\%specific_kms%" /f

-

-echo:

-%nul% reg query "HKLM\%specific_kms%" && (

-call :dk_color %Red% "Failed to remove specific KMS Host."

-call :dk_color %Blue% "%_fixmsg%"

-) || (

-echo Successfully removed specific KMS Host.

-)

-

-echo:

-echo KMS38 activation doesn't modify any Windows components and doesn't install any new files.

-echo:

-call :dk_color %Gray% "If you want to reset the activation status,"

-call :dk_color %Blue% "%_fixmsg%"

-echo:

-

-goto :dk_done

-

-::========================================================================================================================================

-

-::  Set variables

-

-:dk_setvar

-

-set ps=%SysPath%\WindowsPowerShell\v1.0\powershell.exe

-set psc=%ps% -nop -c

-set winbuild=1

-for /f "tokens=2 delims=[]" %%G in ('ver') do for /f "tokens=2,3,4 delims=. " %%H in ("%%~G") do set "winbuild=%%J"

-

-set _slexe=sppsvc.exe& set _slser=sppsvc

-if %winbuild% LEQ 6300 (set _slexe=SLsvc.exe& set _slser=SLsvc)

-if %winbuild% LSS 7600 if exist "%SysPath%\SLsvc.exe" (set _slexe=SLsvc.exe& set _slser=SLsvc)

-if %_slexe%==SLsvc.exe set _vis=1

-

-set _NCS=1

-if %winbuild% LSS 10586 set _NCS=0

-if %winbuild% GEQ 10586 reg query "HKCU\Console" /v ForceV2 %nul2% | find /i "0x0" %nul1% && (set _NCS=0)

-

-echo "%PROCESSOR_ARCHITECTURE% %PROCESSOR_ARCHITEW6432%" | find /i "ARM64" %nul1% && (if %winbuild% LSS 21277 set ps32onArm=1)

-

-if %_NCS% EQU 1 (

-for /F %%a in ('echo prompt $E ^| cmd') do set "esc=%%a"

-set     "Red="41;97m""

-set    "Gray="100;97m""

-set   "Green="42;97m""

-set    "Blue="44;97m""

-set   "White="107;91m""

-set    "_Red="40;91m""

-set  "_White="40;37m""

-set  "_Green="40;92m""

-set "_Yellow="40;93m""

-) else (

-set     "Red="Red" "white""

-set    "Gray="Darkgray" "white""

-set   "Green="DarkGreen" "white""

-set    "Blue="Blue" "white""

-set   "White="White" "Red""

-set    "_Red="Black" "Red""

-set  "_White="Black" "Gray""

-set  "_Green="Black" "Green""

-set "_Yellow="Black" "Yellow""

-)

-

-set "nceline=echo: &echo ==== ERROR ==== &echo:"

-set "eline=echo: &call :dk_color %Red% "==== ERROR ====" &echo:"

-if %~z0 GEQ 200000 (

-set "_exitmsg=Go back"

-set "_fixmsg=Go back to Main Menu, select Troubleshoot and run Fix Licensing option."

-) else (

-set "_exitmsg=Exit"

-set "_fixmsg=In MAS folder, run Troubleshoot script and select Fix Licensing option."

-)

-exit /b

-

-::  Show OS info

-

-:dk_showosinfo

-

-for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v PROCESSOR_ARCHITECTURE') do set osarch=%%b

-

-for /f "tokens=6-7 delims=[]. " %%i in ('ver') do if not "%%j"=="" (

-set fullbuild=%%i.%%j

-) else (

-for /f "tokens=3" %%G in ('"reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v UBR" %nul6%') do if not errorlevel 1 set /a "UBR=%%G"

-for /f "skip=2 tokens=3,4 delims=. " %%G in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v BuildLabEx') do (

-if defined UBR (set "fullbuild=%%G.!UBR!") else (set "fullbuild=%%G.%%H")

-)

-)

-

-echo Checking OS Info                        [%winos% ^| %fullbuild% ^| %osarch%]

-exit /b

-

-::  Check SKU value

-

-:dk_checksku

-

-call :dk_reflection

-

-set osSKU=

-set slcSKU=

-set wmiSKU=

-set regSKU=

-set winsub=

-

-if %winbuild% GEQ 14393 (set info=Kernel-BrandingInfo) else (set info=Kernel-ProductInfo)

-set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('SLGetWindowsInformationDWORD', 'slc.dll', 'Public, Static', 1, [int], @([String], [int].MakeByRefType()), 1, 3);

-set d1=%d1% $Sku = 0; [void]$TypeBuilder.CreateType()::SLGetWindowsInformationDWORD('%info%', [ref]$Sku); $Sku

-for /f "delims=" %%s in ('"%psc% %d1%"') do if not errorlevel 1 (set slcSKU=%%s)

-set slcSKU=%slcSKU: =%

-if "%slcSKU%"=="0" set slcSKU=

-for /f "tokens=* delims=0123456789" %%a in ("%slcSKU%") do (if not "[%%a]"=="[]" set slcSKU=)

-

-for /f "tokens=3 delims=." %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\ProductOptions" /v OSProductPfn %nul6%') do set "regSKU=%%a"

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%a in ('"wmic Path Win32_OperatingSystem Get OperatingSystemSKU /format:LIST" %nul6%') do if not errorlevel 1 set "wmiSKU=%%a"

-if %_wmic% EQU 0 for /f "tokens=1" %%a in ('%psc% "([WMI]'Win32_OperatingSystem=@').OperatingSystemSKU" %nul6%') do if not errorlevel 1 set "wmiSKU=%%a"

-

-if %winbuild% GEQ 15063 %psc% "$f=[System.IO.File]::ReadAllText('!_batp!') -split ':winsubstatus\:.*';. ([scriptblock]::Create($f[1]))" %nul2% | find /i "Subscription_is_activated" %nul% && (

-if defined regSKU if defined slcSKU if not "%regSKU%"=="%slcSKU%" (

-set winsub=1

-set osSKU=%regSKU%

-)

-)

-

-if not defined osSKU set osSKU=%slcSKU%

-if not defined osSKU set osSKU=%wmiSKU%

-if not defined osSKU set osSKU=%regSKU%

-exit /b

-

-::  Get Windows Subscription status

-

-:winsubstatus:

-$DM = [AppDomain]::CurrentDomain.DefineDynamicAssembly(6, 1).DefineDynamicModule(4).DefineType(2)

-[void]$DM.DefinePInvokeMethod('ClipGetSubscriptionStatus', 'Clipc.dll', 22, 1, [Int32], @([IntPtr].MakeByRefType()), 1, 3).SetImplementationFlags(128)

-$m = [System.Runtime.InteropServices.Marshal]

-$p = $m::AllocHGlobal(12)

-$r = $DM.CreateType()::ClipGetSubscriptionStatus([ref]$p)

-if ($r -eq 0) {

-  $enabled = $m::ReadInt32($p)

-  if ($enabled -ge 1) {

-    $state = $m::ReadInt32($p, 8)

-    if ($state -eq 1) {

-        "Subscription_is_activated."

-    }

-  }

-}

-:winsubstatus:

-

-::  Check KMS activation status

-

-:k_actinfo

-

-set xpr=

-for /f "tokens=* delims=" %%# in ('%psc% "$([DateTime]::Now.addMinutes(%gpr%)).ToString('yyyy-MM-dd HH:mm:ss')" %nul6%') do set "xpr=%%#"

-call :dk_color %Green% "%winos% is activated till !xpr!"

-exit /b

-

-::  Check remaining KMS activation grace period

-

-:k_checkexp

-

-set gpr=0

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('"wmic path %spp% where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL AND LicenseDependsOn is NULL) get GracePeriodRemaining /VALUE" %nul6%') do set "gpr=%%#"

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT GracePeriodRemaining FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND Description like ''%%KMSCLIENT%%'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL').Get()).GracePeriodRemaining | %% {echo ('GracePeriodRemaining='+$_)}" %nul6%') do set "gpr=%%#"

-if %gpr% GTR 259200 (set _k38=1) else (set _k38=)

-exit /b

-

-::  Get Windows permanent activation status

-

-:dk_checkperm

-

-if %_wmic% EQU 1 wmic path %spp% where (LicenseStatus='1' and GracePeriodRemaining='0' and PartialProductKey is not NULL AND LicenseDependsOn is NULL) get Name /value %nul2% | findstr /i "Windows" %nul1% && set _perm=1||set _perm=

-if %_wmic% EQU 0 %psc% "(([WMISEARCHER]'SELECT Name FROM %spp% WHERE LicenseStatus=1 AND GracePeriodRemaining=0 AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL').Get()).Name | %% {echo ('Name='+$_)}" %nul2% | findstr /i "Windows" %nul1% && set _perm=1||set _perm=

-exit /b

-

-::  Refresh license status

-

-:dk_refresh

-

-if %_wmic% EQU 1 wmic path %sps% where __CLASS='%sps%' call RefreshLicenseStatus %nul%

-if %_wmic% EQU 0 %psc% "$null=(([WMICLASS]'%sps%').GetInstances()).RefreshLicenseStatus()" %nul%

-exit /b

-

-::  Install Key

-

-:dk_inskey

-

-if %_wmic% EQU 1 wmic path %sps% where __CLASS='%sps%' call InstallProductKey ProductKey="%key%" %nul%

-if %_wmic% EQU 0 %psc% "try { $null=(([WMISEARCHER]'SELECT Version FROM %sps%').Get()).InstallProductKey('%key%'); exit 0 } catch { exit $_.Exception.InnerException.HResult }" %nul%

-set keyerror=%errorlevel%

-cmd /c exit /b %keyerror%

-if %keyerror% NEQ 0 set "keyerror=[0x%=ExitCode%]"

-

-if defined generickey (set "keyecho=Installing Generic Product Key         ") else (set "keyecho=Installing Product Key                 ")

-if %keyerror% EQU 0 (

-if %sps%==SoftwareLicensingService call :dk_refresh

-echo %keyecho% %~1 [Successful]

-) else (

-call :dk_color %Red% "%keyecho% %~1 [Failed] %keyerror%"

-if not defined showfix (

-if defined altapplist call :dk_color %Red% "Activation ID not found for this key."

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-echo:

-set showfix=1

-)

-set error=1

-)

-

-set generickey=

-exit /b

-

-::  Get Windows installed key channel

-

-:k_channel

-

-set _gvlk=

-if %_wmic% EQU 1 for /f "tokens=2 delims==" %%# in ('wmic path %spp% where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL and Description like '%%KMSCLIENT%%'" Get Name /value %nul6%') do (echo %%# findstr /i "Windows" %nul1% && set _gvlk=1)

-if %_wmic% EQU 0 for /f "tokens=2 delims==" %%# in ('%psc% "(([WMISEARCHER]'SELECT Name FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND PartialProductKey IS NOT NULL AND LicenseDependsOn is NULL and Description like ''%%KMSCLIENT%%''').Get()).Name | %% {echo ('Name='+$_)}" %nul6%') do (echo %%# findstr /i "Windows" %nul1% && set _gvlk=1)

-exit /b

-

-::  Get all products Activation IDs

-

-:dk_actids

-

-set allapps=

-if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %spp% where (ApplicationID='%1') get ID /VALUE" %nul6%')"

-if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM %spp% WHERE ApplicationID=''%1''').Get()).ID ^| %% {echo ('ID='+$_)}" %nul6%')"

-%chkapp% do (if defined allapps (call set "allapps=!allapps! %%a") else (call set "allapps=%%a"))

-exit /b

-

-::  Get installed products Activation IDs

-

-:dk_actid

-

-set apps=

-if %_wmic% EQU 1 set "chkapp=for /f "tokens=2 delims==" %%a in ('"wmic path %spp% where (ApplicationID='%1' and PartialProductKey is not null) get ID /VALUE" %nul6%')"

-if %_wmic% EQU 0 set "chkapp=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT ID FROM %spp% WHERE ApplicationID=''%1'' AND PartialProductKey IS NOT NULL').Get()).ID ^| %% {echo ('ID='+$_)}" %nul6%')"

-%chkapp% do (if defined apps (call set "apps=!apps! %%a") else (call set "apps=%%a"))

-exit /b

-

-::  Trigger reevaluation, it helps in updating SPP tasks

-

-:dk_reeval

-

-if %winbuild% LSS 7600 exit /b

-

-::  This key is left by the system in rearm process and sppsvc sometimes fails to delete it, it causes issues in working of the Scheduled Tasks of SPP

-

-set "ruleskey=HKU\S-1-5-20\Software\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\PersistedSystemState"

-reg delete "%ruleskey%" /v "State" /f %nul%

-reg delete "%ruleskey%" /v "SuppressRulesEngine" /f %nul%

-

-set r1=$TB = [AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1).DefineDynamicModule(2, $False).DefineType(0);

-set r2=%r1% [void]$TB.DefinePInvokeMethod('SLpTriggerServiceWorker', 'sppc.dll', 22, 1, [Int32], @([UInt32], [IntPtr], [String], [UInt32]), 1, 3);

-set d1=%r2% [void]$TB.CreateType()::SLpTriggerServiceWorker(0, 0, 'reeval', 0)

-%psc% "Start-Job { Stop-Service sppsvc -force } | Wait-Job -Timeout 20 | Out-Null; %d1%"

-exit /b

-

-::  Install License files using Powershell/WMI instead of slmgr.vbs

-

-:xrm:

-function InstallLicenseFile($Lsc) {

-    try {

-        $null = $sls.InstallLicense([IO.File]::ReadAllText($Lsc))

-    } catch {

-        $host.SetShouldExit($_.Exception.HResult)

-    }

-}

-function InstallLicenseArr($Str) {

-    $a = $Str -split ';'

-    ForEach ($x in $a) {InstallLicenseFile "$x"}

-}

-function InstallLicenseDir($Loc) {

-	Get-ChildItem $Loc -Recurse -Filter *.xrm-ms | ForEach-Object {InstallLicenseFile $_.FullName}

-}

-function ReinstallLicenses() {

-	$Paths = @("$env:SysPath\oem", "$env:SysPath\licensing", "$env:SysPath\spp\tokens")

-	foreach ($Path in $Paths) {

-    if (Test-Path $Path) { InstallLicenseDir "$Path" }

-	}

-}

-:xrm:

-

-::  Check wmic.exe

-

-:dk_ckeckwmic

-

-if %winbuild% LSS 9200 (set _wmic=1&exit /b)

-set _wmic=0

-for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" (

-cmd /c "wmic path Win32_ComputerSystem get CreationClassName /value" %nul2% | find /i "computersystem" %nul1% && set _wmic=1

-)

-exit /b

-

-::  Show info for potential script stuck scenario

-

-:dk_sppissue

-

-sc start %_slser% %nul%

-set spperror=%errorlevel%

-

-if %spperror% NEQ 1056 if %spperror% NEQ 0 (

-%eline%

-echo sc start %_slser% [Error Code: %spperror%]

-if %spperror% EQU 1053 (

-echo:

-call :dk_color %Blue% "Reboot your machine using the restart option and try again."

-call :dk_color %Blue% "If it still does not work, go back to Main Menu, select Troubleshoot and run Fix WPA Registry option."

-)

-)

-

-echo:

-%psc% "$job = Start-Job { (Get-WmiObject -Query 'SELECT * FROM %sps%').Version }; if (-not (Wait-Job $job -Timeout 30)) {write-host '%_slser% is not working correctly. Check this webpage for help - %mas%troubleshoot'}"

-exit /b

-

-::  Get Product name (WMI/REG methods are not reliable in all conditions, hence winbrand.dll method is used)

-

-:dk_product

-

-set d1=%ref% $meth = $TypeBuilder.DefinePInvokeMethod('BrandingFormatString', 'winbrand.dll', 'Public, Static', 1, [String], @([String]), 1, 3);

-set d1=%d1% $meth.SetImplementationFlags(128); $TypeBuilder.CreateType()::BrandingFormatString('%%WINDOWS_LONG%%') -replace [string][char]0xa9, '' -replace [string][char]0xae, '' -replace [string][char]0x2122, ''

-

-set winos=

-for /f "delims=" %%s in ('"%psc% %d1%"') do if not errorlevel 1 (set winos=%%s)

-echo "%winos%" | find /i "Windows" %nul1% || (

-for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName %nul6%') do set "winos=%%b"

-if %winbuild% GEQ 22000 (

-set winos=!winos:Windows 10=Windows 11!

-)

-)

-

-if not defined winsub exit /b

-

-::  Check base edition product name if Windows subscription license is found

-

-for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b

-set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('GetEditionNameFromId', 'pkeyhelper.dll', 'Public, Static', 1, [int], @([int], [IntPtr].MakeByRefType()), 1, 3);

-set d1=%d1% $out = 0; [void]$TypeBuilder.CreateType()::GetEditionNameFromId(%regSKU%, [ref]$out);$s=[Runtime.InteropServices.Marshal]::PtrToStringUni($out); $s

-

-for /f %%a in ('%psc% "%d1%"') do if not errorlevel 1 (

-if %winbuild% GEQ 22000 (

-set winos=Windows 11 %%a

-) else (

-set winos=Windows 10 %%a

-)

-)

-exit /b

-

-::  Common lines used in PowerShell reflection code

-

-:dk_reflection

-

-set ref=$AssemblyBuilder = [AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1);

-set ref=%ref% $ModuleBuilder = $AssemblyBuilder.DefineDynamicModule(2, $False);

-set ref=%ref% $TypeBuilder = $ModuleBuilder.DefineType(0);

-exit /b

-

-::========================================================================================================================================

-

-::  Get Product Key from pkeyhelper.dll for future new editions

-::  It works on Windows 10 1803 (17134) and later builds.

-

-:k_pkey

-

-call :dk_reflection

-

-set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('SkuGetProductKeyForEdition', 'pkeyhelper.dll', 'Public, Static', 1, [int], @([int], [String], [String].MakeByRefType(), [String].MakeByRefType()), 1, 3);

-set d1=%d1% $out = ''; [void]$TypeBuilder.CreateType()::SkuGetProductKeyForEdition(%1, %2, [ref]$out, [ref]$null); $out

-

-set pkey=

-for /f %%a in ('%psc% "%d1%"') do if not errorlevel 1 (set pkey=%%a)

-exit /b

-

-::  Get channel name for the key which was extracted from pkeyhelper.dll

-

-:k_pkeychannel

-

-set k=%1

-set m=[Runtime.InteropServices.Marshal]

-set p=%SysPath%\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms

-

-set d1=%ref% [void]$TypeBuilder.DefinePInvokeMethod('PidGenX', 'pidgenx.dll', 'Public, Static', 1, [int], @([String], [String], [String], [int], [IntPtr], [IntPtr], [IntPtr]), 1, 3);

-set d1=%d1% $r = [byte[]]::new(0x04F8); $r[0] = 0xF8; $r[1] = 0x04; $f = %m%::AllocHGlobal(0x04F8); %m%::Copy($r, 0, $f, 0x04F8);

-set d1=%d1% [void]$TypeBuilder.CreateType()::PidGenX('%k%', '%p%', '00000', 0, 0, 0, $f); %m%::Copy($f, $r, 0, 0x04F8); %m%::FreeHGlobal($f); [Text.Encoding]::Unicode.GetString($r, 1016, 128)

-

-set pkeychannel=

-for /f %%a in ('%psc% "%d1%"') do if not errorlevel 1 (set pkeychannel=%%a)

-exit /b

-

-:k_gvlk

-

-for %%# in (pkeyhelper.dll) do @if "%%~$PATH:#"=="" exit /b

-for %%# in (Volume:GVLK) do (

-call :k_pkey %osSKU% '%%#'

-if defined pkey call :k_pkeychannel !pkey!

-if /i "!pkeychannel!"=="%%#" (

-set key=!pkey!

-exit /b

-)

-)

-exit /b

-

-::========================================================================================================================================

-

-:dk_chkmal

-

-::  Many users unknowingly download mal-ware by using activators found through Google search.

-::  This code aims to notify users that their system has been affected by mal-ware.

-

-set w=

-set results=

-if exist "%ProgramFiles%\KM%w%Spico" set pupfound= KM%w%Spico 

-if not defined pupfound (

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\taskcache\tasks" /f Path /s | find /i "AutoPico" %nul% && set pupfound= KM%w%Spico 

-)

-

-set hcount=0

-for %%# in (avira.com kaspersky.com virustotal.com mcafee.com) do (

-find /i "%%#" %SysPath%\drivers\etc\hosts %nul% && set /a hcount+=1)

-if %hcount%==4 set "results=[Antivirus URLs are blocked in hosts]"

-

-sc start %_slser% %nul%

-echo "%errorlevel%" | findstr "577 225" %nul% && (

-set "results=%results%[Likely File Infector]"

-) || (

-if not exist %SysPath%\%_slexe% if not exist %SysPath%\alg.exe (set "results=%results%[Likely File Infector]")

-)

-

-if not "%results%%pupfound%"=="" (

-if defined pupfound call :dk_color %Gray% "Checking PUP Activators                 [Found%pupfound%]"

-if defined results call :dk_color %Red% "Checking Probable Mal%w%ware Infection..."

-if defined results (call :dk_color %Red% "%results%"&set showfix=1)

-echo:

-set fixes=%fixes% %mas%remove_mal%w%ware

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%remove_mal%w%ware"

-echo:

-)

-

-::  Remove the scheduled task of R@1n-KMS (old version) that runs the activation command every minute, as it leads to high CPU usage.

-

-if exist %SysPath%\Tasks\R@1n-KMS (

-for /f %%A in ('dir /b /a:-d %SysPath%\Tasks\R@1n-KMS %nul6%') do (schtasks /delete /tn \R@1n-KMS\%%A /f %nul%)

-)

-

-exit /b

-

-::========================================================================================================================================

-

-:dk_errorcheck

-

-set showfix=

-call :dk_chkmal

-

-::==============================

-

-::  Check Sandboxing

-

-sc query Null %nul% || (

-call :dk_color %Red% "Checking Sandboxing                     [Found, script may not work properly]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "If you are using any third-party antivirus, check if it is blocking the script."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check WinPE mode

-

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\WinPE" /v InstRoot %nul% && (

-

-call :dk_color %Red% "Checking WinPE                          [Found]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "WinPE mode found. Reboot the system and run in normal mode."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check Safe mode

-

-if defined safeboot_option (

-call :dk_color %Red% "Checking Boot Mode                      [%safeboot_option%]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "Safe mode found. Reboot the system and run in normal mode."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check ImageState

-::  https://learn.microsoft.com/en-us/windows-hardware/manufacture/desktop/windows-setup-states

-

-for /f "skip=2 tokens=2*" %%A in ('reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup\State" /v ImageState') do (set imagestate=%%B)

-

-if /i not "%imagestate%"=="IMAGE_STATE_COMPLETE" (

-call :dk_color %Gray% "Checking Windows Setup State            [%imagestate%]"

-echo "%imagestate%" | find /i "RESEAL" %nul% && (

-if not defined showfix (

-echo:

-call :dk_color %Blue% "You need to run it in normal mode in case you are running it in Audit Mode."

-echo:

-)

-set error=1

-set showfix=1

-)

-echo "%imagestate%" | find /i "UNDEPLOYABLE" %nul% && (

-if not defined showfix (

-echo:

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "If the activation fails, do this - " %_Yellow% " %mas%in-place_repair_upgrade"

-echo:

-)

-)

-)

-

-::==============================

-

-::  Check corrupt services

-

-set serv_cor=

-for %%# in (%_serv%) do (

-set _regcorr=

-set _corrupt=

-sc start %%# %nul%

-if !errorlevel! EQU 1060 set _corrupt=1

-sc query %%# %nul% || set _corrupt=1

-for %%G in (DependOnService Description DisplayName ErrorControl ImagePath ObjectName Start Type) do if not defined _regcorr (

-reg query HKLM\SYSTEM\CurrentControlSet\Services\%%# /v %%G %nul% || (set _corrupt=1&set _regcorr=-RegistryError)

-)

-

-if defined _corrupt (if defined serv_cor (set "serv_cor=!serv_cor! %%#!_regcorr!") else (set "serv_cor=%%#!_regcorr!"))

-)

-

-if defined serv_cor (

-call :dk_color %Red% "Checking Corrupt Services               [%serv_cor%]"

-

-if not defined showfix (

-echo:

-if /i "%serv_cor%"=="sppsvc-RegistryError" (

-set fixes=%fixes% %mas%fix_service

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%fix_service"

-) else (

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-)

-echo:

-)

-

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check disabled services

-

-set serv_ste=

-for %%# in (%_serv%) do (

-sc start %%# %nul%

-if !errorlevel! EQU 1058 (if defined serv_ste (set "serv_ste=!serv_ste! %%#") else (set "serv_ste=%%#"))

-)

-

-::  Change disabled services startup type to default

-

-set serv_csts=

-set serv_cste=

-

-if defined serv_ste (

-for %%# in (%serv_ste%) do (

-if /i %%#==ClipSVC          (reg add "HKLM\SYSTEM\CurrentControlSet\Services\%%#" /v "Start" /t REG_DWORD /d "3" /f %nul% & sc config %%# start= demand %nul%)

-if /i %%#==wlidsvc          sc config %%# start= demand %nul%

-if /i %%#==sppsvc           (reg add "HKLM\SYSTEM\CurrentControlSet\Services\%%#" /v "Start" /t REG_DWORD /d "2" /f %nul% & sc config %%# start= delayed-auto %nul%)

-if /i %%#==SLsvc            sc config %%# start= auto %nul%

-if /i %%#==KeyIso           sc config %%# start= demand %nul%

-if /i %%#==LicenseManager   sc config %%# start= demand %nul%

-if /i %%#==Winmgmt          sc config %%# start= auto %nul%

-if !errorlevel!==0 (

-if defined serv_csts (set "serv_csts=!serv_csts! %%#") else (set "serv_csts=%%#")

-) else (

-if defined serv_cste (set "serv_cste=!serv_cste! %%#") else (set "serv_cste=%%#")

-)

-)

-)

-

-if defined serv_csts call :dk_color %Gray% "Enabling Disabled Services              [Successful] [%serv_csts%]"

-

-if defined serv_cste (

-call :dk_color %Red% "Enabling Disabled Services              [Failed] [%serv_cste%]"

-

-if not defined showfix (

-echo:

-echo %serv_cste% | findstr /i "ClipSVC sppsvc" %nul% && (

-echo A registry fix has been applied to enable the disabled service.

-echo:

-call :dk_color %Blue% "Reboot your machine using the restart option to fix this error."

-) || (

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-)

-echo:

-)

-

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check if the services are able to run or not

-::  Workarounds are added to get correct status and error code because sc query doesn't output correct results in some conditions

-

-set serv_e=

-for %%# in (%_serv%) do (

-set errorcode=

-set checkerror=

-

-sc query %%# | find /i "RUNNING" %nul% || (

-%psc% "Start-Job { Start-Service %%# } | Wait-Job -Timeout 20 | Out-Null"

-set errorcode=!errorlevel!

-sc query %%# | find /i "RUNNING" %nul% || set checkerror=1

-)

-

-sc start %%# %nul%

-if !errorlevel! NEQ 1056 if !errorlevel! NEQ 0 (set errorcode=!errorlevel!&set checkerror=1)

-if defined checkerror if defined serv_e (set "serv_e=!serv_e!, %%#-!errorcode!") else (set "serv_e=%%#-!errorcode!")

-)

-

-if defined serv_e (

-call :dk_color %Red% "Starting Services                       [Failed] [%serv_e%]"

-

-if not defined showfix (

-set listwospp=%_serv:sppsvc=%

-echo %serv_e% | findstr /i "!listwospp!" %nul% && (

-set showfix=1

-echo:

-call :dk_color %Blue% "Reboot your machine using the restart option and run the script again."

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "If service error is still not fixed, do this - " %_Yellow% " %mas%in-place_repair_upgrade"

-echo:

-)

-)

-set error=1

-)

-

-::==============================

-

-::  Check WMI

-

-set wmifailed=

-if %_wmic% EQU 1 wmic path Win32_ComputerSystem get CreationClassName /value %nul2% | find /i "computersystem" %nul1%

-if %_wmic% EQU 0 %psc% "Get-WmiObject -Class Win32_ComputerSystem | Select-Object -Property CreationClassName" %nul2% | find /i "computersystem" %nul1%

-

-if %errorlevel% NEQ 0 set wmifailed=1

-

-if %_wmic% EQU 1 wmic path %sps% get Version %nul%

-if %_wmic% EQU 0 %psc% "try { $null=([WMISEARCHER]'SELECT * FROM %sps%').Get().Version; exit 0 } catch { exit $_.Exception.InnerException.HResult }" %nul%

-set error_code=%errorlevel%

-cmd /c exit /b %error_code%

-if %error_code% NEQ 0 set "error_code=0x%=ExitCode%"

-

-echo "%error_code%" | findstr /i "0x800410 0x800440 0x80131501" %nul1% && set wmifailed=1& ::  https://learn.microsoft.com/en-us/windows/win32/wmisdk/wmi-error-constants

-

-if defined wmifailed (

-call :dk_color %Red% "Checking WMI                            [Not Working]"

-

-if not defined showfix (

-echo:

-call :dk_color %Blue% "Go back to Main Menu, select Troubleshoot and run Fix WMI option."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check SPP Registry Key

-

-if %winbuild% GEQ 7600 reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Plugins\Objects\msft:rm/algorithm/hwid/4.0" /f ba02fed39662 /d %nul% || (

-call :dk_color %Red% "Checking SPP Registry Key               [Incorrect ModuleId Found] [Most likely caused by gaming spoofers]"

-if not defined showfix (

-echo:

-set fixes=%fixes% %mas%issues_due_to_gaming_spoofers

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%issues_due_to_gaming_spoofers"

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check TokenStore registry key

-

-set tokenstore=

-if %winbuild% GEQ 7600 (

-for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v TokenStore %nul6%') do call set "tokenstore=%%b"

-if %winbuild% LSS 9200 set "tokenstore=%Systemdrive%\Windows\ServiceProfiles\NetworkService\AppData\Roaming\Microsoft\SoftwareProtectionPlatform"

-

-if %winbuild% GEQ 9200 if /i not "!tokenstore!"=="%SysPath%\spp\store" if /i not "!tokenstore!"=="%SysPath%\spp\store\2.0" if /i not "!tokenstore!"=="%SysPath%\spp\store_test\2.0" (

-call :dk_color %Red% "Checking TokenStore Registry Key        [Correct Path Not Found] [!tokenstore!]"

-if not defined showfix (

-echo:

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-echo:

-)

-set toerr=1

-set error=1

-set showfix=1

-)

-)

-

-::==============================

-

-::  This code creates token folder only if it's missing and sets default permission for it

-

-if %winbuild% GEQ 7600 if not defined toerr if not exist "%tokenstore%\" (

-

-mkdir "%tokenstore%" %nul%

-

-if %winbuild% LSS 9200 set "d=$sddl = 'O:NSG:NSD:AI(A;OICIID;FA;;;SY)(A;OICIID;FA;;;BA)(A;OICIID;FA;;;NS)';"

-if %winbuild% GEQ 9200 set "d=$sddl = 'O:BAG:BAD:PAI(A;OICI;FA;;;SY)(A;OICI;FA;;;BA)(A;OICIIO;GR;;;BU)(A;;FR;;;BU)(A;OICI;FA;;;S-1-5-80-123231216-2592883651-3715271367-3753151631-4175906628)';"

-set "d=!d! $AclObject = New-Object System.Security.AccessControl.DirectorySecurity;"

-set "d=!d! $AclObject.SetSecurityDescriptorSddlForm($sddl);"

-set "d=!d! Set-Acl -Path %tokenstore% -AclObject $AclObject;"

-%psc% "!d!" %nul%

-

-if exist "%tokenstore%\" (

-call :dk_color %Gray% "Checking SPP Token Folder               [Not Found, Created Now] [%tokenstore%\]"

-) else (

-call :dk_color %Red% "Checking SPP Token Folder               [Not Found, Failed to Create] [%tokenstore%\]"

-if not defined showfix (

-echo:

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-echo:

-)

-set error=1

-set showfix=1

-)

-)

-

-::==============================

-

-::  This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers.

-

-set permerror=

-if %winbuild% GEQ 9200 if not defined toerr if not defined ps32onArm if exist "%tokenstore%\" (

-for %%# in (

-"%tokenstore%+FullControl"

-"HKLM:\SYSTEM\WPA+QueryValues, EnumerateSubKeys, WriteKey"

-"HKLM:\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform+SetValue"

-) do for /f "tokens=1,2 delims=+" %%A in (%%#) do if not defined permerror (

-%psc% "$acl = (Get-Acl '%%A' | fl | Out-String); if (-not ($acl -match 'NT SERVICE\\sppsvc Allow  %%B') -or ($acl -match 'NT SERVICE\\sppsvc Deny')) {Exit 2}" %nul%

-if !errorlevel!==2 (

-if "%%A"=="%tokenstore%" (

-set "permerror=Error Found In Token Folder"

-) else (

-set "permerror=Error Found In SPP Registries"

-)

-)

-)

-

-REM  https://learn.microsoft.com/en-us/office/troubleshoot/activation/license-issue-when-start-office-application

-

-if not defined permerror (

-reg query "HKU\S-1-5-20\Software\Microsoft\Windows NT\CurrentVersion" %nul% && (

-set "pol=HKU\S-1-5-20\Software\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Policies"

-reg query "!pol!" %nul% || reg add "!pol!" %nul%

-%psc% "$netServ = (New-Object Security.Principal.SecurityIdentifier('S-1-5-20')).Translate([Security.Principal.NTAccount]).Value; $aclString = Get-Acl 'Registry::!pol!' | Format-List | Out-String; if (-not ($aclString.Contains($netServ + ' Allow  FullControl') -or $aclString.Contains('NT SERVICE\sppsvc Allow  FullControl')) -or ($aclString.Contains('Deny'))) {Exit 3}" %nul%

-if !errorlevel!==3 set "permerror=Error Found In S-1-5-20 SPP"

-)

-)

-

-if defined permerror (

-call :dk_color %Red% "Checking SPP Permissions                [!permerror!]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-echo:

-)

-set error=1

-set showfix=1

-)

-)

-

-::==============================

-

-::  Check WPA Registry Errors

-

-set chkalp=

-set wpainfo=NotFound

-for /f "delims=" %%a in ('%psc% "$f=[System.IO.File]::ReadAllText('!_batp!') -split ':wpatest\:.*';. ([scriptblock]::Create($f[1]))" %nul6%') do (set wpainfo=%%a)

-for /f "delims=0123456789" %%i in ("%wpainfo%") do set chkalp=%%i

-

-if defined chkalp (

-call :dk_color %Red% "Checking WPA Registry Errors            [%wpainfo%]"

-if not defined showfix (

-echo "%wpainfo%" | find /i "Error Found" %nul% && (

-echo:

-call :dk_color %Blue% "Go back to Main Menu, select Troubleshoot and run Fix WPA Registry option."

-echo:

-set error=1

-set showfix=1

-)

-)

-set wpainfo=a

-)

-

-if not defined chkalp (

-if %wpainfo% GEQ 5000 (

-call :dk_color %Gray% "Checking WPA Registry Count             [%wpainfo%]"

-echo:

-call :dk_color %Blue% "A large number of WPA registries have been found, which may cause high CPU usage."

-call :dk_color %Blue% "Go back to Main Menu, select Troubleshoot and run Fix WPA Registry option."

-echo:

-) else (

-echo Checking WPA Registry Count             [%wpainfo%]

-)

-)

-

-::==============================

-

-::  Check Rearm

-

-reg query "HKU\S-1-5-20\Software\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\PersistedTSReArmed" %nul% && (

-call :dk_color %Red% "Checking Rearm                          [System is Rearmed]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "Reboot your machine using the restart option to fix this error."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ClipSVC\Volatile\PersistedSystemState" %nul% && (

-call :dk_color %Red% "Checking ClipSVC PersistedSystemState   [Found]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "Reboot your machine using the restart option to fix this error."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check SoftwareLicensingService

-

-if %error_code% NEQ 0 (

-call :dk_color %Red% "Checking SoftwareLicensingService       [Not Working] [%error_code%]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-call :dk_color %Blue% "If activation still fails then run Fix WPA Registry option."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check Activation IDs

-

-call :dk_actid 55c92734-d682-4d71-983e-d6ec3f16059f

-

-if not defined apps (

-%psc% "if (-not $env:_vis) {Start-Job { Stop-Service %_slser% -force } | Wait-Job -Timeout 20 | Out-Null}; $sls = Get-WmiObject SoftwareLicensingService; $f=[System.IO.File]::ReadAllText('!_batp!') -split ':xrm\:.*';. ([scriptblock]::Create($f[1])); ReinstallLicenses" %nul%

-if not defined _vis if !errorlevel! NEQ 0 set rlicfailed=1

-call :dk_actid 55c92734-d682-4d71-983e-d6ec3f16059f

-)

-

-if not defined apps call :dk_actids 55c92734-d682-4d71-983e-d6ec3f16059f

-

-if not defined apps if defined allapps if not defined notwinact (

-call :dk_color %Gray% "Checking Activation IDs                 [Key Not Installed or Act ID Not Found]"

-)

-

-if not defined apps if not defined allapps (

-call :dk_color %Red% "Checking Activation IDs                 [Not found]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-call :dk_color %Blue% "If activation still fails then run Fix WPA Registry option."

-echo:

-)

-set error=1

-set showfix=1

-)

-

-if not defined showfix if defined rlicfailed (

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-call :dk_color %Blue% "If activation still fails then run Fix WPA Registry option."

-echo:

-)

-

-if %winbuild% GEQ 7600 if exist "%tokenstore%\" if not exist "%tokenstore%\tokens.dat" (

-call :dk_color %Red% "Checking SPP tokens.dat                 [Not Found] [%tokenstore%\]"

-)

-

-::==============================

-

-::  Check Eval Windows

-

-if not defined notwinact if exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" (

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionID %nul2% | find /i "Eval" %nul1% || (

-call :dk_color %Red% "Checking Eval Packages                  [License swapping found. Non-Eval licenses are installed in Eval Windows]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "License swapping is not the right way to upgrade to the full version. Learn the correct method at the link below."

-set fixes=%fixes% %mas%evaluation_editions

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%evaluation_editions"

-echo:

-)

-set error=1

-set showfix=1

-)

-)

-

-::==============================

-

-::  Check HKU\S-1-5-20\Software registry, in some systems it's missing and that causes Windows activation problems

-

-reg query "HKU\S-1-5-20\Software\Microsoft\Windows NT\CurrentVersion" %nul% || (

-call :dk_color %Red% "Checking HKU\S-1-5-20 Registry          [Not Found]"

-if not defined showfix (

-echo:

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-echo:

-)

-set error=1

-set showfix=1

-)

-

-::==============================

-

-::  Check license and package files for the current edition

-

-set osedition=0

-if %_wmic% EQU 1 set "chkedi=for /f "tokens=2 delims==" %%a in ('"wmic path %spp% where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' AND LicenseDependsOn is NULL AND PartialProductKey IS NOT NULL) get LicenseFamily /VALUE" %nul6%')"

-if %_wmic% EQU 0 set "chkedi=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT LicenseFamily FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND LicenseDependsOn is NULL AND PartialProductKey IS NOT NULL').Get()).LicenseFamily ^| %% {echo ('LicenseFamily='+$_)}" %nul6%')"

-%chkedi% do if not errorlevel 1 (call set "osedition=%%a")

-

-if %osedition%==0 for /f "skip=2 tokens=3" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionID %nul6%') do set "osedition=%%a"

-

-::  Workaround for an issue in builds between 1607 and 1709 where ProfessionalEducation is shown as Professional

-

-if not %osedition%==0 (

-if "%osSKU%"=="164" set osedition=ProfessionalEducation

-if "%osSKU%"=="165" set osedition=ProfessionalEducationN

-)

-

-if not defined notwinact (

-if %osedition%==0 (

-call :dk_color %Red% "Checking Edition Name                   [Not Found In Registry]"

-) else (

-if not exist "%SysPath%\spp\tokens\skus\%osedition%\%osedition%*.xrm-ms" if not exist "%SysPath%\spp\tokens\skus\Security-SPP-Component-SKU-%osedition%\*-%osedition%-*.xrm-ms" if not exist "%SysPath%\licensing\skus\Security-Licensing-SLC-Component-SKU-%osedition%\*-%osedition%-*.xrm-ms" (

-set skunotfound=1

-call :dk_color %Red% "Checking License Files                  [Not Found] [%osedition%]"

-)

-if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*-%osedition%-*.mum" (

-if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-%osedition%Edition*.mum" (

-call :dk_color %Red% "Checking Package Files                  [Not Found] [%osedition%]"

-)

-)

-)

-)

-

-::==============================

-

-::  Check SKU value to find if there is any difference

-

-if not defined notwinact (

-if %winbuild% GEQ 10240 (

-%nul% set /a "sum=%slcSKU%+%regSKU%+%wmiSKU%"

-set /a "sum/=3"

-if not "!sum!"=="%slcSKU%" (

-call :dk_color %Gray% "Checking SLC/WMI/REG SKU                [Difference Found - SLC:%slcSKU% WMI:%wmiSKU% Reg:%regSKU%]"

-)

-) else (

-%nul% set /a "sum=%slcSKU%+%wmiSKU%"

-set /a "sum/=2"

-if not "!sum!"=="%slcSKU%" (

-call :dk_color %Gray% "Checking SLC/WMI SKU                    [Difference Found - SLC:%slcSKU% WMI:%wmiSKU%]"

-)

-)

-)

-

-::==============================

-

-::  This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping.

-

-if exist "%SysPath%\wlms\wlms.exe" (

-echo Checking Eval WLMS Service              [Found]

-)

-

-::==============================

-

-::  Check SPP interference in IFEO

-

-for %%# in (SppEx%w%tComObj.exe SLsvc.exe sppsvc.exe sppsvc.exe\PerfOptions) do (

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Ima%w%ge File Execu%w%tion Options\%%#" %nul% && (if defined _sppint (set "_sppint=!_sppint!, %%#") else (set "_sppint=%%#"))

-)

-if defined _sppint (

-echo %_sppint% | find /i "PerfOptions" %nul% && (

-call :dk_color %Red% "Checking SPP Interference In IFEO       [%_sppint% - System might deactivate later]"

-if not defined showfix (

-echo:

-call :dk_color %Blue% "%_fixmsg%"

-echo:

-)

-set showfix=1

-) || (

-echo Checking SPP In IFEO                    [%_sppint%]

-)

-)

-

-::==============================

-

-::  Check and fix SkipRearm registry value

-

-if %winbuild% GEQ 7600 for /f "skip=2 tokens=2*" %%a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "SkipRearm" %nul6%') do if /i %%b NEQ 0x0 (

-reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "SkipRearm" /t REG_DWORD /d "0" /f %nul%

-call :dk_color %Gray% "Checking SkipRearm                      [Default 0 Value Not Found. Changing To 0]"

-%psc% "Start-Job { Stop-Service sppsvc -force } | Wait-Job -Timeout 20 | Out-Null"

-)

-

-::==============================

-

-::  Check SvcRestartTask status, this task helps in making sure system remains activated

-

-if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" (

-%psc% "Get-WmiObject -Query 'SELECT Description FROM SoftwareLicensingProduct WHERE PartialProductKey IS NOT NULL AND LicenseDependsOn IS NULL' | Select-Object -Property Description" %nul2% | findstr /i "KMS_" %nul1% || (

-for /f "delims=" %%a in ('%psc% "$s=New-Object -ComObject 'Schedule.Service'; $s.Connect(); $state=$s.GetFolder('\Microsoft\Windows\SoftwareProtectionPlatform').GetTask('SvcRestartTask').State; @{0='Unknown';1='Disabled';2='Queued';3='Ready';4='Running'}[$state]" %nul6%') do (set taskinfo=%%a)

-

-echo !taskinfo! | find /i "Ready" %nul% || (

-reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul%

-reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Schedule\TaskCache\Tree\Microsoft\Windows\SoftwareProtectionPlatform\SvcRestartTask" %nul% || set taskinfo=Removed

-if "!taskinfo!"=="" set "taskinfo=Not Found"

-

-call :dk_color %Gray% "Checking SvcRestartTask Status          [!taskinfo!. System might deactivate later.]"

-if not defined showfix (

-echo:

-echo "!taskinfo!" | findstr /i "Removed Not Found" %nul1% && (

-set fixes=%fixes% %mas%in-place_repair_upgrade

-call :dk_color2 %Blue% "Check this webpage for help - " %_Yellow% " %mas%in-place_repair_upgrade"

-) || (

-call :dk_color %Blue% "Reboot your machine using the restart option and run the script again."

-)

-echo:

-)

-)

-)

-)

-

-::==============================

-

-exit /b

-

-::  This code checks for invalid registry keys in HKLM\SYSTEM\WPA. This issue may appear even on healthy systems

-

-:wpatest:

-$wpaKey = [Microsoft.Win32.RegistryKey]::OpenRemoteBaseKey('LocalMachine', $env:COMPUTERNAME).OpenSubKey("SYSTEM\\WPA")

-$count = 0

-foreach ($subkeyName in $wpaKey.GetSubKeyNames()) {

-    if ($subkeyName -match '8DEC0AF1-0341-4b93-85CD-72606C2DF94C.*') {

-        $count++

-    }

-}

-$osVersion = [System.Environment]::OSVersion.Version

-$minBuildNumber = 14393

-if ($osVersion.Build -ge $minBuildNumber) {

-    $subkeyHashTable = @{}

-    foreach ($subkeyName in $wpaKey.GetSubKeyNames()) {

-        if ($subkeyName -match '8DEC0AF1-0341-4b93-85CD-72606C2DF94C.*') {

-            $keyNumber = $subkeyName -replace '.*-', ''

-            $subkeyHashTable[$keyNumber] = $true

-        }

-    }

-    for ($i=1; $i -le $count; $i++) {

-        if (-not $subkeyHashTable.ContainsKey("$i")) {

-            Write-Output "Total Keys $count. Error Found - $i key does not exist."

-			$wpaKey.Close()

-			exit

-        }

-    }

-}

-$wpaKey.GetSubKeyNames() | ForEach-Object {

-    if ($_ -match '8DEC0AF1-0341-4b93-85CD-72606C2DF94C.*') {

-        if ($PSVersionTable.PSVersion.Major -lt 3) {

-            cmd /c "reg query "HKLM\SYSTEM\WPA\$_" /ve /t REG_BINARY >nul 2>&1"

-			if ($LASTEXITCODE -ne 0) {

-            Write-Host "Total Keys $count. Error Found - Binary Data is corrupt."

-			$wpaKey.Close()

-			exit

-			}

-        } else {

-            $subkey = $wpaKey.OpenSubKey($_)

-            $p = $subkey.GetValueNames()

-            if (($p | Where-Object { $subkey.GetValueKind($_) -eq [Microsoft.Win32.RegistryValueKind]::Binary }).Count -eq 0) {

-                Write-Host "Total Keys $count. Error Found - Binary Data is corrupt."

-				$wpaKey.Close()

-				exit

-            }

-        }

-    }

-}

-$count

-$wpaKey.Close()

-:wpatest:

-

-::========================================================================================================================================

-

-:dk_color

-

-if %_NCS% EQU 1 (

-echo %esc%[%~1%~2%esc%[0m

-) else if exist %ps% (

-%psc% write-host -back '%1' -fore '%2' '%3'

-) else if not exist %ps% (

-echo %~3

-)

-exit /b

-

-:dk_color2

-

-if %_NCS% EQU 1 (

-echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m

-) else if exist %ps% (

-%psc% write-host -back '%1' -fore '%2' '%3' -NoNewline; write-host -back '%4' -fore '%5' '%6'

-) else if not exist %ps% (

-echo %~3 %~6

-)

-exit /b

-

-::========================================================================================================================================

-

-:dk_done

-

-echo:

-if %_unattended%==1 timeout /t 2 & exit /b

-

-if defined fixes (

-call :dk_color %White% "Follow ALL the ABOVE blue lines.   "

-call :dk_color2 %Blue% "Press [1] to Open Support Webpage " %Gray% " Press [0] to Ignore"

-choice /C:10 /N

-if !errorlevel!==2 exit /b

-if !errorlevel!==1 (start %selfgit% & start %github% & for %%# in (%fixes%) do (start %%#))

-)

-

-if defined terminal (

-call :dk_color %_Yellow% "Press [0] key to %_exitmsg%..."

-choice /c 0 /n

-) else (

-call :dk_color %_Yellow% "Press any key to %_exitmsg%..."

-pause %nul1%

-)

-

-exit /b

-

-::========================================================================================================================================

-

-::  1st column = Activation ID

-::  2nd column = GVLK (Generic volume licensing key)

-::  3rd column = SKU ID

-::  4th column = WMI Edition ID (For reference only)

-::  5th column = Build Branch name incase same Edition ID is used in different OS versions with different key (For reference only)

-::  Separator  = "_"

-

-:kms38data

-

-set f=

-for %%# in (

-:: Windows 10/11

-73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43___4_Enterprise

-e272e3e2-732f-4c65-a8f0-484747d0d947_DPH2V-TTNVB-4X9Q3-TJR4H-KH%f%JW4__27_EnterpriseN

-2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX__48_Professional

-a80b5abf-76ad-428b-b05d-a47d2dffeebf_MH37W-N47XK-V7XM9-C7227-GC%f%QG9__49_ProfessionalN

-7b9e1751-a8da-4f75-9560-5fadfe3d8e38_3KHY7-WNT83-DGQKR-F7HPR-84%f%4BM__98_CoreN

-a9107544-f4a0-4053-a96a-1479abdef912_PVMJN-6DFY6-9CCP6-7BKTT-D3%f%WVR__99_CoreCountrySpecific

-cd918a57-a41b-4c82-8dce-1a538e221a83_7HNRX-D7KGG-3K4RQ-4WPJ4-YT%f%DFH_100_CoreSingleLanguage

-58e97c99-f377-4ef1-81d5-4ad5522b5fd8_TX9XD-98N7V-6WMQ6-BX7FG-H8%f%Q99_101_Core

-e0c42288-980c-4788-a014-c080d2e1926e_NW6C2-QMPVW-D7KKK-3GKT6-VC%f%FB2_121_Education

-3c102355-d027-42c6-ad23-2e7ef8a02585_2WH4N-8QGBV-H22JP-CT43Q-MD%f%WWJ_122_EducationN

-32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee_M7XTQ-FN8P6-TTKYV-9D4CC-J4%f%62D_125_EnterpriseS_RS5,VB,Ge

-2d5a5a60-3040-48bf-beb0-fcd770c20ce0_DCPHK-NFMTC-H88MJ-PFHPY-QJ%f%4BJ_125_EnterpriseS_RS1

-7b51a46c-0c04-4e8f-9af4-8496cca90d5e_WNMTR-4C88C-JK8YV-HQ7T2-76%f%DF9_125_EnterpriseS_TH1

-7103a333-b8c8-49cc-93ce-d37c09687f92_92NFX-8DJQP-P6BBQ-THF9C-7C%f%G2H_126_EnterpriseSN_RS5,VB,Ge

-9f776d83-7156-45b2-8a5c-359b9c9f22a3_QFFDN-GRT3P-VKWWX-X7T3R-8B%f%639_126_EnterpriseSN_RS1

-87b838b7-41b6-4590-8318-5797951d8529_2F77B-TNFGY-69QQF-B8YKP-D6%f%9TJ_126_EnterpriseSN_TH1

-82bbc092-bc50-4e16-8e18-b74fc486aec3_NRG8B-VKK3Q-CXVCJ-9G2XF-6Q%f%84J_161_ProfessionalWorkstation

-4b1571d3-bafb-4b40-8087-a961be2caf65_9FNHH-K3HBT-3W4TD-6383H-6X%f%YWF_162_ProfessionalWorkstationN

-3f1afc82-f8ac-4f6c-8005-1d233e606eee_6TP4R-GNPTD-KYYHQ-7B7DP-J4%f%47Y_164_ProfessionalEducation

-5300b18c-2e33-4dc2-8291-47ffcec746dd_YVWGF-BXNMC-HTQYQ-CPQ99-66%f%QFC_165_ProfessionalEducationN

-e0b2d383-d112-413f-8a80-97f373a5820c_YYVX9-NTFWV-6MDM3-9PT4T-4M%f%68B_171_EnterpriseG

-e38454fb-41a4-4f59-a5dc-25080e354730_44RPN-FTY23-9VTTB-MP9BX-T8%f%4FV_172_EnterpriseGN

-ec868e65-fadf-4759-b23e-93fe37f2cc29_CPWHC-NT2C7-VYW78-DHDB2-PG%f%3GK_175_ServerRdsh_RS5

-e4db50ea-bda1-4566-b047-0ca50abc6f07_7NBT4-WGBQX-MP4H7-QXFF8-YP%f%3KX_175_ServerRdsh_RS3

-0df4f814-3f57-4b8b-9a9d-fddadcd69fac_NBTWJ-3DR69-3C4V8-C26MC-GQ%f%9M6_183_CloudE

-59eb965c-9150-42b7-a0ec-22151b9897c5_KBN8V-HFGQ4-MGXVD-347P6-PD%f%QGT_191_IoTEnterpriseS_VB,NI

-d30136fc-cb4b-416e-a23d-87207abc44a9_6XN7V-PCBDC-BDBRH-8DQY7-G6%f%R44_202_CloudEditionN

-ca7df2e3-5ea0-47b8-9ac1-b1be4d8edd69_37D7F-N49CB-WQR8W-TBJ73-FM%f%8RX_203_CloudEdition

-:: Windows 2016/19/22/25 LTSC/SAC

-7dc26449-db21-4e09-ba37-28f2958506a6_TVRH6-WHNXV-R9WG3-9XRFY-MY%f%832___7_ServerStandard_Ge

-9bd77860-9b31-4b7b-96ad-2564017315bf_VDYBN-27WPP-V4HQT-9VMD4-VM%f%K7H___7_ServerStandard_FE

-de32eafd-aaee-4662-9444-c1befb41bde2_N69G4-B89J2-4G8F4-WWYCC-J4%f%64C___7_ServerStandard_RS5

-8c1c5410-9f39-4805-8c9d-63a07706358f_WC2BQ-8NRM3-FDDYY-2BFGV-KH%f%KQY___7_ServerStandard_RS1

-c052f164-cdf6-409a-a0cb-853ba0f0f55a_D764K-2NDRG-47T6Q-P8T8W-YP%f%6DF___8_ServerDatacenter_Ge

-ef6cfc9f-8c5d-44ac-9aad-de6a2ea0ae03_WX4NM-KYWYW-QJJR4-XV3QB-6V%f%M33___8_ServerDatacenter_FE

-34e1ae55-27f8-4950-8877-7a03be5fb181_WMDGN-G9PQG-XVVXX-R3X43-63%f%DFG___8_ServerDatacenter_RS5

-21c56779-b449-4d20-adfc-eece0e1ad74b_CB7KF-BWN84-R7R2Y-793K2-8X%f%DDG___8_ServerDatacenter_RS1

-034d3cbb-5d4b-4245-b3f8-f84571314078_WVDHN-86M7X-466P6-VHXV7-YY%f%726__50_ServerSolution_RS5

-2b5a1b0f-a5ab-4c54-ac2f-a6d94824a283_JCKRF-N37P4-C2D82-9YXRT-4M%f%63B__50_ServerSolution_RS1

-7b4433f4-b1e7-4788-895a-c45378d38253_QN4C6-GBJD2-FB422-GHWJK-GJ%f%G2R_110_ServerCloudStorage

-8de8eb62-bbe0-40ac-ac17-f75595071ea3_GRFBW-QNDC4-6QBHG-CCK3B-2P%f%R88_120_ServerARM64_RS5

-43d9af6e-5e86-4be8-a797-d072a046896c_K9FYF-G6NCK-73M32-XMVPY-F9%f%DRR_120_ServerARM64_RS4

-39e69c41-42b4-4a0a-abad-8e3c10a797cc_QFND9-D3Y9C-J3KKY-6RPVP-2D%f%PYV_145_ServerDatacenterACor_FE

-90c362e5-0da1-4bfd-b53b-b87d309ade43_6NMRW-2C8FM-D24W7-TQWMY-CW%f%H2D_145_ServerDatacenterACor_RS5

-e49c08e7-da82-42f8-bde2-b570fbcae76c_2HXDN-KRXHB-GPYC7-YCKFJ-7F%f%VDG_145_ServerDatacenterACor_RS3

-f5e9429c-f50b-4b98-b15c-ef92eb5cff39_67KN8-4FYJW-2487Q-MQ2J7-4C%f%4RG_146_ServerStandardACor_FE

-73e3957c-fc0c-400d-9184-5f7b6f2eb409_N2KJX-J94YW-TQVFB-DG9YT-72%f%4CC_146_ServerStandardACor_RS5

-61c5ef22-f14f-4553-a824-c4b31e84b100_PTXN8-JFHJM-4WC78-MPCBR-9W%f%4KR_146_ServerStandardACor_RS3

-45b5aff2-60a0-42f2-bc4b-ec6e5f7b527e_FCNV3-279Q9-BQB46-FTKXX-9H%f%PRH_168_ServerAzureCor_Ge

-8c8f0ad3-9a43-4e05-b840-93b8d1475cbc_6N379-GGTMK-23C6M-XVVTC-CK%f%FRQ_168_ServerAzureCor_FE

-a99cc1f0-7719-4306-9645-294102fbff95_FDNH6-VW9RW-BXPJ7-4XTYG-23%f%9TB_168_ServerAzureCor_RS5

-3dbf341b-5f6c-4fa7-b936-699dce9e263f_VP34G-4NPPG-79JTQ-864T4-R3%f%MQX_168_ServerAzureCor_RS1

-c2e946d1-cfa2-4523-8c87-30bc696ee584_XGN3F-F394H-FD2MY-PP6FD-8M%f%CRC_407_ServerTurbine_Ge

-19b5e0fb-4431-46bc-bac1-2f1873e4ae73_NTBV8-9K7Q8-V27C6-M2BTV-KH%f%MXV_407_ServerTurbine_RS5

-) do (

-for /f "tokens=1-5 delims=_" %%A in ("%%#") do if %osSKU%==%%C (

-if %1==key if not defined key echo "!allapps!" | find /i "%%A" %nul1% && set key=%%B

-)

-)

-exit /b

-

-::========================================================================================================================================

-

-:sign:

-$ErrorActionPreference = "Stop"

-

-function SignProperties {

-    param (

-        $Properties,

-        $rsa

-    )

-

-    $sha256 = [Security.Cryptography.SHA256]::Create()

-    $bytes = [Text.Encoding]::UTF8.GetBytes($Properties)

-    $hash = $sha256.ComputeHash($bytes)

-

-    $signature = $rsa.SignHash($hash, [Security.Cryptography.HashAlgorithmName]::SHA256, [Security.Cryptography.RSASignaturePadding]::Pkcs1)

-    return [Convert]::ToBase64String($signature)

-

-}

-

-[byte[]] $key = 0x07,0x02,0x00,0x00,0x00,0xA4,0x00,0x00,0x52,0x53,0x41,0x32,0x00,0x04,0x00,0x00,

-                0x01,0x00,0x01,0x00,0x29,0x87,0xBA,0x3F,0x52,0x90,0x57,0xD8,0x12,0x26,0x6B,0x38,

-                0xB2,0x3B,0xF9,0x67,0x08,0x4F,0xDD,0x8B,0xF5,0xE3,0x11,0xB8,0x61,0x3A,0x33,0x42,

-                0x51,0x65,0x05,0x86,0x1E,0x00,0x41,0xDE,0xC5,0xDD,0x44,0x60,0x56,0x3D,0x14,0x39,

-                0xB7,0x43,0x65,0xE9,0xF7,0x2B,0xA5,0xF0,0xA3,0x65,0x68,0xE9,0xE4,0x8B,0x5C,0x03,

-                0x2D,0x36,0xFE,0x28,0x4C,0xD1,0x3C,0x3D,0xC1,0x90,0x75,0xF9,0x6E,0x02,0xE0,0x58,

-                0x97,0x6A,0xCA,0x80,0x02,0x42,0x3F,0x6C,0x15,0x85,0x4D,0x83,0x23,0x6A,0x95,0x9E,

-                0x38,0x52,0x59,0x38,0x6A,0x99,0xF0,0xB5,0xCD,0x53,0x7E,0x08,0x7C,0xB5,0x51,0xD3,

-                0x8F,0xA3,0x0D,0xA0,0xFA,0x8D,0x87,0x3C,0xFC,0x59,0x21,0xD8,0x2E,0xD9,0x97,0x8B,

-                0x40,0x60,0xB1,0xD7,0x2B,0x0A,0x6E,0x60,0xB5,0x50,0xCC,0x3C,0xB1,0x57,0xE4,0xB7,

-                0xDC,0x5A,0x4D,0xE1,0x5C,0xE0,0x94,0x4C,0x5E,0x28,0xFF,0xFA,0x80,0x6A,0x13,0x53,

-                0x52,0xDB,0xF3,0x04,0x92,0x43,0x38,0xB9,0x1B,0xD9,0x85,0x54,0x7B,0x14,0xC7,0x89,

-                0x16,0x8A,0x4B,0x82,0xA1,0x08,0x02,0x99,0x23,0x48,0xDD,0x75,0x9C,0xC8,0xC1,0xCE,

-                0xB0,0xD7,0x1B,0xD8,0xFB,0x2D,0xA7,0x2E,0x47,0xA7,0x18,0x4B,0xF6,0x29,0x69,0x44,

-                0x30,0x33,0xBA,0xA7,0x1F,0xCE,0x96,0x9E,0x40,0xE1,0x43,0xF0,0xE0,0x0D,0x0A,0x32,

-                0xB4,0xEE,0xA1,0xC3,0x5E,0x9B,0xC7,0x7F,0xF5,0x9D,0xD8,0xF2,0x0F,0xD9,0x8F,0xAD,

-                0x75,0x0A,0x00,0xD5,0x25,0x43,0xF7,0xAE,0x51,0x7F,0xB7,0xDE,0xB7,0xAD,0xFB,0xCE,

-                0x83,0xE1,0x81,0xFF,0xDD,0xA2,0x77,0xFE,0xEB,0x27,0x1F,0x10,0xFA,0x82,0x37,0xF4,

-                0x7E,0xCC,0xE2,0xA1,0x58,0xC8,0xAF,0x1D,0x1A,0x81,0x31,0x6E,0xF4,0x8B,0x63,0x34,

-                0xF3,0x05,0x0F,0xE1,0xCC,0x15,0xDC,0xA4,0x28,0x7A,0x9E,0xEB,0x62,0xD8,0xD8,0x8C,

-                0x85,0xD7,0x07,0x87,0x90,0x2F,0xF7,0x1C,0x56,0x85,0x2F,0xEF,0x32,0x37,0x07,0xAB,

-                0xB0,0xE6,0xB5,0x02,0x19,0x35,0xAF,0xDB,0xD4,0xA2,0x9C,0x36,0x80,0xC6,0xDC,0x82,

-                0x08,0xE0,0xC0,0x5F,0x3C,0x59,0xAA,0x4E,0x26,0x03,0x29,0xB3,0x62,0x58,0x41,0x59,

-                0x3A,0x37,0x43,0x35,0xE3,0x9F,0x34,0xE2,0xA1,0x04,0x97,0x12,0x9D,0x8C,0xAD,0xF7,

-                0xFB,0x8C,0xA1,0xA2,0xE9,0xE4,0xEF,0xD9,0xC5,0xE5,0xDF,0x0E,0xBF,0x4A,0xE0,0x7A,

-                0x1E,0x10,0x50,0x58,0x63,0x51,0xE1,0xD4,0xFE,0x57,0xB0,0x9E,0xD7,0xDA,0x8C,0xED,

-                0x7D,0x82,0xAC,0x2F,0x25,0x58,0x0A,0x58,0xE6,0xA4,0xF4,0x57,0x4B,0xA4,0x1B,0x65,

-                0xB9,0x4A,0x87,0x46,0xEB,0x8C,0x0F,0x9A,0x48,0x90,0xF9,0x9F,0x76,0x69,0x03,0x72,

-                0x77,0xEC,0xC1,0x42,0x4C,0x87,0xDB,0x0B,0x3C,0xD4,0x74,0xEF,0xE5,0x34,0xE0,0x32,

-                0x45,0xB0,0xF8,0xAB,0xD5,0x26,0x21,0xD7,0xD2,0x98,0x54,0x8F,0x64,0x88,0x20,0x2B,

-                0x14,0xE3,0x82,0xD5,0x2A,0x4B,0x8F,0x4E,0x35,0x20,0x82,0x7E,0x1B,0xFE,0xFA,0x2C,

-                0x79,0x6C,0x6E,0x66,0x94,0xBB,0x0A,0xEB,0xBA,0xD9,0x70,0x61,0xE9,0x47,0xB5,0x82,

-                0xFC,0x18,0x3C,0x66,0x3A,0x09,0x2E,0x1F,0x61,0x74,0xCA,0xCB,0xF6,0x7A,0x52,0x37,

-                0x1D,0xAC,0x8D,0x63,0x69,0x84,0x8E,0xC7,0x70,0x59,0xDD,0x2D,0x91,0x1E,0xF7,0xB1,

-                0x56,0xED,0x7A,0x06,0x9D,0x5B,0x33,0x15,0xDD,0x31,0xD0,0xE6,0x16,0x07,0x9B,0xA5,

-                0x94,0x06,0x7D,0xC1,0xE9,0xD6,0xC8,0xAF,0xB4,0x1E,0x2D,0x88,0x06,0xA7,0x63,0xB8,

-                0xCF,0xC8,0xA2,0x6E,0x84,0xB3,0x8D,0xE5,0x47,0xE6,0x13,0x63,0x8E,0xD1,0x7F,0xD4,

-                0x81,0x44,0x38,0xBF

-

-$rsa = New-Object Security.Cryptography.RSACryptoServiceProvider

-$rsa.ImportCspBlob($key)

-$SessionId = [Convert]::ToBase64String([Text.Encoding]::Unicode.GetBytes($env:SessionIdStr + [char]0))

-$PropertiesStr = "OA3xOriginalProductId=;OA3xOriginalProductKey=;SessionId=$SessionId;TimeStampClient=2022-10-11T12:00:00Z"

-$SignatureStr = SignProperties $PropertiesStr $rsa

-

-$xml = @"

-<?xml version="1.0" encoding="utf-8"?><genuineAuthorization xmlns="http://www.microsoft.com/DRM/SL/GenuineAuthorization/1.0"><version>1.0</version><genuineProperties origin="sppclient"><properties>$PropertiesStr</properties><signatures><signature name="clientLockboxKey" method="rsa-sha256">$SignatureStr</signature></signatures></genuineProperties></genuineAuthorization>

-"@

-[System.IO.File]::WriteAllText("$env:ProgramData\Microsoft\Windows\ClipSVC\GenuineTicket\GenuineTicket", ($xml -join ""), [System.Text.Encoding]::ASCII)

-:sign:

-

-::========================================================================================================================================

-

-::  Below code is used to get alternate edition name and key if current edition doesn't support KMS38 activation

-

-::  1st column = Current SKU ID

-::  2nd column = Current Edition Name

-::  3rd column = Current Edition Activation ID

-::  4th column = Alternate Edition Activation ID

-::  5th column = Alternate Edition GVLK

-::  6th column = Alternate Edition Name

-::  Separator  = _

-

-

-:kms38fallback

-

-set notfoundaltactID=

-if %_NoEditionChange%==1 exit /b

-

-for %%# in (

-188_IoTEnterprise__________________8ab9bdd1-1f67-4997-82d9-8878520837d9_73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43_Enterprise

-206_IoTEnterpriseK_________________80083eae-7031-4394-9e88-4901973d56fe_73111121-5638-40f6-bc11-f1d7b0d64300_NPPR9-FWDCX-D2C8J-H872K-2Y%f%T43_Enterprise

-191_IoTEnterpriseS-2021____________ed655016-a9e8-4434-95d9-4345352c2552_32d2fab3-e4a8-42c2-923b-4bf4fd13e6ee_M7XTQ-FN8P6-TTKYV-9D4CC-J4%f%62D_EnterpriseS-2021

-205_IoTEnterpriseSK________________d4f9b41f-205c-405e-8e08-3d16e88e02be_59eb965c-9150-42b7-a0ec-22151b9897c5_KBN8V-HFGQ4-MGXVD-347P6-PD%f%QGT_IoTEnterpriseS

-138_ProfessionalSingleLanguage_____a48938aa-62fa-4966-9d44-9f04da3f72f2_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

-139_ProfessionalCountrySpecific____f7af7d09-40e4-419c-a49b-eae366689ebd_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

-139_ProfessionalCountrySpecific-Zn_01eb852c-424d-4060-94b8-c10d799d7364_2de67392-b7a7-462a-b1ca-108dd189f588_W269N-WFGWX-YVC9B-4J6C9-T8%f%3GX_Professional

-) do (

-for /f "tokens=1-6 delims=_" %%A in ("%%#") do if %osSKU%==%%A (

-echo "!allapps!" | find /i "%%C" %nul1% && (

-echo "!allapps!" | find /i "%%D" %nul1% && (

-set altkey=%%E

-set altedition=%%F

-) || (

-set altedition=%%F

-set notfoundaltactID=1

-)

-)

-)

-)

-exit /b

-

-::========================================================================================================================================

-:: Leave empty line below

diff --git a/MAS/Separate-Files-Version/Activators/Online_KMS_Activation.cmd b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation.cmd
index 2be8ae5..ba039cb 100644
--- a/MAS/Separate-Files-Version/Activators/Online_KMS_Activation.cmd
+++ b/MAS/Separate-Files-Version/Activators/Online_KMS_Activation.cmd
@@ -655,7 +655,7 @@ set altedition=
 call :dk_actids 55c92734-d682-4d71-983e-d6ec3f16059f

 if defined allapps call :ksdata winkey

 if not defined key call :k_gvlk %nul%

-if defined allapps if not defined key call :kms38fallback

+if defined allapps if not defined key call :kmsfallback

 

 if defined altkey (set key=%altkey%&set changekey=1)

 

@@ -4226,7 +4226,7 @@ exit /b
 ::  Separator  = _

 

 

-:kms38fallback

+:kmsfallback

 

 set notfoundaltactID=

 if %_NoEditionChange%==1 exit /b

diff --git a/MAS/Separate-Files-Version/Activators/_ReadMe.txt b/MAS/Separate-Files-Version/Activators/_ReadMe.txt
index 058a628..9832bc8 100644
--- a/MAS/Separate-Files-Version/Activators/_ReadMe.txt
+++ b/MAS/Separate-Files-Version/Activators/_ReadMe.txt
@@ -5,7 +5,6 @@ Activation Type        Supported Product        Activation Period
 HWID                -  Windows 10-11          -  Permanent                           

 Ohook               -  Office                 -  Permanent                           

 TSforge             -  Windows / ESU / Office -  Permanent                           

-KMS38               -  Windows 10-11-Server   -  Till the Year 2038                  

 Online KMS          -  Windows / Office       -  180 Days. Lifetime With Renewal Task

 

 --------------------------------------------------------------------------------------

diff --git a/MAS/Separate-Files-Version/Extract_OEM_Folder.cmd b/MAS/Separate-Files-Version/Extract_OEM_Folder.cmd
index e831122..0b3bd39 100644
--- a/MAS/Separate-Files-Version/Extract_OEM_Folder.cmd
+++ b/MAS/Separate-Files-Version/Extract_OEM_Folder.cmd
@@ -406,7 +406,6 @@ goto done2
 )

 

 set HWID_Activation.cmd=Activators\HWID_Activation.cmd

-set KMS38_Activation.cmd=Activators\KMS38_Activation.cmd

 set Online_KMS_Activation.cmd=Activators\Online_KMS_Activation.cmd

 set Ohook_Activation_AIO.cmd=Activators\Ohook_Activation_AIO.cmd

 set TSforge_Activation.cmd=Activators\TSforge_Activation.cmd

@@ -415,7 +414,6 @@ pushd "!_work!"
 set _nofile=

 for %%# in (

 %HWID_Activation.cmd%

-%KMS38_Activation.cmd%

 %Online_KMS_Activation.cmd%

 %Ohook_Activation_AIO.cmd%

 %TSforge_Activation.cmd%

@@ -449,28 +447,26 @@ echo:
 echo:            [1] HWID             [Windows]

 echo:            [2] Ohook            [Office]

 echo:            [3] TSforge          [Windows / ESU / Office]

-echo:            [4] KMS38            [Windows]

-echo:            [5] Online KMS       [Windows / Office]

+echo:            [4] Online KMS       [Windows / Office]

 echo:

-echo:            [6] HWID    [Windows] ^+ Ohook [Office]

-echo:            [7] HWID    [Windows] ^+ Ohook [Office] ^+ TSforge [ESU]

-echo:            [8] TSforge [Windows] ^+ Online KMS [Office]

+echo:            [5] HWID    [Windows] ^+ Ohook [Office]

+echo:            [6] HWID    [Windows] ^+ Ohook [Office] ^+ TSforge [ESU]

+echo:            [7] TSforge [Windows] ^+ Online KMS [Office]

 echo:

 call :dk_color2 %_White% "            [R] " %_Green% "ReadMe"

 echo:            [0] Exit

 echo:         ____________________________________________________________

 echo:  

 call :dk_color2 %_White% "             " %_Green% "Choose a menu option using your keyboard :"

-choice /C:12345678R0 /N

+choice /C:1234567R0 /N

 set _erl=%errorlevel%

 

-if %_erl%==10 exit /b

-if %_erl%==9 start %mas%oem-folder &goto :Menu

-if %_erl%==8 goto:tsforge_kms

-if %_erl%==7 goto:hwid_ohook_tsforge

-if %_erl%==6 goto:hwid_ohook

-if %_erl%==5 goto:kms

-if %_erl%==4 goto:kms38

+if %_erl%==9 exit /b

+if %_erl%==8 start %mas%oem-folder &goto :Menu

+if %_erl%==7 goto:tsforge_kms

+if %_erl%==6 goto:hwid_ohook_tsforge

+if %_erl%==5 goto:hwid_ohook

+if %_erl%==4 goto:kms

 if %_erl%==3 goto:tsforge

 if %_erl%==2 goto:ohook

 if %_erl%==1 goto:hwid

@@ -568,36 +564,6 @@ cd \
 

 ::========================================================================================================================================

 

-:kms38

-

-cls

-md "!desktop!\$OEM$\$$\Setup\Scripts"

-pushd "!_work!"

-copy /y /b "%KMS38_Activation.cmd%" "!_dir!\KMS38_Activation.cmd" %nul%

-popd

-call :export kms38_setup

-

-set _error=

-if not exist "!_dir!\KMS38_Activation.cmd" set _error=1

-if not exist "!_dir!\SetupComplete.cmd" set _error=1

-if defined _error goto errorfound

-

-set oem=KMS38

-goto done

-

-:kms38_setup:

-@echo off

-

-fltmc >nul || exit /b

-

-call "%~dp0KMS38_Activation.cmd" /KMS38

-

-cd \

-(goto) 2>nul & (if "%~dp0"=="%SystemRoot%\Setup\Scripts\" rd /s /q "%~dp0")

-:kms38_setup:

-

-::========================================================================================================================================

-

 :kms

 

 cls

@@ -760,11 +726,6 @@ echo ______________________________________________________________
 echo:

 call :dk_color %Blue% "%oem%"

 call :dk_color %Green% "$OEM$ folder was successfully created on your Desktop."

-echo "%oem%" | find /i "38" %nul% && (

-echo:

-echo To KMS38 activate Server Cor/Acor editions [No GUI Versions],

-echo Check this page %mas%oem-folder

-)

 echo ______________________________________________________________

 

 :done2