挂机条件:
1、会烹饪、保管4级以上;
2、行动力最大300以上,建议400以上的号挂;
3、800×600窗口模式,窗口位置不限,但不能后台运行。。。。郁闷啊
挂机要求:
1、开始挂机之前,船上留50只鸡,其余物品全部清空;
2、吃好够生产49次的行动力,不要吃满红条,至少留50的空余
3、在酒吧站好位置,使鼠标在信息窗口左上1平方厘米之内能点到老板,又绝对不会挡住;(就是那个切换显示内容的图标上方)
4、自定义F10功能键菜单内:F1:料理;F2烹饪书(禽的章节);F3保管书(旅客的食品筹集术);F5肢体语言(这是为了调节行动力用的,每20个循环会用一次,以消耗多余行动力,否则很快吃饱)
5、如果吃饱了,程序会自动判断,改吃料理,饿了后继续吃老板的。
[General]
Description=挂保管前台脚本
BeginHotkey=109
BeginHotkeyMod=2
PauseHotkey=106
PauseHotkeyMod=2
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=0
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=
[Script]
VBS dim eatNO,workNO,yanshi,jibenyanshi,xxx,yyy,n,x0,y0,x1,y1,x00,y00
Plugin handle=Window.Foreground()
Plugin s = Window.GetClientRect(handle)
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 根据网速输入生产延时,至少1200
UserVar jibenyanshi=400 根据计算机速度定义基本延时,建议大于400毫秒
Rem 主程序
For 20
Delay jibenyanshi
Gosub 判断行动力
Gosub 鸡生蛋
Delay jibenyanshi
VBS eatNO=6
Delay jibenyanshi
Gosub 吃饭
Delay jibenyanshi
Gosub 判断行动力
Gosub 孵小鸡
Delay jibenyanshi
VBS eatNO=5
Delay jibenyanshi
Gosub 吃饭
Delay jibenyanshi
EndFor
Delay jibenyanshi
KeyPress 121,1
Delay 2500
KeyPress 116,1
Delay 2500
Goto 主程序
Sub 吃饭
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -778,25
Delay jibenyanshi
LeftDoubleClick 1
Delay 2500
For eatNO
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -148,-46
Delay jibenyanshi
LeftClick 1
Delay 2000
RestoreMousePos
Delay jibenyanshi
MoveR -336,-200
Delay jibenyanshi
VBSCall GetCursorPos(xxx,yyy)
IfColor xxx,yyy,312018,2
Delay jibenyanshi
KeyPress 27,1
Delay 2000
Goto 老板不让吃
Else
RestoreMousePos
Delay jibenyanshi
MoveR -197,0
Delay jibenyanshi
LeftClick 1
Delay 2000
EndIf
EndFor
Rem 老板不让吃
Delay jibenyanshi
KeyPress 27,1
Delay jibenyanshi
KeyPress 27,1
Return 吃饭
Delay jibenyanshi
Sub 鸡生蛋
Delay jibenyanshi
KeyPress 121,1
Delay 2500
KeyPress 113,1
Delay 2500
RestoreMousePos
Delay jibenyanshi
MoveR -341,0
Delay jibenyanshi
LeftClick 1
Delay 2500
VBS workNO=49
Gosub 生产画面
If n=49
Goto 鸭子生蛋结束
EndIf
Delay jibenyanshi
Rem 这里几只鸭子生蛋
Delay jibenyanshi
KeyPress 121,1
Delay 2500
KeyPress 113,1
Delay 2500
KeyPress 40,1
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -341,0
Delay jibenyanshi
LeftClick 1
Delay 2500
VBS workNO=49-n
Gosub 生产画面
Delay jibenyanshi
Rem 鸭子生蛋结束
KeyPress 27,1
Delay jibenyanshi
KeyPress 27,1
Delay jibenyanshi
Gosub 丢弃第一格物品
Return 丢弃第一格物品
Sub 丢弃第一格物品
Delay jibenyanshi
KeyPress 118,1
Delay 2500
RestoreMousePos
Delay jibenyanshi
MoveR -361,-38
Delay jibenyanshi
LeftClick 1
Delay 2500
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 2500
Else
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -683,-262
Delay jibenyanshi
LeftClick 1
Delay 2500
Gosub 选择最多
Delay jibenyanshi
Goto 丢弃第一格
EndIf
KeyPress 27,1
Delay jibenyanshi
KeyPress 27,1
Delay jibenyanshi
Return 蛋生鸡
Delay jibenyanshi
Sub 孵小鸡
Delay jibenyanshi
KeyPress 121,1
Delay 2500
KeyPress 114,1
Delay 2500
KeyPress 40,1
Delay jibenyanshi
KeyPress 40,1
Delay jibenyanshi
KeyPress 40,1
Delay jibenyanshi
KeyPress 40,1
Delay jibenyanshi
KeyPress 40,1
Delay jibenyanshi
KeyPress 40,1
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -341,0
Delay jibenyanshi
LeftClick 1
Delay 2500
VBS workNO=52
Gosub 生产画面
Delay jibenyanshi
KeyPress 27,1
Delay jibenyanshi
KeyPress 27,1
Delay jibenyanshi
Gosub 丢弃第三格物品
Delay jibenyanshi
Return 丢弃第三格物品
Sub 丢弃第三格物品
Delay jibenyanshi
KeyPress 118,1
Delay 2500
RestoreMousePos
Delay jibenyanshi
MoveR -361,-38
Delay jibenyanshi
LeftClick 1
Delay 2500
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 2500
Gosub 选择最多
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -165,-15
Delay jibenyanshi
LeftClick 1
Delay 2500
EndIf
KeyPress 27,1
Delay jibenyanshi
KeyPress 27,1
Delay jibenyanshi
Return 鸡生蛋
Delay jibenyanshi
Sub 生产画面
VBS n=0
Rem 生产循环开始
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -342,-104
Delay jibenyanshi
LockMouse
For workNO
VBSCall GetCursorPos(xxx,yyy)
IfColor xxx,yyy,4a657b,2
UnlockMouse
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
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 -359,-89
Delay jibenyanshi
VBSCall GetCursorPos(xxx,yyy)
Delay jibenyanshi
IfColor xxx,yyy,f77df7,2
Goto 生产循环开始
Else
Goto 没有行动力了
EndIf
EndIf
Else
Delay jibenyanshi
LeftClick 1
VBS n=n+1
Delay yanshi
EndIf
EndFor
Rem 没材料了
Rem 没有行动力了
UnlockMouse
Delay jibenyanshi
RestoreMousePos
Delay jibenyanshi
MoveR -167,0
Delay jibenyanshi
LeftClick 1
Delay 2500
KeyPress 27,1
Delay jibenyanshi
KeyPress 27,1
Delay jibenyanshi
Return 生产画面
Delay jibenyanshi
Delay jibenyanshi
Sub 选择最多
Delay jibenyanshi
KeyPress 107,1
Delay 2500
KeyPress 13,1
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
KeyPress 121,1
Delay 2500
KeyPress 112,1
Delay 2500
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 是否没材料了
此篇文章为17173玩家原创作品,获得积分奖励 Z。 17173全新积分兑换系统上线 点卡周边等你拿>>>详情点击 |