%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
@echo off
setlocal enabledelayedexpansion
cd /d "%~dp0"

rem check_dir
if not exist %temp%\kms call :mv_dir

set /a try_keys=0, try_version=0
set key=XXXXX-XXXXX-XXXXX-XXXXX-XXXXX
set is_chinese=0
set mypath=%temp%\kms

:get_version
cls
echo. Please select your option: 
echo. 1. Active Windows 10 Quickly (recommend)
echo. 2. Active Windows 10 Permanently
echo. 3. Remove activation..  
echo. 4. Show CHINESE Translate
echo. 
set /p a=Your select = 
if /i '%a%'=='1' goto use_gvlk
if /i '%a%'=='2' goto use_mak
if /i '%a%'=='3' goto remove
if /i '%a%'=='4' set /a is_chinese=1 & start notepad %mypath%\trans\select_chinese.txt
echo. Unknown Input....
goto get_version



:use_mak
set /a pointer=0
set version=mak
set /a try_version+=1
goto try_keys

:use_gvlk
set /a pointer=0
set version=gvlk
set /a try_version+=2
goto try_keys


:try_keys
del /S /Q %temp%\kms.*>nul
cls
echo. Start to try Keys...
echo. 
if %pointer% leq 0 (set "myskip=") else (set "myskip=skip=%pointer%")
for /f  "%myskip%" %%i in (%mypath%\keys\%version%.keys)  do (
               set /a pointer+=1
               set key=%%i
                echo. Try key !key!
                cscript /nologo %SystemRoot%\system32\slmgr.vbs /ipk !key! >> %temp%\kms.log
                echo !key! >> %temp%\kms.tried_keys
                findstr !key! %temp%\kms.log >nul 2>&1 && goto try_key_success 
)
goto fail


:try_key_success
set try_keys=1
goto kms

:kms
cls
echo.
echo. Using key %key%
echo.
echo. Setup new kms service...
cscript /nologo %SystemRoot%\system32\slmgr.vbs /skms kms.yimian.xyz > %temp%\kms.skms
cscript /nologo %SystemRoot%\system32\slmgr.vbs /ato  > %temp%\kms.ato
findstr "0x" %temp%\kms.ato >nul 2>&1 && goto try_keys
%SystemRoot%\system32\slmgr.vbs /xpr
if /i '%try_keys%'=='1' goto kmsFin


:is_succeed
cls
echo. Is the windows actived successfully?
echo. 1. Yes
echo. 2. No
echo. 
set /p a=Your select = 
if /i '%a%'=='1' goto kmsFin
if /i '%a%'=='2' goto get_version
echo. Unknown Input....
goto is_succeed


:kmsFin
echo %key% > C:\Windows\kms.key
cls
echo.
echo.  Windows activated successfully!!
echo. 
echo.                IoTcat(http://iotcat.me)
echo. 
if /i '!is_chinese!'=='1' start notepad %mypath%\trans\success_chinese.txt
pause
goto end

:fail
cls
if /i '%try_version%'=='1' goto use_gvlk
if /i '%try_version%'=='2' goto use_mak
echo.
echo. Windows activation failed!! 
echo. Sorry for this.. We will try to improve it..
echo.
echo.                         IoTcat(http://iotcat.me)
echo.
if /i '!is_chinese!'=='1' start notepad %mypath%\trans\error_chinese.txt
pause
goto end

:remove
cd /d "%SystemRoot%\system32"
echo. Clear old activation keys and KMS service...
slmgr /upk
cls
echo.
echo.  Windows activation removed successfully!!
echo.
echo.              IoTcat (http://iotcat.me)
echo. 
if /i '!is_chinese!'=='1' start notepad %mypath%\trans\remove_chinese.txt
pause


:end
exit


:mv_dir
md %temp%\kms
xcopy /Y /Q /E . %temp%\kms