挂机条件：

1、会烹饪、保管4级以上；

2、行动力最大建议300以上的号挂；（少也没关系，就是慢点）

3、必须800×600窗口模式，窗口位置不限，但不能后台运行。。。。郁闷啊

4、必须用按键精灵6.6以上版本，我用的是华军6.603免费版，否则有窗口插件运行不正常。

5、启动热键最好用组合键并尽量避免使用游戏的热键，比如用ctrl+x或ctrl+小键盘‘-’就比较好。

挂机要求：

1、开始挂机之前，船上除了留鸡、鸭或蛋，其余物品全部清空，身上带些料理；

2、在酒吧站好位置，要靠近酒吧老板（尽量人少的酒吧）

3、在酒吧吃一次最小组合的食物（如奶+生火腿）（咖啡+油豆角）。。。。。

4、自定义F10功能键菜单内：F1：料理；F2烹饪书（禽的章节）；F3保管书（旅客的食品筹集术）；

5、如果吃饱了，程序会自动判断，改吃料理，饿了后继续吃老板的。

7、如果发现问题，可以联系我哟，我是2-3我是小魔女小号名姬，用得不好，板砖伺侯，用好了不要打劫我就好了

－－－－－－下面是脚本－－－－－－－－－－－－－－

#这是按键精灵生成的脚本源文件
#在理解各条命令的基础上，您可以修改这个文件的内容
#您修改的结果将会在普通视图上有所反映
 
VBS dim yanshi,jibenyanshi,xxx,yyy,n,x0,y0,x1,y1,x00,y00,t,dhhsd
VBS dim x11,x12,x13,x14,x15,x16,y11,y12,y13,y14,y15,y16
Delay 100
KeyPress 27,1
Delay 500
KeyPress 27,1
Delay 500
Delay 100
Plugin dhhsd = Window.Foreground()
Delay 100
Plugin s = Window.GetClientRect(dhhsd)
Delay 100
MyArray = Split(s, "|", -1, 1)
Delay jibenyanshi
MoveTo MyArray(0),MyArray(1)
Delay jibenyanshi
MoveR 794,402
Delay jibenyanshi
SaveMousePos
Delay jibenyanshi
UserVar yanshi=1500 根据网速输入生产延时
UserVar jibenyanshi=400 根据计算机速度定义基本延时，建议大于400毫秒
Rem 主程序
For 999999
    Delay jibenyanshi
    Gosub 吃饭
    Gosub 判断行动力
    Gosub 鸡生蛋
    Delay jibenyanshi
    Gosub 吃饭
    Delay jibenyanshi
    Gosub 判断行动力
    Gosub 孵小鸡
    Delay jibenyanshi
    Goto 主程序
EndFor
Rem 主程序结束
Sub 吃饭
    VBS t=1
    Delay jibenyanshi
    Gosub 找酒吧老板子程序
    Delay jibenyanshi
    Rem 看看让吃不
    Delay jibenyanshi
    VBS xxx=MyArray(0)+646
    VBS yyy=MyArray(1)+357
    MoveTo xxx,yyy
    Delay jibenyanshi
    LeftClick 1
    Delay 2000
    VBS xxx=MyArray(0)+666
    VBS yyy=MyArray(1)+330
    IfColor xxx,yyy,4a4942,2
        Gosub 再吃一次
        If t=0
            Goto 吃饭结束饭
        EndIf
        Goto 看看让吃不
    Else
        Rem 吃饭结束
        KeyPress 27,1
        Delay 1000
        KeyPress 27,1
        Delay 500
    EndIf
Return 吃饭
Sub 再吃一次
    Delay jibenyanshi
    VBS xxx=MyArray(0)+483
    VBS yyy=MyArray(1)+179
    IfColor xxx,yyy,b5b2b5,2
        RestoreMousePos
        Delay jibenyanshi
        MoveR -197,0
        Delay jibenyanshi
        LeftClick 1
        Delay 2000
        Goto 吃好了
    Else
        Delay jibenyanshi
        KeyPress 27,1
        Delay 2000
        Goto 老板不让吃
    EndIf
    Delay jibenyanshi
    Rem 老板不让吃
    VBS t=0
    Delay jibenyanshi
    Rem 吃好了
