把钓鱼拉到键盘1键
钓鱼后不是要读条么?读条的位置是不会动的。先裁图读条,也把钓鱼的浮标图裁图下来。
按下1键后用找图找读条那个图,然后加入延迟。如果读条是3秒你就延时个2.6到2.9吧!然后开始下一个找图找浮标的图。找到后加入鼠标移动到浮标位置。在加入右键点击就完成一次循环。如果想一直循环就在程序前面加循环就好了
For 3Rem 开始钓鱼
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 开始钓鱼
推荐你用361窗口增强先获取句柄
然后激活窗口
然后调用361插件窗口欺骗模式。(V6.10版,按键官网有下载)
然后用按键精灵自带的后台插件写命令
我玩很多网游都是用这个方法写的脚本。你试试吧
按键精灵知道团队为您解答,祝您一帆风顺,希望采纳
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)