按键精灵手机版多点找色，图片对比 by <剑行洪荒> 忠哥
代码：
Do
Dim ret1,ret2
Delay 500
ret1 = CmpColor(76,72, "153274", 0.9)
ret2 = CmpColor(81,574, "CCEFFF", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 72, 92
Delay 300
Tap 73,608
Exit Do
End If
Loop
代码：
Do
FindPic 0,0,1080,1920, "Attachment:k确定.png", "000000", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
Delay 300
Tap 97, 631
Exit Do
End If
Loop
代码：
RunApp "com.wanmei.xom.uc" 启动UC客户端
killApp "com.wanmei.xom.uc"关闭UC客户端
KeyPress "Back”
KeyPress "Del"
Swipe 251, 940, 251, 840
Exit for
Rem A3 标记 A3
Goto A3 跳转到 A3
代码:
//定义全局变量
Dim a,intX,intY,dx1,dx2,dx3,dx4,dx5,dx6,dx7,dx8,dx9,dx10
dx1= ReadUIConfig("dx1", "") //是否早上6点开始
If dx1=true then
Do
a = DateTime.Hour()
Delay 1000
If a = 6 Then
Exit Do
Else
If a > 6 and a < 12 Then
Exit Do
End If
End If
Loop
End If
代码：
//已点击到账号
Sub 输入958()
Delay 300
InputText "589611958"
Delay 500
Tap 357, 677
Delay 200
InputText "19911031"
Delay 300
KeyPress "Enter"End Sub
代码:
//复杂情况下排错的多重应用（多对一关系）
Sub 刷装备普4()
Do
//扫荡
// Dim intX, intY
FindPic 182, 659, 105, 839, "Attachment:扫荡.png", "000000", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
Tap 146,747
End If//开始
FindPic 179, 584, 117, 675, "Attachment:开始.png", "000000", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
Tap 149,642
End If
//元宝不足
FindPic 186, 554, 126, 720, "Attachment:充值.png", "000000", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
Delay 300
Tap 567,998
Delay 500
goto A1
End If
//确定FindPic 376, 483, 311, 608, "Attachment:确定.png", "000000", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
Tap 263, 640
Delay 500
Goto A1
End If
//包满
FindPic 444, 424, 358, 721, "Attachment:包满.png", "000000", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
Tap 262, 640
Delay 500
Goto A1
End If//是
ret1 = CmpColor(261,480, "0F3059", 0.9)
ret2 = CmpColor(264,743, "103162", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 261,480
End If//退出循环
ret1 = CmpColor(265,621, "BEECF9", 0.9)
ret2 = CmpColor(427,559, "111A23", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 265, 621
Delay 500
Tap 593, 927
Delay 200
Exit Do
End ifLoop
Rem A1
//关闭 副本
Do
//取消
ret1 = CmpColor(266,748, "C0DDEF", 0.9)
ret2 = CmpColor(266,795, "D3F0FE", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 266, 748End If
//关闭背包
ret1 = CmpColor(432,850, "43D1D5", 0.9)
ret2 = CmpColor(432,1012, "3CD0DA", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 681,1134End If
ret1 = CmpColor(679,1112, "1B4374", 0.9)
ret2 = CmpColor(679,1135, "507CAA", 0.9)
If ret1 > -1 and ret2 > -1 Then
Delay 200
Tap 679, 1112
Delay 200
Exit Do
End If
LoopEnd Sub
代码：
//是否中，do loop结构确是一定的处理
//是否第二章精英
do
Delay 700
ret1 = CmpColor(681,296, "000000", 0.9)
ret2 = CmpColor(690,296, "010202", 0.9)
ret3= CmpColor(548,237, "0A0AF1", 0.9)
If ret1 > -1 and ret2 > -1 and ret3 > -1 Then
Exit Do
Else
Swipe 410, 1051, 410, 800
End If
Loop
代码:
//艺术就是代码 by忠哥
Sub 小交易()
Dim ret1,ret2,intX, intY
Rem j2
//交易
Do
Delay 500
//点开交易
ret1 = CmpColor(537,1056, "151840", 0.9)
ret2 = CmpColor(531,1050, "0F133E", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 521, 1049
Delay 500
Tap 262, 504
End If
//是 否交易
// FindPic 445,423, 365,573, "Attachment:八.png", "000000", 0, 0.9, intX, intY
// If intX > -1 And intY > -1 Then
// Tap 262, 504
// Else
// ret1 = CmpColor(265,742, "113263", 0.9)
// ret2 = CmpColor(260,772, "CEEBFA", 0.9)
// If ret1 > -1 and ret2 > -1 Then
// Tap 265,772
// End If
// End If
FindPic 705,597, 667,674, "Attachment:交易.png", "000000", 0, 0.9, intX, intY
If intX > -1 And intY > -1 Then
Exit Do
End If
Loop
//交易装备
Delay 500
ret1 = CmpColor(550,863, "3E6590", 0.9)
ret2 = CmpColor(546, 900, "3E6590", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 681,1131
Goto A3
End If
Dim x,y
x = 547
For 2
y=880
For 3
Delay 500
Tap x, y
Delay 500
ret1 = CmpColor(77,520, "CEEBFA", 0.9)
ret2 = CmpColor(73,489, "07214C", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 77,520
End If
y=y+111
Next
x=x-111
Next
delay 300
Tap 54, 896
Delay 100
Do
ret1 = CmpColor(57,1039, "0D2E5F", 0.9)
ret2 = CmpColor(60,1114, "05264F", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 57, 1039
Exit Do
End If
Loop
Do
ret1 = CmpColor(537,1056, "151840", 0.9)
ret2 = CmpColor(531,1050, "0F133E", 0.9)
If ret1 > -1 and ret2 > -1 Then
Goto j2
End If
LoopRem A3
End Sub
代码：
//相对于上面多重多对一，if嵌套能不用尽量不用吧，呃我觉得。只有当必须要搞的时候，才去嵌套。正常情况下，游戏逻辑是不可逆的。所以流水线般运作的程序完全不必担心.
Sub 刷装备4()
Do
Dim ret1,ret2
ret1 = CmpColor(185,1130, "C8E0FF", 0.9)
ret2 = CmpColor(191,1125, "B3C8D8", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 199,1133
Exit Do
End If
Loop
Delay 500
Tap 205, 1134
Do
Delay 700
ret1 = CmpColor(682,278, "010203", 0.9)
ret2 = CmpColor(678,285, "000101", 0.9)
If ret1 > -1 and ret2 > -1 Then
Exit Do
Else
Swipe 520, 990, 520, 900
End If
LoopDim x,y
x = 463
y=376
For 3
rem g1
Delay 300Tap x, y
Delay 300
Tap 147, 757
Delay 500
ret1 = CmpColor(261,631, "C1EFFB", 0.9)
ret2 = CmpColor(357,505, "D10102", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 261, 631
Delay 500
Tap 375,936
delay 300
Tap 367, 661
Delay 300
Tap 246, 509
Delay 300
Tap 677, 1131
Exit for
End If
Do
delay 300
Tap 138, 640
Delay 300
Tap 265, 501
Delay 500
ret1 = CmpColor(261,631, "C1EFFB", 0.9)
ret2 = CmpColor(422,559, "000000", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 261, 631
Delay 500
ret1 = CmpColor(592,927, "15213F", 0.9)
ret2 = CmpColor(589,932, "111A37", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 589,932
End If
Exit Do
End Ifret1 = CmpColor(261,631, "C1EFFB", 0.9)
ret2 = CmpColor(357,505, "D10102", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 261, 631
Delay 500
Tap 375,936
delay 300
Tap 367, 661
Delay 300
Tap 246, 509
Delay 300
Tap 677, 1131
Delay 300
Tap 594,929
Exit Do
End If
//武器不刷
ret1 = CmpColor(296,1005, "C8B1BD", 0.9)
ret2 = CmpColor(345,1025, "47262E", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 627, 1079
Delay 200
goto g1
End IfLoop
x=x-110
Next
x = 463
y=902
For 3
rem g2
Delay 300Tap x, y
Delay 300
Tap 147, 757
Delay 500
ret1 = CmpColor(261,631, "C1EFFB", 0.9)
ret2 = CmpColor(357,505, "D10102", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 261, 631
Delay 500
Tap 375,936
delay 300
Tap 367, 661
Delay 300
Tap 246, 509
Delay 300
Tap 677, 1131
Exit for
End If
Do
delay 300
Tap 138, 640
Delay 300
Tap 265, 501
Delay 500
ret1 = CmpColor(261,631, "C1EFFB", 0.9)
ret2 = CmpColor(422,559, "000000", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 261, 631
Delay 500
ret1 = CmpColor(592,927, "15213F", 0.9)
ret2 = CmpColor(589,932, "111A37", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 589,932
End If
Exit Do
End Ifret1 = CmpColor(261,631, "C1EFFB", 0.9)
ret2 = CmpColor(357,505, "D10102", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 261, 631
Delay 500
Tap 375,936
delay 300
Tap 367, 661
Delay 300
Tap 246, 509
Delay 300
Tap 677, 1131
Delay 300
Tap 594,929
Exit Do
End If
//武器不刷
ret1 = CmpColor(296,1005, "C8B1BD", 0.9)
ret2 = CmpColor(345,1025, "47262E", 0.9)
If ret1 > -1 and ret2 > -1 Then
Tap 627, 1079
Delay 200
goto g2
End IfLoop
x=x-110
NextDelay 500
ret1 = CmpColor(682,1125, "111A37", 0.9)
ret2 = CmpColor(677,1130, "111A37", 0.9)
If ret1 - 1 and ret2 > -1 Then
Tap 680, 1131
End If
End Sub
按键精灵手机版多点找色，图片对比 by <剑行洪荒> 忠哥的更多相关文章
- 按键精灵安卓版 tap、touch命令 不好用的解决办法！
用按键精灵手机版写脚本来操作新浪微博APP,在关注列表页自动取消关注,代码如下: If x > -1 And y > -1 Then delay 1000 tap x,y delay 10 ...
- 第六篇T语言实例开发，多点找色应用
---恢复内容开始--- 多点找色应用 文字,图形特征的获取 多点找色 功能原型 窗口多点找色(窗口句柄,x1,y1,x2,y2,颜色值,色点组,相似度,方向,返回x,返回y) 功能说明 根据指定的多 ...
- 按键精灵PC版<末日王者>
更新模式[强制] 更新版本[1.28] 更新链接[https://yunfei-1256035889.cos.ap-beijing.myqcloud.com/%E6%9C%AB%E6%97%A5%E4 ...
- 【按键精灵篇】如何做一个自动打开APP进入注册页面自动输入自己手机号
按键精灵,虽然很早听过,但是一直没有真正使用过,所以最近有点时间也简单试一下,通过脚本自动清理APP缓存,打开百家号并自动进入注册页面输入自己的手机号. 软件清单 1. 雷电手机模拟器:https:/ ...
- 按键精灵对APP自动化测试（上）
简单介绍下应用背景:测试安卓app时发现重复点击某一按钮的时候会出现报错,开发修复后提交测试.如果采用手动点击按钮,效率不高,在领导提示下使用按键精灵实现自动操作. 一． 安卓手机按键精灵 ...
- 按键精灵与逍遥安卓ADB连接重键方法
1.按键精灵与逍遥安卓ADB连接安装按键精灵与逍遥安卓这两个软件我不用多说了.安装好后把逍遥安卓安装目录下的三个文件adb.exe,AdbWinApi.dll,AdbWinUsbApi.dll 全部复 ...
- C#实现按键精灵的'找图' '找色' '找字'的功能
http://www.cnblogs.com/JimmyBright/p/4355862.html 背景:游戏辅助功能通常使用按键精灵编写脚本,按键精灵的最大卖点就是能够找到画面中字,图,色,这对于模 ...
- 原来找字也可以这样用ElseIf FindStr 手机按键精灵 跟大漠的区别
原来找字也可以这样用ElseIf FindStr(646, 1109, 776, 1261, "公告小叉", "FFFFFF-333333", 0.9, in ...
- 自己开发iOS版按键精灵--TTouch
利用闲余时间,把之前的按键录制和播放整理了一些,开发了一个iOS版按键录制.播放的越狱APP,类似按键精灵.触动精灵等按键类的基本功能.脚本采用lua语法格式,可直接执行lua脚本,通过lua和obj ...
随机推荐
- Take my breath away
Take my breath away 编辑 目录 1简介 2翻唱简介 3歌词 ▪ 英文歌词 ▪ 中英文歌词 1简介编辑 <Take My Breath Away>(中文译为<带走我 ...
- 取消centOS7虚拟机锁屏
https://blog.csdn.net/ViJayThresh/article/details/81076622
- IOS的滑动菜单(Sliding Menu)的具体写法（附代码）
滑动菜单是一个很流行的IOS控件 先上效果图: 这里使用github的JTReveal框架来开发,链接是https://github.com/agassiyzh/JTRevealSide ...
- BZOJ3747:[POI2015]Kinoman(线段树)
Description 共有m部电影,编号为1~m,第i部电影的好看值为w[i]. 在n天之中(从1~n编号)每天会放映一部电影,第i天放映的是第f[i]部. 你可以选择l,r(1<=l< ...
- 1864. [ZJOI2006]三色二叉树【树形DP】
Description Input 仅有一行,不超过500000个字符,表示一个二叉树序列. Output 输出文件也只有一行,包含两个数,依次表示最多和最少有多少个点能够被染成绿色. Sample ...
- [SCOI2012]奇怪的游戏
题目 话说有没有跟我一样直接猜了一个最大值不会改变这样一个二乎乎的结论之后交上去保龄的呀 首先看到棋盘,选择相邻的格子,非常经典的黑白染色 显然那个二乎乎的结论是错的,随便就能\(hack\)了 于是 ...
- php基础学习-sdy
1.php语言结构和函数 exit()和die() exit()相当于把下面的代码都注释了 die()终止脚本 两个差不多 函数有很多种 (1)语言结构 (2)自定义函数 (3)内置函数 functi ...
- virtualbox+vagrant学习-3-Vagrant Share-6-Custom Provider
⚠️警告:只是一个高级主题! 这个话题与开发vagrant插件有关.如果你对此不感兴趣,或者你刚刚开始使用vagrant,跳过这一页是安全的. 如果你正在开发一个 custom Vagrant pro ...
- (转)MyEclipse快捷键大全
-------------------------------------MyEclipse 快捷键1(CTRL)-------------------------------------Ctrl+1 ...
- 跳转到appstore下载app的链接 记录一下
这是链接: https://itunes.apple.com/cn/app/da-dou-dou-lao-shi/id1395835036?mt=8 其中值得一提的是mt参数是啥意思 见下图: