判断循环找图问题

xunlu

请问一下，以下判断找图，怎么改成不管随机出现了那一个需要找的图，出现了需要找的图只执行一次在图片消失之前不重复判断这一张图片，然后接着循环判断下一个随机出现需要找的现图一样只执行一次在图片消失之前不重复判断这一张图片，每一张图的显示和消失时间不固定用不了延迟，麻烦大佬帮我改改


列如  A B C D  图片，随机出现了一张 A 图片判断到 A 图片执行命令，接着 A 图片还没消失掉（每一种图片消失和显示时间不一样用不了延迟，但是每次只随机出现一张图片）又随机出现了一张 C 图片，然后跳过被执行过得 A 图片，只执行 C 图片执行命令，，，，，，一直这样循环，被执行过得随机出现的图片，不会在消失前不会重复执行，每一张图片执行的命令只执行一次

  

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

判断启动游戏循环 ＝ 真
启动线程 (&启动游戏, , 线程启动游戏句柄)

子程序名	返回值类型	公开	备 注
启动游戏

判断循环首 (判断启动游戏循环)
dm.FindPic (547, 665, 721, 760, “配置\游戏奖确认.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 领取奖励0” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (1021, 653, 1071, 688, “配置\游戏奖确认1.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 领取奖励1” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (968, 629, 1017, 659, “配置\游戏奖确认2.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 领取奖励2” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (606, 364, 682, 425, “配置\游戏奖励荣耀升级.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 升级了” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (528, 639, 716, 677, “配置\房间称号.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 获得称号” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (717, 637, 785, 678, “配置\房间称号奖励.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 获得称号奖励” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (680, 598, 752, 634, “配置\房间道具卡奖励.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 获得道具” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (629, 596, 701, 631, “配置\房间道具推荐.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 关闭商城” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (673, 620, 732, 655, “配置\房间道具续费.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 关闭商城续费” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (661, 423, 719, 456, “配置\房间好友邀请.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 拒绝邀请” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (912, 110, 956, 151, “配置\房间模式介绍.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 模式介绍” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (617, 431, 685, 469, “配置\房间升级.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 升级” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (607, 421, 666, 454, “配置\房间游戏房主.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 房间房主” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (1120, 506, 1234, 544, “配置\房间游戏准备.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 房间准备” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (540, 295, 729, 388, “配置\房间标实.bmp|配置\房间标实1.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 游戏标签” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (1120, 506, 1234, 544, “配置\房间游戏开始.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 开始游戏” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (1120, 506, 1234, 544, “配置\房间游戏进入.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 游戏进入” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (170, 0, 400, 80, “配置\房间游戏加载.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 游戏加载” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (601, 314, 677, 393, “配置\游戏准星.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (2, 1)
dm.KeyPress (75)  ' 键盘按K
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 进入游戏完成” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (826, 429, 865, 463, “配置\传送6阶.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 打开传送菜单” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (588, 542, 676, 581, “配置\传送确认.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 确认传送” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (588, 542, 676, 581, “配置\传送取消.bmp”, “000000”, 0.9, 0, intX, intY) ＝ 0
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (点击延迟, 0)
dm.MoveTo (intX, intY)
程序_延时 (点击延迟, 0)
dm.LeftClick ()
程序_延时 (5, 1)
编辑框纪录框.加入文本 (“> 传送完成” ＋ 到文本 (cf) ＋ #换行符 )

dm.FindPic (536, 9, 652, 101, “配置\游戏10分钟.bmp”, “000000”, 0.9, 0, intX, intY)
如果真 (intX ＞ 0 且 intY ＞ 0)
程序_延时 (1, 1)
cf ＝ cf ＋ 1
编辑框纪录框.加入文本 (“> 启动跑图” ＋ 到文本 (cf) ＋ #换行符 )
程序_延时 (点击延迟, 0)
启动跑图 ()

判断循环尾 ()

子程序名	返回值类型	公开	备 注
启动跑图

编辑框纪录框.加入文本 (“> 开始跑图” ＋ 到文本 (cf) ＋ #换行符 )

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

cf ＝ 0
判断启动游戏循环 ＝ 假
强制结束线程 (线程启动游戏句柄)
关闭线程句柄 (线程启动游戏句柄)

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 判断启动游戏循环 ＝ 真<br /> 启动线程 (&启动游戏, , 线程启动游戏句柄)<br /> <br /> <br /> .子程序 启动游戏<br /> <br /> <br /> .判断循环首 (判断启动游戏循环)<br /> <br />     dm.FindPic (547, 665, 721, 760, “配置\游戏奖确认.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 领取奖励0” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (1021, 653, 1071, 688, “配置\游戏奖确认1.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 领取奖励1” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (968, 629, 1017, 659, “配置\游戏奖确认2.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 领取奖励2” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (606, 364, 682, 425, “配置\游戏奖励荣耀升级.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 升级了” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (528, 639, 716, 677, “配置\房间称号.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 获得称号” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (717, 637, 785, 678, “配置\房间称号奖励.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 获得称号奖励” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (680, 598, 752, 634, “配置\房间道具卡奖励.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 获得道具” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (629, 596, 701, 631, “配置\房间道具推荐.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 关闭商城” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (673, 620, 732, 655, “配置\房间道具续费.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 关闭商城续费” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (661, 423, 719, 456, “配置\房间好友邀请.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 拒绝邀请” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (912, 110, 956, 151, “配置\房间模式介绍.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 模式介绍” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (617, 431, 685, 469, “配置\房间升级.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 升级” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (607, 421, 666, 454, “配置\房间游戏房主.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 房间房主” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (1120, 506, 1234, 544, “配置\房间游戏准备.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 房间准备” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (540, 295, 729, 388, “配置\房间标实.bmp|配置\房间标实1.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 游戏标签” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (1120, 506, 1234, 544, “配置\房间游戏开始.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 开始游戏” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (1120, 506, 1234, 544, “配置\房间游戏进入.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 游戏进入” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (170, 0, 400, 80, “配置\房间游戏加载.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 游戏加载” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (601, 314, 677, 393, “配置\游戏准星.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (2, 1)<br />         dm.KeyPress (75)  ' 键盘按K<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 进入游戏完成” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (826, 429, 865, 463, “配置\传送6阶.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 打开传送菜单” ＋ 到文本 (cf) ＋ #换行符)<br />     .如果真结束<br /> <br /> <br />     dm.FindPic (588, 542, 676, 581, “配置\传送确认.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 确认传送” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (588, 542, 676, 581, “配置\传送取消.bmp”, “000000”, 0.9, 0, intX, intY) ＝ 0<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (点击延迟, 0)<br />         dm.MoveTo (intX, intY)<br />         程序_延时 (点击延迟, 0)<br />         dm.LeftClick ()<br />         程序_延时 (5, 1)<br />         编辑框纪录框.加入文本 (“> 传送完成” ＋ 到文本 (cf) ＋ #换行符)<br /> <br />     .如果真结束<br /> <br /> <br />     dm.FindPic (536, 9, 652, 101, “配置\游戏10分钟.bmp”, “000000”, 0.9, 0, intX, intY)<br />     .如果真 (intX ＞ 0 且 intY ＞ 0)<br />         程序_延时 (1, 1)<br />         cf ＝ cf ＋ 1<br />         编辑框纪录框.加入文本 (“> 启动跑图” ＋ 到文本 (cf) ＋ #换行符)<br />         程序_延时 (点击延迟, 0)<br />         启动跑图 ()<br /> <br />     .如果真结束<br /> <br /> <br /> .判断循环尾 ()<br /> <br /> <br /> <br /> .子程序 启动跑图<br /> <br /> 编辑框纪录框.加入文本 (“> 开始跑图” ＋ 到文本 (cf) ＋ #换行符)<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> cf ＝ 0<br /> 判断启动游戏循环 ＝ 假<br /> 强制结束线程 (线程启动游戏句柄)<br /> 关闭线程句柄 (线程启动游戏句柄)

补充内容 (2025-11-27 00:48):
源码在下面

补充内容 (2025-11-27 18:09):
临时解决了加了个变量判断，把主要bug 部分重新判断了，如果有更好的建议，评论里发一下 非常感谢各位大佬

xunlu

加了个变量判断



补充内容 (2025-11-27 17:42):
临时加了个变量判断，把主要部分判断了，如果有更好的建议1欢迎欢迎评论发一下

xunlu

不能用全屏识别，有些图片是很相似的，只能区域单图识别

xunlu

源码.rar (1.15 MB, 下载次数: 3)

2025-11-27 00:47 上传

点击文件名下载附件

xunlu

源码在下面

錵錵

加一个判断消失即可

那小子很坏

代码好臃肿啊  写外部读取啊还能随时外面添加  代码就不用写这么多  不累么?

xunlu

錵錵 发表于 2025-11-27 09:16
加一个判断消失即可

还是重复执行这一段命令

xunlu

那小子很坏 发表于 2025-11-27 10:18
代码好臃肿啊  写外部读取啊还能随时外面添加  代码就不用写这么多  不累么? ...

新入坑的全都看不懂哪学得会那些

錵錵

前面的dm_ret 赋下值  我只是演示了你找图循环的一段  你这个最好用状态机制做模块化  要不然你的循环代码太多了

錵錵

还有我看了你要找的图片 理论是可以做游戏窗口全屏识别的