求个魔兽世界钓鱼脚本的脚本哇!!掉的蛋疼啊

wow钓鱼辅助工具|魔兽世界钓鱼辅助1.2 绿色免费版-东坡下载
东坡下载:内容最丰富最安全的下载站!|||
→ 魔兽世界钓鱼辅助 1.2 绿色免费版
魔兽世界钓鱼辅助介绍
wow中钓鱼作为一个休闲项目,包含了很多的成就,各种稀有的鱼类。最有吸引力的就是只有钓鱼才会出的稀有坐骑乌龟了。然而这些都需要花费玩家大量的时间去拼运气。在这里给大家介绍一款魔兽世界钓鱼辅助。软件功能:魔兽世界钓鱼辅助是专门针对wow里的钓鱼而特别设计的一款辅助工具。主要有定点钓鱼和钓稀有鱼类两个功能。设置好辅助挂在那里就不用管了,是您节省时间快乐游戏的好帮手,还可以帮您调到稀有宠物哦!使用方法:先启动游戏,然后启动本辅助设置启动和停止热键在游戏中走到要钓鱼的地点,点击启动热键就行了
wow相关软件
电脑版相关
手机版相关
魔兽世界钓鱼辅助 1.2 绿色免费版
四川南充铁通 网友 客人 发表于:
能下载吗?
广东教育网 网友 客人 发表于:
不会自动捡取绑定的 有什么用呢~
河南安阳/许昌联通ADSL 网友 客人 发表于:
怎么不能用
美国CZ88.NET 网友 客人 发表于:
高效后台钓鱼脚本,支持所有魔兽服务器,设置简单,不影响您玩游戏或者看电影。高效280条/小时
48.1M / 04-01 / 2013稳定版
165KB / 03-07 / V1.0
绿色英文版
16.6M / 06-03 / 1.0.0.1051 经典怀旧版
18.6M / 07-22 / 8.6 官网最新版
6.5M / 10-22 / 3.75
中文***版
本类软件排行
装机必备软件
模拟平台对战工具你的位置:
魔兽钓鱼脚本求问~~
13:26:14 |
来源: 按键精灵资源站
Rem 国服魔兽世界自动钓鱼脚本
// normalshape =
// fishshape =
Rem 获取声音窗口大小(用来定位第三格声音的点):
soundwin = Plugin.Window.Find(0, &声音&)
If soundwin = 0 Then
MsgBox &没有打开声音窗口&
soundRect = Plugin.Window.GetClientRect(soundwin)
Dim soundArray
soundArray = split(soundRect, &|&)
//MessageBox(wowRect)
sL = Clng(soundArray(0))
sT = Clng(soundArray(1))& &
sR = Clng(soundArray(2))
sB = Clng(soundArray(3))
plugin.Window.Active(soundwin)
wowin=Plugin.Window.Find(0, &魔獸世界&)
//MessageBox (wowin)
Rem 窗口置顶:
plugin.Window.Active(wowin)
wowRect = Plugin.Window.GetClientRect(wowin)
Dim wowArray
wowArray = split(wowRect, &|&)
L = Clng(wowArray(0))
T = Clng(wowArray(1))& &
R = Clng(wowArray(2))
B = Clng(wowArray(3))& &
L1 = L + R / 5
R1 = L + (R/5) * 4&&
T1 = T + B/2 + B/11& &
B1 = T + B / 2 + (B / 10) * 4&&
KeyDown &1&, 1& &
KeyUp &1&, 1
Rem 鼠标滑动
Call mouse(L1, R1, T1, B1, 8, 25)
Function mouse(l2, r2, t2, b2,ustep,vstep)
//滑动起始点
mbx = l2+5
mby = b2-5
while t2&mby and mby&b2
&&while l2&mbx and mbx&r2
& & MoveTo mbx, mby
& &&&If findfishmouse = 1 Then
& && & call fish
& & End If
mbx = mbx+ustep
mby = mby - vstep
mbx = l2 + 1
Goto begin
End Function
Function findfishmouse()
mouseshape=GetCursorShape(0)
If (mouseshape=) Then
findfishmouse = 1
Else findfishmouse=0
End Function
Function fish()
GetCursorPos x, y
MoveTo x-5, y
//MsgBox &找到浮漂!进入钓鱼模式!&
fishtime=60
While fishtime&0
If fishsound = 1 Then
RightClick 1
Delay 1000
Goto begin
fishtime = fishtime - 1
Goto begin
End Function
Function fishsound()
IfColor A232&,2 Then
fishsound=1
fishsound=0
End Function
RightClick 3
脚本思路:
& &&&1.找浮漂,使用鼠标在钓鱼区域滑行,每滑行10像素进行一次鼠标形状判断,碰到浮漂进入钓鱼模式
& &&&2.上钩判断,,打开windows 7 声音窗口,扬声器有个声音输出指示,我这里判定声音指示条到3格判定鱼上钩,判定方法用 ifcolor
这是一个论坛小前辈 的帖子,思路非常精妙。别出心裁,我在台服和国服都已经试验成功,前面半段都没有问题,包括打开声音窗口,鼠标自动扫描找到鱼钩,但就在后面出问题,声音出现后,鼠标就是没有反应,在下初入论坛,也不知道是哪里出了问题,附上声音图一张,求达人君子看看是否找色出问题??还是声音窗口的坐标出问题??也没有其他要求,升级都是一个个做任务升上去的,只是钓鱼实在太费眼和时间,还要注意力高度集中,只要能自动钓鱼,于愿足矣。不胜感激涕零,拜谢。
下载地址请访问原帖求给一个能用的魔兽世界自动钓鱼的按键精灵脚本_百度知道[经验分享] 钓鱼的福利,霸王刺皮鱼100%出-潜行者|Rogue-魔兽世界-多玩游戏论坛 -
手机版 - Powered by Discuz!求一个魔兽世界自动钓鱼的脚本或者宏!_百度知道

参考资料

 

随机推荐