洛奇 求发个按键精灵 钓鱼脚本。

For 3
Rem 开始钓鱼
KeyDown 49 1
Delay 50
KeyUp 49 1
Delay 2000 \\上面是甩杆 我设置到按键1的
For 30
Delay 100
VBSCall FindColor(142,141,690,406,"000000",x,y) \\这里在指定范围内查找颜色 我去偷了个黑色版鱼漂 所以颜色是000000
If x>=0 and y>=0
MoveTo x y
Goto 确定鱼上钩 \\这个跳转不知道怎么回事 死活不肯跳......好在这里循环30次后 它自己跑下一步去了
EndIf
EndFor
Rem 确定鱼上钓
Delay 50
IfColor 348 473 5a615a 1 \\这个是施法条的判断
IfColor 678 50 7b797b 1 \\这里我又加了一个判断 主要是判断右上角鱼饵的BUFF
Goto 鱼饵
Else
Goto 开始钓鱼
EndIf
Goto 开始钓鱼
Else
EndIf
IfColor 813 180 b59ece 0 \\这个判断是这个脚本最关键的地方....就是WOW程序以外运行的声音频谱仪的监视
RightClick 1
Goto 拣取物品
Else
Goto 确定鱼上钓
EndIf
Rem 拣取物品
Delay 700
IfColor x y 000000 1 \\这个是拿物品
For 10
Delay 50
RightClick 1
EndFor
Else
EndIf
EndFor
Rem 鱼饵
IfColor 678 50 7b797b 0 \ \这个坐标是右上角的鱼饵BUFF
Goto 开始钓鱼
Else
Delay 500
KeyDown 67 1
Delay 100
KeyUp 67 1
Delay 500
MoveTo 310 612 \\鱼饵我设在按键2的位置上
Delay 1000
LeftClick 1
Delay 300
MoveTo 81 307
Delay 700
LeftClick 1
Delay 7000
KeyDown 67 1
Delay 100
KeyUp 67 1
Delay 300
EndIf
Goto 开始钓鱼