自动找图并处理一些事儿

178826559

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
dm	dmsoft
程序集_起点X	整数型		查找范围
程序集_起点Y	整数型		查找范围
程序集_屏幕宽度	整数型		查找范围
程序集_屏幕高度	整数型		查找范围
程序集_图片路径	文本型		用来存放图片的路径
程序集_寻找	自定义寻找甲	0
程序集_记录甲	整数型		用来记录当前运行
程序集_循环标记	逻辑型		进入或跳出循环所用
程序集_按下左X	整数型		当按下左键时，X移动距离
程序集_按下左Y	整数型		当按下左键时，X移动距离
程序集_找到图片X点	整数型
程序集_找到图片Y点	整数型

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

' 【程序集_寻找】数组的成员如下。
' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】
程序集_起点X ＝ 0
程序集_起点Y ＝ 0
程序集_屏幕宽度 ＝ 取屏幕宽度 ()
程序集_屏幕高度 ＝ 取屏幕高度 ()
程序集_图片路径 ＝ 取运行目录 () ＋ “\pic\”
窗口_热键注册 (_启动窗口.取窗口句柄 (), 2, #Q键, &_按钮点鼠_被单击, 1)

子程序名	返回值类型	公开	备 注
子程序初始化程数据			初始化程序集的数据

清除数组 (程序集_寻找)
程序集_记录甲 ＝ 1
程序集_循环标记 ＝ 真
编辑框提示信息区.内容 ＝ “”

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

变量名	类 型	静态	数组	备 注
局部_找图	文本型		0
计次	整数型
计次连几图	整数型

程序_延时 (1000, 0)
子程序初始化程数据 ()
' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】
加入成员 (局部_找图, “征战001.bmp||左单击||18||10||1200||1”)
加入成员 (局部_找图, “征战002.bmp||左单击||30||46||1000||1”)
加入成员 (局部_找图, “征战003.bmp||左单击||16||9||1000||1”)
加入成员 (局部_找图, “征战004.bmp||左单击||16||9||3000||1”)
加入成员 (局部_找图, “征战005.bmp||左单击||18||20||2000||1”)
加入成员 (局部_找图, “征战006.bmp||左单击||30||46||2000||1”)
加入成员 (局部_找图, “征战007.bmp||左单击||8||8||2000||2”)
加入成员 (局部_找图, “征战007-1.bmp||左单击||8||8||2000||1”)
计次循环首 (取数组成员数 (局部_找图), 计次)
子程序添加数组 (局部_找图 [计次])
计次循环尾 ()
输出调试文本 (取数组成员数 (程序集_寻找))
判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲)
编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容
子程序找图一 (程序集_寻找 [程序集_记录甲])
程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图
判断循环尾 ()
计次循环首 (4, 计次)
程序集_记录甲 ＝ 3
判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲)
编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容
子程序找图一 (程序集_寻找 [程序集_记录甲])
程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图
判断循环尾 ()
计次循环尾 ()
程序集_记录甲 ＝ 5
编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容
子程序找图一 (程序集_寻找 [程序集_记录甲])
输出调试文本 (“=====================================”)
编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容
子程序找图一 (程序集_寻找 [程序集_记录甲])
编辑框提示信息区.内容 ＝ “运行完毕!” ＋ #换行符 ＋ 编辑框提示信息区.内容

子程序名	返回值类型	公开	备 注
子程序找图一	逻辑型		找图最底层。
参数名	类 型	参考	可空	数组	备 注
参数_找图	自定义寻找甲

变量名	类 型	静态	数组	备 注
局部_位置	文本型
局部_位置数组	文本型		0
i	整数型
局部_X移数	整数型
局部_Y移数	整数型
计次	整数型
局部_临时甲	整数型			用来作为循环进入或退出条件
局部_临时乙	整数型			用来记录运行了几次，大于某次退出
计次连几图	整数型

