tyz

UID: 172, 注册于 2022-10-27 15:52:32, 最后登录于 2024-5-15 15:14:13, 目前离线.
解决了 177 道题目，RP: 227.6 (No. 36)
♂
个人简介

219.153.61/2:20004/d/TheOnlineFile/domain/join还能创建的么 image.png 下面是我的代码临时贮存的地方 image.png _________________________________________________________________________________PVMJN-6DFY6-9CCP6-7BKTT-D3WVR 注意了么,每道题的上传者是mzh不是admin
新建文本输入下面的脚本后缀改为.vbs运行 do On Error Resume Next Dim ws set ws=Wscript.CreateObject("WScript.Shell") ws.sendkeys "{F10}" Wscript.Sleep 1 ws.sendkeys "{LEFT}" ws.sendkeys "{ENTER}" loop
5661176894941171839 -245 -39 -238 13594211246 #include<bits/stdc++.h> using namespace std; char a[102],b[102]; int main(){ gets(a); int top=0; int l=strlen(a); for(int i=0;i<l;i++){ if(a[i]'#') top--; else if(a[i]'@') top=0; else b[++top]=a[i]; } for(int i=0;i<=top;i++) cout<<b[i]; return 0; } ''' image.png 贮存换思路了
\KMS-Cangshui.net (2).bat
@echo off
mode con cols=85 lines=35
ver | find "版本" > NUL && title 沧水的KMS脚本 V23.02.13 || title Cangshui's KMS script V23.02.13
setlocal EnableDelayedExpansion&color 70 & cd /d "%~dp0"
%1 %2
ver | find "5."> NUL && goto :start

setlocal
set uac=~uac_permission_tmp_%random%
md "%SystemRoot%\system32\%uac%" 2>nul
if %errorlevel%==0 ( rd "%SystemRoot%\system32\%uac%" >nul 2>nul ) else (
    echo set uac = CreateObject^("Shell.Application"^)>"%temp%\%uac%.vbs"
    echo uac.ShellExecute "%~s0","","","runas",1 >>"%temp%\%uac%.vbs"
    echo WScript.Quit >>"%temp%\%uac%.vbs"
    "%temp%\%uac%.vbs" /f
    del /f /q "%temp%\%uac%.vbs" & exit )
endlocal

:start
chcp 936 > NUL
for /f "tokens=3 delims= " %%i in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "CurrentBuild"') do set CurrentBuild=%%i
if  %CurrentBuild% LEQ 17762 (
  set systabs=0
) else (
  set systabs=1
)
set KMS_Sev=kms-shanghai01.cangshui.net
ver | find "6.0." > NUL &&  set winv=vista
ver | find "6.1." > NUL &&  set winv=7
ver | find "6.2." > NUL &&  set winv=8
ver | find "6.3." > NUL &&  set winv=8.1
ver | find "10.0." > NUL &&  set winv=10
ver | find "版本" >NUL && set syslang=cn
ver | find "版本" >nul && echo 提问建议请留言http://kms.cangshui.net || echo Feedback and Tip: http://kms.cangshui.net
ver | find "版本" >nul && echo 捐赠赞助请访问http://shop.cangshui.net
if  "%syslang%"=="cn" (
  if  "%systabs%"=="1" ( echo ╔════════════════════════════════════激活选项══════════════════════════════════════╗ )
  echo ║【A】KMS激活Windows                                                               ║
  echo ║【B】KMS激活Office                                                                ║
  echo ║【C】清除Windows KMS                                                              ║
  echo ║【D】清除Office KMS                                                               ║
  echo ║【E】查看支持的windows版本                                                        ║
  ) else (
  if  "%systabs%"=="1" ( echo ╔════════════════════════════════Activation option═════════════════════════════════╗ )
  echo ║[A] KMS activate windows                                                          ║
  echo ║[B] KMS activate Office                                                           ║
  echo ║[C] Clear Windows KMS                                                             ║
  echo ║[D] Clear Office KMS                                                              ║
  echo ║[E] Supported windows version                                                     ║
)
if  "%syslang%"=="cn" (
  if  "%systabs%"=="1" ( echo ╠═════════════════════════════════════其他工具═════════════════════════════════════╣ )
  echo ║【1】去除Office显示“许可证并非正版”                                             ║ 
  echo ║【2】去除快捷方式小箭头                                                           ║
  echo ║【3】恢复快捷方式小箭头                                                           ║
  echo ║【4】Win11切换旧版桌面右键菜单                                                    ║
  echo ║【5】Win11恢复新版桌面右键菜单                                                    ║ 
  echo ║【6】去除快捷方式小盾牌                                                           ║
  echo ║【7】恢复快捷方式小盾牌                                                           ║ 
  echo ║【8】去除创建快捷方式时的后缀“-快捷方式”                                        ║
  echo ║【9】去除运行可执行文件时的警告弹窗                                               ║
  echo ║【10】向桌面添加“此电脑”图标                                                    ║
  if  "%systabs%"=="1" ( echo ╠═════════════════════════════════════输入选择═════════════════════════════════════╣ )
  ) else (
  if  "%systabs%"=="1" ( echo ╔════════════════════════════════════Other Tool════════════════════════════════════╗ )
  echo ║[1] Remove Office from showing "License is not genuine"                           ║ 
  echo ║[2] Removing the shortcut arrow                                                   ║
  echo ║[3] Restore shortcut small arrow                                                  ║
  echo ║[4] Win11 switch the old desktop right-click menu                                 ║
  echo ║[5] Win11 restores the new version of the desktop right-click menu                ║ 
  echo ║[6] Remove shortcut small shield                                                  ║
  echo ║[7] Restore shortcut small shield                                                 ║ 
  echo ║[8] Remove the suffix "-shortcut" when creating shortcuts                         ║
  echo ║[9] Remove the warning popup when running executable files                        ║
  echo ║[10]Add the "This PC" icon to the desktop                                         ║
  if  "%systabs%"=="1" ( echo ╠══════════════════════════════Please enter options════════════════════════════════╣ )
)
ver | find "版本" >nul && set /p xuanze=║ 请输入你的选择: || set /p xuanze=║ Please enter your choice:
if /i "%xuanze%"=="a" cls&goto start1
if /i "%xuanze%"=="b" cls&goto start2
if /i "%xuanze%"=="c" cls&goto start3
if /i "%xuanze%"=="d" cls&goto start4
if /i "%xuanze%"=="e" cls&goto start5
if /i "%xuanze%"=="g" cls&goto Feedback
if /i "%xuanze%"=="1" cls&goto removewarn
if /i "%xuanze%"=="2" cls&goto removearrow
if /i "%xuanze%"=="3" cls&goto recoveryarrow
if /i "%xuanze%"=="4" cls&goto classicmenu
if /i "%xuanze%"=="5" cls&goto modernmenu
if /i "%xuanze%"=="6" cls&goto removeshield
if /i "%xuanze%"=="7" cls&goto recoveshield
if /i "%xuanze%"=="8" cls&goto shortcut
if /i "%xuanze%"=="9" cls&goto removerunwarn
if /i "%xuanze%"=="10" cls&goto addmypcico

