@ECHO OFF
Set CustomPath1=
Set CustomPath2=
Set StartTime=180

cls
title Silent Windows and Office Re-Activation
color 1F

start StartKMSmicro.exe -S
echo -- 
echo -- Wait for KMSmicro start...
echo -- 
timeout %StartTime%>>nul

echo - Windows Re-Activating
cscript /nologo %windir%\System32\slmgr.vbs /ato

If Not Exist "%ProgramFiles(x86)%\Microsoft Office\Office14\OSPP.vbs" Goto :Test2
Set Of_Name=Office 2010
Set Of_Path=%ProgramFiles(x86)%\Microsoft Office\Office14
Call :OF_Activate

:Test2
If Not Exist "%ProgramFiles%\Microsoft Office\Office14\OSPP.vbs" Goto :Test3
Set Of_Name=Office 2010
Set Of_Path=%ProgramFiles%\Microsoft Office\Office14
Call :OF_Activate

:Test3
If Not Exist "%ProgramFiles(x86)%\Microsoft Office\Office15\OSPP.vbs" Goto :Test4
Set Of_Name=Office 2013
Set Of_Path=%ProgramFiles(x86)%\Microsoft Office\Office15
Call :OF_Activate

:Test4
If Not Exist "%ProgramFiles%\Microsoft Office\Office15\OSPP.vbs" Goto :Test5
Set Of_Name=Office 2013
Set Of_Path=%ProgramFiles%\Microsoft Office\Office15
Call :OF_Activate

:Test5
If Not DEFINED CustomPath1 goto :Test6
If NOT Exist "%CustomPath1%\OSPP.vbs" Goto :Test6
Set Of_Name=Office Custom 1
Set Of_Path=%CustomPath1%
Call :OF_Activate

:Test6
If Not DEFINED CustomPath2 goto :TheEnd
If NOT Exist "%CustomPath2%\OSPP.vbs" Goto :TheEnd
Set Of_Name=Office Custom 2
Set Of_Path=%CustomPath2%
Call :OF_Activate

:TheEnd
echo -- 
echo -- Delete KMSmicro
echo -- 
taskkill /IM qemu-system-x86_64.exe /F>>nul
pause
goto :EOF

:OF_Activate
  echo - Re-Activating %Of_Name% (%Of_Path%)
  cscript "%Of_Path%\OSPP.vbs" /act
goto :EOF