set Description=ProPlusVL_MAK
set key=4CPKN-C7G7T-XH847-V63RR-HQW3Y
reg Delete HKLM\Software\Wow6432Node\Microsoft\Office\16.0\Common\OEM /f
reg Delete HKLM\Software\Microsoft\Office\16.0\Common\OEM /f
for %a in (4,5,6) do (if exist "%ProgramFiles%\Microsoft Office\Office1%a\ospp.vbs" (cd /d "%ProgramFiles%\Microsoft Office\Office1%a")
if exist "%ProgramFiles(x86)%\Microsoft Office\Office1%a\ospp.vbs" (cd /d "%ProgramFiles(x86)%\Microsoft Office\Office1%a"))&cls
for /f "tokens=8" %b in ('cscript //nologo OSPP.VBS /dstatus ^| findstr /b /c:"Last 5"') do (cscript //nologo ospp.vbs /unpkey:%b)
cls
for /f %i in ('dir /b ..\root\Licenses16\%Description%*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%i"
cscript ospp.vbs /remhst
cscript ospp.vbs /ckms-domain
cscript ospp.vbs /inpkey:%key%
cscript //nologo ospp.vbs /act
start winword
@