《火炬之光2》给大家个自动钓鱼的福利吧，我花钱找人做的

心偶尔酸酸的62026-06-23 15:02:40

给大家个自动钓鱼的福利吧，我花钱找人做的

火炬之光2

hiv8839419：严格说不太需要宠物打，除了召唤师，不过召唤师就算变战斗兽，也就一个骷髅的伤害····· 发布于 2022-12-28 07:38:03

十月蓝调：如果做个自动给背包所有装备三级附魔的就好了。发布于 2022-12-07 11:49:43

ji寂寞的人：好好好！！！！发布于 2022-12-07 03:40:33

不羁的Lin：怎么设置都不行。钓鱼有过场动画吗？发布于 2022-12-06 16:13:03

多年都没有看到：钓了一条就站着不动啊发布于 2022-12-06 15:30:43

不羁的Lin：按热键启动后没有作用啊？都按要求做了发布于 2022-12-06 12:12:13

Yamazaru丶：？？？不是很早就有脚本的吗？发布于 2022-12-05 20:00:53

agan_321：结合以上两位的脚本
Delay 200
SaveMousePos
LeftClick 1
Delay 1000
For 1000000
FindColorEx 477,376,515,442,"917D84",0,0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo 517, 407
LeftClick 1
Delay 2600
RestoreMousePos
Delay 600
LeftClick 1
Delay 100
Else
End If
Next
=========================================
说明：游戏必须1024X768，窗口模式，把游戏主窗口贴电脑桌面左上角摆放。发布于 2022-12-05 19:57:23

茯苓宝汤：我刚才又试了一下。把我的代码中的8B776D替换为89746E效果更好发布于 2022-11-13 23:02:43

茯苓宝汤：忘记了一个重要的事情！
执行代码之前，鼠标要放在“钓鱼池”那三个字的框框里，否则无效！
放在框框里，开始执行代码，然后请去睡觉，第二天早上醒来全是惊喜~ 发布于 2022-11-13 22:48:43

scorpio_鬼塚：我现在就差永久骨鱼没雕过，用来刷最好了发布于 2022-11-13 22:48:13

茯苓宝汤：必要的设置：
必须窗口模式、必须1024X768、任何MOD不影响此代码使用、必须关闭背包箱、地图M放在右上角（就是游戏默认的位置）。
重要！重要！重要！↓
我重新设置了抓色范围和抓色色域，偶尔会有判断收杆失误，大概50次会有1次，但是不影响使用，错误1次，大概几秒以后会继续进入循环。
代码：
Delay 200
SaveMousePos
LeftClick 1
Delay 1000
For 1000000
FindColorEx 474,394,494,450,"8B776D",0,0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo 514, 413
LeftClick 1
Delay 2600
RestoreMousePos
Delay 600
LeftClick 1
Delay 100
Else
End If
Next
直接复制粘贴进去即可
如果使用中有什么小问题，可以回帖咨询，渣渣的我尽量解决QAQ 发布于 2022-11-13 22:47:23

茯苓宝汤：题主的语句比较完整，看起来是比较专业的人士写的，覆盖一整套钓鱼功能。但是由于完整的语句必定造成插入的delay太多，使用了DO语句、鼠标移动频繁，捕点和移动判断偶有冲突，色域的捕捉范围大等。这也是没办法的事情QAQ
在此基础上，我自己减少了不必要的流程，例如删去了窗口矫正、让程序去点通知的勾勾等等。
我的代码不专业，属于简化版本，但是亲测可用，已经在我睡觉的时候给我钓了两个通宵了~~

97只永久战鼻鱼镇贴~哇哈哈哈~~~ 发布于 2022-11-13 22:46:03

茯苓宝汤：我来啦我来啦，嘿嘿
昨天太累了，就没顾上整理。现在发布一下我的简易源代码~~
tips:题主发布的源代码我简单解读了下，比较完整，还有一些附加功能。大致判断流程为：
1.首先游戏窗口矫正。
2.进入无线循环DO语句。
3.鼠标移动至“钓鱼池”点，点击。
4.在一个设定好的矩形小范围内，寻找917D84这个颜色（大概是深灰吧，咱不知道啊QAQ）。
5.若相似色度达到90%准确率，则移动鼠标至抬杆点，点击。
6.（没太细研究）大概是根据色域或delay，判断让鼠标点击绿色的勾勾或者关闭钓鱼通知窗口之类的。发布于 2022-11-13 22:44:23

茯苓宝汤：感谢题主！在你的源代码启发下，我自己写了一份，可以用了。嘿嘿发布于 2022-11-13 16:48:23

茯苓宝汤：只钓1次就终止了呜呜呜发布于 2022-11-13 16:29:53

_素颜♀：
是不是这样设置呢如果是还是只钓一次就不钓了地图也设置在了左边发布于 2022-11-13 07:51:33

_素颜♀：题主，我用1024 768钓一次然后就不掉了怎么弄呢发布于 2022-11-13 07:45:13

心偶尔酸酸的6：Hwnd = Plugin.Window.Find("OgreD3D9Wnd", 0)
TracePrint hwnd
Call Plugin.Window.Move(Hwnd, 0, 0)
Delay 100
Do
MoveTo 549, 339
LeftClick 1
Delay 1500
Do
FindColorEx 477,376,515,442,"917D84",0,0.9,intX,intY
If intX > 0 And intY > 0 Then
TracePrint "点击"
MoveTo 517, 407
LeftClick 1
Delay 500
End If
GetColor=GetPixelColor(785,358)
If GetColor = "000711" Then
MoveTo 797, 560
Delay 100
LeftClick 1
Delay 1000
Exit Do
End If
Delay 2
Loop
Loop 发布于 2022-11-13 07:36:33