大漠连连看连击问题

沉默不语！

一直重复找一个图片。不知道怎么回事。




大佬帮忙看看。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
dm	dmsoft
bool	逻辑型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

dm.创建 ()
调试输出 (dm.Reg (“”, “”))
dm.SetPath (取运行目录 () ＋ “\img”)
bool ＝ 真
监视热键2 (&子程序_开启辅助, #F2键, , , _启动窗口.取窗口句柄 ())
监视热键2 (&子程序_关闭辅助, #F3键, , , _启动窗口.取窗口句柄 ())

子程序名	返回值类型	公开	备 注
_按钮1_被单击

子程序名	返回值类型	公开	备 注
子程序_开启辅助

变量名	类 型	静态	数组	备 注
hwnd	整数型
x1	整数型
y1	整数型
x2	整数型
y2	整数型
intx	整数型
inty	整数型
ret	文本型
分割1	文本型		0
分割2	文本型		0
i	整数型
窗口矩形	精易_矩形

' 调试输出 (dm.Ver ())
hwnd ＝ dm.FindWindow (“UnityWndClass”, “连连看翻新版”)
如果真 (hwnd ＝ 0)
返回 ()
dm.SetWindowState (hwnd, 1)
窗口矩形 ＝ 窗口_取矩形 (hwnd)
x1 ＝ 窗口矩形.左边
y1 ＝ 窗口矩形.顶边
x2 ＝ 窗口矩形.右边
y2 ＝ 窗口矩形.底边
调试输出 (hwnd, x1, y1, x2, y2)
bool ＝ 真
判断循环首 (真)
如果真 (bool ＝ 假)
跳出循环 ()
ret ＝ dm.FindPicEx (x1, y1, x2, y2, “1.bmp|2.bmp|3.bmp|4.bmp|5.bmp|6.bmp|7.bmp|8.bmp|9.bmp|10.bmp|11.bmp|12.bmp|13.bmp|14.bmp|15.bmp|16.bmp|18.bmp|19.bmp|20.bmp|21.bmp|22.bmp|23.bmp|24.bmp|25.bmp|26.bmp|27.bmp|28.bmp|30.bmp|31.bmp|33.bmp|34.bmp|35.bmp|36.bmp|37.bmp|38.bmp|39.bmp|40.bmp|41.bmp|42.bmp”, “050505”, 0.95, 0)
调试输出 (ret)
如果真 (ret ≠ “”)
分割1 ＝ 分割文本 (ret, “|”, )
如果真 (取数组成员数 (分割1) ≥ 2)
计次循环首 (取数组成员数 (分割1), i)
分割2 ＝ 分割文本 (分割1 [i], “,”, )
如果真 (取数组成员数 (分割2) ≥ 3)
' 调试输出 (到整数 (分割2 [2]), 到整数 (分割2 [3]))
dm.MoveTo (到整数 (分割2 [2]) ＋ 1, 到整数 (分割2 [3]) ＋ 1)
dm.LeftClick ()
延时 (20)
计次循环尾 ()

延时 (100)
判断循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

' 子程序_关闭辅助 ()

子程序名	返回值类型	公开	备 注
子程序_关闭辅助

bool ＝ 假
调试输出 (“111”)

子程序名	返回值类型	公开	备 注
__启动窗口_将被销毁

撤消监视热键2 ()

i支持库列表	支持库注释
dm	(未知支持库)
spec	特殊功能支持库

.版本 2<br /> .支持库 dm<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 dm, dmsoft<br /> .程序集变量 bool, 逻辑型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> dm.创建 ()<br /> 调试输出 (dm.Reg (“”, “”))<br /> dm.SetPath (取运行目录 () ＋ “\img”)<br /> bool ＝ 真<br /> 监视热键2 (&子程序_开启辅助, #F2键, , , _启动窗口.取窗口句柄 ())<br /> 监视热键2 (&子程序_关闭辅助, #F3键, , , _启动窗口.取窗口句柄 ())<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> <br /> <br /> .子程序 子程序_开启辅助<br /> .局部变量 hwnd, 整数型<br /> .局部变量 x1, 整数型<br /> .局部变量 y1, 整数型<br /> .局部变量 x2, 整数型<br /> .局部变量 y2, 整数型<br /> .局部变量 intx, 整数型<br /> .局部变量 inty, 整数型<br /> .局部变量 ret, 文本型<br /> .局部变量 分割1, 文本型, , "0"<br /> .局部变量 分割2, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 窗口矩形, 精易_矩形<br /> <br /> <br /> ' 调试输出 (dm.Ver ())<br /> hwnd ＝ dm.FindWindow (“UnityWndClass”, “连连看翻新版”)<br /> .如果真 (hwnd ＝ 0)<br />     返回 ()<br /> .如果真结束<br /> dm.SetWindowState (hwnd, 1)<br /> 窗口矩形 ＝ 窗口_取矩形 (hwnd)<br /> x1 ＝ 窗口矩形.左边<br /> y1 ＝ 窗口矩形.顶边<br /> x2 ＝ 窗口矩形.右边<br /> y2 ＝ 窗口矩形.底边<br /> 调试输出 (hwnd, x1, y1, x2, y2)<br /> bool ＝ 真<br /> .判断循环首 (真)<br />     .如果真 (bool ＝ 假)<br />         跳出循环 ()<br />     .如果真结束<br />     ret ＝ dm.FindPicEx (x1, y1, x2, y2, “1.bmp|2.bmp|3.bmp|4.bmp|5.bmp|6.bmp|7.bmp|8.bmp|9.bmp|10.bmp|11.bmp|12.bmp|13.bmp|14.bmp|15.bmp|16.bmp|18.bmp|19.bmp|20.bmp|21.bmp|22.bmp|23.bmp|24.bmp|25.bmp|26.bmp|27.bmp|28.bmp|30.bmp|31.bmp|33.bmp|34.bmp|35.bmp|36.bmp|37.bmp|38.bmp|39.bmp|40.bmp|41.bmp|42.bmp”, “050505”, 0.95, 0)<br />     调试输出 (ret)<br />     .如果真 (ret ≠ “”)<br />         分割1 ＝ 分割文本 (ret, “|”, )<br />         .如果真 (取数组成员数 (分割1) ≥ 2)<br />             .计次循环首 (取数组成员数 (分割1), i)<br />                 分割2 ＝ 分割文本 (分割1 <i>, “,”, )<br />                 .如果真 (取数组成员数 (分割2) ≥ 3)<br />                     ' 调试输出 (到整数 (分割2 [2]), 到整数 (分割2 [3]))<br />                     dm.MoveTo (到整数 (分割2 [2]) ＋ 1, 到整数 (分割2 [3]) ＋ 1)<br />                     dm.LeftClick ()<br />                 .如果真结束<br />                 延时 (20)<br />             .计次循环尾 ()<br /> <br />         .如果真结束<br /> <br />     .如果真结束<br />     延时 (100)<br /> .判断循环尾 ()<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> ' 子程序_关闭辅助 ()<br /> <br /> <br /> .子程序 子程序_关闭辅助<br /> <br /> bool ＝ 假<br /> 调试输出 (“111”)<br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> 撤消监视热键2 ()

这里是源码

大漠插件.zip (610.47 KB, 下载次数: 2)

2024-12-31 21:27 上传

点击文件名下载附件