Return 再吃一次
Sub 找酒吧老板子程序
    Rem 名字坐标计算
    VBS x11=MyArray(0)+630
    VBS y11=MyArray(1)+329
    VBS x12=MyArray(0)+630
    VBS y12=MyArray(1)+337
    VBS x13=MyArray(0)+639
    VBS y13=MyArray(1)+337
    VBS x14=MyArray(0)+652
    VBS y14=MyArray(1)+330
    VBS x15=MyArray(0)+675
    VBS y15=MyArray(1)+331
    VBS x16=MyArray(0)+681
    VBS y16=MyArray(1)+336
    Rem 名字坐标计算结束
    Rem 找酒吧老板开始
    Delay jibenyanshi
    KeyPress 9,1       //按TAB键
    Delay 2000
    Delay jibenyanshi
    IfColor x11,y11,ffffff,2
        Delay 50
        IfColor x12,y12,ffffff,2
            Delay 50
            IfColor x13,y13,ffffff,2
                Delay 50
                IfColor x14,y14,ffffff,2
                    Delay 50
                    IfColor x15,y15,ffffff,2
                        Delay 50
                        IfColor x16,y16,ffffff,2
                            Delay 50
                            Goto 初步确认找到了老板
                        Else
                            Delay 50
                            Goto 找酒吧老板开始
                        EndIf
                    Else
                        Delay 50
                        Goto 找酒吧老板开始
                    EndIf
                Else
                    Delay 50
                    Goto 找酒吧老板开始
                EndIf
            Else
                Delay 50
                Goto 找酒吧老板开始
            EndIf
        Else
            Delay 50
            Goto 找酒吧老板开始
        EndIf
    Else
        Goto 找酒吧老板开始
    EndIf
    Delay jibenyanshi
    Rem 初步确定找到了老板
    KeyPress 13,1     //按回车键
    Delay 4000
    Delay jibenyanshi
    RestoreMousePos
    Delay jibenyanshi
    MoveR -173,0
    Delay jibenyanshi
    VBSCall GetCursorPos(xxx,yyy)
    Delay jibenyanshi
    IfColor xxx,yyy,7B6963,2
        Delay jibenyanshi
        IfColor x11,y11,ffffff,2
            Delay 50
            IfColor x12,y12,ffffff,2
                Delay 50
                IfColor x13,y13,ffffff,2
                    Delay 50
                    IfColor x14,y14,ffffff,2
                        Delay 50
                        IfColor x15,y15,ffffff,2
                            Delay 50
                            IfColor x16,y16,ffffff,2
                                Delay 50
                                Goto 最终确认找到了老板
                            Else
                                Delay 50
                                Goto 找酒吧老板开始
                            EndIf
                        Else
                            Delay 50
                            Goto 找酒吧老板开始
                        EndIf
                    Else
                        Delay 50
                        Goto 找酒吧老板开始
                    EndIf
                Else
                    Delay 50
                    Goto 找酒吧老板开始
                EndIf
            Else
                Delay 50
                Goto 找酒吧老板开始
            EndIf
        Else
            Goto 找酒吧老板开始
        EndIf
        Delay jibenyanshi
    Else
        Goto 找酒吧老板开始
        Rem 最终确认找到了老板
        Delay jibenyanshi
        VBS xxx=MyArray(0)+646
        VBS yyy=MyArray(1)+357
        MoveTo xxx,yyy
        Delay jibenyanshi
        LeftClick 1
        Delay 2000
    Return 找酒吧老板子程序
    Delay jibenyanshi
    Sub 鸡生蛋
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,121)
        Delay 3500
        Plugin Window.SendKeyPress(dhhsd,113)
        Delay 3500
        RestoreMousePos
        Delay jibenyanshi
        MoveR -341,0
        Delay jibenyanshi
        LeftClick 1
        Delay 3500
        Gosub 生产画面
        Delay jibenyanshi
        Rem 这里几只鸭子生蛋
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,121)
        Delay 3500
        Plugin Window.SendKeyPress(dhhsd,113)
        Delay 3500
        Plugin Window.SendKeyPress(dhhsd,40)
        Delay jibenyanshi
        RestoreMousePos
        Delay jibenyanshi
        MoveR -341,0
        Delay jibenyanshi
        LeftClick 1
        Delay 3500
        Gosub 生产画面
        Delay jibenyanshi
        Rem 鸭子生蛋结束
        KeyPress 27,1
        Delay jibenyanshi
        KeyPress 27,1
        Delay jibenyanshi
        Gosub 丢弃第一格物品
    Return 丢弃第一格物品
    Sub 丢弃第一格物品
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,118)
        Delay 3500
        RestoreMousePos
        Delay jibenyanshi
        MoveR -361,-38
        Delay jibenyanshi
        LeftClick 1
        Delay 3500
        Rem 丢弃第一格
        RestoreMousePos
        Delay jibenyanshi
        MoveR -624,-266
        Delay jibenyanshi
        VBSCall GetCursorPos(xxx,yyy)
        Delay jibenyanshi
        IfColor xxx,yyy,422818,2
            Delay jibenyanshi
            RestoreMousePos
            Delay jibenyanshi
            MoveR -165,-15
            Delay jibenyanshi
            LeftClick 1
            Delay 3500
        Else
            Delay jibenyanshi
            RestoreMousePos
            Delay jibenyanshi
            MoveR -683,-262
            Delay jibenyanshi
            LeftClick 1
            Delay 3500
            Gosub 选择最多
            Delay jibenyanshi
            Goto 丢弃第一格
        EndIf
        KeyPress 27,1
        Delay jibenyanshi
        KeyPress 27,1
        Delay jibenyanshi
    Return 蛋生鸡
    Delay jibenyanshi
    Sub 孵小鸡
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,121)
        Delay 3500
        Plugin Window.SendKeyPress(dhhsd,114)
        Delay 3500
        Plugin Window.SendKeyPress(dhhsd,40)
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,40)
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,40)
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,40)
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,40)
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,40)
        Delay jibenyanshi
        RestoreMousePos
        Delay jibenyanshi
        MoveR -341,0
        Delay jibenyanshi
        LeftClick 1
        Delay 3500
        VBS workNO=99
        Gosub 生产画面
        Delay jibenyanshi
        KeyPress 27,1
        Delay jibenyanshi
        KeyPress 27,1
        Delay jibenyanshi
        Gosub 丢弃第三格物品
        Delay jibenyanshi
    Return 丢弃第三格物品
    Sub 丢弃第三格物品
        Delay jibenyanshi
        Plugin Window.SendKeyPress(dhhsd,118)
        Delay 3500
        RestoreMousePos
        Delay jibenyanshi
        MoveR -361,-38
        Delay jibenyanshi
        LeftClick 1
        Delay 3500
        RestoreMousePos
        Delay jibenyanshi
        MoveR -564,-266
        Delay jibenyanshi
        VBSCall GetCursorPos(xxx,yyy)
        Delay jibenyanshi
        IfColor xxx,yyy,422818,2
            Delay jibenyanshi
            KeyPress 27,1
            Delay 2000
            KeyPress 27,1
            Delay 2000
        Else
            Delay jibenyanshi
            LeftClick 1
            Delay 3500
            Gosub 选择最多
            Delay jibenyanshi
            RestoreMousePos
            Delay jibenyanshi
            MoveR -165,-15
            Delay jibenyanshi
            LeftClick 1
            Delay 3500
        EndIf
        KeyPress 27,1
        Delay jibenyanshi
        KeyPress 27,1
        Delay jibenyanshi
    Return 鸡生蛋
    Delay jibenyanshi
    Sub 生产画面
        Rem 生产循环开始
        Delay jibenyanshi
        RestoreMousePos
        Delay jibenyanshi
        MoveR -342,-104
        Delay jibenyanshi
        LockMouse
        For 999
            Delay jibenyanshi
            VBS xxx=MyArray(0)+401
            VBS yyy=MyArray(1)+272
            IfColor xxx,yyy,efebce,2
                Delay jibenyanshi
                UnlockMouse
                KeyPress 27,1
                Delay 2000
                RestoreMousePos
                Delay jibenyanshi
                MoveR -341,0
                Delay jibenyanshi
                LeftClick 1
                Delay 3500
            Else
                VBSCall GetCursorPos(xxx,yyy)
                IfColor xxx,yyy,4a657b,2
                    UnlockMouse
                    Delay jibenyanshi
                    RestoreMousePos
                    Delay 1500
                    MoveR -410,-269
                    Delay jibenyanshi
                    VBSCall GetCursorPos(xxx,yyy)
                    Delay jibenyanshi
                    IfColor xxx,yyy,8482ff,2
                        Goto 没材料了
                    Else
                        UnlockMouse
                        Delay jibenyanshi
                        RestoreMousePos
                        Delay jibenyanshi
                        MoveR -360,-89
                        Delay jibenyanshi
                        VBSCall GetCursorPos(xxx,yyy)
                        Delay jibenyanshi
                        IfColor xxx,yyy,f77df7,2
                            Goto 生产循环开始
                        Else
                            Goto 没有行动力了
                        EndIf
                    EndIf
                Else
                    Delay jibenyanshi
                    LeftClick 1
                    Delay yanshi
                EndIf
            EndIf
        EndFor
        Rem 没材料了
        Rem 没有行动力了
        UnlockMouse
        Delay jibenyanshi
        RestoreMousePos
        Delay jibenyanshi
        MoveR -167,0
        Delay jibenyanshi
        LeftClick 1
        Delay 3500
        KeyPress 27,1
        Delay jibenyanshi
        KeyPress 27,1
        Delay jibenyanshi
    Return 生产画面
    Delay jibenyanshi
    Delay jibenyanshi
    Sub 选择最多
        Delay jibenyanshi
        KeyPress 107,1
        Delay 2500
        KeyPress(dhhsd,13)
        Delay 2500
    Return 选择最多
    Delay jibenyanshi
    Sub 判断行动力
        Rem 判断开始
        Delay jibenyanshi
        RestoreMousePos
        Delay jibenyanshi
        MoveR -696,-287
        Delay jibenyanshi
        VBSCall GetCursorPos(xxx,yyy)
        Delay jibenyanshi
        IfColor xxx,yyy,ff7dff,2
            Goto 有行动力
        Else
            Delay jibenyanshi
            Plugin Window.SendKeyPress(dhhsd,121)
            Delay 3500
            Plugin Window.SendKeyPress(dhhsd,112)
            Delay 3500
        EndIf
        Goto 判断开始
        Rem 有行动力
        Delay jibenyanshi
    Return 判断行动力
    Sub 是否没材料了
        UnlockMouse
        Delay jibenyanshi
        RestoreMousePos
        Delay jibenyanshi
        MoveR -410,-269
        Delay jibenyanshi
        VBSCall GetCursorPos(xxx,yyy)
        Delay jibenyanshi
        IfColor xxx,yyy,8482ff,2
            Goto 没材料了
        Else
            Goto 生产循环开始
        EndIf
    Return 是否没材料了
    

• 自己编写的酒吧挂保管脚本（修改版） (2007-12-10)
• 自己编写的酒吧挂保管脚本 (2007-12-09)

史上最难游戏第2辑