KillAFish - WoW [x64] Fish Bot

[dbevf1]

@DarkLinux Hi, I'm a TW wow player.

"CastSpellByName(\"Fishing\");" //It's only work for enUS/enEU wow client. CastSpellByID(id) maybe can work for anykind langue client, and I not proof it yet.

[Virosoft]

Works great, no need to inject manually, the Run batch file does it all.
A few things though:
-How do you stop it? If I close the application or try to log out it crashes WoW.
-The option to use the bait would be great, if while fishing it automatically applies it.

Very efficient bot - Good work!

[Turkey11]

The crash when you disable it is so darn annoying!

[Dodgexander]

For anyone wondering why they are getting an MSVCR100.dll missing error, you need to download Visual C++ Service Pack 1.

Download Microsoft Visual C++ 2010 Service Pack 1 Redistributable Package MFC Security Update from Official Microsoft Download Center

edit# too bad, doesn't work any more. Opening run.bat results in the injection working fine but the program doesn't start.

[Jaladhjin]

I'm getting a warning d3d failed on a junk machine of mine.

It is running the game in dx11. 64 bit. I installed exras with the dx web installer.

http://imgur.com/g6gDzEV

[Turkey11]

This really needs a configurable hotkey, or at least no crash when turning it off. Only seems to happen around 2/3 times..

[razoks]

I have a question , can you post the links of all the olders versions 1.0.0 1.0.1 etc ...
Thanks ^^

[3588]

anyone get msvcr100.dll issue ?


NVM fixed

[adisri]

I'm getting a warning d3d failed on a junk machine of mine.

It is running the game in dx11. 64 bit. I installed exras with the dx web installer.

Imgur: The most awesome images on the Internet

Had the same problem but this fixed it for me, hope it works for you
Download DirectX End-User Runtime Web Installer from Official Microsoft Download Center

[DarkLinux]

Still works in 6.2.2, its a little slow to load but I'll fix that later

[eyecandyyo]

Hi

I am a Korean user.

This program does not work on Korean client.

"Fishing" is meaning of "낚시" in Korean.

I ask you to update program that will run under Korean client. please.

[Jonnathan Valle]

Hello, hey is there a way to run the bot multiple times in one pc? if yes can you please give us a quick steps please, thank you.! amazing bot btw

[user0000]

I find a way to use this bot with non English client (russian, korean etc.).
I use AutoIt to start fishing.
Script enclosed.

You should set AutoLoot off, change coords for MouseClick (Fishing Button) and PixelGetColor coodrs (set point inside Loot frame).
So script press Fish button, waiting for Loot frame and press Fish button again.
If Loot frame didn't appear in 18 sec it restarts fishing.
P.S. In script function PixelGetColor looking for point on Hero frame, that is near the bottom in my interface. But in your case may be it would be more easy use PixelGetColor (x,y) = <color>. The set correct color start script and wait for loot frame, because we need to know it correct location and press ESC to stop to script.And use second script to detect color. You should set coords in this script by yourself.
If you have problem with setting PixelGetColor you can remove this part of code "If PixelGetColor (880,810) <> 34316 Then Sleep(1000) ExitLoop EndIf" and just restart fishing every 15-20 sec + set AutoLoot on.

Start fishing script

#include <MsgBoxConstants.au3>

Global $g_bPaused = False

HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

Func _Au3RecordSetup()
	Opt('WinWaitDelay',100)
	Opt('WinDetectHiddenText',1)
	Opt('MouseCoordMode',0)
	Opt("PixelCoordMode", 0)
EndFunc

Func TogglePause()
    $g_bPaused = Not $g_bPaused
    While $g_bPaused
        Sleep(100)
        ToolTip('Script is "Paused"', 0, 0)
    WEnd
    ToolTip("")
EndFunc   ;==>TogglePause

Func Terminate()
    Exit
EndFunc   ;==>Terminate

Func _WinWaitActivate($title,$text,$timeout=0)
	WinWait($title,$text,$timeout)
	If Not WinActive($title,$text) Then WinActivate($title,$text)
	WinWaitActive($title,$text,$timeout)
EndFunc

_AU3RecordSetup()

$timer = TimerInit()

While 1

   _WinWaitActivate("World of Warcraft","")
   MouseClick("left",843,943,1)
   $StartTime = TimerDiff($timer)
   Sleep(7000)

   While 1
		If PixelGetColor (880,810) <> 34316 Then
			Sleep(1000)
			ExitLoop
		EndIf

		$CurrentTime = TimerDiff($timer)
		If ($CurrentTime - $StartTime) > 18000 Then ; 18000 = 18 sec
			ExitLoop
		EndIf
	WEnd

WEnd

Detect color script

#include <MsgBoxConstants.au3>
#include <GUIConstantsEx.au3>

Global $g_bPaused = False
Global $colorlabel = 0

HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

Func _Au3RecordSetup()
	Opt('WinWaitDelay',100)
	Opt('WinDetectHiddenText',1)
	Opt('MouseCoordMode',0)
EndFunc

Func TogglePause()
    $g_bPaused = Not $g_bPaused
    While $g_bPaused
        Sleep(100)
        ToolTip('Script is "Paused"', 0, 0)
    WEnd
    ToolTip("")
EndFunc   ;==>TogglePause

Func Terminate()
    Exit
EndFunc   ;==>Terminate

Func _WinWaitActivate($title,$text,$timeout=0)
	WinWait($title,$text,$timeout)
	If Not WinActive($title,$text) Then WinActivate($title,$text)
	WinWaitActive($title,$text,$timeout)
EndFunc

_AU3RecordSetup()
#endregion --- Internal functions Au3Recorder End ---

_WinWaitActivate("World of Warcraft","")
Opt("PixelCoordMode", 0)

DIM $x[2] = [880,810] ;point to detect color coords

Sleep(1000)

$var = PixelGetColor($x[0],$x[1])
MouseMove($x[0],$x[1])
ClipPut($var)
MsgBox(4096, "Color", 'DEC color: ' & $var & @LF & _
        'HEX color: ' & Hex($var))

[Miscr]

Does this bot still work?

[Kroniq]

Does this bot still work?

using it now