模拟器游戏...，图色

mengxinmeng

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
程_日志条数	整数型
程_线程句柄	整数型
程_xy	xy	12
程_暂停	逻辑型
程_任务完成	逻辑型

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

热键_监视 ( #空格键, , 到整数 (&暂停), , , )
日志输出____ (“句柄不用填”)
日志输出____ (“空格键 暂停”)
日志输出____ (“欢迎使用 挂机拖狗.........”)

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

变量名	类 型	静态	数组	备 注
句柄	整数型

句柄 ＝ 到整数 (编辑框_句柄.内容)
如果真 (句柄 ＝ 0)
句柄 ＝ ck.句柄查找 (“雷电模拟器”, , , , , , , , , , , , )
如果真 (程_线程句柄 ≠ 0)
ts.后台_解绑 ()
线程销毁 (程_线程句柄, )
日志输出____ (“解绑成功”)
返回 ()
如果真 (ts.后台_绑定 (句柄, 1, , , , ))
ck.置宽高 (句柄, 510, 868)
日志输出____ (“绑定成功”)
程_线程句柄 ＝ 线程启动 (&主线程, , )
返回 ()
日志输出____ (“绑定错误： 当前句柄 ” ＋ 到文本 (句柄))
日志输出____ (“启动雷电模拟器”)
日志输出____ (“运行游戏 再叫我 拖狗”)

子程序名	返回值类型	公开	备 注
取占比例	小数型		取一张图 的某个颜色 占整张图的百分比
参数名	类 型	参考	可空	数组	备 注
图像1	字节集
颜色	整数型

变量名	类 型	静态	数组	备 注
tx1	图像xx处理类
i	整数型
ii	整数型
计数	整数型
总数	双精度小数型

tx1.载入xx (图像1, )
计次循环首 (tx1.取宽度 (), i)
计次循环首 (tx1.取高度 (), ii)
如果真 (tx1.取点颜色 (i － 1, ii － 1) ＝ 颜色)
计数 ＝ 计数 ＋ 1

计次循环尾 ()
计次循环尾 ()
返回 (计数 ÷ (tx1.取宽度 () × tx1.取高度 ()) × 100)

子程序名	返回值类型	公开	备 注
日志输出____
参数名	类 型	参考	可空	数组	备 注
内容	文本型

如果真 (程_日志条数 ≥ 300)
编辑框_日志.内容 ＝ #空
程_日志条数 ＝ 程_日志条数 ＋ 1
编辑框_日志.加入文本 (内容 ＋ #换行符 )

子程序名	返回值类型	公开	备 注
主线程

变量名	类 型	静态	数组	备 注
图片1	字节集		0
购买次数	整数型
x1	整数型
y1	整数型

超级延时 (300, )
循环判断首 ()
如果真 (程_暂停)
超级延时 (300, )
到循环尾 ()
干扰 ()
截图所有标志 (图片1)
如果真 (进行对比_拖动 (图片1, 购买次数))
获取金币 (购买次数)

循环判断尾 (程_线程句柄 ≠ 0)

子程序名	返回值类型	公开	备 注
干扰

ts.鼠标_移至点击 (373, 324, )
ts.鼠标_移至点击 (413, 70, )
超级延时 (100, )
ts.鼠标_移至点击 (250, 519, )
如果真 (取占比例 (ts.图色_截图 (164, 499, 345, 544, , ), 颜色_RGB色到易格式颜色 (“73DE73”)) ＞ 0.9)
ts.鼠标_移至点击 (286, 541, )
判断循环首 (取占比例 (ts.图色_截图 (129, 406, 340, 454, , ), 颜色_RGB色到易格式颜色 (“646465”)) ＞ 2.1)
超级延时 (500, )
日志输出____ (“前方有遮挡.....” ＋ #换行符 ＋ “等待中.......”)
判断循环尾 ()
' 调试输出 (取占比例 (ts.图色_截图 (129, 406, 340, 454, , ), 颜色_RGB色到易格式颜色 (“646465”)))

子程序名	返回值类型	公开	备 注
获取金币
参数名	类 型	参考	可空	数组	备 注
购买几次	整数型

变量名	类 型	静态	数组	备 注
x	整数型
y	整数型
x1	整数型
y1	整数型
逻辑	逻辑型
i	整数型

' 商店位置
x ＝ 386
y ＝ 378
日志输出____ (“开始买狗>>>>>>”)
如果真 (程_任务完成)
ts.后台_解绑 ()
日志输出____ (“任务完成”)
程_任务完成 ＝ 假
线程销毁 (程_线程句柄, )

计次循环首 (购买几次, i)
' ts.鼠标_移至点击 (231, 703, )
ts.鼠标_移至点击 (255, 747, )
如果真 (取占比例 (ts.图色_截图 (122, 516, 349, 565, , ), 颜色_RGB色到易格式颜色 (“73DE73”)) ＞ 1.1) ' 大于代表广告弹窗
日志输出____ (“吐血的广告到了....”)
ts.鼠标_移至点击 (250, 519, ) ' 点击广告
超级延时 (16, 1) ' 广告30秒C
超级延时 (10, 1)
超级延时 (10, 1)
跳出循环 ()
如果真 (取占比例 (ts.图色_截图 (126, 519, 353, 565, , ), 颜色_RGB色到易格式颜色 (“F4F4F4”)) ＞ 1.1)
ts.鼠标_移至点击 (397, 304, )
程_任务完成 ＝ 真
. ' 如果真 (购买几次 ＝ i)
' ts.鼠标_移至点击 (235, 758, )
超级延时 (500, )
计次循环尾 ()

子程序名	返回值类型	公开	备 注
进行对比_拖动	逻辑型		返回真 代表无狗可拖
参数名	类 型	参考	可空	数组	备 注
图像1	字节集
返回无狗空槽	整数型

变量名	类 型	静态	数组	备 注
i	整数型
局_图像	字节集		0
图像相似度标准	小数型			大于标准代表相似
局_tx1	图像xx处理类
ii	整数型
跳出	逻辑型
购买次数	整数型
随机数	整数型

图像相似度标准 ＝ 0.81
' 这里我要把现有的一样的都进行拖动合体
局_图像 ＝ 图像1
计次循环首 (取数组成员数 (图像1), i)
如果真 (取占比例 (局_图像 [i], #黑色 ) ＞ 90) ' 先进行计算百分比 测试为大于 90% 为没有狗
局_图像 [i] ＝ { 1 } ' 赋值 1 代表处无狗
购买次数 ＝ 购买次数 ＋ 1

计次循环尾 ()
返回无狗空槽 ＝ 购买次数
计次循环首 (12, i)
tx.载入xx (局_图像 [i], )
计次循环首 (12, ii)
如果真 (i ＝ ii) ' 同一张图不进行对比
到循环尾 ()
局_tx1.载入xx (局_图像 [ii], )
如果真 (tx.图像相似度对比 (局_tx1) ＞ 图像相似度标准)
' 进行拖动
ts.鼠标_拖动 (程_xy [i].x, 程_xy [i].y, 程_xy [ii].x, 程_xy [ii].y, 真, , 10)
跳出 ＝ 真
跳出循环 ()

计次循环尾 ()
如果真 (跳出)
跳出循环 ()

计次循环尾 ()
随机数 ＝ 取随机数2 (1, 12)
如果真 (购买次数 ＝ 1 或 购买次数 ＝ 0)
ts.鼠标_拖动 (程_xy [8].x, 程_xy [8].y, 程_xy [随机数].x, 程_xy [随机数].y, 真, , 10)

超级延时 (400, )
如果真 (i ＝ 13 且 ii ＝ 13)
返回 (真)
返回 (假)

子程序名	返回值类型	公开	备 注
截图所有标志
参数名	类 型	参考	可空	数组	备 注
等级图	字节集

变量名	类 型	静态	数组	备 注
i	整数型
x1	整数型
y1	整数型
宽	整数型
高	整数型
横向间距	整数型
图像1	字节集		0
新x1	整数型

x1 ＝ 101
y1 ＝ 478
宽 ＝ 14
高 ＝ 21
横向间距 ＝ 107
计次循环首 (4, i)
新x1 ＝ x1 ��� (i － 1) × 横向间距
加入成员 (图像1, 图片获取 (新x1, y1, 新x1 ＋ 宽, y1 ＋ 高))
程_xy [i].x ＝ 新x1
程_xy [i].y ＝ y1
' 调试输出 (y1 ＋ 高)
计次循环尾 ()
y1 ＝ 585
计次循环首 (4, i)
新x1 ＝ x1 ��� (i － 1) × 横向间距
加入成员 (图像1, 图片获取 (新x1, y1, 新x1 ＋ 宽, y1 ＋ 高))
程_xy [i ＋ 4].x ＝ 新x1
程_xy [i ＋ 4].y ＝ y1
' 调试输出 (y1 ＋ 高)
计次循环尾 ()
y1 ＝ 692
计次循环首 (4, i)
新x1 ＝ x1 ��� (i － 1) × 横向间距
加入成员 (图像1, 图片获取 (新x1, y1, 新x1 ＋ 宽, y1 ＋ 高))
程_xy [i ＋ 8].x ＝ 新x1
程_xy [i ＋ 8].y ＝ y1
' 调试输出 (y1 ＋ 高)
计次循环尾 ()
等级图 ＝ 图像1

子程序名	返回值类型	公开	备 注
暂停

程_暂停 ＝ 取反 (程_暂停)

.版本 2<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 程_日志条数, 整数型<br /> .程序集变量 程_线程句柄, 整数型<br /> .程序集变量 程_xy, xy, , "12"<br /> .程序集变量 程_暂停, 逻辑型<br /> .程序集变量 程_任务完成, 逻辑型<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> 热键_监视 (#空格键, , 到整数 (&暂停), , , )<br /> 日志输出____ (“句柄不用填”)<br /> 日志输出____ (“空格键 暂停”)<br /> 日志输出____ (“欢迎使用 挂机拖狗.........”)<br /> <br /> <br /> .子程序 _按钮_GO_被单击<br /> .局部变量 句柄, 整数型<br /> <br /> <br /> 句柄 ＝ 到整数 (编辑框_句柄.内容)<br /> .如果真 (句柄 ＝ 0)<br /> 句柄 ＝ ck.句柄查找 (“雷电模拟器”, , , , , , , , , , , , )<br /> .如果真结束<br /> .如果真 (程_线程句柄 ≠ 0)<br /> ts.后台_解绑 ()<br /> 线程销毁 (程_线程句柄, )<br /> 日志输出____ (“解绑成功”)<br /> 返回 ()<br /> .如果真结束<br /> .如果真 (ts.后台_绑定 (句柄, 1, , , , ))<br /> ck.置宽高 (句柄, 510, 868)<br /> 日志输出____ (“绑定成功”)<br /> 程_线程句柄 ＝ 线程启动 (&主线程, , )<br /> 返回 ()<br /> .如果真结束<br /> 日志输出____ (“绑定错误： 当前句柄 ” ＋ 到文本 (句柄))<br /> 日志输出____ (“启动雷电模拟器”)<br /> 日志输出____ (“运行游戏 再叫我 拖狗”)<br /> <br /> .子程序 取占比例, 小数型, , 取一张图 的某个颜色 占整张图的百分比<br /> .参数 图像1, 字节集<br /> .参数 颜色, 整数型<br /> .局部变量 tx1, 图像xx处理类<br /> .局部变量 i, 整数型<br /> .局部变量 ii, 整数型<br /> .局部变量 计数, 整数型<br /> .局部变量 总数, 双精度小数型<br /> <br /> tx1.载入xx (图像1, )<br /> .计次循环首 (tx1.取宽度 (), i)<br /> .计次循环首 (tx1.取高度 (), ii)<br /> .如果真 (tx1.取点颜色 (i － 1, ii － 1) ＝ 颜色)<br /> 计数 ＝ 计数 ＋ 1<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环尾 ()<br /> 返回 (计数 ÷ (tx1.取宽度 () × tx1.取高度 ()) × 100)<br /> <br /> .子程序 日志输出____<br /> .参数 内容, 文本型<br /> <br /> .如果真 (程_日志条数 ≥ 300)<br /> 编辑框_日志.内容 ＝ #空<br /> .如果真结束<br /> 程_日志条数 ＝ 程_日志条数 ＋ 1<br /> 编辑框_日志.加入文本 (内容 ＋ #换行符)<br /> <br /> <br /> .子程序 主线程<br /> .局部变量 图片1, 字节集, , "0"<br /> .局部变量 购买次数, 整数型<br /> .局部变量 x1, 整数型<br /> .局部变量 y1, 整数型<br /> <br /> 超级延时 (300, )<br /> .循环判断首 ()<br /> .如果真 (程_暂停)<br /> 超级延时 (300, )<br /> 到循环尾 ()<br /> .如果真结束<br /> 干扰 ()<br /> 截图所有标志 (图片1)<br /> .如果真 (进行对比_拖动 (图片1, 购买次数))<br /> <br /> 获取金币 (购买次数)<br /> .如果真结束<br /> <br /> .循环判断尾 (程_线程句柄 ≠ 0)<br /> <br /> <br /> .子程序 干扰<br /> <br /> ts.鼠标_移至点击 (373, 324, )<br /> ts.鼠标_移至点击 (413, 70, )<br /> 超级延时 (100, )<br /> ts.鼠标_移至点击 (250, 519, )<br /> .如果真 (取占比例 (ts.图色_截图 (164, 499, 345, 544, , ), 颜色_RGB色到易格式颜色 (“73DE73”)) ＞ 0.9)<br /> ts.鼠标_移至点击 (286, 541, )<br /> .如果真结束<br /> .判断循环首 (取占比例 (ts.图色_截图 (129, 406, 340, 454, , ), 颜色_RGB色到易格式颜色 (“646465”)) ＞ 2.1)<br /> 超级延时 (500, )<br /> 日志输出____ (“前方有遮挡.....” ＋ #换行符 ＋ “等待中.......”)<br /> .判断循环尾 ()<br /> <br /> <br /> ' 调试输出 (取占比例 (ts.图色_截图 (129, 406, 340, 454, , ), 颜色_RGB色到易格式颜色 (“646465”)))<br /> <br /> .子程序 获取金币<br /> .参数 购买几次, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 x1, 整数型<br /> .局部变量 y1, 整数型<br /> .局部变量 逻辑, 逻辑型<br /> .局部变量 i, 整数型<br /> <br /> ' 商店位置<br /> x ＝ 386<br /> y ＝ 378<br /> 日志输出____ (“开始买狗>>>>>>”)<br /> .如果真 (程_任务完成)<br /> ts.后台_解绑 ()<br /> 日志输出____ (“任务完成”)<br /> 程_任务完成 ＝ 假<br /> 线程销毁 (程_线程句柄, )<br /> <br /> .如果真结束<br /> <br /> <br /> .计次循环首 (购买几次, i)<br /> ' ts.鼠标_移至点击 (231, 703, )<br /> ts.鼠标_移至点击 (255, 747, )<br /> .如果真 (取占比例 (ts.图色_截图 (122, 516, 349, 565, , ), 颜色_RGB色到易格式颜色 (“73DE73”)) ＞ 1.1) ' 大于代表广告弹窗<br /> 日志输出____ (“吐血的广告到了....”)<br /> ts.鼠标_移至点击 (250, 519, ) ' 点击广告<br /> 超级延时 (16, 1) ' 广告30秒C<br /> 超级延时 (10, 1)<br /> 超级延时 (10, 1)<br /> 跳出循环 ()<br /> .如果真结束<br /> .如果真 (取占比例 (ts.图色_截图 (126, 519, 353, 565, , ), 颜色_RGB色到易格式颜色 (“F4F4F4”)) ＞ 1.1)<br /> ts.鼠标_移至点击 (397, 304, )<br /> 程_任务完成 ＝ 真<br /> <br /> .如果真结束<br /> .' 如果真 (购买几次 ＝ i)<br /> ' ts.鼠标_移至点击 (235, 758, )<br /> .如果真结束<br /> 超级延时 (500, )<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> <br /> .子程序 进行对比_拖动, 逻辑型, , 返回真 代表无狗可拖<br /> .参数 图像1, 字节集, 数组<br /> .参数 返回无狗空槽, 整数型, 参考<br /> .局部变量 i, 整数型<br /> .局部变量 局_图像, 字节集, , "0"<br /> .局部变量 图像相似度标准, 小数型, , , 大于标准代表相似<br /> .局部变量 局_tx1, 图像xx处理类<br /> .局部变量 ii, 整数型<br /> .局部变量 跳出, 逻辑型<br /> .局部变量 购买次数, 整数型<br /> .局部变量 随机数, 整数型<br /> <br /> 图像相似度标准 ＝ 0.81<br /> ' 这里我要把现有的一样的都进行拖动合体<br /> 局_图像 ＝ 图像1<br /> .计次循环首 (取数组成员数 (图像1), i)<br /> .如果真 (取占比例 (局_图像 <i>, #黑色) ＞ 90) ' 先进行计算百分比 测试为大于 90% 为没有狗<br /> 局_图像 <i> ＝ { 1 } ' 赋值 1 代表处无狗<br /> 购买次数 ＝ 购买次数 ＋ 1<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回无狗空槽 ＝ 购买次数<br /> .计次循环首 (12, i)<br /> tx.载入xx (局_图像 <i>, )<br /> .计次循环首 (12, ii)<br /> .如果真 (i ＝ ii) ' 同一张图不进行对比<br /> 到循环尾 ()<br /> .如果真结束<br /> 局_tx1.载入xx (局_图像 [ii], )<br /> .如果真 (tx.图像相似度对比 (局_tx1) ＞ 图像相似度标准)<br /> ' 进行拖动<br /> ts.鼠标_拖动 (程_xy <i>.x, 程_xy <i>.y, 程_xy [ii].x, 程_xy [ii].y, 真, , 10)<br /> 跳出 ＝ 真<br /> 跳出循环 ()<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .如果真 (跳出) <br /> 跳出循环 ()<br /> .如果真结束<br /> <br /> <br /> <br /> .计次循环尾 ()<br /> <br /> 随机数 ＝ 取随机数2 (1, 12)<br /> .如果真 (购买次数 ＝ 1 或 购买次数 ＝ 0)<br /> ts.鼠标_拖动 (程_xy [8].x, 程_xy [8].y, 程_xy [随机数].x, 程_xy [随机数].y, 真, , 10)<br /> .如果真结束<br /> <br /> 超级延时 (400, )<br /> .如果真 (i ＝ 13 且 ii ＝ 13)<br /> 返回 (真)<br /> .如果真结束<br /> 返回 (假)<br /> <br /> .子程序 截图所有标志<br /> .参数 等级图, 字节集, 参考 数组<br /> .局部变量 i, 整数型<br /> .局部变量 x1, 整数型<br /> .局部变量 y1, 整数型<br /> .局部变量 宽, 整数型<br /> .局部变量 高, 整数型<br /> .局部变量 横向间距, 整数型<br /> .局部变量 图像1, 字节集, , "0"<br /> .局部变量 新x1, 整数型<br /> <br /> x1 ＝ 101<br /> y1 ＝ 478<br /> 宽 ＝ 14<br /> 高 ＝ 21<br /> 横向间距 ＝ 107<br /> <br /> <br /> .计次循环首 (4, i)<br /> 新x1 ＝ x1 ＋ (i － 1) × 横向间距<br /> 加入成员 (图像1, 图片获取 (新x1, y1, 新x1 ＋ 宽, y1 ＋ 高))<br /> 程_xy <i>.x ＝ 新x1<br /> 程_xy <i>.y ＝ y1<br /> ' 调试输出 (y1 ＋ 高)<br /> .计次循环尾 ()<br /> <br /> y1 ＝ 585<br /> .计次循环首 (4, i)<br /> 新x1 ＝ x1 ＋ (i － 1) × 横向间距<br /> 加入成员 (图像1, 图片获取 (新x1, y1, 新x1 ＋ 宽, y1 ＋ 高))<br /> 程_xy [i ＋ 4].x ＝ 新x1<br /> 程_xy [i ＋ 4].y ＝ y1<br /> <br /> ' 调试输出 (y1 ＋ 高)<br /> .计次循环尾 ()<br /> y1 ＝ 692<br /> .计次循环首 (4, i)<br /> 新x1 ＝ x1 ＋ (i － 1) × 横向间距<br /> 加入成员 (图像1, 图片获取 (新x1, y1, 新x1 ＋ 宽, y1 ＋ 高))<br /> 程_xy [i ＋ 8].x ＝ 新x1<br /> 程_xy [i ＋ 8].y ＝ y1<br /> <br /> ' 调试输出 (y1 ＋ 高)<br /> .计次循环尾 ()<br /> 等级图 ＝ 图像1<br /> <br /> <br /> .子程序 暂停<br /> <br /> 程_暂停 ＝ 取反 (程_暂停)

模块   乐玩模块  太大了没发传 精易搜
云   https://share.weiyun.com/5Q6KsLn

xnkj116

看不明白 是什么模拟器

10883004

看不明白 是什么模拟器

walter97

模块   乐玩模块  太大了没发传 精易搜

外星星人

感谢楼主分享