本文作者:淡

诛仙手游--按键精灵辅助

6个月前 ( 05-23 ) 611
诛仙手游--按键精灵辅助摘要: 没错,这是个游戏辅助源码,但因工作原因未能完成制作,也可以理解是一个半成品。逻辑部分是已经从游戏登录、自动建队伍、自动帮派世界组人、幻月秘境、死灵之渊、草庙村部分已经开发完成。当然...

没错,这是个游戏辅助源码,但因工作原因未能完成制作,也可以理解是一个半成品。逻辑部分是已经从游戏登录、自动建队伍、自动帮派世界组人、幻月秘境、死灵之渊、草庙村部分已经开发完成。当然游戏界面有更新部分字库需要更新。妖兽突袭,镇魔古洞,玄冥殿,仙府种植,日常环线,彻夜不眠这部分是没有开发的,怎么说IOS系统太闭源了,没有越狱的设备用不了。这也是停止开发的原因,还需要设计多分辨,开发初衷仅是自己使用,现有源码仅适用于iPhoneSE 其他设备需更改X,Y坐标。请自行测试并修改。

附上源码及字库文件,有兴趣可以研究一下!开发设备是IOS iPhoneSE 设计分辨率是1136*640 326dpi 

界面设置


微信截图_20200523104705.png

脚本界面手机预览

已经开发的子程序

调试模式

简单过游戏检测

微信截图_20200523104840.png

部分子程序

微信截图_20200523104932.png微信截图_20200523104918.png

使用说明

微信截图_20200523111156.png

//诛仙手游IOS越狱版一条-日常任务-在线领奖---紫猫插件版
//手机分辨率1136*640 326dpi;适配于Iphone 5S 5SE开发;手机需越狱 
//开启日记记录

Log.Open
TracePrint "日志被开启,这句话会被记录到日志文件中"
//释放紫猫插件到Plugins目录
PutAttachment "./Plugins", "zm.luae"
Import "zm.luae"
zm.Init

//定义变量
Dim ret,诛仙登录字库,诛仙日常字库,诛仙三本字库,诛仙仙府字库,intX,intY,x,y,线程1,线程2,n=0,h=0,T1,精度,双精度,随机_x,随机_y,识别文字,识别颜色,屏幕旋转方向,三本妖兽任务模式,任务执行顺序,任务模式,喊话模式,幻月难度,草庙难度,死灵难度,镇魔难度,玄冥难度

//界面精度识别类型转换
精度 = ReadUIConfig("识别精度","0.85")//识别精度设置
TracePrint 精度  
双精度 = CDbl(精度)//转换表达式为双精度浮点数
TracePrint 双精度


//将附件中的诛仙登录.txt设置为0号字库
诛仙登录字库 = SetDictEx(0, "Attachment:登录.txt")
TracePrint "设置字库诛仙登录.txt为0号字库,设置结果:"&诛仙登录字库
//Delay 1000
//将附件中的诛仙日常.txt设置为1号字库
诛仙日常字库 = SetDictEx(1, "Attachment:日常.txt")
TracePrint "设置字库诛仙日常.txt为1号字库,设置结果:"&诛仙日常字库
//Delay 1000
//将附件中的诛仙三本.txt设置为2号字库
诛仙三本字库 = SetDictEx(2, "Attachment:三本.txt")
TracePrint "设置字库诛仙三本.txt为2号字库,设置结果:"&诛仙三本字库
//Delay 1000
//将附件中的诛仙仙府.txt设置为3号字库
诛仙仙府字库 = SetDictEx(3, "Attachment:仙府.txt")
TracePrint "设置字库诛仙仙府.txt为3号字库,设置结果:"&诛仙仙府字库

//以下代码找字在附件中的诛仙登录.txt字库中匹配查找
TracePrint"以下代码开始使用0号登录字库点阵找字成功返回值为1:"& UseDict (0)

//紫猫插件设置超级延时
//超级延时浮动值
zm.SetDelay ({"min":30, "max":80})
//超级延时基准值
zm.Delay (300)

//移动浮窗到右上角并可移动 命令BUG无法使用
//SetControlBarPos 0,0


//根据脚本UI界面游戏登录状态选择执行函数
If ReadUIConfig("登录状态") = 0 Then 
    TracePrint "游戏已登录"
    Call 任务顺序()
Else 
    TracePrint "游戏未登录,已执行登录函数"
    Call 登录函数()
End If





