在东南亚的脚本

2008-03-18 09:22:26 攻略技巧,

网友评论0条来源: 17173作者: ^俄们木目爱^

啊...第一次..紧张中..在东南亚做羽毛冲商呢,自己做个脚本,鸡和蛋反复生产!在98老板呢点好了先.......吃98! F1是自定义栏 F5烹饪的家禽书 F6蛋孵化鸡的书 ....

具体的那个坐标啊什么的自己搞啊! 生产的时候点小锤子的生产那个坐标要自己搞,吃98的那个坐标也要自己搞,吃料理也可以..........自己去修改一下..<紧张>

   Plugin hwnd = Window.GetKeyFocusWnd()
Delay 2000
For 100000
    For 1
        Gosub 鸡生蛋
    EndFor
    For 45
        Gosub 生产
    EndFor
    For 1
        Gosub 退出
    EndFor
    For 4
        Gosub 行动力
    EndFor
    For 1
        Gosub 蛋生鸡
    EndFor
    For 45
        Gosub 生产
    EndFor
    For 1
        Gosub 退出
    EndFor
    For 4
        Gosub 行动力
    EndFor
EndFor
Sub 鸡生蛋
    Delay 800
    Plugin Window.SendKeyPress(hwnd,112)
    Delay 1000
    Plugin Window.SendKeyPress(hwnd,116)
    Delay 1000
    Plugin Window.SendKeyPress(hwnd,13)
    Delay 100
    Plugin Window.SendKeyPress(hwnd,13)
    Delay 1000
Return
Sub 生产
    Delay 500
    MoveTo 780,480
    LeftClick 1
    Delay 500
Return
Sub 退出
    Delay 800
    Plugin Window.SendKeyPress(hwnd,27)
    Plugin Window.SendKeyPress(hwnd,27)
    Plugin Window.SendKeyPress(hwnd,27)
    Delay 500
Return
Sub 行动力
    Delay 500
    MoveTo 1300,690
    Delay 500
    LeftClick 1
    Delay 500
    MoveTo 920,590
    Delay 500
    LeftClick 1
    Delay 500
Return
Sub 蛋生鸡
    Delay 1000
    Plugin Window.SendKeyPress(hwnd,112)
    Delay 1000
    Plugin Window.SendKeyPress(hwnd,117)
    Delay 1000
    Plugin Window.SendKeyPress( hwnd,40)
    Delay 500
    Plugin Window.SendKeyPress(hwnd,40)
    Delay 500
    Plugin Window.SendKeyPress(hwnd,40)
    Delay 500
    Plugin Window.SendKeyPress(hwnd,40)
    Delay 500
    Plugin Window.SendKeyPress(hwnd,40)
    Delay 500
    Plugin Window.SendKeyPress(hwnd,40)
    Delay 500
    Plugin Window.SendKeyPress(hwnd,13)
    Delay 500
    Plugin Window.SendKeyPress(hwnd,13)
    Delay 1000
Return
Sub 生产
    Delay 500
    MoveTo 780,480
    LeftClick 1
    Delay 500
Return
Sub 退出
    Delay 800
    Plugin Window.SendKeyPress(hwnd,27)
    Plugin Window.SendKeyPress(hwnd,27)
    Plugin Window.SendKeyPress(hwnd,27)
    Delay 500
Return
Sub 行动力
    Delay 500
    MoveTo 1300,690
    Delay 500
    LeftClick 1
    Delay 500
    MoveTo 920,590
    Delay 500
    LeftClick 1
    Delay 500
Return
Return