|
- @echo off
- if /i "%UserName%" == "SYSTEM" (Goto GotAdmin) else (reg query "HKLM\SYSTEM\ControlSet001\Control\MiniNT" 1>nul 2>nul&&Goto GotAdmin)
- if exist %WinDir%\System32\fltMC.exe fltMC 1>nul 2>nul||mshta VBScript:CreateObject("Shell.Application").ShellExecute("%~dpnx0","%*",,"runas",1)(Window.Close) 2>nul&&Exit /b
- :GotAdmin
- Title &ver|find " 5." 1>nul 2>nul&&Title NumLock&(if exist %WinDir%\System32\ureg.dll Mode 30,3 2>nul)
- REM 默认切换 NumLock 指示灯,传参 on 为打开 NumLock 指示灯,传参 off 为关闭 NumLock 指示灯
- Color 2f&Set "do=切换 NumLock 指示灯"
- if /i "%~1" == "on" Color 9f&Set "do=打开 NumLock 指示灯"&Set not=not
- if /i "%~1" == "off" Color cf&Set "do=关闭 NumLock 指示灯"&Set not=
- if not exist "%temp%\NumLock.vbs" (echo Set WSHShell = CreateObject^("WScript.Shell"^)&echo WSHShell.SendKeys "{NumLock}") >"%temp%\NumLock.vbs"
- echo.&Set /p="_ %do%"<nul
- if `%1` == `` (WScript.exe /b %temp%\NumLock.vbs 1>nul 2>nul) else for /f %%i in ('powershell -command [console]::NumberLock') do if /i %not% "%%~i" == "True" WScript.exe /b %temp%\NumLock.vbs 1>nul 2>nul
- Exit /b
复制代码
NumLock.bat -> 切换 NumLock 指示灯
NumLock.bat on -> 打开 NumLock 指示灯
NumLock.bat off -> 关闭 NumLock 指示灯
|
|