[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[其他] [测试版]ZD_BatBossMouse(不支持WIN10)

希望管理员能将此贴移入原创区
今天我突然发现像素级的鼠标位置检测第三方,所以我就做了“老板键”的变种“老板鼠标”
该软件未经过全面测试,如果发生错误,请在下方发帖反馈。
详情见2楼
https://4m.cn/jKzty
密码:zdeity

本帖最后由 zdeity 于 2021-9-8 16:13 编辑

文件位置:我的空间\bat原创区\ZDBatBossMouse_Setup
直接下载:ZD_BatBossMouse
该exe会提取出ZD_BatBossMouse的文件夹,然后运行ZD_BatBossMouseGUI就可以了

主要功能:关闭/打开防火墙,隐藏窗口,关机
触发方式:鼠标移至左上角

源码如下:
GUI.bat
  1. @echo off
  2. cd core\
  3. if exist main.exe start main.exe
  4. if exist main.bat start main.bat
  5. cico /ico favicon.ico
  6. title ZD_BatBossMouse
  7. echo 0 > settings\Exit.txt
  8. :home
  9. cls
  10. echo ZD_BatBossMouse ^[Version 1.0.0.0^] By zdeity
  11. echo 仅供学习交流思路,请勿作不当用途。
  12. echo.
  13. echo -------------------------------------------------------------------------------------------
  14. echo 输入每个选项后括号内的字符串以选择
  15. echo ^[N^]表示该选项为否 ^[Y^]表示该选项为是
  16. echo ^[XX^]为选择后进行的操作
  17. echo.
  18. echo -------------------------------------------------------------------------------------------
  19. echo 最小化至托盘(a1)
  20. echo 安全退出(a2)
  21. echo.
  22. echo -------------------------------------------------------------------------------------------
  23. set /p fc=<settings\Firewall.txt
  24. set /p sc=<settings\Shutdown.txt
  25. set /p swc=<settings\ScanWait.txt
  26. set /p lc=<settings\LowCover.txt
  27. echo 当鼠标移动到屏幕或任意窗口的左上角时,进行以下操作:
  28. echo ^[%fc%^]打开/关闭防火墙(b1) ^[%sc%^]关机(慎选)(b2)
  29. echo ^[添加^]隐藏/恢复下列窗口(b3):
  30. type settings\WindowHide.txt
  31. echo.
  32. echo -------------------------------------------------------------------------------------------
  33. echo BossMouse设置:
  34. echo ^[%lc%^]开启CPU低占用模式(设置检测间隔,慎用)(c1)
  35. if %lc% EQU Y goto lcp
  36. :lcpr
  37. echo ^[更改^]检测到鼠标触发操作后等待%swc%毫秒后继续操作(c2)
  38. echo.
  39. set /p cont=^>
  40. if %cont% EQU a1 goto ucode
  41. if %cont% EQU a2 goto uexit
  42. if %cont% EQU b1 goto unetsh
  43. if %cont% EQU b2 goto ushutdown
  44. if %cont% EQU b3 goto ucmdow
  45. if %cont% EQU c1 goto uesleep
  46. if %cont% EQU c2 goto usleep
  47. if %cont% EQU c2a goto uesleeppro
  48. goto home
  49. :ucode
  50. call code "%titlebak%"
  51. goto home
  52. :uexit
  53. echo 1 > settings\Exit.txt
  54. exit
  55. :unetsh
  56. if %fc% EQU N goto UUnetsh
  57. echo N > settings\Firewall.txt
  58. goto home
  59. :UUnetsh
  60. echo Y > settings\Firewall.txt
  61. goto home
  62. :ushutdown
  63. if %sc% EQU N goto UUshutdown
  64. echo N > settings\Shutdown.txt
  65. goto home
  66. :UUshutdown
  67. echo Y > settings\Shutdown.txt
  68. goto home
  69. :uesleep
  70. if %lc% EQU N goto uusleep
  71. echo N > settings\LowCover.txt
  72. goto home
  73. :uuecho
  74. echo Y > settings\LowCover.txt
  75. goto home
  76. :ucmdow
  77. echo.
  78. cmodw /t
  79. echo.
  80. echo 请输入要隐藏的窗口:
  81. set /p windowc=^>
  82. echo %windowc% > settings\WindowHide.txt
  83. goto home
  84. :usleep
  85. echo 该设置是为了避免程序过快导致一次鼠标移动触发了多次操作
  86. echo 当前设置为:触发一次操作后需等待%swc%毫秒才会进行第二次鼠标检测
  87. echo 请输入新的数值:
  88. set /p swsn=^>
  89. set swsnn=%swsn%
  90. set /a swsn=%swsn% >nul
  91. if %swsn% EQU %swsnn% goto usleepright
  92. echo 输入错误
  93. timeout /t 3 /nobreak >nul
  94. goto home
  95. :usleepright
  96. echo %swsn% > settings\ScanWait.txt
  97. goto home
  98. :uesleeppro
  99. echo 请输入新的等待时间
  100. set /p uesd=^>
  101. echo %uesd% > setttings\LowCoverSet.txt
  102. goto home
  103. :lcp
  104. set /p lcps=<settings\LowCoverSet.txt
  105. echo CPU低占用模式说明:
  106. echo 该模式是为了避免频繁地探测鼠标位置会导致电脑卡顿
  107. echo 原理是探测一次鼠标位置后倒计时指定时间之后再次探测
  108. echo 该模式可能会降低隐藏效率和你的主观判断混乱
  109. echo 请谨慎开启,确保自己有足够的预判技术
  110. echo 当前每次探测之间间隔%lcps%毫秒^[更改^](c1a)
  111. goto lcpr
复制代码
main.bat
  1. @echo off
  2. set att=0
  3. :home
  4. set /p fc=<settings\Firewall.txt
  5. set /p sc=<settings\Shutdown.txt
  6. set /p swc=<settings\ScanWait.txt
  7. set /p lc=<settings\LowCover.txt
  8. set /p exitcode=<settings\Exit.txt
  9. set /p lcpro=<settings\LowCoverSet.txt
  10. if %lc% EQU Y sleep_s %lcpro%
  11. if %exitcode% EQU 1 exit
  12. if %lcpool% EQU 1 goto lowc
  13. EMOS /mouse
  14. set mousetime=1
  15. for /f %%i in (errorleveldat.dat) do (
  16. if %mousetime% EQU 1 (
  17. set x=%%i
  18. )
  19. if %mousetime% EQU 2 (
  20. set y=%%i
  21. )
  22. set /a mousetime+=1
  23. )
  24. if %x% GTR 10 goto home
  25. if %y% GTR 10 goto home
  26. if %att% EQU 0 set att=1
  27. if %att% EQU 1 set att=0
  28. if %sc% EQU Y shutdown /p
  29. if %fc% EQU Y (
  30. if %att% EQU 1 (
  31. net start sharedaccess
  32. ) else net stop sharedaccess
  33. )
  34. if %att% EQU 1 (
  35. for /f %%i in (settings\WindowHide.txt) do cmdow "%%i" /hid
  36. ) else for /f %%i in (settings\WindowHide.txt) do cmdow "%%i" /vim
  37. )
  38. sleep_s %swc%
  39. goto home
