add 硬件控制模块 (hardware_control.py) 并修复游戏状态扫描区域宽度

- 新增 wyhkm.dll 硬件盒子 COM 接口封装，支持键盘鼠标控制 - 修复 game_state_config.json 中 scan_region_width 过小导致截图越界的问题 - 添加鼠标路径录制器、硬件测试脚本等工具 - 更新多项配置默认值 Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
2026-04-15 12:15:00 +08:00
parent b4de5278ed
commit 33dc741fd9
203 changed files with 12197 additions and 247 deletions
--- a/ddl/chm_output/com_fun/GetCursorPos2.html
+++ b/ddl/chm_output/com_fun/GetCursorPos2.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
+<title>GetCursorPos2</title>
+<link rel="stylesheet" type="text/css" href="css/help.css">
+</head>
+<body>
+<table width="100%" border="0" cellpadding="0" cellspacing="1" class="ts">
+  <tr>
+    <th width="50"><EFBFBD><EFBFBD><EFBFBD><EFBFBD></th>
+    <td class="name">GetCursorPos2 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD></td>
+  </tr>
+  <tr>
+    <th><EFBFBD><EFBFBD><EFBFBD><EFBFBD></th>
+    <td><EFBFBD><EFBFBD><EFBFBD>ò<EFBFBD><EFBFBD><EFBFBD>ϵͳ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>е<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꡣ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>GetCursorPos<EFBFBD><EFBFBD>ȫ<EFBFBD><EFBFBD>ͬ<EFBFBD><EFBFBD>ֻ<EFBFBD><EFBFBD>Ϊ<EFBFBD>˽<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Բ<EFBFBD>֧<EFBFBD>ֲ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ַ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⡣ʹ<EFBFBD><EFBFBD><a href="Open.html">Open</a><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>豸<EFBFBD><EFBFBD><EFBFBD>ſ<EFBFBD><EFBFBD><EFBFBD>ʹ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD></td>
+  </tr>
+  <tr>
+    <th><EFBFBD><EFBFBD><EFBFBD><EFBFBD></th>
+    <td class="canshu">&nbsp;</td>
+  </tr>
+  <tr>
+    <th><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֵ</th>
+    <td class="fanhui">32λ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>16λ<EFBFBD>Ǻ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>꣬<EFBFBD><EFBFBD>16λ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ꡣ</td>
+  </tr>
+  <tr>
+    <th>vbs<br /><EFBFBD><EFBFBD><EFBFBD><EFBFBD></th>
+    <td class="lizi">Function GetX(pos)<br />
+      &nbsp;&nbsp;&nbsp;&nbsp;GetX=CInt(&quot;&amp;h&quot; &amp; Hex(pos And &amp;h0000FFFF&amp;))<br />
+      End Function<br />
+      <br />
+Function GetY(pos)<br />
+&nbsp;&nbsp;&nbsp;&nbsp;GetY=CInt((pos And &amp;hFFFF0000&amp;)/&amp;h10000&amp;)<br />
+End Function<br />
+      <br />
+      Dim DevId,pos<br />
+      DevId=wyhkm.SearchDevice(&amp;h1234&amp;,&amp;hABCD&amp;,0)<br />
+      If DevId=-1 Then<br />
+      &nbsp;&nbsp;&nbsp;&nbsp;MsgBox &quot;δ<EFBFBD>ҵ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ļ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>&quot;,4096<br />
+      &nbsp;&nbsp;&nbsp;&nbsp;wscript.quit<br />
+      End If<br />
+      If Not wyhkm.Open(DevId,0) Then<br />
+      &nbsp;&nbsp;&nbsp;&nbsp;MsgBox &quot;<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ļ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʧ<EFBFBD><EFBFBD>&quot;,4096<br />
+      &nbsp;&nbsp;&nbsp;&nbsp;wscript.quit<br />
+      End If<br />
+      pos=wyhkm.GetCursorPos2()<br />
+    MsgBox &quot;<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>꣺&quot;&amp;CStr(GetX(pos))&amp;&quot;,&quot;&amp;CStr(GetY(pos)),4096<br />
+    wyhkm.Close</td>
+  </tr>
+</table>
+</body>
+</html>