夺宝中华挂机脚本下载 最新更新|软件分类|软件专题|手机版|论坛转贴|软件发布

您当前所在位置:首页游戏娱乐游戏辅助 → 夺宝中华打修脚本 免费版

夺宝中华打修脚本

免费版

夺宝中华打修脚本
  • 软件大小:21.4M
  • 软件语言:中文
  • 软件类型:国产软件 / 游戏辅助
  • 软件授权:免费软件
  • 更新时间:2017-10-25 09:56
  • 软件等级:4星
  • 应用平台:WinXP, Win7, Win8, Win10
  • 软件官网:

ITMOP本地下载文件大小:21.4M

点赞好评0%(0) 差评差评0%(0)

软件介绍人气软件精品推荐相关文章网友评论下载地址

小编为您推荐:夺宝中华游戏脚本

夺宝中华打修脚本是一款适用于电脑、手机双端夺宝中华侠客行的挂机脚本,用法同大多按键精灵脚本差不多,让你在休息之余轻松修炼内力,提升战力,推荐给大家哦!

夺宝中华侠客行脚本简介

#这是按键精灵生成的脚本源文件

#在理解各条命令的基础上,您可以修改这个文件的内容

#您修改的结果将会在普通视图上有所反映

#本脚本需配合winwap4.0使用

夺宝中华侠客行脚本

夺宝中华修内力脚本/挂机脚本

Sub xiunei

    Rem 状态

    vbSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\状态.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto 身体状态

    EndIf 

    If intX=-1 and intY=-1

        Gosub reg

        Goto 状态

    EndIf 

    Rem 身体状态

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\身体状态.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto 修炼内力

    EndIf 

    If intX=-1 and intY=-1

        Gosub 返回游戏

        Goto 状态

    EndIf 

    Rem 修炼内力

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\修炼内力.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto 方框

    EndIf 

    If intX=-1 and intY=-1

        Gosub 返回游戏

        Goto 状态

    EndIf 

    Rem 方框

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\内力方框.bmp",1,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Delay 100

        KeyDown 50,1

        Delay 100

        KeyUp 50,1

        Delay 100

        KeyDown 48,1

        Delay 100

        KeyUp 48,1

        Delay 100

        Gosub queding

        //xinx=信息

        Gosub xinxi

        Goto xiunei_end

    EndIf 

    If intX=-1 and intY=-1

        Gosub 返回游戏

        Goto 状态

    EndIf 

    Rem xiunei_end

    Goto 状态

Return 

Sub reg

    Rem denglu

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\登陆.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto 进入五区

    EndIf 

    If intX=-1 and intY=-1

        MoveTo 170,70

        LeftClick 1

        Gosub chenkstop

        Goto denglu

    EndIf 

    //

    Rem 进入五区

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\进入五区.bmp",1,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto 环顾四方

    EndIf 

    If intX=-1 and intY=-1

        MoveTo 170,70

        LeftClick 1

        Gosub chenkstop

        Goto denglu

    EndIf 

    //

    Rem 环顾四方

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\环顾四方.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        Goto reg_end

    EndIf 

    If intX=-1 and intY=-1

        Goto 进入江湖

    EndIf 

    //

    Rem 进入江湖

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\进入江湖.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto 环顾四方

    EndIf 

    If intX=-1 and intY=-1

        MoveTo 170,70

        LeftClick 1

        Gosub chenkstop

        Goto denglu

    EndIf 

    Rem reg_end

Return 

Sub chenkstop

    Rem quxiao

    Delay 2222

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\取消.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Delay 500

        MoveTo 225,75

        LeftClick 1

        Delay 500

        Goto stop

    EndIf 

    If intX=-1 and intY=-1

        Goto stop

    EndIf 

    Rem stop

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\停止.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        Goto error

    EndIf 

    If intX=-1 and intY=-1

        Goto quxiao

    EndIf 

    Rem error

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\error.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo 230,70

        LeftClick 1

        Goto stop

    EndIf 

    If intX=-1 and intY=-1

        Goto chenkstop_end

    EndIf 

    Rem chenkstop_end

Return 

Sub fanhui

    Rem 返回

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\返回.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto fanhui_end

    EndIf 

    If intX=-1 and intY=-1

        Goto reg

    EndIf 

    Rem fanhui_end

Return 

Sub fanhuiyouxi

    Rem 返回游戏

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\返回游戏.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto fanhuiyouxi_end

    EndIf 

    If intX=-1 and intY=-1

        Goto reg

    EndIf 

    Rem fanhuiyouxi_end

Return 

Sub queding

    Rem 确定

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\确定.bmp",1,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

    EndIf 

Return 

Sub xinxi

    Rem 信息

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\继续修炼.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        Gosub queding

        Goto 信息

    EndIf 

    If intX=-1 and intY=-1

        Goto 内力提高

    EndIf 

    Rem 内力提高

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\内力提高.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        Gosub queding

        Gosub fanhui

        Gosub queding

        Goto 信息

    EndIf 

    If intX=-1 and intY=-1

        Goto 等级提高

    EndIf 

    Rem 等级提高

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\等级提高.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        Gosub fanhui

        Gosub queding

        Goto 信息

    EndIf 

    If intX=-1 and intY=-1

        Goto 精神不够

    EndIf 

    Rem 精神不够

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\太累了.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        Gosub fanhuiyouxi

        Gosub xiuxi

        Goto xinxi_end

    EndIf 

    If intX=-1 and intY=-1

        Goto 等级不够

    EndIf 

    Rem 等级不够

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\等级不够.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        Gosub fanhuiyouxi

        Goto 开始挂机

    EndIf 

    If intX=-1 and intY=-1

        Goto reg

    EndIf 

    Rem xinxi_end

Return 

Sub xiuxi

    Rem 长安睡觉

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\睡觉.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Delay 8000

        Gosub chenkstop

        Goto 等待

    EndIf 

    If intX=-1 and intY=-1

        Goto 休息

    EndIf 

    Rem 休息

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\休息.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY+10

        LeftClick 1

        Delay 8000

        Gosub chenkstop

        Goto 等待

    EndIf 

    If intX=-1 and intY=-1

        Goto xiuxi_end

    EndIf 

    Rem 等待

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\等待.bmp",1,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Gosub chenkstop

        Goto xiuxi_end

    EndIf 

    If intX=-1 and intY=-1

        Goto xiuxi_end

    EndIf 

    Rem xiuxi_end

Return 

Sub 开始挂机

    Rem hgsf

    VBSCall Call FindPic(0,50,1023,767,"E:\luzooy\duobao\外挂\bmp\环顾四方.bmp",0.9,intX,intY)

    If intX>=0 and intY>=0

        MoveTo intX,intY

        LeftClick 1

        Delay 5000

        Gosub chenkstop

        Goto hgsf

    EndIf 

    If intX=-1 and intY=-1

        Goto hgsf

    EndIf 

Return 

EndScript

更多>>软件截图

推荐软件

其他版本下载

    精品推荐

    相关文章

    下载地址

    • 夺宝中华打修脚本 免费版

    查看所有评论>>网友评论

    发表评论

    (您的评论需要经过审核才能显示) 网友粉丝QQ群号:203046401

    查看所有0条评论>>

    更多>>猜你喜欢