代码：

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 if

Loop

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, 748

End If
        //关闭背包
        ret1 = CmpColor(432,850, "43D1D5", 0.9)
        ret2 = CmpColor(432,1012, "3CD0DA", 0.9)
        If ret1 > -1 and ret2 > -1 Then
            Tap 681,1134

End 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   
    Loop

End 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   
    Loop

Rem 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   
    Loop

Dim x,y
    x = 463
    y=376
    For 3
        rem g1
        Delay 300

Tap 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 If

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
                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 If

Loop

x=x-110
    Next
    x = 463
    y=902
    For 3
        rem g2
        Delay 300

Tap 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 If

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
                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 If

Loop

x=x-110
    Next

Delay 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 <剑行洪荒> 忠哥的更多相关文章

  1. 按键精灵安卓版 tap、touch命令 不好用的解决办法！

    用按键精灵手机版写脚本来操作新浪微博APP,在关注列表页自动取消关注,代码如下: If x > -1 And y > -1 Then delay 1000 tap x,y delay 10 ...

  2. 第六篇T语言实例开发，多点找色应用

    ---恢复内容开始--- 多点找色应用 文字,图形特征的获取 多点找色 功能原型 窗口多点找色(窗口句柄,x1,y1,x2,y2,颜色值,色点组,相似度,方向,返回x,返回y) 功能说明 根据指定的多 ...

  3. 按键精灵PC版<末日王者>

    更新模式[强制] 更新版本[1.28] 更新链接[https://yunfei-1256035889.cos.ap-beijing.myqcloud.com/%E6%9C%AB%E6%97%A5%E4 ...

  4. 【按键精灵篇】如何做一个自动打开APP进入注册页面自动输入自己手机号

    按键精灵,虽然很早听过,但是一直没有真正使用过,所以最近有点时间也简单试一下,通过脚本自动清理APP缓存,打开百家号并自动进入注册页面输入自己的手机号. 软件清单 1. 雷电手机模拟器:https:/ ...

  5. 按键精灵对APP自动化测试（上）

    简单介绍下应用背景:测试安卓app时发现重复点击某一按钮的时候会出现报错,开发修复后提交测试.如果采用手动点击按钮,效率不高,在领导提示下使用按键精灵实现自动操作. 一．       安卓手机按键精灵 ...

  6. 按键精灵与逍遥安卓ADB连接重键方法

    1.按键精灵与逍遥安卓ADB连接安装按键精灵与逍遥安卓这两个软件我不用多说了.安装好后把逍遥安卓安装目录下的三个文件adb.exe,AdbWinApi.dll,AdbWinUsbApi.dll 全部复 ...

  7. C#实现按键精灵的'找图' '找色' '找字'的功能

    http://www.cnblogs.com/JimmyBright/p/4355862.html 背景:游戏辅助功能通常使用按键精灵编写脚本,按键精灵的最大卖点就是能够找到画面中字,图,色,这对于模 ...

  8. 原来找字也可以这样用ElseIf FindStr 手机按键精灵 跟大漠的区别

     原来找字也可以这样用ElseIf FindStr(646, 1109, 776, 1261, "公告小叉", "FFFFFF-333333", 0.9, in ...

  9. 自己开发iOS版按键精灵--TTouch

    利用闲余时间,把之前的按键录制和播放整理了一些,开发了一个iOS版按键录制.播放的越狱APP,类似按键精灵.触动精灵等按键类的基本功能.脚本采用lua语法格式,可直接执行lua脚本,通过lua和obj ...

随机推荐

  1. Linux 系统的日志目录

    连接时间的日志 连接时间日志一般由/var/log/wtmp和/var/run/utmp这两个文件记录,通过who查看 who /var/log/wtmp [连接时间日志] who /var/log/ ...

  2. 一、JDBC的概述 二、通过JDBC实现对数据的CRUD操作 三、封装JDBC访问数据的工具类 四、通过JDBC实现登陆和注册 五、防止SQL注入

    一.JDBC的概述###<1>概念 JDBC:java database connection ,java数据库连接技术 是java内部提供的一套操作数据库的接口(面向接口编程),实现对数 ...

  3. November 5th Week 45th Saturday 2016

    The longest day has an end. 最难过的日子也会有尽头. No, no, no, I can't see the end of such days, of course, if ...

  4. Python中网络编程对socket accept函数的理解

    在服务器端,socket()返回的套接字用于监听(listen)和接受(accept),这个套接字不能用于与客户端之间发送和接收数据. accept()接受一个客户端的连接请求,并返回一个新的套接字, ...

  5. 自定义配置编译linux内核

    1 编译linux内核原因一般情况下,我们是不需要重新去编译linux内核的,但如果你发现你需要修改内核的某个部分或者说你需要的某个模块并没有编译进内核,那里你可以通过重新编译内核来满足你的需求,比如 ...

  6. Uva1395 POJ3522 Slim Span （最小生成树）

    Description Given an undirected weighted graph G, you should find one of spanning trees specified as ...

  7. cocos2d-x发生undefined reference to `XX'异常 一劳永逸解决的方法

    转自:http://www.myexception.cn/operating-system/1620542.html cocos2d-x发生undefined reference to `XX'错误 ...

  8. 【[HNOI2016]序列】

    莫队好题啊 莫队来做这个题的难点就是考虑如何在\(O(1)\)时间内由\([l,r]\)转移到\([l,r+1]\) 显然加入\(r+1\)这个数之后会和之前所有的位置都产生一个区间,就是要去快速求出 ...

  9. Hadoop学习之路（一）理论基础和逻辑思维

    三个题目 第一题 问题描述 统计出当前这个一行一个IP的文件中,到底哪个IP出现的次数最多 解决思路 //必须要能读取这个内容 BufferedReader br = new BuffedReader ...

  10. Selenium启动最新的火狐浏览器异常排查

    报错如下: WebDriverException: Message: 'Can\'t load the profile 打开谷歌浏览器和IE浏览器均正常 网上查阅资料,疑似与selenium版本相关联 ...