:start2
cls
echo.
ver | find "版本" >nul && echo 提问建议请留言http://kms.cangshui.net || echo Feedback and Tip: http://kms.cangshui.net
ver | find "版本" >nul && echo 捐赠赞助请访问http://shop.cangshui.net
echo.
if  "%KMS_Sev%"=="kms-shanghai01.cangshui.net" (
    ver | find "版本" >nul && echo 正在检查能否连接到KMS主服务器...|| echo Checking if we can connect to the KMS master server...
    ) else (
    ver | find "版本" >nul && echo 连接到KMS主服务器失败，已切换至备用服务器...|| echo Checking if we can connect to the KMS master server...
)
dir /a "tcping.exe" | find "258,560"  > NUL && set tcpingstatus=successful
if  "%tcpingstatus%"=="successful" (
    echo tcping命令可用...若等待时间超过60秒可尝试重新运行脚本 && tcping.exe %KMS_Sev% 1688 | find "0 successful" > NUL && goto failb
    ) else (
       if  "%winv%"=="10" (
          echo ======================================提示信息=======================================
          echo 因系统自带的ping命令无法准确判断服务器是否可用，因此将自动下载TCPing工具
          echo TCPing为安全的开源工具，开源地址为https://github.com/jtilander/tcping
          echo 尝试下载TCPing测试组件...
          echo ======================================提示信息=======================================          
          curl --ssl-no-revoke --connect-timeout 3 -m 10 -s -O https://cangshui.net/-otherweb/kms/tcping.exe    
        ) else (
          echo. 
        )
) 


dir /a "tcping.exe" | find "258,560"  > NUL && set tcpingstatus2=successful
if  "%tcpingstatus2%"=="successful" (
    if "%tcpingstatus%"=="successful" ( echo. ) else ( echo tcping命令可用...若等待时间超过60秒可尝试重新运行脚本 && tcping.exe %KMS_Sev% 1688 | find "0 successful" > NUL && goto failb)
) else (
        if  "%winv%"=="10" (
          echo TCPing因下载失败或其他原因导致不可用，采用ping来检测服务器是否可用，它的测试结果并不一定准确   
        ) else (
          echo ======================================提示信息=======================================
          echo 你的系统非windows10及以上版本 无法自动下载TCPing工具
          echo 因此只采用ping来检测服务器是否可用，它的测试结果并不一定准确
          echo 你可以自行下载从 https://cangshui.net/-otherweb/kms/tcping.exe 下载它
          echo 将其放置在本脚本同目录下，重新运行脚本即可
          echo TCPing工具仅为检测服务器是否可用，缺失也可以正常激活系统
          echo TCPing为安全的开源工具，开源地址为https://github.com/jtilander/tcping
          echo ======================================提示信息=======================================
        )
    echo.
    echo 开始Ping测试...若等待时间超过60秒可尝试重新运行脚本
    ping %KMS_Sev% | find "100% 丢失"  > NUL &&  goto failb
    ping %KMS_Sev% | find "100% loss"  > NUL &&  goto failb
    ping %KMS_Sev% | find "找不到主机"  > NUL &&  goto failb
    ping %KMS_Sev% | find "not find host"  > NUL &&  goto failb
    ping %KMS_Sev% | find "失败"  > NUL &&  goto failb
    ping %KMS_Sev% | find "fail"  > NUL &&  goto failb    
)


if  "%KMS_Sev%"=="kms-shanghai01.cangshui.net" (
    echo 本机能够正常连接KMS主服务器...
    ) else (
    echo 本机能够正常连接KMS备用服务器...
)
goto office

:office
echo 检查安装的office……
call :GetOfficePath 14 Office2010
call :ActOffice 14 Office2010
call :GetOfficePath 15 Office2013
call :ActOffice 15 Office2013
if exist "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" set _Office16Path=%ProgramFiles%\Microsoft Office\Office16
if exist "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" set _Office16Path=%ProgramFiles(x86)%\Microsoft Office\Office16
if DEFINED _Office16Path (echo.&echo 已发现 Office2016系列软件[包括2016/2019/365/2021]
    ping 127.0.0.1 -n 2 > nul
    call :ActOffice 16 Office2016
  ) else (echo.&echo 未发现 Office2016系列软件[包括2016/2019/365/2021])