局部_临时甲 ＝ 1
判断循环首 (局部_临时甲 ＝ 1)
计次循环首 (程序集_寻找 [程序集_记录甲].成员连几图, 计次连几图)
如果真 (局部_临时乙 ＝ 1)
dm.MoveTo (10, 10)
' 为了消除鼠标挡住图标的情况。
子程序提示信息 (“正在处理” ＋ 参数_找图.成员图片名 ＋ “图片！”)
局部_位置 ＝ dm.FindPicE (程序集_起点X, 程序集_起点Y, 程序集_屏幕宽度, 程序集_屏幕高度, 程序集_图片路径 ＋ 参数_找图.成员图片名, “080808”, 0.9, 0)
输出调试文本 (参数_找图.成员图片名)
输出调试文本 (局部_位置)
局部_位置数组 ＝ 分割文本 (局部_位置, “|”, )
如果 (到整数 (局部_位置数组 [1]) ＞ -1)
子程序提示信息 (“找到图片：” ＋ 局部_位置)
计次循环首 (3, i)
输出调试文本 (局部_位置数组 [i])
计次循环尾 ()
程序集_找到图片X点 ＝ 到整数 (局部_位置数组 [2])
程序集_找到图片Y点 ＝ 到整数 (局部_位置数组 [3])
如果真 (参数_找图.成员处理方式 ＝ “左单击”)
dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)
输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
程序_延时 (800, 0)
dm.LeftClick ()
输出调试文本 (“左单击”)
如果真 (参数_找图.成员处理方式 ＝ “右单击”)
dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)
输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
程序_延时 (800, 0)
dm.RightClick ()
输出调试文本 (“右单击”)
如果真 (参数_找图.成员处理方式 ＝ “左双击”)
dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)
输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
程序_延时 (800, 0)
dm.LeftDoubleClick ()
输出调试文本 (“左双击”)
如果真 (参数_找图.成员处理方式 ＝ “按下左键”)
dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)
输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)
程序_延时 (800, 0)
dm.LeftDown ()
输出调试文本 (“按下左键”)
如果真 (程序集_按下左X ≠ 0 或 程序集_按下左Y ≠ 0)
' 这里只能横移或竖移鼠标。
如果 (程序集_按下左X ＞ 0)
计次循环首 (程序集_按下左X, 计次)
dm.MoveR (1, 0)
程序_延时 (10, 0)
计次循环尾 ()
计次循环首 (取绝对值 (程序集_按下左X), 计次)
dm.MoveR (-1, 0)
程序_延时 (10, 0)
计次循环尾 ()
如果 (程序集_按下左Y ＞ 0)
计次循环首 (程序集_按下左Y, 计次)
dm.MoveR (0, 1)
程序_延时 (10, 0)
计次循环尾 ()
计次循环首 (取绝对值 (程序集_按下左Y), 计次)
dm.MoveR (0, -1)
程序_延时 (10, 0)
计次循环尾 ()
程序_延时 (200, 0)dm.LeftUp ()
程序集_按下左X ＝ 0
程序集_按下左Y ＝ 0

局部_临时甲 ＝ 2
程序_延时 (参数_找图.成员等待毫秒, 0)
返回 (真)
程序_延时 (100, 0)

计次循环尾 ()
如果真 (局部_临时乙 ＞ 20)
子程序提示信息 (“找不到” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ “图片。”)
跳出循环 ()
局部_临时乙 ＝ 局部_临时乙 ＋ 1
程序_延时 (200, 0)
判断循环尾 ()
返回 (假)

子程序名	返回值类型	公开	备 注
子程序添加数组
参数名	类 型	参考	可空	数组	备 注
参数文本型	文本型

变量名	类 型	静态	数组	备 注
局部_临时数组	文本型		0
局部_临时甲	自定义寻找甲

' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】
局部_临时数组 ＝ 分割文本 (参数文本型, “||”, )
如果真 (取数组成员数 (局部_临时数组) ≠ 6)
信息框 (“添加【程序集_寻找】数组出错”, 0, , )
返回 ()
局部_临时甲.成员图片名 ＝ 局部_临时数组 [1]
局部_临时甲.成员处理方式 ＝ 局部_临时数组 [2]
局部_临时甲.成员相对X移 ＝ 到整数 (局部_临时数组 [3])
局部_临时甲.成员相对Y移 ＝ 到整数 (局部_临时数组 [4])
局部_临时甲.成员等待毫秒 ＝ 到整数 (局部_临时数组 [5])
局部_临时甲.成员连几图 ＝ 到整数 (局部_临时数组 [6])
加入成员 (程序集_寻找, 局部_临时甲)

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

