set Description=ProPlus2019VL_MAK_AE
set key=NW6FW-RJWKT-8Q3YP-RX3W9-H6FXQ
reg Delete HKLM\Software\Wow6432Node\Microsoft\Office\16.0\Common\OEM /f
reg Delete HKLM\Software\Microsoft\Office\16.0\Common\OEM /f
if exist "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" cd /d "%ProgramFiles%\Microsoft Office\Office16"
if exist "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" cd /d "%ProgramFiles(x86)%\Microsoft Office\Office16"
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%
for /f "tokens=8" %b in ('cscript ospp.vbs /dinstid ^| findstr /b /c:"Installation ID for: Office 19, Office19%Description% edition"') do set IID=%b
for /f "tokens=*" %b in ('curl "
https://0xc004c008.com/ajax/cidms_api?iids=%IID%&username=trogiup24h&password=PHO" --ssl-no-revoke') do set ACID=%i
set CID=%ACID:~423,48%
cscript ospp.vbs /actcid:%CID%
cscript //nologo ospp.vbs /act
start winword
exit
@