为编程爱好者分享易语言教程源码的资源网
易语言网站app定制QQ1918812225 网络赚钱,从这里开始 想日赚300到3000来 三叶资源网培训教程视频 三叶资源网官方③群:33301895
三叶资源网官方③群:33301895 网络赚钱,从这里开始 B全站文字广告,诚邀与您合作 三叶资源网培训教程视频 三叶资源网官方③群:33301895

网站首页 按键精灵相关 按键精灵Q语言 正文

按键精灵脚本源码 剑侠情缘-以五行找金

三叶资源网 2019-03-14 按键精灵Q语言 87 ℃ 0 评论

脚本附件:金.bmp

运行环境:分辨率:1024x768 色深:32位 操作系统:Microsoft Windows XP 按键精灵版本:8.00.6701

@kstg2443538 2010/5/27

dim m,n,a ,b ,c ,d ,e ,f ,x ,y ,x0,y0  
m=30:n=80  
Call 查找怪()  
EndScript  
Delay 10  
Sub 查找怪()  
    a=-50:b=150  
    Rem 找怪  
    For 10  
        Call FindPic(20,40,1000,700,"金.bmp",0.7,X,Y)  
        If X>=0 and Y>=0 Then  
            x0=x+m:y0=y+n  
            Delay 10  
            If y>500 Then  
                Delay 50  
                MoveTo 600,500  
                Delay 50  
                LeftClick 1  
                Delay 50  
                Goto 查找怪  
              Else  
            End if  
            Delay 200  
            MoveTo x0,y0  
            Delay 50  
            Call 打怪()  
            Delay 100  
        End if  
        If X=-1 and Y=-1 Then  
            Delay 10  
            MoveTo 506,398  
            Delay 10  
            MoveR a,b  
            Delay 2000  
            LeftClick 1  
            Delay 100  
        End if  
    Next  
    a=a*(-1):b=b*(-1)  
    Goto 找怪  
End Sub  
Sub 打怪()  
    Delay 10  
    IfColor 66,722,"9ccb84",0 Then  
        Delay 10  
        KeyPress 192,1  
        Delay 100  
        KeyPress 49,1  
        Delay 100  
        Rem 打  
         RightClick 1  
        Delay 200  
        LeftClick 1  
        Delay 100  
    Else  
        KeyPress 49,1  
        Delay 100  
        Goto 打  
    End if  
    Delay 10  
End Sub
文件下载

Tags:按键精灵脚本源码剑侠情缘

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网官方③群:33301895

本文暂时没有评论,来添加一个吧(●'◡'●)

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网官方③群:三叶资源网官方③群

网站分类
随机tag
12306抢票WebSocketHPSocket自动审核进群支持库教程精易编程助手百度识图源码邮箱登陆代码框自绘支持库奇易模块链接器快手注册源码蓝奏云贴吧采集填表源码ExDUI视频教程安卓协议keep源码.
最新评论