变量名	类 型	静态	数组	备 注
局部_找图	文本型		0
计次	整数型
计次连几图	整数型
局部_整数型个数	整数型			用来记录 程序集 寻找 数组的个数。

程序_延时 (1000, 0)
子程序取消聊天窗口 ()
子程序初始化程数据 ()
' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】
加入成员 (局部_找图, “酒店001.bmp||左单击||30||46||1000||1”)
加入成员 (局部_找图, “酒店002.bmp||按下左键||5||5||1000||1”)
计次循环首 (取数组成员数 (局部_找图), 计次)
子程序添加数组 (局部_找图 [计次])
计次循环尾 ()
局部_整数型个数 ＝ 取数组成员数 (程序集_寻找)
输出调试文本 (局部_整数型个数)
判断循环首 (局部_整数型个数 ≥ 程序集_记录甲)
编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容
如果真 (程序集_记录甲 ＝ 2)
程序集_按下左Y ＝ 110
子程序找图一 (程序集_寻找 [程序集_记录甲])
程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图
判断循环尾 ()
编辑框提示信息区.内容 ＝ “酒店，操作完成！” ＋ #换行符 ＋ 编辑框提示信息区.内容

子程序名	返回值类型	公开	备 注
子程序取消聊天窗口

变量名	类 型	静态	数组	备 注
局部_找图	文本型		0
计次	整数型
计次连几图	整数型
局部_位置	文本型

子程序初始化程数据 ()
' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】
加入成员 (局部_找图, “聊天001.bmp||左单击||5||5||100||1”)
加入成员 (局部_找图, “聊天001-1.bmp||左单击||5||5||100||1”)
加入成员 (局部_找图, “聊天001-1.bmp||左单击||5||5||100||1”)
加入成员 (局部_找图, “聊天002.bmp||不单击||5||5||100||1”)
计次循环首 (取数组成员数 (局部_找图), 计次)
子程序添加数组 (局部_找图 [计次])
计次循环尾 ()
输出调试文本 (取数组成员数 (程序集_寻找))
如果 (子程序找图一 (程序集_寻找 [4]))
计次 ＝ 10
计次 ＝ 100
判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲 且 计次 ＝ 10)
编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容
子程序找图一 (程序集_寻找 [程序集_记录甲])
程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图
判断循环尾 ()

子程序名	返回值类型	公开	备 注
子程序提示信息
参数名	类 型	参考	可空	数组	备 注
参数提示信息	文本型

编辑框提示信息区.内容 ＝ 参数提示信息 ＋ 到文本 (取现行时间 ()) ＋ #换行符 ＋ 编辑框提示信息区.内容

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

变量名	类 型	静态	数组	备 注
局部_找图	文本型		0
计次	整数型
计次连几图	整数型

程序_延时 (1000, 0)
子程序初始化程数据 ()
' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】
加入成员 (局部_找图, “征战001.bmp||左单击||18||10||1200||1”)
计次循环首 (取数组成员数 (局部_找图), 计次)
子程序添加数组 (局部_找图 [计次])
输出调试文本 (计次)
计次循环尾 ()
输出调试文本 (取数组成员数 (程序集_寻找))
判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲)
子程序提示信息 (“找图：” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ “开始！”)
子程序找图一 (程序集_寻找 [程序集_记录甲])
程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图
判断循环尾 ()
输出调试文本 (“继续开始”)

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

如果 (按钮点鼠.标题 ＝ “点”)
时钟1.时钟周期 ＝ 500
按钮点鼠.标题 ＝ “停”
按钮点鼠.标题 ＝ “点”
时钟1.时钟周期 ＝ 0

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

dm.LeftClick ()

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

窗口_热键卸载 (_启动窗口.取窗口句柄 (), 1)