////////////////////////////////////////////////////登录游戏开始////////////////////////////////////////////////////
////////////////////////////////////////////////////登录游戏开始///////////////////////////////////////////////////
////////////////////////////////////////////////////登录游戏开始////////////////////////////////////////////////////
Function 登录函数()
    //关闭诛仙
    KillApp "com.pwrd.zx.ios"
    //依据诛仙Ios包名打开诛仙APP程序
    Delay 2000
    RunApp "com.pwrd.zx.ios"
    Delay 8000
    //获取屏幕旋转方向并提醒用户,旋转方向不对程序无法使用
    屏幕旋转方向 = GetScreenRotation()
    Delay 200
    If 屏幕旋转方向=0 Then
        TracePrint "屏幕没有旋转"
    ElseIf 屏幕旋转方向 = 1 Then
        TracePrint "屏幕逆时针旋转90度"
    ElseIf 屏幕旋转方向 = 2 Then
        TracePrint "屏幕逆时针旋转180度"
    ElseIf 屏幕旋转方向 = 3 Then
        TracePrint "屏幕逆时针旋转270度"
        zm.Delay
        ShowMessage "请旋转画面至相反向"
        zm.Delay
    End If

    Do
        //查找是否有公告内容,有公告内容则点击确定按钮
        Delay 1000
        识别文字 = FindStr(97, 543, 139, 622, "确定", "31210A|3C2B10", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
     
            zm.Delay 
            Call 通用点击屏幕()
            TracePrint "找到公告确定并点击坐标为:",intX,intY&"代码耗时:"&t1
        Else
            TracePrint "没有找到公告确定"
        End If


        // 查找是否在登录账号界面,若是则点击登录  
        Delay 1000
        识别文字 = FindStr(186,403,252,732, "登录", "FFFFFF", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then 
            zm.Delay 
            Call 通用点击屏幕()
            TracePrint "找到账号登录按钮并点击坐标为:",intX,intY&"代码耗时:"&t1
        Else
            TracePrint "没有找到账号登录按钮"
        End If
        
        
        //查找区服区字并以区字坐标为基准X、Y坐标各偏移加100并点击
        Delay 3000
        识别文字 = FindStr(47, 455, 98, 512, "区", "FFFFFF|FCFCFC|F8F8F7|F5F4F3|E8E7E5|FEFEFE|FDFDFD", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then 
            TracePrint "找到区字并点击坐标为:",  intX+100,intY+100
            zm.Delay
            Call 进入游戏点击屏幕()
        Else
            TracePrint "没有找到区字"
        End If
        
        
        //在界面查找进入游戏的入字点击进入游戏
        Delay 4000
        识别文字 = FindStr(15, 935, 50, 987, "入", "FFFFFF|FFFFFE|FEFEFD|FEFEFC|F2ECDD|F9F6F0|F8F5EB|FBF9F3|F4EFE7", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint "找到进入游戏入字并点击坐标为:",  intX,intY
            zm.Delay 
            Call 通用点击屏幕()
        Else
            TracePrint "没有找到进入游戏入字"
        End If
      
      
        //在界面查找是否有雇佣券如有则关闭界面=====长时间不玩判断
        Delay 4000
        识别文字 = FindStr(49, 541, 116, 623, "雇佣", "05142E-222222", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint "找到雇佣券坐标为:",  intX,intY
            zm.Delay 
            Call 关闭雇佣券()
        Else
            TracePrint "没有找到雇佣券"
        End If
        

        //查找队伍的对字判断是否已经进入游戏画面
        Delay 6000
        识别文字 = FindStr(475, 151, 504, 223, "队", "C7BEB8|FCFBFB|F1EFEE|FFFFFF|E2DDDA|FAFAF9|EFECEB|F5F3F2|D6CFCB|EBE8E6", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint "找到队伍的队字并点击坐标为:",  intX,intY
            zm.Delay
            Call 任务顺序()
            Exit Do
        Else
            TracePrint "没有找到队伍队字"
        End If
        
        
        //查找是否有弹窗
        Delay 1000
        识别文字 = FindStr(94, 25, 546, 205, "公众号", "FEFEFE-111111|FCFCFB-111111|E1D9D4-111111", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then 
            TracePrint "找到弹窗公众号三字并点击坐标为:",  intX,intY
            Delay 300
            //公众号三字坐标位置浮动直接点击关闭按钮坐标点  
            Tap 570, 1087
        Else
            TracePrint "没有找到弹窗公众号三字"
        End If
    Loop
    
    //改安卓版时预计增加判断脚本使用者是否是不问春秋成员是则停止脚本不是则继续使用
    
    
End Function

////////////////////////////////////////////////////登录游戏结束////////////////////////////////////////////////////
////////////////////////////////////////////////////登录游戏结束////////////////////////////////////////////////////
////////////////////////////////////////////////////登录游戏结束////////////////////////////////////////////////////



////////////////////////////////////////////////////主线----判断执行什么任务////////////////////////////////////////////////////

Function 任务顺序()

    //改安卓版时预计增加判断脚本使用者是否是不问春秋成员是则停止脚本不是则继续使用

    任务执行顺序 = ReadUIConfig("任务顺序")
    TracePrint "任务执行顺序为:"&任务执行顺序
    If 任务执行顺序 = 0 Then 
        TracePrint "执行三本妖兽任务"
        Call 三本妖兽()
    ElseIf 任务执行顺序 = 1 Then
        TracePrint "执行日常任务"
        Delay 300
        Call 久久领取判断()
    ElseIf 任务执行顺序 = 2 Then
        TracePrint "执行仙府种植任务"
    ElseIf 任务执行顺序 = 3 Then
        TracePrint "自动任务"
    End If

End Function


////////////////////////////////////////////////////日常任务部分开始////////////////////////////////////////////////////
////////////////////////////////////////////////////日常任务部分开始////////////////////////////////////////////////////
////////////////////////////////////////////////////日常任务部分开始////////////////////////////////////////////////////



////////////////////////////////////////////////////久久至尊领取////////////////////////////////////////////////////

Function 久久领取判断()
    //以下代码找字在附件中的诛仙日常字库.txt字库中匹配查找
    TracePrint"以下代码开始使用1号日常任务字库点阵找字成功返回值为1:"&UseDict (1)
    If ReadUIConfig("久久至尊") = True Then 
        Call 久久领取()
    Else 
        TracePrint "没有运行久久至尊领取"
    End If

End Function

Function 久久领取()
    

    //查找是否有弹窗
    Delay 800
    识别文字 = FindStr(94, 25, 546, 205, "公众号", "FEFEFE-111111|FCFCFB-111111|E1D9D4-111111", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到弹窗公众号三字并点击坐标为:",  intX,intY
        Delay 300
        Tap 570, 1087
    Else
        TracePrint "没有找到弹窗公众号三字"
    End If

    //查找久久领取入口--充值       
    Delay 900
    识别文字 = FindStr(564, 755, 585, 773, "充", "FFFFFF-222222|E8E6E5-111111", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到充值并点击坐标为:",  intX,intY
        zm.Delay 
        Call 通用点击屏幕()
    Else
        TracePrint "没有找到充值"
    End If

    //查找久久领取入口--招财进宝      
    Delay 500
    识别文字 = FindStr(162, 138, 428, 300, "进宝", "294890-111111", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到招财进宝并点击坐标为:",  intX,intY
        zm.Delay 
        Call 通用点击屏幕()
    Else
        TracePrint "没有找到招财进宝"
    End If


    //查找久久领取入口--招财进宝      
    Delay 500
    识别文字 = FindStr(49, 826, 85, 909, "取", "322715-111111", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到招财进宝领取并点击坐标为:",  intX,intY
        zm.Delay 
        Call 通用点击屏幕()
        zm.Delay 
        Tap intX + 505, intY + 166  // 关闭久久领取界面
    Else
        TracePrint "没有找到招财进宝领取"
    End If

    Call 每日抽奖()

End Function



////////////////////////////////////////////////////日常任务---每日签到、抽奖////////////////////////////////////////



Function 每日抽奖()

    Do
        //查找是否有弹窗
        //        Delay 500
        //        识别文字 = FindStr(94, 25, 546, 205, "公众号", "FEFEFE-111111|FCFCFB-111111|E1D9D4-111111", 双精度, intX, intY)
        //        If intX >= 0 and intY >= 0 Then
        //            TracePrint "找到弹窗公众号三字并点击坐标为:",  intX,intY
        //            Delay 300
        //            Tap 570, 1087
        //        Else
        //            TracePrint "没有找到弹窗公众号三字"
        //        End If
      
      
        //识别界面中福利的利字若有则点击
        Delay 1200
        识别文字 = FindStr(564, 870, 585, 919, "利", "FFFFFF-222222|D6D1CD-222222", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint intX,intY
            TracePrint "找到福利并点击坐标为:",  intX,intY
            Delay 600
            Call 通用点击屏幕()
        Else
            TracePrint "没有找到福利"
            Delay 300
        End If	


        ////////////////////////////////////////////////////日常任务---每日签到////////////////////////////////////////////////////
        //识别打开界面中有无每日签到4个字若有则点击
        Delay 1100
        识别文字 = FindStr(169, 140, 505, 331, "到", "294890-111111", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint intX,intY
            TracePrint "找到每日签到并点击坐标为:",  intX,intY
            Delay 700
            Call 通用点击屏幕()
        Else
            TracePrint "没有找到每日签到"
        End If


        //识别打开界面中有无签到2个字若有则点击
        Delay 1200
        识别文字 = FindStr(70, 890, 114, 993, "签到", "31210A|31230D|31230E|333329|31210A|4A5D6C", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint intX,intY
            TracePrint "找到签到并点击坐标为:",  intX,intY
            Delay 650
            Call 通用点击屏幕()
        Else
            TracePrint "没有找到签到"
        End If


        ////////////////////////////////////////////////////日常任务---每日抽奖////////////////////////////////////////////////////
        //识别打开每日抽奖界面中有无免费抽奖4个字若有则点击
        Delay 1100
        识别文字 = FindStr(169, 140, 505, 331, "抽奖", "294890", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint intX,intY
            TracePrint "找到每日抽奖并点击坐标为:",  intX,intY
            Delay 640
            Call 通用点击屏幕()
        Else
            TracePrint "没有找到每日抽奖"
        End If


        //识别打开每日抽奖界面中有无免费抽3个字若有则在免费抽奖坐标intX上加334,intY上加462点击
        Delay 1300
        识别文字 = FindStr(221, 510, 260, 598, "免费抽", "312510-111111|364C52-111111|333228-111111", 双精度, intX, intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint intX,intY
            TracePrint "找到免费抽并点击坐标为:",  intX,intY
            Delay 520
            Call 通用点击屏幕()
            Delay 8000
            Call 通用点击屏幕()
            Delay 8000
            Call 通用点击屏幕()
            Delay 8000
        Else
            TracePrint "没有找到免费抽"
        End If
        
        
        //查找每日抽奖完成后的抽1次的1次字样关闭窗口并退出循环
        Delay 1100
        识别文字 = FindStr(161,474,330,682, "1次","312510-111111|364C52-111111|333228-111111",双精度,intX,intY)
        If intX >= 0 and intY >= 0 Then
            TracePrint intX,intY
            TracePrint "找到抽1次并点击坐标为:",  intX,intY
            Delay 400
            Call 抽奖关闭点击屏幕()
            Delay 377
            Exit Do
        Else
            TracePrint "没有找到免费抽1次"
        End If

    Loop
    Delay 300
    Call 在线领奖判断()
End Function 

//////////////////////////////////////依据界面元素判断是否运行在线领奖////////////////////////////////////////////////////
Function 在线领奖判断()
    //查询脚本界面元素福利多选框的值如果为真则执行福利领取,为假则不操作
    If ReadUIConfig("福利") = True Then 
        TracePrint "运行在线领奖"
        Delay 200
        Call 领取奖励() 
    
    Else  
        TracePrint "没有运行在线领奖"
    End If

End Function


////////////////////////////////////////////////////日常任务---循环在线领奖////////////////////////////////////////////////////
//循环前10分钟8次在线领奖
Function 领取奖励()
    Call 在线领奖()
   
    Do While true
        TracePrint "前面8次开始循环"
        n = n + 1
        TracePrint n & "次"
        //        Delay 350
        If n>=7 Then
            //当循环条件成立的时候,离开循环体600000
            TracePrint "前面8次每隔10分钟领取奖励已领取完毕"
            //  Delay 300000  本次领奖是10分钟一次领奖,这里延时5分钟领奖为后面15分钟领奖时差互补 
            //            Delay 300 
            Call 十五分钟领取奖励()
            Exit Do
        ElseIf n<=6 Then  
            TracePrint  "延时10分钟"
           
            For 600 
                Delay 1000
            Next
           
            TracePrint "8次延时一分钟"
        Else
        End if
        TracePrint "运行在线领奖子程序"
        Call 在线领奖()
    Loop
End Function


//后两次在线领奖15分钟奖励领取900000
Function 十五分钟领取奖励()
    Do While true
        h = h + 1
        TracePrint h & "次"
        //        Delay 350
        If h<=2 Then
            //当循环条件成立的时候,离开循环体
            TracePrint  "延时15分钟"
           
            For 900
                Delay 1000
            Next
           
            TracePrint "2次延时一分钟"
        ElseIf h >= 3 Then
            TracePrint "后面每隔15分钟领取奖励已领取完毕"
            Exit Do
             
        Else

        End if
        Call 在线领奖() 
    Loop
End Function


////////////////////////////////////////////////日常任务------在线领奖////////////////////////////////////////////
Sub 在线领奖()
    ////////////////////////////////////////////////////在线领奖////////////////////////////////////////////////////
    //识别界面中福利的利字若有则点击
    Delay 7000
    识别文字 = FindStr(564, 870, 585, 919, "利", "FFFFFF-222222|D6D1CD-222222", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint intX,intY
        TracePrint "找到福利并点击坐标为:",  intX,intY
        Delay 1500
        Call 通用点击屏幕()
    Else
        TracePrint "没有找到福利"
        Delay 300
    End If
    
    
    //识别打开界面中有无在线领奖4个字若有则点击
    Delay 400
    识别文字 = FindStr(169,140,505,331, "在线领奖", "294890", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint intX,intY
        TracePrint "找到在线领奖并点击坐标为:",  intX,intY
        Delay 1500
        Call 通用点击屏幕()
   
    Else
        TracePrint "没有找到在线领奖"
    End If
    
    
    //识别打开界面中领取文字
    Delay 200
    识别文字 = FindStr(204, 825, 363, 976, "领取", "322715-111111|35423F-111111|322F21-111111", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到领取并点击坐标为:",  intX,intY
        Delay 1500
        Call 通用点击屏幕()
        Delay 3000
        Tap 561,1036
    Else
        TracePrint "没有找到领取"
    End If


End Sub

////////////////////////////////////////////////////日常任务部分结束////////////////////////////////////////////////////
////////////////////////////////////////////////////日常任务部分结束////////////////////////////////////////////////////
////////////////////////////////////////////////////日常任务部分结束////////////////////////////////////////////////////



////////////////////////////////////////////////////三本妖兽任务部分开始//////////////////////////////////////////////
////////////////////////////////////////////////////三本妖兽任务部分开始//////////////////////////////////////////////
////////////////////////////////////////////////////三本妖兽任务部分开始//////////////////////////////////////////////

Function 三本妖兽()

    //以下代码找字在附件中的诛仙登录.txt字库中匹配查找
    TracePrint"以下代码开始使用2号三本字库点阵找字成功返回值为1:"&  UseDict (2)
    任务模式 = ReadUIConfig("任务模式")
    If 任务模式 = 0 Then 
        TracePrint "带队模式"
        Call 带队模式()
    ElseIf 任务模式 = 1 Then
        TracePrint "野人模式"
    ElseIf 任务模式 = 2 Then
        TracePrint "坑神模式"
    End If

End Function

////////////////////////////////////////////////////三本妖兽----带队模式//////////////////////////////////////////////

Function 带队模式()
    Call 妖兽突袭()	
    //查找队伍文字
    Delay 3000
    识别文字 = FindStr(475, 151, 504, 223, "队", "C7BEB8|FCFBFB|F1EFEE|FFFFFF|E2DDDA|FAFAF9|EFECEB|F5F3F2|D6CFCB|EBE8E6", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到队伍队字坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "三本妖兽-没找到队伍队字两字"
    End If

    
    //查找一条龙并点击开启一条龙带队模式
    Delay 1500
    识别文字 = FindStr(281, 70, 315, 150, "条龙", "FFFFFF-222222|BDBCBC-222222", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到一条龙坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "三本妖兽-没找到一条龙"
        Call 已组队()
    End If


    //查找一条龙组队调整目标确定
    Delay 1500
    识别文字 = FindStr(56, 729, 94, 798, "定", "31210A-111111|3C2B10-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到一条龙组队调整目标确定坐标为:"&intX ,intY
        Call 通用点击屏幕()
        Call 未组队喊话()
    Else 
        TracePrint "没有找到一条龙组队调整目标确定"
    End If


End Function


//避免和已组队状态下喊话重复
Function 未组队喊话()
    //  循环组队直到组满5人退出循环  
    Do
        //    查找一键喊话 
        Delay 1500
        识别文字 = FindStr(60, 876, 92, 985, "喊话", "31210A-222222", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到一条龙一键喊话坐标为:"&intX ,intY
            Call 通用点击屏幕()
            Call 喊话频道判断()
        Else 
            TracePrint "没有找到一条龙一键喊话"
        End If
        
        
        //    查找组队下是否有第五人
        Delay 1500
        识别文字 = FindStr(374, 860, 406, 985, "级", "273D6D-111111", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到一条龙组队下第五人坐标为:"&intX ,intY
            Exit Do 
        Else 
            TracePrint "没有找到一条龙组队第五人"
        End If
 
    Loop

    //    查找未组队状态下发起确认一条龙
    Do
        Delay 5000
        识别文字 = FindStr(65, 766, 92, 796, "认", "31210A-111111", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到组队状态下一条龙确认坐标为:"&intX ,intY
            Call 通用点击屏幕() 
        Else 
            TracePrint "没有找到组队状态下一条龙确认"
            Call 关闭队伍页面()
            zm.Delay 
            Exit Do
        End If
    Loop
    //关闭功能页面
    Delay 2000
    识别文字 = FindStr(15, 371, 46, 424, "组队", "FFFFFF-111111|D0D8D0-111111|EEF2EE-111111|EAE2DB-222222", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态组队按钮并关闭功能页面坐标为:"&intX ,intY
        Call 关闭功能页面()
    Else 
        TracePrint "没有找到已组队状态组队按钮"
    End If
     
    
    //增加一个关闭队伍页面判断
    Delay 1500
    识别文字 = FindStr(60, 876, 92, 985, "喊话", "31210A-222222", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到第二次关闭组队页面坐标为:"&intX ,intY
        zm.Delay 
        Call 关闭队伍页面二()
    Else 
        TracePrint "没有找到第二次关闭组队页面"
    End If
    zm.Delay   
    Call 幻月秘境()

End Function




////////////////////////////////////////////////////三本妖兽----已组队并调整任务目标为一条龙//////////////////////////////////////////////
Function 已组队()

    //等级处于非飞升以及飞升状态,查找队伍队字,如果已组队且在任务页面则找队伍并切换到队伍页面并点击人物头像
    Delay 2500
  
    识别文字 = FindStr(475, 151, 504, 223, "队", "C7BEB8|FCFBFB|F1EFEE|FFFFFF|E2DDDA|FAFAF9|EFECEB|F5F3F2|D6CFCB|EBE8E6", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到已组队状态下队伍的队字并点击坐标为:",  intX,intY
        zm.Delay
        Tap intX + 104, intY
          
    Else 
        TracePrint "没有找到已组队状态下队伍队字"  
    End If


    //如果界面处于队伍页面则查找任务页面UI并点击上面人物头像
    Delay 1000
    识别文字 = FindStr(476, 70, 502, 93, "务", "FFFFFF-222222|DED9D5-222222|FDFDFD-222222", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到已组队状态下任务UI并点击坐标为:",  intX,intY
        zm.Delay
        Tap intX + 104, intY
          
    Else 
        TracePrint "没有找到已组队状态下任务UI"  
    End If


    //查找一条组队按钮---点击人物头像后选择组队并点击
    Delay 2000
    识别文字 = FindStr(15, 371, 46, 424, "组队", "FFFFFF-111111|D0D8D0-111111|EEF2EE-111111|EAE2DB-222222", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态组队按钮坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到已组队状态组队按钮"
    End If


    //查找组队按钮并点击---点击组队后选择队伍
    Delay 2000
    识别文字 = FindStr(67, 349, 98, 417, "伍", "ECE4DD-111111|DFD1C5-111111|FBF9F8-111111|C8B39F-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态组队按钮坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到已组队状态组队按钮"
    End If
    
    
    //查找已组队状态下调整任务目标---调整任务目标
    Delay 2000
    识别文字 = FindStr(464, 108, 505, 195, "标", "273D6D-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态下调整任务目标坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到已组队状态下调整任务目标"
    End If
    
    
    //查找已组队状态下调整任务目标
    Delay 2000
    识别文字 = FindStr(464, 108, 505, 195, "标", "273D6D-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态下调整任务目标坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到已组队状态下调整任务目标"
    End If
    
    
    //查找已组队状态下调整任务为一条龙
    Delay 2000
    识别文字 = FindStr(378, 385, 421, 477, "龙", "151C20-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态下调整任务目标为一条龙坐标为:"&intX ,intY
        Call 通用点击屏幕()

    Else 
        TracePrint "没有找到已组队状态下调整任务目标为一条龙"
    End If
    
    //查找已组队状态下一条龙组队调整目标确定
    Delay 1500
    识别文字 = FindStr(56, 729, 94, 798, "定", "31210A-111111|3C2B10-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态下一条龙组队调整目标确定坐标为:"&intX ,intY
        Call 通用点击屏幕()
        Delay 300
    Else 
        TracePrint "没有找到已组队状态下一条龙组队调整目标确定"
    End If

    //循环组队知道组满5人退出循环    
    Do
        //    查找已组队状态下一键喊话
        Delay 1500
        识别文字 = FindStr(60, 876, 92, 985, "喊话", "31210A-222222", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到已组队状态下一条龙一键喊话坐标为:"&intX ,intY
            Call 通用点击屏幕()
            Call 喊话频道判断()
        Else 
            TracePrint "没有找到已组队状态下一条龙一键喊话"
        End If
    
        //    查找组队下是否有第五人
        Delay 1500
        识别文字 = FindStr(374, 860, 406, 985, "级", "273D6D-111111", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到一条龙组队下第五人坐标为:"&intX ,intY
            zm.Delay 
            //            
            Exit Do 
        Else 
            TracePrint "没有找到组队第五人"
        End If
    Loop
    
    //    查找已组队状态下发起确认一条龙
    Do
        Delay 5000
        识别文字 = FindStr(65, 766, 92, 796, "认", "31210A-111111", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到已组队状态下一条龙确认坐标为:"&intX ,intY
            Call 通用点击屏幕()

        Else 
            TracePrint "没有找到已组队状态下一条龙确认"
            Call 关闭队伍页面()
            zm.Delay 
            Exit Do 
        End If
    Loop
        
    //关闭功能页面
    Delay 2000
    识别文字 = FindStr(15, 371, 46, 424, "组队", "FFFFFF-111111|D0D8D0-111111|EEF2EE-111111|EAE2DB-222222", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到已组队状态组队按钮并关闭功能页面坐标为:"&intX ,intY
        Call 关闭功能页面()
    Else 
        TracePrint "没有找到已组队状态组队按钮"
    End If
   
    //增加一个关闭队伍页面判断
    Delay 1500
    识别文字 = FindStr(60, 876, 92, 985, "喊话", "31210A-222222", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到第二次关闭组队页面坐标为:"&intX ,intY
        zm.Delay 
        Call 关闭队伍页面二()
    Else 
        TracePrint "没有找到第二次关闭组队页面"
    End If
    zm.Delay 
    Call 幻月秘境()
     
End Function






////////////////////////////////////////////////////三本妖兽----组队喊话频道//////////////////////////////////////////////
// 查询界面元素喊话模式
Function 喊话频道判断()

    喊话模式 = ReadUIConfig("喊话模式")
    If 喊话模式 = 0 Then 
        Call 世界频道()
    ElseIf 喊话模式 = 1 Then
        Call 帮派频道()

    End If

End Function


////////////////////////////////////////////////////世界频道喊话//////////////////////////////////////////////
Function 世界频道()
    //  世界频道一键喊话组队一条龙
    
    Delay 1500
    识别文字 = FindStr(113, 877, 155, 927, "世界", "322715-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-世界频道一键喊话坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到世界频道一键喊话"
    End If
End Function


////////////////////////////////////////////////////帮派频道喊话//////////////////////////////////////////////
Function 帮派频道()
    //  帮派频道一键喊话组队一条龙
   
    Delay 1500
    识别文字 = FindStr(218, 876, 268, 928, "帮派", "322715-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-帮派频道一键喊话坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到帮派频道一键喊话"
    End If


End Function


///////////////////////////////////////////////////开始三本妖兽任务//////////////////////////////////////////////


////////////////////////////////////////////////////三本妖兽--幻月秘境//////////////////////////////////////////////
Function 幻月秘境()
    
    
    //幻月秘境循环查找
    //	查找活动图标并点击
    Do
        Delay 1500
        识别文字 = FindStr(484, 860, 543, 921, "动", "FFFFFF-222222|D6D1CD-111111", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到活动坐标为:"&intX ,intY
            Call 通用点击屏幕()
        Else 
            TracePrint "没有找到活动"
        
        End If

        //	查找幻月秘境并点击
        Delay 1500
        识别文字 = FindStr(352, 283, 503, 1036, "幻月", "F8F6F3-111111|ECE7DE-111111", 1.0, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到幻月秘境坐标为:"&intX ,intY
            Call 通用点击屏幕()
        Else 
            TracePrint "没有找到幻月秘境"
            Exit Do
        End If

        幻月难度 = ReadUIConfig("幻月难度选择")
        TracePrint "当前幻月秘境难度为:"&幻月难度
        If 幻月难度 = 0 Then 
            zm.Delay
            Call 简单任务()
            TracePrint "执行幻月秘境简单任务"
        ElseIf 幻月难度 = 1 Then
            zm.Delay
            Call 普通任务()
            TracePrint "执行幻月秘境普通任务"
        ElseIf 幻月难度 = 2 Then
            zm.Delay
            Call 困难任务()
            TracePrint "执行幻月秘境困难任务"
        ElseIf 幻月难度 = 3 Then
            zm.Delay
            Call 挑战任务()
            TracePrint "执行幻月秘境挑战任务"
    		
        End If
    Loop
    TracePrint"幻月秘境任务完成"
    Call 草庙疑云()
    
    
End Function



////////////////////////////////////////////////////三本妖兽--草庙疑云//////////////////////////////////////////////
Function 草庙疑云()
   
   
    //草庙疑云循环查找
    //	查找活动图标并点击
    Do
        Delay 1500
        识别文字 = FindStr(484, 860, 543, 921, "动", "FFFFFF-222222|D6D1CD-111111", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到活动坐标为:"&intX ,intY
            Call 通用点击屏幕()
        Else 
            TracePrint "没有找到活动"
        
        End If

        //	查找幻月秘境并点击
        Delay 1500
        识别文字 = FindStr(352, 283, 503, 1036, "草庙", "F8F6F3-111111|ECE7DE-111111|E2DBCC-111111", 1.0, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到草庙疑云坐标为:"&intX ,intY
            Call 通用点击屏幕()
        Else 
            TracePrint "没有找到草庙疑云"
            Exit Do
        End If

        草庙难度 = ReadUIConfig("草庙难度选择")
        TracePrint "当前草庙疑云难度为:"&草庙难度
        If 草庙难度 = 0 Then 
            zm.Delay
            Call 简单任务()
            TracePrint "执行草庙疑云简单任务"
        ElseIf 草庙难度 = 1 Then
            zm.Delay
            Call 普通任务()
            TracePrint "执行草庙疑云普通任务"
        ElseIf 草庙难度 = 2 Then
            zm.Delay
            Call 困难任务()
            TracePrint "执行草庙疑云困难任务"
        ElseIf 草庙难度 = 3 Then
            zm.Delay
            Call 挑战任务()
            TracePrint "执行草庙疑云挑战任务"
    		
        End If
    Loop
    TracePrint"草庙疑云任务完成"	
    Call 死灵之渊()
    
    
End Function


////////////////////////////////////////////////////三本妖兽--死灵之渊//////////////////////////////////////////////
Function 死灵之渊()
    //死灵之渊循环查找
    //	查找活动图标并点击
    Do
        Delay 1500
        识别文字 = FindStr(484, 860, 543, 921, "动", "FFFFFF-222222|D6D1CD-111111", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到活动坐标为:"&intX ,intY
            Call 通用点击屏幕()
        Else 
            TracePrint "没有找到活动"
        
        End If

        //	查找死灵之渊并点击
        Delay 1500
        识别文字 = FindStr(352, 283, 503, 1036, "死灵", "F8F6F3-111111|ECE7DE-111111|E2DBCC-111111", 1.0, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到死灵之渊坐标为:"&intX ,intY
            Call 通用点击屏幕()
        Else 
            TracePrint "没有找到死灵之渊"
            Exit Do
        End If

        死灵难度 = ReadUIConfig("死灵难度选择")
        TracePrint "当前死灵之渊难度为:"&死灵难度
        If 死灵难度 = 0 Then 
            zm.Delay
            Call 简单任务()
            TracePrint "执行死灵之渊简单任务"
        ElseIf 死灵难度 = 1 Then
            zm.Delay
            Call 普通任务()
            TracePrint "执行死灵之渊普通任务"
        ElseIf 死灵难度 = 2 Then
            zm.Delay
            Call 困难任务()
            TracePrint "执行死灵之渊困难任务"
        ElseIf 死灵难度 = 3 Then
            zm.Delay
            Call 挑战任务()
            TracePrint "执行死灵之渊挑战任务"
    		
        End If
    Loop
    TracePrint"死灵之渊任务结束"	
    Call 妖兽突袭()
End Function

////////////////////////////////////////////////////三本妖兽--妖兽突袭//////////////////////////////////////////////
Function 妖兽突袭()
    //	 查找妖兽突袭  
    Delay 1500
    识别文字 = FindStr(484, 860, 543, 921, "动", "FFFFFF-222222|D6D1CD-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到活动坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到活动"
        
    End If
        
    //	查找妖兽突袭并点击
    Delay 1500
    识别文字 = FindStr(352, 283, 503, 1036, "妖兽", "F8F6F3-111111|ECE7DE-111111|E2DBCC-111111", 1.0, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到妖兽突袭坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到妖兽突袭"
           
    End If
        
    //	查找参加妖兽突袭
    Delay 1500
    识别文字 = FindStr(289, 903, 320, 969, "参加", "3C2B10-111111|61491C-101010", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到妖兽突袭参加坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到妖兽突袭参加"
            
    End If
        
    //查找进入妖兽突袭任务
    //切勿在动图及河阳城回城处
    识别文字 = FindStr(276, 7, 461, 217, "/", "60D034-444444", 0.8, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到妖兽突袭分割符号并点击坐标为:",  intX,intY
        zm.Delay
        Call 通用点击屏幕()
          
    Else
        TracePrint "没有找到进入妖兽突袭"
    End If
    Delay 5000
  
  
  
  //找队伍按钮集合队友
   
    识别文字 = FindStr(475, 151, 504, 223, "队", "C7BEB8|FCFBFB|F1EFEE|FFFFFF|E2DDDA|FAFAF9|EFECEB|F5F3F2|D6CFCB|EBE8E6", 双精度, intX, intY)
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到已组队状态下队伍的队字并点击坐标为:",  intX,intY
        zm.Delay
        Call 通用点击屏幕()
          
    Else 
        TracePrint "没有找到已组队状态下队伍队字"  
    End If
    
    
//     队友组队跟随   
    识别文字 = FindStr(222, 15, 255, 60, "合", "FEFEFE-333333|FFFFFF-333333|DDDDDD-333333", 双精度, intX, intY)
  
    
    If intX >= 0 and intY >= 0 Then
        TracePrint "找到集合队友并点击坐标为:",  intX,intY
        zm.Delay
        Call 通用点击屏幕()
          
    Else 
        TracePrint "没有找到集合队友"  
    End If    
        
        
End Function













////////////////////////////////////////////////////三本妖兽--简单任务//////////////////////////////////////////////
Function 简单任务()
   
   
    //查找任务难度并调整为简单
    Delay 1500
    识别文字 = FindStr(341, 332, 437, 419, "简", "FFFFFF-101010", 1.0, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到难度调整并调整为简单坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到难度调整为简单"
        
    End If

    //进入简单副本
    Delay 1500
    识别文字 = FindStr(59, 787, 142, 955, "副本", "33230B-222222|5E461D-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到副本难度为简单并进入副本坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到副本难度为简单"
        
    End If
    Do
        //查找副本完成并关闭副本
        Delay 1500
        识别文字 = FindStr(92, 24, 127, 159, "排名", "31210A-222222|5A431A-222222", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到简单副本完成后排名信息坐标为:"&intX ,intY
            zm.Delay
            Call 退出副本()
            zm.Delay 
            Exit Do 
        Else 
            //            TracePrint "没有找到退出副本"
        
        End If
    Loop
    Delay 8000
    
    
End Function


////////////////////////////////////////////////////三本妖兽--普通任务//////////////////////////////////////////////
Function 普通任务()
    
    
    //查找幻月秘境任务难度并调整为普通
    Delay 1500
    识别文字 = FindStr(347, 455, 446, 551, "普", "FFFFFF-101010", 1.0, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到副本难度为普通并调整为普通坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到副本难度普通"
        
    End If

    //进入普通副本
    Delay 1500
    识别文字 = FindStr(59, 787, 142, 955, "副本", "33230B-222222|5E461D-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到副本难度为普通并进入副本坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到副本难度为普通"
        
    End If
    Do
        //查找副本完成并关闭副本
        Delay 1500
        识别文字 = FindStr(92, 24, 127, 159, "排名", "31210A-222222|5A431A-222222", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到普通副本完成后排名信息坐标为:"&intX ,intY
            zm.Delay
            Call 退出副本()
            zm.Delay 
            Exit Do 
        Else 
            //            TracePrint "没有找到普通副本退出副本"
        
        End If
    Loop
    Delay 8000
    
    
End Function


////////////////////////////////////////////////////三本妖兽--困难任务//////////////////////////////////////////////
Function 困难任务()


    //查找副本任务难度并调整为困难
    Delay 1500
    识别文字 = FindStr(345, 574, 438, 680, "困", "FFFFFF-222222", 1.0, intX, intY) 
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到副本难度为困难并调整为困难坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到副本难度为困难"
        
    End If

    //进入困难副本
    Delay 1500
    识别文字 = FindStr(59, 787, 142, 955, "副本", "33230B-222222|5E461D-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到困难副本并进入副本坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到困难副本"
        
    End If
    Do
        //查找副本完成并关闭副本
        Delay 1500
        识别文字 = FindStr(92, 24, 127, 159, "排名", "31210A-222222|5A431A-222222", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到困难副本完成后排名信息坐标为:"&intX ,intY
            zm.Delay
            Call 退出副本()
            zm.Delay 
            Exit Do 
        Else 
            //            TracePrint "没有找到困难副本退出副本"
        
        End If
    Loop
    Delay 8000
    
    
End Function


////////////////////////////////////////////////////三本妖兽--挑战任务//////////////////////////////////////////////
Function 挑战任务()
		 
		 
    //查找幻月秘境任务难度并调整为挑战
    Delay 1500
    识别文字 = FindStr(376, 725, 410, 755, "挑", "FFFFFF-333333", 1.0, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到副本难度为挑找并调整为挑战坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到挑战任务"
        
    End If

    //进入挑战副本
    Delay 1500
    识别文字 = FindStr(59, 787, 142, 955, "副本", "33230B-222222|5E461D-111111", 双精度, intX, intY)
    If intX > 0 and intY > 0 Then 
        TracePrint "三本妖兽-找到挑战难度进入副本坐标为:"&intX ,intY
        Call 通用点击屏幕()
    Else 
        TracePrint "没有找到挑战难度进入副本"
        
    End If
    Do
        //查找副本完成并关闭副本
        Delay 1500
        识别文字 = FindStr(92, 24, 127, 159, "排名", "31210A-222222|5A431A-222222", 双精度, intX, intY)
        If intX > 0 and intY > 0 Then 
            TracePrint "三本妖兽-找到挑找任务成后排名信息副本坐标为:"&intX ,intY
            zm.Delay
            Call 退出副本()
            zm.Delay 
            Exit Do 
        Else 
            //            TracePrint "没有找到挑战任务退出副本"
        
        End If
    Loop
    Delay 8000
    
    
End Function

////////////////////////////////////////////////////三本妖兽任务部分结束//////////////////////////////////////////////
////////////////////////////////////////////////////三本妖兽任务部分结束//////////////////////////////////////////////
////////////////////////////////////////////////////三本妖兽任务部分结束//////////////////////////////////////////////






////////////////////////////////////////////////////仙府种植部分开始//////////////////////////////////////////////
////////////////////////////////////////////////////仙府种植部分开始//////////////////////////////////////////////
////////////////////////////////////////////////////仙府种植部分开始//////////////////////////////////////////////

//以下代码找字在附件中的诛仙登录.txt字库中匹配查找
UseDict (3)





////////////////////////////////////////////////////仙府种植部分结束//////////////////////////////////////////////
////////////////////////////////////////////////////仙府种植部分结束//////////////////////////////////////////////
////////////////////////////////////////////////////仙府种植部分结束//////////////////////////////////////////////




////////////////////////////////////////////////////过游戏检测部分开始////////////////////////////////////////////////////
////////////////////////////////////////////////////过游戏检测部分开始////////////////////////////////////////////////////
////////////////////////////////////////////////////过游戏检测部分开始////////////////////////////////////////////////////

//防止行为检测,防止游戏封号部分
//在intX,intY坐标上随机加减1-10像素点点击
Function 通用点击屏幕()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 随机_x, intY + 随机_y
    TracePrint "通用点击屏幕坐标为:"&intX + 随机_x, intY + 随机_y
End Function

//以找区服的区字为准故鼠标点击在区字坐标标准上各加100,且在intX+100,intY+100坐标上随机加减1-10像素点点击
Function 进入游戏点击屏幕()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 100 + 随机_x, intY + 100 + 随机_y
    TracePrint "进入游戏点击屏幕坐标为:"&intX + 100 + 随机_x, intY + 100 + 随机_y
End Function

//关闭福利领取界面图标鼠标点击随机坐标,在intX+95,intY+354坐标上随机加减1-10像素点点击
Function 福利关闭点击屏幕()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 95 + 随机_x, intY + 354 + 随机_y
    TracePrint "福利关闭点击屏幕坐标为:"&intX + 95 + 随机_x, intY + 354 + 随机_y
End Function
//每日抽奖界面中有无免费抽3个字若有则在免费抽奖坐标intX上加334,intY上加462点击
Function 抽奖关闭点击屏幕()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 334 + 随机_x, intY + 462 + 随机_y
    TracePrint "抽奖关闭点击屏幕坐标为:"&intX + 334 + 随机_x, intY + 462 + 随机_y
End Function

//关闭功能页面随机点击坐标
Function 关闭功能页面()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 578 + 随机_x, intY + 737 + 随机_y
    TracePrint "功能页面关闭点击屏幕坐标为:"&intX + 578 + 随机_x, intY + 737 + 随机_y
End Function

//关闭队伍页面随机点击坐标
Function 关闭队伍页面()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 496 + 随机_x, intY + 269 + 随机_y
    TracePrint "队伍页面关闭点击屏幕坐标为:"&intX + 496 + 随机_x, intY + 269 + 随机_y
End Function

//关闭队伍页面二随机点击坐标
Function 关闭队伍页面二()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 496 + 随机_x, intY + 110 + 随机_y
    TracePrint "队伍页面二关闭点击屏幕坐标为:"&intX + 496 + 随机_x, intY + 110 + 随机_y
End Function


//关闭副本完成页面随机点击坐标
Function 退出副本()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 10 + 随机_x, intY + 961 + 随机_y
    TracePrint "退出副本关闭点击屏幕坐标为:"&intX + 10 + 随机_x, intY + 961 + 随机_y
End Function

//查找是否长时间不玩游戏有提示雇佣券关闭
Function 关闭雇佣券()
    zm.Delay
    Randomize//初始化随机数
    //为了增加随机性,把x和y的随机数设置成不同的数值
    随机_x = Int((10 - 0 + 1) * Rnd() + 0)
    随机_y = Int((10 - 0 + 1) * Rnd() + 0)
    zm.Delay
    Tap intX + 501 + 随机_x, intY + 491 + 随机_y
    TracePrint "进入游戏点击屏幕坐标为:"&intX + 501 + 随机_x, intY + 491 + 随机_y
End Function




////////////////////////////////////////////////////过游戏检测部分结束////////////////////////////////////////////////////
////////////////////////////////////////////////////过游戏检测部分结束////////////////////////////////////////////////////
////////////////////////////////////////////////////过游戏检测部分结束////////////////////////////////////////////////////

//日记关闭
TracePrint "日志被开启,这句话会被记录到日志文件中"
Log.Close


下载地址

诛仙手游--按键精灵辅助 下载

解压密码123456

文件下载

此软件由“半星笔记”免费分享,如有疑问,请联系我们

点击下载链接 > 输入提取码(非解压密码) >下载即可,本站默认解压密码:123456

close
文章版权及转载声明

作者:本文地址:https://www.jietn.com/blog/58.html发布于 6个月前 ( 05-23 )
文章转载或复制请以超链接形式并注明出处半星笔记

赞(3

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏

阅读
分享