新脚本加入指定采集功能，具体使用方法请仔细阅读脚本说明
//——脚本说明——
// 1. 适合行动力 > 400 玩家。
// 2. 800＊600窗口模式，窗口位置随意。
// 3. 支持5种料理长时间挂机
// 4. 采集开始前先调整人物位置和视角，使人物位于采集目标的左边，并使得采集的图标恰好
// 处于采集目标上（例如南美东南岸的红花），以防后台鼠标点空，造成人物位置移动（退// 出游戏重新登录后视角是朝向人物的正面方向，脚本会自动调整视角时采集图标重新位于
// 采集目标之上）。然后点一次采集目标，使人物正面面对采集目标。
// 5. 本脚本分前台模式及后台模式，通过设置“后台模式开关”项选择。前台模式可防GM密语
// 及人物胡乱走动，完全无需监管。后台模式运行时如网络状况不佳可能会出现人物胡乱走// 动的现象，需要定时监管。后台模式运行时只有丢弃废物和登入登出时才会自动弹到前台
// ，其余时间都在后台运行。
// 6. 后台模式时游戏窗口不可最小化，但可以被其他窗口遮挡// 7. 使用前台模式时最好将人物状态设为完全屏蔽，否则可能会导致不正常登出
// 8. 每采集大约300次自动登出登入一次，将用户名及密码修改为自己的即可，支持大小写及各
// 种特殊字符。
// 9. 快捷键设置：F8 自定义栏 F7 装载 F9 任务，其他位置均设为不使用。
// 10.自定义栏 ：F1 采集 F2-F6 料理，如果料理不足5种相应位置留空即可。
// 11.脚本延时可通过“延时”变量进行设置，默认为25，即按下F8后2.5秒弹出自定义栏，使
// 用者可根据自己的网络情况自行设置。
// 12.应用于按键精灵6.71版，需要361后台鼠标插件支持
// 13.使用本脚本前请确定采集技能的使用次数为0，最好进入一次出航所或者登出游戏一次使
//技能使用次数清零
// 14.用户名和密码的修改并不是直接修改脚本中的字符，在精灵主界面（选择脚本的界面）选
//择脚本后在右边的脚本属性栏修改（修改启动/中止热键处）
// 15.新增指定丢弃功能使用说明：新增指定丢货功能，可丢弃不需要的货物，只留自己需要的
// ，并且采满货物后会自动下线。使用本功能前先手动采集几次，直到采集到一个自己需要
// 的物品，然后将该物品截图。可使用QQ的截图功能，截取范围为物品的上半部分（采集的
// 数目以上部分，注意不要将数字截进去），并注意截取边框以内的部分，不要截到图片的
// 边框。选好截取范围后将图片保存为BMP格式文件，文件名为1.bmp，并保存在精灵安装目
// 录的script目录下。然后将丢弃模式选择为指定采集即可。
// 16.使用指定采集功能最好将脚本的中止热键修改为Ctrl+F5
//
//——脚本——
//＊＊＊＊＊＊＊＊＊定义变量＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
VBS dim shiftDown， VKCode， nAscCode， nSkillCounter
UserVar UserName=“aaaaaaaaa”用户名
UserVar Password=“aaaaaaaaa”密码
UserVar mainDalay=30延时
UserVar swBackGround=DropList{后台模式：1|前台模式：0}=1后台模式开关
UserVar nDisMode=DropList{全丢：0|全留：1|指定采集：3}=0丢弃模式选择
//＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
VBS set TiShiObj = createobject（“WScript.Shell”）
Plugin hwn=Window.GetKeyFocusWnd（）
VBS Dim Blood，disleft，distop，disright，disbottom
VBS hpAddr = &H00ae44fc
VBS Dim DX，DY
//获取窗口原始位置函数
Plugin handle=Window.Foreground（）
Plugin s = Window.GetClientRect（handle）
MyArray = Split（s， “|”， -1， 1）
DX = MyArray（0）
DY = Myarray（1）
//GM密语取色范围
gmleft = MyArray（0）+ 8
gmtop = MyArray（1）+ 461
gmright = MyArray（0）+ 586
gmbottom = MyArray（1）+ 561
//丢货找图范围
disleft = MyArray（0）+ 86
distop = MyArray（1）+ 110
disright = MyArray（0）+ 367
disbottom = MyArray（1）+ 335
// Main route
Sub main
Rem start
For 50000
For 9
Plugin Window.Active（hwn）
Delay 300
Plugin Window.Restore（hwn）
Delay 300
If swBackGround=1
KeyDown 18，1
KeyPress 9，1
KeyUp 18，1
EndIf
Delay 300
For 4
For 7
If swBackGround=0
Gosub取色防GM
EndIf
Plugin Window.SendKeyPress（hwn，119）
Delay mainDalay＊100
Plugin Window.SendKeyPress（hwn，112）
Delay 3000
If swBackGround=1
Plugin BGKM5.LClick（hwn，780，290）
Else
MoveTo DX+780，DY+290
Delay 50
LeftClick 1
EndIf
Delay 200
Plugin Window.SendKeyPress（hwn，13）
EndFor
Plugin Blood=Memory.Read16Bit（handle， hpAddr）
If Blood < 80
Gosub吃料理
EndIf
If swBackGround=0
Gosub取色防GM
EndIf
Plugin Window.SendKeyPress（hwn，119）
Delay mainDalay＊100
Plugin Window.SendKeyPress（hwn，112）
Delay mainDalay＊130
Plugin Window.SendKeyPress（hwn，120）
Delay mainDalay＊100
Plugin Window.SendKeyPress（hwn，27）
Delay 300
Plugin Window.SendKeyPress（hwn，27）
Delay 1000
EndFor
If nDisMode = 0 or nDisMode = 3
Gosub丢弃交易品
Else
EndIf
EndFor
Gosub LogOut
Delay 25000
Gosub LogIn
Delay mainDalay＊280
Delay 500
KeyDown 17，1
KeyDown 37，1
Delay 1550
KeyUp 37，1 KeyUp 17，1
