17173首页 - 免费新游 - 火爆论坛 - 游戏博客 - 游戏播客 - 百科问答 - 网游排行榜 - 网游期待榜
| 通行证 注册
大航海时代OL > > 正文
老山羊全自动后台采集脚本V1.0版
2007-11-18           【 加入收藏 / 文章投稿 / 截图上传 / 发表评论
作者:沉默的老山羊 获得积分: Z 投稿总数:

功能描述:后台自动采集(30分钟)-------》自动切换到前台丢垃圾、摆摊(半分钟)--------》后台自动采集(30分钟)-------》循环(掉线自动登陆与自动叫卖实属鸡肋,故本版本并无集成此两项功能)

要求:


桌面分辨率:1024X768
游戏分辨率:960X600(游戏窗口位于桌面左上方,位置很重要,别摆歪太多了噢。。。)

快捷键设置:F7-露天  F10-自定义栏  F11-使用技能(用于纠错)
自定义栏设置:F1-搜索或采集  F2-料理(50+以上,默认为匹萨)
其他:1、开始前补给全扔掉(水、食物、木材及其他所有船上装载),并开露天挂一个高价物品;
      2、如不能采集玛瑙(采集9级以下),则需购买玛瑙N个,放置于船仓中,并重新修改玛瑙定价(需定高价,防止被玩家买走,造成程序错误);
      3、默认丢弃垃圾为沙子和石材,自动保留玛瑙与生姜,玛瑙价格为6800,生姜价格为80。


V1.0版本说明:
本脚本整合了目前网络上的两大类型脚本,即后台半自动类(无丢垃圾、无摆摊)与前台自动类(支持丢垃圾、摆摊,但须前台运行),完美的解决了上诉两类脚本不能前后台自动转换问题;

本脚本主要针对埃及北岸之采集而编写,理论上可广泛适用于与采集动作相似的各类生产技能中;

本脚本会因网络连接状况、人物等级、船仓容量、料理等诸多变量之不同,而导致不能完美运行。如遇此类问题,则需适当修改脚**数。本人仅向需要改写脚本的索兰尼亚骑士团(KOS)会员提供免费咨询、协助改写服务,非索兰尼亚骑士团(KOS)会员勿扰;

本脚本编写目的仅为游戏辅助,如因使用不恰当或非官方允许情况下使用此脚本,造成的一切后果,与本人无关,也与索兰尼亚骑士团(KOS)论坛无关;

本脚本所有权归电信2服-索兰尼亚骑士团(KOS)-沉默的老山羊所有,任何组织或个人在未经本人同意之前,不得私自篡改、转载或用作他用。

================复制以下内容===============


#这是按键精灵生成的脚本源文件
#在理解各条命令的基础上,您可以修改这个文件的内容
#您修改的结果将会在普通视图上有所反映

UserVar liaoli=50
UserVar Cl=400
UserVar Jtime=30
UserVar Pd0=1
UserVar Pd1=1
VBS set TiShiObj = createobject("WScript.Shell")
Plugin hwn=Window.GetKeyFocusWnd()
Delay 1000
Gosub 老山羊全自动后台采集V1.0版
Rem 结束
EndScript
Sub 老山羊全自动后台采集V1.0版
    lun=(Jtime*600)\((liaoli\5)*75)
    y=Cl\lun+1
    For y
        Gosub 采集
        If Pd0=1
            Gosub 激活窗口
        EndIf
        If Pd1=1
            huo1=DH1:huo2=DH2:huo3=DH3
            Gosub 丢垃圾
        EndIf
        If Pd0=1
            Gosub 返回窗口
        EndIf
    EndFor
    Rem 结束
