魔兽自动钓鱼按键精灵脚本.pdfVIP

[General] SyntaxVersion=2 BeginHotkey=119 BeginHotkeyMod=0 PauseHotkey=0 PauseHotkeyMod=0 StopHotkey=120 StopHotkeyMod=0 RunOnce=1 EnableWindow= MacroID=1002212b-d2d6-466e-8b60-4406b4e9e915 Description=魔兽世界自动钓鱼程序 Enable=1 AutoRun=0 [Repeat] Type=1 Number=1 [Relative] SetupOCXFile= [Comment] 魔兽世界自动钓鱼程序1.0 —— 松江游子 整理优化 温馨提示： 1、本程序由免费版按键精灵制作，会附带广告，对此表示抱歉 2 、使用按键精灵可能会导致魔兽世界帐号被封，请自行斟酌 3、本程序适合魔兽世界大地的裂变国服版本（其他未测） 4 、为保证程序生效，请按照使用说明对您的游戏进行设置 使用说明： 1、建议设置魔兽世界为1024*768 分辨率，将游戏特效开至最大 如发现本程序无法在您的计算机上运行，请联系作者松江游子 2 、将 “钓鱼”技能拖至绑定了按键“1”的位置，装备上 “鱼竿” 3、请开启自动拾取并检查背包空间 4 、将人物停留在没有其他玩家钓鱼的地方，提高上钩成功率 5、请尽量靠近水面 6、本程序快捷键 F8 启动 F9 停止 其他设置默认即可 7、第一次甩杆，程序会关闭当前界面，如需要恢复请按ALT+Z 每次甩杆，程序都会将视角切换至第一人称 8、当前设置理想延迟50-200，如您无法正常使用，请联系作者 程序原理： 程序启动后，会逐行扫描已经记录下来的当前版本鱼钩特征 通过对比在指定区域内迅速找到鱼漂，并监控鱼漂的动作 当鱼漂上下浮动时，自动点击右键，收杆，就这么简单！ [Script] MessageBox 点击确定 5 秒后将开始钓鱼，请切换至魔兽世界窗口，自动钓鱼期间请勿动 鼠标键盘 Delay 5000 UserVar LTop=300,380 鼠标扫描左上起点 UserVar RBot=980,500 鼠标扫描右下终点 mouseType=1053591638 Call GetCursorShape(0) Dim s, x0, y0, x1, y1, x2, y2, x, y, c, starttime, endtime, m1, n1, m2, n2 s = InStr(LTop, ,) x1 = int(Mid(LTop, 1, s - 1)) y1 = int(Mid(LTop, s + 1)) s = InStr(RBot, ,) x2 = int(Mid(RBot, 1, s - 1)) y2 = int(Mid(RBot, s + 1)) KeyDown 18, 1 KeyPress 90, 1 KeyUp 18, 1 Delay 100 Rem KaiShi KeyPress End, 1 Delay 100 KeyPress Home, 5 Delay 1000 KeyPress 49, 1 Rem SouSuo Delay 1500 x = x1 y = y1 MoveTo x, y starttime = Now While y y2 y = y + 25 While x x2 x = x + 2 MoveTo x, y Delay 1 If GetCursorShape(0) = mouseType Then GetCursorPos x0, y0 MoveTo x, y Goto YiDong End If Wend x=x1 Wend Goto KaiShi Rem YiDong While GetCursorShape(0) = mouseType x = x + 1 MoveTo x, y Delay 10 GetCursorPos m1, n1 Wend x = x0 y = y0 Mo