无忧启动论坛

标题: Num Lock小数字键盘灯工具 CoolAutoNum 1.0 发布！ [打印本页]

作者: 444742627 时间: 2021-9-5 21:38
标题: Num Lock小数字键盘灯工具 CoolAutoNum 1.0 发布！
一个自动判断是否开启Num Lock小数字键盘灯的工具，将本工具加入PE中并设置为自动运行时，本工具会在PE启动时，判断当前电脑是笔记本，还是台式机，若为笔记本，则关闭Num Lock灯；若为台式机，则开启Num Lock灯。

CoolAutoNum.7z (11.58 KB, 下载次数: 208)

本工具需要系统文件msvbvm60.dll和coml2.dll (Win10下)的支持，若PE下运行报错，请检查是否有这两个文件，没有，请补上。

作者: Angel呆呆 时间: 2021-9-5 22:00
顶贴

QQ图片20210905215523.jpg (221.06 KB, 下载次数: 144)

二次元

作者: ku588 时间: 2021-9-5 22:06
本帖最后由 ku588 于 2021-9-5 22:07 编辑

支持下，如果测试没缺陷的话应该是个还不错的工具

作者: 叮叮当当 时间: 2021-9-6 05:20
感谢分享

作者: 狼人72105 时间: 2021-9-6 08:17
顶一下居士，不错的好工具。。。

作者: 2011wolfsina 时间: 2021-9-6 08:20
好像收藏过这样的工具。

作者: smalldimple 时间: 2021-9-6 09:03
正好我的无线键盘看不到灯状态，要是同时显示大小写就好了

作者: smalldimple 时间: 2021-9-6 09:03
在我的win10上运行后没有任何显示呢？

作者: 2012zhd 时间: 2021-9-6 09:23
好工具，感谢。

作者: 444742627 时间: 2021-9-6 10:37

smalldimple 发表于 2021-9-6 09:03
在我的win10上运行后没有任何显示呢？

只是后台开灯关灯，没有任何显示的，如果你是台式机，把Num Lock灯关了，运行软件，这是灯会亮。

作者: 2012andyle113 时间: 2021-9-6 11:47
我这10下面点了，没有任何反应，也没看见什么进程

作者: 444742627 时间: 2021-9-6 12:20

2012andyle113 发表于 2021-9-6 11:47
我这10下面点了，没有任何反应，也没看见什么进程

开灯或关灯后，自动结束，你看不到的

作者: 鸡腿姑爷 时间: 2021-9-6 12:24
有点意思的小工具

作者: ku588 时间: 2021-9-6 13:19
本帖最后由 ku588 于 2021-9-6 13:25 编辑

如果用在PE的话可以用这个批处理试试：用在正常系统需要pecmd！
补充说明：尚未在PE下验证是否通用，有兴趣的朋友可以一试！

@echo off
for /f "tokens=2 delims=={}" %%a in ('wmic PATH Win32_SystemEnclosure get ChassisTypes /value') do (
if %%a==3 (
      goto Desktop
) else (
      if %%a==4 (
         goto Desktop
      ) else (
         if %%a==8 (
            goto NoteBook
         ) else (
            if %%a==9 (
                  goto NoteBook
            ) else (
                  if %%a==10 (
                     goto NoteBook
                  )
            )
         )
      )
)
)
:Desktop
echo 当前电脑为台式机
pecmd NUMK 1
goto End
:NoteBook
echo 当前电脑为笔记本电脑
pecmd NUMK 0
goto End
:End

作者: 444742627 时间: 2021-9-6 13:43

ku588 发表于 2021-9-6 13:19
如果用在PE的话可以用这个批处理试试：用在正常系统需要pecmd！
补充说明：尚未在PE下验证是否通用，有兴 ...

一般PE下没有WMI组件哦！集成WMI会多出几十兆

作者: 坏坏小生 时间: 2021-9-6 13:47
我也来一个,源码公开

Function FF_WINMAIN(ByVal hInstance As HINSTANCE) As Long '程序入口函数
Dim a As SYSTEM_POWER_STATUS
   GetSystemPowerStatus(@a)
if a.BatteryFlag = 128 Or a.BatteryFlag = 255 Then
   '是台式机,打开键灯
   SetLight(VK_NUMLOCK ,True )
Else
   '是笔记本,关闭键盘灯
   SetLight(VK_NUMLOCK ,False)
End if
Function = True
End Function
Sub SetLight(i as Long ,bState As BOOL)
Dim keyState(256) As UByte
GetKeyboardState(@keyState(0))
if ((bState And Not (keyState(i) And 1)) Or (Not bState And (keyState(i) And 1))) Then
   keybd_event(i ,&H45 ,KEYEVENTF_EXTENDEDKEY Or 0 ,0)
   keybd_event(i ,&H45 ,KEYEVENTF_EXTENDEDKEY Or KEYEVENTF_KEYUP ,0)
End if
End Sub

欢迎在PE下测试,该程序为32位EXE

小键盘灯.7z (10.51 KB, 下载次数: 38)

作者: 444742627 时间: 2021-9-6 13:51

坏坏小生发表于 2021-9-6 13:47
我也来一个,源码公开

Function FF_WINMAIN(ByVal hInstance As HINSTANCE) As Long '程序入口函数

我就是用的这个API ，检测有没有电池来判断的。估计电池拔了的笔记本是被识别为台式机！

作者: ku588 时间: 2021-9-6 15:57

444742627 发表于 2021-9-6 13:43
一般PE下没有WMI组件哦！集成WMI会多出几十兆

这个说的倒是，如果pecmd有内置此功能，那PE下就没必要再单独搞这样的工具了

作者: 444742627 时间: 2021-9-6 21:02

ku588 发表于 2021-9-6 15:57
这个说的倒是，如果pecmd有内置此功能，那PE下就没必要再单独搞这样的工具了

PECMD能解决，我就不会在这个上面花时间了，写这个工具，我也是在自己的PE里遇到了这样的问题，没有解决，才自己写的。

作者: 2011wolfsina 时间: 2021-9-6 23:43
之前收藏的，好像也不错。

AutoNumLock.zip (1.91 KB, 下载次数: 63)

作者: dszsdyx 时间: 2021-9-7 03:50
这个工具几乎能检测键盘有没有损坏。

作者: dafs 时间: 2021-9-10 09:43
都是很好的工具谢谢各位

作者: 乾坤大地 时间: 2021-10-9 10:58
最好是根据笔记本触模屏来判断有则是笔记本，没有则是台式机

作者: liuzhaoyzz 时间: 2021-10-9 11:23
目前的这些工具，不能完美地解决笔记本带小键盘的这种类型。
需要的效果是，带右侧小键盘的笔记本，运行之后，Numlock亮起来。

笔记本带小键盘.jpg (85.95 KB, 下载次数: 148)

作者: andy168 时间: 2021-12-25 21:01
不错的软件 14寸笔记本数字键盘的福音

作者: zyy 时间: 2021-12-27 23:00
谢谢分享

作者: bhdc 时间: 2021-12-28 17:16
64位有吗？

作者: zhangzan30 时间: 2022-1-25 14:24
威利古德

作者: winterhope 时间: 2022-3-31 07:10
给力，谢谢

作者: chairmansu 时间: 2022-6-11 23:37
感謝分享

作者: szyang 时间: 2022-6-12 13:44
谢谢分享，顶一下。

欢迎光临无忧启动论坛 (http://wuyou.net/)