i支持库列表	支持库注释
dm	(未知支持库)

.版本 2<br /> .支持库 dm<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 dm, dmsoft<br /> .程序集变量 程序集_起点X, 整数型, , , 查找范围<br /> .程序集变量 程序集_起点Y, 整数型, , , 查找范围<br /> .程序集变量 程序集_屏幕宽度, 整数型, , , 查找范围<br /> .程序集变量 程序集_屏幕高度, 整数型, , , 查找范围<br /> .程序集变量 程序集_图片路径, 文本型, , , 用来存放图片的路径<br /> .程序集变量 程序集_寻找, 自定义寻找甲, , "0"<br /> .程序集变量 程序集_记录甲, 整数型, , , 用来记录当前运行<br /> .程序集变量 程序集_循环标记, 逻辑型, , , 进入或跳出循环所用<br /> .程序集变量 程序集_按下左X, 整数型, , , 当按下左键时，X移动距离<br /> .程序集变量 程序集_按下左Y, 整数型, , , 当按下左键时，X移动距离<br /> .程序集变量 程序集_找到图片X点, 整数型<br /> .程序集变量 程序集_找到图片Y点, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' 【程序集_寻找】数组的成员如下。<br /> ' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】<br /> 程序集_起点X ＝ 0<br /> 程序集_起点Y ＝ 0<br /> 程序集_屏幕宽度 ＝ 取屏幕宽度 ()<br /> 程序集_屏幕高度 ＝ 取屏幕高度 ()<br /> 程序集_图片路径 ＝ 取运行目录 () ＋ “\pic\”<br /> 窗口_热键注册 (_启动窗口.取窗口句柄 (), 2, #Q键, &_按钮点鼠_被单击, 1)<br /> <br /> <br /> .子程序 子程序初始化程数据, , , 初始化程序集的数据<br /> <br /> 清除数组 (程序集_寻找)<br /> 程序集_记录甲 ＝ 1<br /> 程序集_循环标记 ＝ 真<br /> 编辑框提示信息区.内容 ＝ “”<br /> <br /> .子程序 _按钮征战_被单击<br /> .局部变量 局部_找图, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 计次连几图, 整数型<br /> <br /> 程序_延时 (1000, 0)<br /> 子程序初始化程数据 ()<br /> ' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】<br /> 加入成员 (局部_找图, “征战001.bmp||左单击||18||10||1200||1”)<br /> 加入成员 (局部_找图, “征战002.bmp||左单击||30||46||1000||1”)<br /> 加入成员 (局部_找图, “征战003.bmp||左单击||16||9||1000||1”)<br /> 加入成员 (局部_找图, “征战004.bmp||左单击||16||9||3000||1”)<br /> 加入成员 (局部_找图, “征战005.bmp||左单击||18||20||2000||1”)<br /> 加入成员 (局部_找图, “征战006.bmp||左单击||30||46||2000||1”)<br /> 加入成员 (局部_找图, “征战007.bmp||左单击||8||8||2000||2”)<br /> 加入成员 (局部_找图, “征战007-1.bmp||左单击||8||8||2000||1”)<br /> .计次循环首 (取数组成员数 (局部_找图), 计次)<br />     子程序添加数组 (局部_找图 [计次])<br /> .计次循环尾 ()<br /> 输出调试文本 (取数组成员数 (程序集_寻找))<br /> .判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲)<br />     编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容<br />     子程序找图一 (程序集_寻找 [程序集_记录甲])<br />     程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图<br /> .判断循环尾 ()<br /> .计次循环首 (4, 计次)<br />     程序集_记录甲 ＝ 3<br />     .判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲)<br />         编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容<br />         子程序找图一 (程序集_寻找 [程序集_记录甲])<br />         程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图<br />     .判断循环尾 ()<br /> .计次循环尾 ()<br /> 程序集_记录甲 ＝ 5<br /> 编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容<br /> 子程序找图一 (程序集_寻找 [程序集_记录甲])<br /> 输出调试文本 (“=====================================”)<br /> 编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容<br /> 子程序找图一 (程序集_寻找 [程序集_记录甲])<br /> 编辑框提示信息区.内容 ＝ “运行完毕!” ＋ #换行符 ＋ 编辑框提示信息区.内容<br /> <br /> .子程序 子程序找图一, 逻辑型, , 找图最底层。<br /> .参数 参数_找图, 自定义寻找甲<br /> .局部变量 局部_位置, 文本型<br /> .局部变量 局部_位置数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 局部_X移数, 整数型<br /> .局部变量 局部_Y移数, 整数型<br /> .局部变量 计次, 整数型<br /> .局部变量 局部_临时甲, 整数型, , , 用来作为循环进入或退出条件<br /> .局部变量 局部_临时乙, 整数型, , , 用来记录运行了几次，大于某次退出<br /> .局部变量 计次连几图, 整数型<br /> <br /> 局部_临时甲 ＝ 1<br /> .判断循环首 (局部_临时甲 ＝ 1)<br />     .计次循环首 (程序集_寻找 [程序集_记录甲].成员连几图, 计次连几图)<br />         .如果真 (局部_临时乙 ＝ 1)<br />             dm.MoveTo (10, 10)<br />             ' 为了消除鼠标挡住图标的情况。<br />         .如果真结束<br />         子程序提示信息 (“正在处理” ＋ 参数_找图.成员图片名 ＋ “图片！”)<br />         局部_位置 ＝ dm.FindPicE (程序集_起点X, 程序集_起点Y, 程序集_屏幕宽度, 程序集_屏幕高度, 程序集_图片路径 ＋ 参数_找图.成员图片名, “080808”, 0.9, 0)<br />         输出调试文本 (参数_找图.成员图片名)<br />         输出调试文本 (局部_位置)<br />         局部_位置数组 ＝ 分割文本 (局部_位置, “|”, )<br />         .如果 (到整数 (局部_位置数组 [1]) ＞ -1)<br />             子程序提示信息 (“找到图片：” ＋ 局部_位置)<br />             .计次循环首 (3, i)<br />                 输出调试文本 (局部_位置数组 <i>)<br />             .计次循环尾 ()<br />             程序集_找到图片X点 ＝ 到整数 (局部_位置数组 [2])<br />             程序集_找到图片Y点 ＝ 到整数 (局部_位置数组 [3])<br />             .如果真 (参数_找图.成员处理方式 ＝ “左单击”)<br />                 dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)<br />                 输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 程序_延时 (800, 0)<br />                 dm.LeftClick ()<br />                 输出调试文本 (“左单击”)<br />             .如果真结束<br />             .如果真 (参数_找图.成员处理方式 ＝ “右单击”)<br />                 dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)<br />                 输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 程序_延时 (800, 0)<br />                 dm.RightClick ()<br />                 输出调试文本 (“右单击”)<br />             .如果真结束<br />             .如果真 (参数_找图.成员处理方式 ＝ “左双击”)<br />                 dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)<br />                 输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 程序_延时 (800, 0)<br />                 dm.LeftDoubleClick ()<br />                 输出调试文本 (“左双击”)<br />             .如果真结束<br />             .如果真 (参数_找图.成员处理方式 ＝ “按下左键”)<br />                 dm.MoveTo (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移, 到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 输出调试文本 (到整数 (局部_位置数组 [2]) ＋ 参数_找图.成员相对X移)<br />                 输出调试文本 (到整数 (局部_位置数组 [3]) ＋ 参数_找图.成员相对Y移)<br />                 程序_延时 (800, 0)<br />                 dm.LeftDown ()<br />                 输出调试文本 (“按下左键”)<br />                 .如果真 (程序集_按下左X ≠ 0 或 程序集_按下左Y ≠ 0)<br />                     ' 这里只能横移或竖移鼠标。<br />                     .如果 (程序集_按下左X ＞ 0)<br />                         .计次循环首 (程序集_按下左X, 计次)<br />                             dm.MoveR (1, 0)<br />                             程序_延时 (10, 0)<br />                         .计次循环尾 ()<br />                     .否则<br />                         .计次循环首 (取绝对值 (程序集_按下左X), 计次)<br />                             dm.MoveR (-1, 0)<br />                             程序_延时 (10, 0)<br />                         .计次循环尾 ()<br />                     .如果结束<br />                     .如果 (程序集_按下左Y ＞ 0)<br />                         .计次循环首 (程序集_按下左Y, 计次)<br />                             dm.MoveR (0, 1)<br />                             程序_延时 (10, 0)<br />                         .计次循环尾 ()<br />                     .否则<br />                         .计次循环首 (取绝对值 (程序集_按下左Y), 计次)<br />                             dm.MoveR (0, -1)<br />                             程序_延时 (10, 0)<br />                         .计次循环尾 ()<br />                     .如果结束<br />                     程序_延时 (200, 0)<br />                     dm.LeftUp ()<br />                     程序集_按下左X ＝ 0<br />                     程序集_按下左Y ＝ 0<br />                 .如果真结束<br /> <br />             .如果真结束<br />             局部_临时甲 ＝ 2<br />             程序_延时 (参数_找图.成员等待毫秒, 0)<br />             返回 (真)<br />         .否则<br />             程序_延时 (100, 0)<br />         .如果结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (局部_临时乙 ＞ 20)<br />         子程序提示信息 (“找不到” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ “图片。”)<br />         跳出循环 ()<br />     .如果真结束<br />     局部_临时乙 ＝ 局部_临时乙 ＋ 1<br />     程序_延时 (200, 0)<br /> .判断循环尾 ()<br /> 返回 (假)<br /> <br /> <br /> .子程序 子程序添加数组<br /> .参数 参数文本型, 文本型<br /> .局部变量 局部_临时数组, 文本型, , "0"<br /> .局部变量 局部_临时甲, 自定义寻找甲<br /> <br /> ' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】<br /> 局部_临时数组 ＝ 分割文本 (参数文本型, “||”, )<br /> .如果真 (取数组成员数 (局部_临时数组) ≠ 6)<br />     信息框 (“添加【程序集_寻找】数组出错”, 0, , )<br />     返回 ()<br /> .如果真结束<br /> 局部_临时甲.成员图片名 ＝ 局部_临时数组 [1]<br /> 局部_临时甲.成员处理方式 ＝ 局部_临时数组 [2]<br /> 局部_临时甲.成员相对X移 ＝ 到整数 (局部_临时数组 [3])<br /> 局部_临时甲.成员相对Y移 ＝ 到整数 (局部_临时数组 [4])<br /> 局部_临时甲.成员等待毫秒 ＝ 到整数 (局部_临时数组 [5])<br /> 局部_临时甲.成员连几图 ＝ 到整数 (局部_临时数组 [6])<br /> 加入成员 (程序集_寻找, 局部_临时甲)<br /> <br /> <br /> .子程序 _按钮酒馆_被单击<br /> .局部变量 局部_找图, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 计次连几图, 整数型<br /> .局部变量 局部_整数型个数, 整数型, , , 用来记录 程序集 寻找 数组的个数。<br /> <br /> 程序_延时 (1000, 0)<br /> 子程序取消聊天窗口 ()<br /> 子程序初始化程数据 ()<br /> ' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】<br /> 加入成员 (局部_找图, “酒店001.bmp||左单击||30||46||1000||1”)<br /> 加入成员 (局部_找图, “酒店002.bmp||按下左键||5||5||1000||1”)<br /> .计次循环首 (取数组成员数 (局部_找图), 计次)<br />     子程序添加数组 (局部_找图 [计次])<br /> .计次循环尾 ()<br /> 局部_整数型个数 ＝ 取数组成员数 (程序集_寻找)<br /> 输出调试文本 (局部_整数型个数)<br /> .判断循环首 (局部_整数型个数 ≥ 程序集_记录甲)<br />     编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容<br />     .如果真 (程序集_记录甲 ＝ 2)<br />         程序集_按下左Y ＝ 110<br />     .如果真结束<br />     子程序找图一 (程序集_寻找 [程序集_记录甲])<br />     程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图<br /> .判断循环尾 ()<br /> 编辑框提示信息区.内容 ＝ “酒店，操作完成！” ＋ #换行符 ＋ 编辑框提示信息区.内容<br /> <br /> .子程序 子程序取消聊天窗口<br /> .局部变量 局部_找图, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 计次连几图, 整数型<br /> .局部变量 局部_位置, 文本型<br /> <br /> 子程序初始化程数据 ()<br /> ' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】<br /> 加入成员 (局部_找图, “聊天001.bmp||左单击||5||5||100||1”)<br /> 加入成员 (局部_找图, “聊天001-1.bmp||左单击||5||5||100||1”)<br /> 加入成员 (局部_找图, “聊天001-1.bmp||左单击||5||5||100||1”)<br /> 加入成员 (局部_找图, “聊天002.bmp||不单击||5||5||100||1”)<br /> .计次循环首 (取数组成员数 (局部_找图), 计次)<br />     子程序添加数组 (局部_找图 [计次])<br /> .计次循环尾 ()<br /> 输出调试文本 (取数组成员数 (程序集_寻找))<br /> .如果 (子程序找图一 (程序集_寻找 [4]))<br />     计次 ＝ 10<br /> .否则<br />     计次 ＝ 100<br /> .如果结束<br /> .判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲 且 计次 ＝ 10)<br />     编辑框提示信息区.内容 ＝ “找” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ #换行符 ＋ 编辑框提示信息区.内容<br />     子程序找图一 (程序集_寻找 [程序集_记录甲])<br />     程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图<br /> .判断循环尾 ()<br /> <br /> .子程序 子程序提示信息<br /> .参数 参数提示信息, 文本型<br /> <br /> 编辑框提示信息区.内容 ＝ 参数提示信息 ＋ 到文本 (取现行时间 ()) ＋ #换行符 ＋ 编辑框提示信息区.内容<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局部_找图, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 计次连几图, 整数型<br /> <br /> 程序_延时 (1000, 0)<br /> 子程序初始化程数据 ()<br /> ' 1成员图片名【文本型】、2成员处理方式【文本型】、3成员相对X移【整数型】、4成员相对Y移【整数型】、5成员等待毫秒【整数型】、6成员连几图【整数型】<br /> 加入成员 (局部_找图, “征战001.bmp||左单击||18||10||1200||1”)<br /> .计次循环首 (取数组成员数 (局部_找图), 计次)<br />     子程序添加数组 (局部_找图 [计次])<br />     输出调试文本 (计次)<br /> .计次循环尾 ()<br /> 输出调试文本 (取数组成员数 (程序集_寻找))<br /> .判断循环首 (取数组成员数 (程序集_寻找) ≥ 程序集_记录甲)<br />     子程序提示信息 (“找图：” ＋ 程序集_寻找 [程序集_记录甲].成员图片名 ＋ “开始！”)<br />     子程序找图一 (程序集_寻找 [程序集_记录甲])<br />     程序集_记录甲 ＝ 程序集_记录甲 ＋ 程序集_寻找 [程序集_记录甲].成员连几图<br /> .判断循环尾 ()<br /> 输出调试文本 (“继续开始”)<br /> <br /> .子程序 _按钮点鼠_被单击<br /> <br /> .如果 (按钮点鼠.标题 ＝ “点”)<br />     时钟1.时钟周期 ＝ 500<br />     按钮点鼠.标题 ＝ “停”<br /> .否则<br />     按钮点鼠.标题 ＝ “点”<br />     时钟1.时钟周期 ＝ 0<br /> .如果结束<br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> dm.LeftClick ()<br /> <br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> 窗口_热键卸载 (_启动窗口.取窗口句柄 (), 1)

tianxi

看不懂 一大堆

克里斯托

赞一个，共享精神值得赞

zhulei0524

我只是来赚一点JB

cyfei

赞一个，共享精神值得赞

感谢无阻大哥

感谢，研究一下

wjswzj0

感谢，研究一下

Movax

要自己对着打一遍看效果？

anner

直接发源码

anying860452

感谢，研究一下

aini1wna2

这样的建议直接发源码