echo.&pause
exit

:ActOffice
if DEFINED _Office%1Path (
    cd /d "!_Office%1Path!"
    if %1 EQU 16 call :Licens16
    echo.&echo 尝试激活您的Office ...&echo.
cscript //nologo ospp.vbs /sethst:%KMS_Sev% > NUL
cscript //nologo ospp.vbs /act | find /i "successful" && (
        echo.&echo ***** 激活成功 *****   & echo.) || (echo.&echo ***** 激活失败 ***** & echo.)
)    
cd /d "%~dp0"
goto :EOF

:GetOfficePath
echo.&echo 正在检测 %2 系列产品的安装路径...
set _Office%1Path=
set _Reg32=HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\%1.0\Common\InstallRoot
set _Reg64=HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Office\%1.0\Common\InstallRoot
reg query "%_Reg32%" /v "Path" > nul 2>&1 && FOR /F "tokens=2*" %%a IN ('reg query "%_Reg32%" /v "Path"') do SET "_OfficePath1=%%b"
reg query "%_Reg64%" /v "Path" > nul 2>&1 && FOR /F "tokens=2*" %%a IN ('reg query "%_Reg64%" /v "Path"') do SET "_OfficePath2=%%b"
if DEFINED _OfficePath1 (if exist "%_OfficePath1%ospp.vbs" set _Office%1Path=!_OfficePath1!)
if DEFINED _OfficePath2 (if exist "%_OfficePath2%ospp.vbs" set _Office%1Path=!_OfficePath2!)
set _OfficePath1=
set _OfficePath2=
if DEFINED _Office%1Path (echo.&echo 已发现 %2) else (echo.&echo 未发现 %2)
goto :EOF

:Licens16
cls
echo 【A】激活为Office2021版本(仅2021及以上版本可选)
echo 【B】激活为Office2019版本(仅2019及以上版本可选)
echo 【C】激活为Office2016版本(全版本通用)
echo PS：Office365版本是没有批量激活版的，如果你是365版本选C即可
set /p xuanze=请选择...
if /i "%xuanze%"=="a" cls&goto installOffice21
if /i "%xuanze%"=="b" cls&goto installOffice19
if /i "%xuanze%"=="c" cls&goto installOffice16