Return 老山羊全自动后台采集V1.0版
Sub 采集
    For lun
        ci=liaoli\5
        For ci
            Plugin Window.SendKeyPress(hwn,121)
            Delay 1500
            Plugin Window.SendKeyPress(hwn,112)
            Delay 1000
            Plugin Window.SendKeyPress(hwn,122)
            Delay 5000
        EndFor
        Plugin Window.SendKeyPress(hwn,121)
        Delay 1000
        Plugin Window.SendKeyPress(hwn,113)
        Delay 1000
        Plugin Window.SendKeyPress(hwn,122)
        Delay 1000
        Plugin Window.SendKeyPress(hwn,27)
        Delay 600
    EndFor
Return 采集
Sub 丢垃圾
    KeyPress 118 1
    Delay 2000
    MoveTo 517 403
    Delay 2000
    LeftClick 1
    MoveTo 261 168
    Delay 2000
    LeftClick 1
    MoveTo 348 260
    Delay 2000
    LeftClick 1
    MoveTo 346 336
    Delay 2000
    LeftClick 1
    MoveTo 313 162
    Delay 2000
    LeftClick 1
    MoveTo 403 268
    Delay 2000
    LeftClick 1
    MoveTo 407 334
    Delay 2000
    LeftClick 1
    MoveTo 714 413
    Delay 2000
    LeftClick 1
    Delay 1000
    KeyPress 27 1
    Delay 500
    KeyPress 27 1
    Delay 500
    KeyPress 27 1
    Delay 500
    Delay 2000
    MoveTo 894 41
    Delay 1000
    LeftClick 1 
    MoveTo 887 181 
    Delay 1000
    LeftClick 1 
    Delay 4000   
    MoveTo 676 431 
    Delay 1000
    LeftClick 1
    Delay 2000
    MoveTo 894 41
    Delay 1000
    LeftClick 1 
    MoveTo 887 181 
    Delay 1000
    LeftClick 1 
    Delay 4000 
    MoveTo 220 147 
    Delay 1000
    LeftClick 1
    MoveTo 429 242 
    Delay 1000
    LeftClick 1
    Delay 1000
    MoveTo 597 270 
    Delay 1000
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 1000
    MoveTo 532 244
    Delay 1000
    LeftClick 1
    Delay 200
    MoveTo 556 319
    Delay 1000
    LeftClick 1
    Delay 200
    MoveTo 549 415
    Delay 1000
    LeftClick 1
    Delay 1000
    MoveTo 220 147 
    Delay 1000
    LeftClick 1
    MoveTo 429 242 
    Delay 1000
    LeftClick 1
    Delay 200
    MoveTo 597 270 
    Delay 1000
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 500
    LeftClick 1
    Delay 1000
    MoveTo 556 267
    Delay 1000
    LeftClick 1
    Delay 200
    MoveTo 534 244
    Delay 1000
    LeftClick 1
    Delay 200
    MoveTo 556 319
    Delay 1000
    LeftClick 1
    Delay 200
    MoveTo 549 418
    Delay 1000
    LeftClick 1
    Delay 1000
    MoveTo 690 431
    Delay 1000
    LeftClick 1
    Delay 200
Return 丢垃圾
Sub 移动鼠标
    Plugin winRect=Window.GetClientRect(hwn)
    winPoint = Split(winRect, "|", -1, 1)
    bx = CInt(winPoint(0)) + ax
    by = CInt(winPoint(1)) + ay
    MoveTo bx by
    Delay 800
Return 移动鼠标
Sub 激活窗口
    Plugin yuan=Window.Foreground()
    Delay 800
    Plugin Window.Active(hwn)
    Delay 800
    Plugin Window.Restore(hwn)
    Delay 800
Return 激活窗口
Sub 返回窗口
    Plugin Window.Active(yuan)
Return 返回窗口


此篇文章为17173玩家原创作品,获得积分奖励 Z。
17173全新积分兑换系统上线 点卡周边等你拿>>>详情点击
关键字:

相关链接

http://dol.17173.com/jingyan/tanxian.shtml

游戏截图
用户: 匿名
史上最强的拼音输入法 下载>>>
评论

我要发布Sogou推广服务

热点标签:
新闻 标题 栏目 文章 图片 链接
热点标签:
新闻 标题 栏目 文章 图片 链接