复制代码
第三方:cico,cmdow,code,emos
3

评分人数

    • zoomark: 感谢楼主无私分享,已学习技术 + 1
    • zybers: 感谢分享技术 + 1
    • zinc: 思路不错技术 + 1
https://4m.cn/jKzty
密码:zdeity

TOP

你这。。。代码有点不太简洁啊

TOP

回复 4# zoomark


    主要是担心cmd出现一些莫名其妙的错误,所以不怎么用跨行的复合句
https://4m.cn/jKzty
密码:zdeity

TOP

感觉效果还不错,没有什么问题

TOP

回复 6# zdeity


    防沉补丁+++1
https://4m.cn/jKzty
密码:zdeity

TOP

额。链接崩了

TOP

回复 7# zybers


    已补链接
2

评分人数

https://4m.cn/jKzty
密码:zdeity

TOP

我从未见过刷分刷的这么明目张胆的,给你评分的全部是小号
证据:
       1.评分者全部同一天注册?只发了个新手帖就直接给你加分?然后就什么都不做?
       2.注册IP一样...
       3.只在你的帖子发帖,别人的不闻不问?
我之前也这么干过,被禁止发言了,所以我重新注册了一个账号,新的账号我没有刷分。
梦依旧在,只是,心有余而力渐有不足
年年岁岁花相似,岁岁年年人不同

TOP

老有经验啦!

TOP

返回列表