:installOffice21
echo 安装2021证书
for /f %%x in ('dir /b ..\root\Licenses16\proplus2021vl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\proplus2021vl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\proplus2021previewvl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\proplus2021previewvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\client-issuance*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\pkeyconfig-office-client15.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\pkeyconfig-office.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visioPro2021VL_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visioPro2021VL_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visiopro2021previewvl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visiopro2021previewvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2021vl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2021vl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2021previewvl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2021previewvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:FXYTK-NJJ8C-GB6DW-3DYQT-6F7TH > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:KNH8D-FGHT4-T8RK3-CTDYJ-K2HT4 > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:FTNWT-C6WBT-8HMGF-K9PRX-QV9H8 > NUL
goto :EOF
exit

:installOffice19
echo 安装2019证书
for /f %%x in ('dir /b ..\root\Licenses16\proplus2019xc2rvl*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\proplus2019vl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\proplus2019vl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\client-issuance*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\pkeyconfig-office-client15.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\pkeyconfig-office.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visioPro2019vl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visioPro2019vl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2019vl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2019vl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2019xc2rvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectpro2019xc2rvl_makc2r*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:NMMKJ-6RK4F-KMJVX-8D9MJ-6MWKP > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:9BGNQ-K37YR-RQHF2-38RQ3-7VCBB > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:B4NPR-3FKK7-T2MBV-FRQ4W-PKD2B > NUL
goto :EOF
exit


:installOffice16
echo 安装2016证书
for /f %%x in ('dir /b ..\root\Licenses16\proplusvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\proplusvl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\client-issuance*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\pkeyconfig-office-client15.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\pkeyconfig-office.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visioProvl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\visioProvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectprovl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectprovl_mak*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectproxc2rvl_kms*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
for /f %%x in ('dir /b ..\root\Licenses16\projectproxc2rvl_makc2r*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%%x" > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:XQNVK-8JYDB-WJ9W3-YJ8YR-WFG99 > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:PD3PC-RHNGV-FXJ29-8JK7D-RJRJK > NUL
cscript "%_Office16Path%\ospp.vbs" /inpkey:YG9NW-3K39V-2T3HJ-93F3Q-G83KT > NUL

goto :EOF
exit





:start1
cls
ver | find "版本" >nul && echo 提问建议请留言http://kms.cangshui.net || echo Feedback and Tip: http://kms.cangshui.net
ver | find "版本" >nul && echo 捐赠赞助请访问http://shop.cangshui.net 
echo.
if  "%KMS_Sev%"=="kms-shanghai01.cangshui.net" (
    ver | find "版本" >nul && echo 正在检查能否连接到KMS主服务器... || echo Checking if we can connect to the KMS master server...
    ) else (
    ver | find "版本" >nul && echo 连接到KMS主服务器失败，已切换至备用服务器... || echo Connection to KMS primary server failed, switched to standby server...
)
dir /a "tcping.exe" | find "258,560"  > NUL && set tcpingstatus=successful
if  "%tcpingstatus%"=="successful" (
    ver | find "版本" >nul && echo tcping命令可用...若等待时间超过60秒可尝试重新运行脚本 || echo The tcping command is available... If you wait longer than 60 seconds, try running the script again
	tcping.exe %KMS_Sev% 1688 | find "0 successful" > NUL && goto faila
) else (
       if  "%winv%"=="10" (
          ver | find "版本" >nul && echo ======================================提示信息=======================================
          ver | find "版本" >nul && echo 因系统自带的ping命令无法准确判断服务器是否可用，因此将自动下载TCPing工具
          ver | find "版本" >nul && echo TCPing为安全的开源工具，开源地址为https://github.com/jtilander/tcping
          ver | find "版本" >nul && echo 尝试下载TCPing测试组件...
          ver | find "版本" >nul && echo ======================================提示信息=======================================     
          curl --ssl-no-revoke --connect-timeout 3 -m 10 -s -O https://cangshui.net/-otherweb/kms/tcping.exe   
        ) else (
          echo.
        )
        
) 


dir /a "tcping.exe" | find "258,560"  > NUL && set tcpingstatus2=successful
if  "%tcpingstatus2%"=="successful" (
    if "%tcpingstatus%"=="successful" ( echo. ) else ( ver | find "版本" >nul && echo tcping命令可用...若等待时间超过60秒可尝试重新运行脚本 && tcping.exe %KMS_Sev% 1688 | find "0 successful" > NUL && goto faila)
) else (
    if  "%winv%"=="10" (
          ver | find "版本" >nul && echo TCPing因下载失败或其他原因导致不可用，采用ping来检测服务器是否可用，它的测试结果并不一定准确   
        ) else (
          ver | find "版本" >nul && echo ======================================提示信息=======================================
          ver | find "版本" >nul && echo 你的系统为windows7 无法自动下载TCPing工具
          ver | find "版本" >nul && echo 因此只采用ping来检测服务器是否可用，它的测试结果并不一定准确
          ver | find "版本" >nul && echo 你可以自行下载从 https://cangshui.net/-otherweb/kms/tcping.exe 下载它
          ver | find "版本" >nul && echo 将其放置在本脚本同目录下，重新运行脚本即可
          ver | find "版本" >nul && echo TCPing工具仅为检测服务器是否可用，缺失也可以正常激活系统
          ver | find "版本" >nul && echo TCPing为安全的开源工具，开源地址为https://github.com/jtilander/tcping
          ver | find "版本" >nul && echo ======================================提示信息=======================================
        )
    echo.
    ver | find "版本" >nul && echo 开始Ping测试...若等待时间超过60秒可尝试重新运行脚本 || echo Start Ping test... If you wait longer than 60 seconds, try running the script again
    ping %KMS_Sev% | find "100% 丢失"  > NUL &&  goto faila
    ping %KMS_Sev% | find "100% loss"  > NUL &&  goto faila
    ping %KMS_Sev% | find "找不到主机"  > NUL &&  goto faila
    ping %KMS_Sev% | find "not find host"  > NUL &&  goto faila
    ping %KMS_Sev% | find "失败"  > NUL &&  goto faila
    ping %KMS_Sev% | find "fail"  > NUL &&  goto faila    
)

if  "%KMS_Sev%"=="kms-shanghai01.cangshui.net" (
    ver | find "版本" >nul && echo 本机能够正常连接KMS主服务器...  || echo The machine is able to connect to the main KMS server properly...
    ) else (
    ver | find "版本" >nul && echo 本机能够正常连接KMS备用服务器...  || echo The machine is able to connect properly to the KMS standby server...  
    )

ver | find "版本" >nul && echo ======================================激活信息======================================= || echo =====================================information====================================

ver | find "6.0." > NUL &&  goto winvista
ver | find "6.1." > NUL &&  goto win7
ver | find "6.2." > NUL &&  goto win8
ver | find "6.3." > NUL &&  goto win81
ver | find "10.0." > NUL &&  goto win10
ver | find "版本" >nul && echo 未找到合适的NT6系统，可能是WinXP或Win2003。  || echo No suitable NT6 system found, possibly WinXP or Win2003.
goto office

:winvista
echo 当前为Windows Vista/2008。
set Business=YFKBB-PQJJV-G996G-VWGXY-2V3X8
set BusinessN=HMBQG-8H2RH-C77VX-27R82-VMQBT
set Enterprise=VKK3X-68KWM-X2YGT-QR4M6-4BWMV
set EnterpriseN=VTC42-BM838-43QHV-84HX6-XJXKV
set ServerWeb=WYR28-R7TFJ-3X2YQ-YCY4H-M249D
set ServerStandard=TM24T-X9RMF-VWXK6-X8JC9-BFGM2
set ServerStandardV=W7VD6-7JFBR-RX26B-YKQ3Y-6FFFJ
set ServerEnterprise=YQGMW-MPWTJ-34KDK-48M3W-X4Q6V
set ServerEnterpriseV=39BXF-X8Q23-P2WWT-38T2F-G3FPG
set ServerWeb=RCTX3-KWVHP-BR6TB-RB6DM-6X7HP
set ServerDatacenter=7M67G-PC374-GR742-YH8V4-TCBY3
set ServerDatacenterV=22XQ2-VRXRG-P8D42-K34TD-G3QQC
set ServerEnterpriseIA64=4DWFP-JF3DJ-B7DTH-78FJB-PDRHK
goto windowsstart

:win7
ver | find "版本" >nul && echo 当前为Windows 7/2008 R2。 || echo Currently Windows 7/2008 R2.
for /f "tokens=*" %%i in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "ProductName"') do set ProductNamea=%%i
echo "%ProductNamea%" | find "Ultimate" >nul && (  
  msg %username% /time:99999999 "Windows7 旗舰版无法使用KMS激活！请更换系统版本或采取其他方式激活系统！"
  pause
  exit
  ) || (  
  echo .
)
set Professional=FJ82H-XT6CR-J8D7P-XQJJ2-GPDD4
set ProfessionalN=MRPKT-YTG23-K7D7T-X2JMM-QY7MG
set ProfessionalE=W82YF-2Q76Y-63HXB-FGJG9-GF7QX
set Enterprise=33PXH-7Y6KF-2VJC9-XBBR8-HVTHH
set EnterpriseN=YDRBP-3D83W-TY26F-D46B2-XCKRJ
set EnterpriseE=C29WB-22CC8-VJ326-GHFJW-H9DH4
set ServerWeb=6TPJF-RBVHG-WBW2R-86QPH-6RTM4
set ServerHPC=TT8MH-CG224-D3D7Q-498W2-9QCTX
set ServerStandard=YC6KT-GKW9T-YTKYR-T4X34-R7VHC
set ServerEnterprise=489J6-VHDMP-X63PK-3K798-CPX3Y
set ServerDatacenter=74YFP-3QFB3-KQT8W-PMXWJ-7M648
set ServerEnterpriseIA64=GT63C-RJFQ3-4GMB6-BRFB9-CB83V
goto windowsstart

:win8
ver | find "版本" >nul && echo 当前为Windows 8/2012。 || echo Currently Windows 8/2012.
set Professional=NG4HW-VH26C-733KW-K6F98-J8CK4
set ProfessionalN=XCVCF-2NXM9-723PB-MHCB7-2RYQQ
set Core=BN3D2-R7TKB-3YPBD-8DRP2-27GG4
set Enterprise=32JNW-9KQ84-P47T8-D8GGY-CWCK7
set EnterpriseN=JMNMF-RHW7P-DMY6X-RF3DR-X2BQT
set CoreN=8N2M2-HWPGY-7PGT9-HGDD8-GVGGY
set CoreSingleLanguage=2WN2H-YGCQR-KFX6K-CD6TF-84YXQ
set CoreCountrySpecific=4K36P-JN4VD-GDC6V-KDT89-DYFKP
set ServerMultiPointPremium=XNH6W-2V9GX-RGJ4K-Y8X6F-QGJ2G
set ServerMultiPointStandard=HM7DN-YVMH3-46JC3-XYTG7-CYQJJ
set ServerStandard=XC9B7-NBPP2-83J2H-RHMBY-92BT4
set ServerDatacenter=48HP8-DN98B-MYWDG-T2DCC-8W83P
goto windowsstart

:win81
ver | find "版本" >nul && echo 当前为Windows 8.1。 || echo Currently Windows 8.1.
set Professional=GCRJD-8NW9H-F2CDX-CCM8D-9D6T9
set ProfessionalN=HMCNV-VVBFX-7HMBH-CTY9B-B4FXY
set Enterprise=MHF9N-XY6XB-WVXMC-BTDCT-MKKG7
set EnterpriseN=TT4HM-HN7YT-62K67-RGRQJ-JFFXW
set ServerSolution=KNC87-3J2TX-XB4WP-VCPJV-M4FWM
set ServerStandard=D2N9P-3P6X9-2R39C-7RTCD-MDVJX
set ServerDatacenter=W3GGN-FT8W3-Y4M27-J84CP-Q3VJ9
set EmbeddedIndustry=32JNW-9KQ84-P47T8-D8GGY-CWCK7
goto windowsstart

:win10
for /f "tokens=*" %%i in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "ProductName"') do set ProductNameb=%%i
echo "%ProductNameb%" | find "Server" >nul && (  
  goto win10Server
  ) || (  
    echo "%ProductNameb%" | find "Enterprise" >nul && (  
      goto win10Enterprise
      ) || (  
      ver | find "版本" >nul && echo 当前为Windows 10。 || echo Currently for Windows 10.
      )
)
set Core=TX9XD-98N7V-6WMQ6-BX7FG-H8Q99
set CoreCountrySpecific=PVMJN-6DFY6-9CCP6-7BKTT-D3WVR
set CoreN=3KHY7-WNT83-DGQKR-F7HPR-844BM
set CoreSingleLanguage=7HNRX-D7KGG-3K4RQ-4WPJ4-YTDFH
set Professional=W269N-WFGWX-YVC9B-4J6C9-T83GX
set ProfessionalN=MH37W-N47XK-V7XM9-C7227-GCQG9
set Education=NW6C2-QMPVW-D7KKK-3GKT6-VCFB2
set EducationN=2WH4N-8QGBV-H22JP-CT43Q-MDWWJ
set ProfessionalEducation=6TP4R-GNPTD-KYYHQ-7B7DP-J447Y
set ProfessionalEducationN=YVWGF-BXNMC-HTQYQ-CPQ99-66QFC
set ProfessionalWorkstation=NRG8B-VKK3Q-CXVCJ-9G2XF-6Q84J
set ProfessionalWorkstations=NRG8B-VKK3Q-CXVCJ-9G2XF-6Q84J
set ProfessionalWorkstationsN=9FNHH-K3HBT-3W4TD-6383H-6XYWF
goto windowsstart


:win10Enterprise
for /f "tokens=*" %%i in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "ProductName"') do set ProductNameh=%%i
echo "%ProductNameh%" | findstr "2021" >nul && ( 
  echo 当前为Windows Enterprise LTSC 2021。 
  set IoTEnterpriseS=M7XTQ-FN8P6-TTKYV-9D4CC-J462D
  set IoTEnterpriseSN=92NFX-8DJQP-P6BBQ-THF9C-7CG2H
  set EnterpriseS=M7XTQ-FN8P6-TTKYV-9D4CC-J462D
  set EnterpriseSN=92NFX-8DJQP-P6BBQ-THF9C-7CG2H
  ) || (      
     echo "%ProductNameh%" | findstr "2019" >nul && ( 
      echo 当前为Windows Enterprise LTSC 2019。 
      set EnterpriseS=M7XTQ-FN8P6-TTKYV-9D4CC-J462D
      set EnterpriseSN=92NFX-8DJQP-P6BBQ-THF9C-7CG2H
      ) || ( 
         echo "%ProductNameh%" | findstr "2016" >nul && ( 
           echo 当前为Windows Enterprise LTSB 2016。 
           set EnterpriseS=DCPHK-NFMTC-H88MJ-PFHPY-QJ4BJ
           set EnterpriseSN=QFFDN-GRT3P-VKWWX-X7T3R-8B639
           ) || (
                echo "%ProductNameh%" | findstr "2015" >nul && ( 
                  echo 当前为Windows Enterprise LTSB 2015。
                  set EnterpriseS=WNMTR-4C88C-JK8YV-HQ7T2-76DF9
                  set EnterpriseSN=2F77B-TNFGY-69QQF-B8YKP-D69TJ
                  ) || (
                  echo 可能是某种企业定制版本...不保证能激活成功...
                  set EnterpriseS=M7XTQ-FN8P6-TTKYV-9D4CC-J462D
                  set EnterpriseSN=92NFX-8DJQP-P6BBQ-THF9C-7CG2H
                  set EnterpriseG=YYVX9-NTFWV-6MDM3-9PT4T-4M68B
                  set EnterpriseGN=44RPN-FTY23-9VTTB-MP9BX-T84FV
                  set Enterprise=NPPR9-FWDCX-D2C8J-H872K-2YT43
                  set EnterpriseN=DPH2V-TTNVB-4X9Q3-TJR4H-KHJW4
                )
          )
     )
)       
goto windowsstart




:win10Server
for /f "tokens=*" %%i in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "ProductName"') do set ProductNamec=%%i
echo "%ProductNamec%" | findstr "2022" >nul && ( 
  ver | find "版本" >nul && echo 当前为Windows server 2022。 || echo Currently Windows server 2022.
  set ServerDatacenter=WX4NM-KYWYW-QJJR4-XV3QB-6VM33
  set ServerStandard=VDYBN-27WPP-V4HQT-9VMD4-VMK7H
  ) || ( 
       echo "%ProductNamec%" | findstr "2019" >nul && ( 
         ver | find "版本" >nul && echo 当前为Windows server 2019。  || echo Currently Windows server 2019.
         set ServerDatacenter=WMDGN-G9PQG-XVVXX-R3X43-63DFG
         set ServerStandard=N69G4-B89J2-4G8F4-WWYCC-J464C
         set ServerEssentials=WVDHN-86M7X-466P6-VHXV7-YY726
         set ServerRdsh=CPWHC-NT2C7-VYW78-DHDB2-PG3GK
         ) || ( 
              echo "%ProductNamec%" | findstr "2016" >nul && ( 
                ver | find "版本" >nul && echo 当前为Windows server 2016。  || echo Currently Windows server 2016.
                set ServerDatacenter=CB7KF-BWN84-R7R2Y-793K2-8XDDG
                set ServerStandard=WC2BQ-8NRM3-FDDYY-2BFGV-KHKQY
                set ServerEssentials=JCKRF-N37P4-C2D82-9YXRT-4M63B
                ) || ( 
                ver | find "版本" >nul && echo 无法识别系统版本……   || echo Unrecognized system version ......
                goto Feedback
              )
          
        )
)
goto windowsstart



:windowsstart
ver | find "版本" >nul && echo 设置Windows Update 服务为自动并运行... || echo Set the Windows Update service to automatic and run...
sc config wuauserv start=auto > NUL
set winupdate=0
net start | find "Windows Update" > NUL && set winupdate=1
if "%winupdate%"==0 ( echo. > NUL ) else ( net start wuauserv > NUL )
for /f "tokens=3 delims= " %%i in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID"') do set EditionID=%%i
if defined %EditionID% (
  ver | find "版本" >nul && echo 版本ID为%EditionID%  || echo The version ID is%EditionID%
  goto windowsstart2
) else (
  ver | find "版本" >nul && echo 找不到序列号…… || echo Serial number not found ......
  goto Feedback
)
echo.&pause
exit

:windowsstart2
for /f "delims=" %%i in ('cscript //Nologo %windir%\system32\slmgr.vbs /ipk !%EditionID%!') do set kmsresulta=%%i
echo %kmsresulta%
echo %kmsresulta% | find "非核心版本的计算机" > NUL && goto keyerror
echo %kmsresulta% | find "Windows non-core edition" > NUL && goto keyerror
cscript //Nologo %windir%\system32\slmgr.vbs /skms %KMS_Sev%
for /f "delims=" %%i in ('cscript //Nologo %windir%\system32\slmgr.vbs /ato') do set kmsresultc=%%i
echo %kmsresultc%
echo %kmsresultc% | find "无法联系任何密钥管理服务" > NUL && set retrya=1 && goto networkerror
echo %kmsresultc% | find "could be contacted" > NUL && set retrya=1 && goto networkerror 
ver | find "版本" >nul && echo ======================================激活信息====================================== || echo =====================================information====================================
echo.&pause
exit

:start4
set nextunnum=0
echo 是否真的要清除Office的KMS激活(仅支持Office2016及以上版本)？
set /p xuanze=【Y】继续   【N】关闭
if /i "%xuanze%"=="y" goto nextun
if /i "%xuanze%"=="n" exit

:nextun
if exist "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs"  (
goto nextun64
) else (
goto nextun32
)

:nextun64
cscript "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" /dstatus | find  /I "No installed product keys detected"  > NUL && goto nextunsuccess
for /f "tokens=*" %%i in (' cscript "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" /dstatus  ^| find /I "Last 5 characters of installed product key:" ') do set office5key=%%i
set "office5key=%office5key:~-5,5%"
cscript  "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" /unpkey:%office5key% > NUL
cscript  "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" /remhst > NUL
set /a nextunnum+=1
cls
echo 清除进度%nextunnum%/10
if "%nextunnum%"=="10" ( goto nextunsuccess )
goto nextun64
pause
exit

:nextun32
cscript "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" /dstatus | find  /I "No installed product keys detected"  > NUL && goto nextunsuccess
for /f "tokens=*" %%i in (' cscript "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" /dstatus  ^| find /I "Last 5 characters of installed product key:" ') do set office5key=%%i
set "office5key=%office5key:~-5,5%"
cscript  "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" /unpkey:%office5key% > NUL
cscript  "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" /remhst > NUL
set /a nextunnum+=1
cls
echo 清除进度%nextunnum%/10
if "%nextunnum%"=="10" ( goto nextunsuccess )
goto nextun32
pause
exit

:nextunsuccess
cls
echo 清除完成
pause
exit

:start3
set /p xuanze=是否真的要清除Windows的KMS？【Y】继续   【N】关闭
if /i "%xuanze%"=="y" goto nextunw
if /i "%xuanze%"=="n" exit
:nextunw
slmgr /upk
slmgr /ckms
slmgr /rearm
cls
echo 清除完成，请重启电脑
ping 127.0.0.1 -n 10 > nul



:start5
cls
echo.
echo windows 11：
echo Windows 11 教育版                    Windows 11 专业教育版
echo Windows 11 企业版                    Windows 11 专业工作站版
echo Windows 11 专业版    
echo. 
echo Windows 10：
echo Windows 10 教育版                    Windows 10 专业教育版
echo Windows 10 企业版                    Windows 10 专业工作站版 
echo Windows 10 专业版                 
echo. 
echo Windows Server：
echo Windows Server version 1709-1909 数据中心版  Windows Server version 1709-1909 标准版
echo Windows Server 2012 数据中心版                         Windows Server 2012 标准版
echo Windows Server 2016 数据中心版                         Windows Server 2016 标准版
echo Windows Server 2019 数据中心版                         Windows Server 2019 标准版
echo Windows Server 2022 数据中心版                         Windows Server 2022 标准版
echo.
echo Windows Enterprise：
echo Windows LTSC 2019                   Windows LTSB 2016
echo Windows LTSB 2015
echo. 
echo Windows 8.1：
echo Windows 8.1 专业版                    Windows 8.1 企业版
echo. 
echo Windows 7：
echo Windows 7 专业版                       Windows 7 企业版
pause
cls
goto start




:faila
cls
if  "%KMS_Sev%"=="kms-shanghai01.cangshui.net" (
    set KMS_Sev=kms-default.cangshui.net && goto start1
    ) else (
    ver | find "版本" >nul && echo 连接到KMS主/备服务器皆失败，请重新运行脚本或检查计算机网络设置... || echo Unable to connect to KMS server
    )
pause



:failb
cls
if  "%KMS_Sev%"=="kms-shanghai01.cangshui.net" (
    set KMS_Sev=kms-default.cangshui.net && goto start2
    ) else (
    ver | find "版本" >nul && echo 连接到KMS主/备服务器皆失败，请重新运行脚本或检查计算机网络设置... || echo Unable to connect to KMS server
    )
pause

:networkerror
set /a retrya=1+%retrya%
if "%retrya%" LEQ "5" (
  goto networkerror2
) else (
  echo ======================================错误信息=======================================
  echo 本机连接KMS服务器多次失败...请检查网络设置...
  goto Feedback
)
pause
exit

:networkerror2
echo 因本机连接KMS服务器失败，正在进行第%retrya%次重试..
for /f "delims=" %%i in ('cscript //Nologo %windir%\system32\slmgr.vbs /ato') do set kmsresultd=%%i
echo %kmsresultd% | find "无法联系任何密钥管理服务" > NUL  && goto networkerror
echo %kmsresultd% | find "could be contacted" > NUL &&  goto networkerror 
pause
exit

:keyerror
echo ======================================错误信息=======================================
echo 激活密匙错误，可能是脚本不支持你的系统版本...
goto Feedback
pause
exit


:Feedback
echo.
if "!%EditionID%!"=="" ( echo. > NUL ) else ( echo windows激活时使用的密匙为!%EditionID%!  )
if "%KMS_Sev%"=="" ( echo. > NUL ) else ( echo 激活使用的服务器为%KMS_Sev%  )
for /f "tokens=*" %%d in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "ProductName"') do set ProductNamed=%%d
echo 版本为%ProductNamed%
for /f "tokens=*" %%f in ('reg QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID"') do set EditionID=%%f
echo ID为%EditionID%
where curl > NUL
if "%errorlevel%"=="0" ( Echo 系统已安装curl工具 ) else ( echo 系统未安装curl工具 )
where tcping > NUL
if "%errorlevel%"=="0" ( Echo 系统已安装Tcping工具 ) else ( echo 系统未安装Tcping工具 )
whoami /groups | find "S-1-16-12288" >NUL && Echo 脚本拥有管理员权限
echo ======================================错误信息=======================================
pause
cls
goto start

:removearrow
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Icons" /v 29 /d "%systemroot%\system32\imageres.dll,197" /t reg_sz /f > nul
taskkill /f /im explorer.exe > nul
start explorer > nul
echo 去除快捷方式箭头操作完成...
pause
cls
goto start

:recoveryarrow
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Icons" /v 29 /f > nul
taskkill /f /im explorer.exe > nul
start explorer > nul
echo 恢复快捷方式箭头操作完成...
pause
cls
goto start



:modernmenu
reg delete "HKCU\Software\Classes\CLSID\{86ca1aa0-34aa-4e8b-a509-50c905bae2a2}" /f  > nul
taskkill /f /im explorer.exe > nul
start explorer > nul
echo 切换为现代桌面右键菜单操作完成...
pause
cls
goto start

:classicmenu
reg add "HKCU\Software\Classes\CLSID\{86ca1aa0-34aa-4e8b-a509-50c905bae2a2}\InprocServer32" /f  > nul
taskkill /f /im explorer.exe > nul
start explorer > nul
echo 切换为经典桌面右键菜单操作完成...
pause
cls
goto start


:removewarn
reg add HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v AudienceId /t REG_SZ /d "55336B82-A18D-4DD6-B5F6-9E5095C314A6" /f > nul
reg add HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v CDNBaseUrl /t REG_SZ /d "http://officecdn.microsoft.com/pr/55336B82-A18D-4DD6-B5F6-9E5095C314A6" /f > nul
reg add HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v UpdateChannel /t REG_SZ /d "http://officecdn.microsoft.com/pr/55336B82-A18D-4DD6-B5F6-9E5095C314A6" /f > nul
reg delete HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v UpdateUrl /f  > nul
reg delete HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v UpdateToVersion /f  > nul
reg delete HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Updates /v UpdateToVersion /f > nul
reg delete HKLM\SOFTWARE\Policies\Microsoft\Office\16.0\Common\OfficeUpdate\ /f > nul
"%CommonProgramFiles%\microsoft shared\ClickToRun\OfficeC2RClient.exe" /update user > nul
echo 请等待“正在下载Office更新窗口”进度完成...
echo 若提示需要关闭office，请点击继续，然后再次打开Office查看效果...
pause
cls
goto start

:shortcut
reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer /v Link /t REG_BINARY /d "00000000" /f > nul
echo 去除创建快捷方式时的后缀“-快捷方式”操作成功...
echo 可能需要重启计算机才能生效...
pause
cls
goto start


:removeshield
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Icons" /v 77 /d "%systemroot%\system32\imageres.dll,197" /t reg_sz /f > nul
taskkill /f /im explorer.exe > nul
start explorer > nul
echo 去除快捷方式盾牌操作完成...
pause
cls
goto start


:recoveshield
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Icons" /v 77 /f > nul
taskkill /f /im explorer.exe > nul
start explorer > nul
echo 恢复快捷方式盾牌操作完成...
pause
cls
goto start


:removerunwarn
reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Associations /v ModRiskFileTypes /t REG_SZ /d .exe;.bat;.vbs;.py;.cmd;.msi;.ps1;.js /f
gpupdate /force
echo 去除可执行文件的安全警告弹窗操作完成...
pause
cls
goto start

:addmypcico
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel" /v "{20D04FE0-3AEA-1069-A2D8-08002B30309D}" /t REG_DWORD /d "0" /f
taskkill /f /im explorer.exe > nul
start explorer > nul
echo 向桌面添加“此电脑”图标操作完成...
pause
cls
goto start
KMS脚本 \tcping.exe
通过的题目
P1

P2

P4

P5

P6

P7

P8

P9

P10

P11

P12

P13

P14

P15

P16

P17

P18

P19

P20

P21

P22

P23

P24

P25

P26

P27

P28

P29

P30

P31

P32

P33

P34

P36

P37

P38

P39

P40

P41

P43

P44

P45

P46

P48
P50

P51

P53

P54

P59

P63

P65

P67

P69

P73

P74

P75

P81

P83

P88

P89

P91

P92

P94

P96

P97

P98

P99

P100

P102

P103

P104

P110

P119

P129

P135

P137

P152

P154

P155

P156

P157

P161

P166

P170

P172

P174

P178

P185
P187

P207

P208

P209

P212

P213

P214

P215

P217

P224

P228

P232

P237

P246

P260

P265

P267

P272

P294

P302

P304

P317

P342

P362

P364

P377

P379

P404

P406

P407

P417

P429

P431

P436

P443

P449

P451

P462

P484

P486

P499

P500

P501

P600
P604

P607

P613

P625

P632

P661

P666

P717

P761

P785

P790

P821

P829

P834

P858

P876

P904

P942

P954

P964

P965

P966

P967

P968

P993

P1012

P1014

P1064

P1074

P1077

P1209

P1219

P1249

P1256

P1264

P1276

P1283

P1285

P1297

P1307

P1525

P1526

P1553

P1586
最近活动
最近编写的题解
【入门】猜拳

【入门】上什么课

【入门】放大镜

【入门】买铅笔

【入门】熟悉一下Online Judge的环境

【基础】螺旋方阵

【入门】判断成绩等级

汉诺塔游戏的步数

杨辉三角

【入门】熟悉一下Online Judge的环境
分支问题: 28
数组问题: 21
基础问题: 17
简单循环: 15
字符串: 13
需要找规律的循环: 11
二维数组: 9
嵌套循环: 8
字符型: 8
递归: 7
递推: 6
高精度算法: 5
搜索: 5
容器: 5
数据结构: 4
深搜: 3
广搜: 3
vector: 3
动态规划: 3
函数: 3
tyz

个人简介

通过的题目

最近活动

最近编写的题解

题目标签

状态

开发

支持

tyz

个人简介

通过的题目

最近活动

最近编写的题解

题目标签

状态

开发

支持

还没有账户？

登录
