Trove Fishing Bot v2

[ragecrysux]

Whatever patch is applied, botting will always be possible. Look at games like runescape, it still gets botted even with a advanced anticheat system in place.

But would you risk getting your account banned?

[Agrius]

First great job but selling the fishes is so slow and common ones are just pain cuz they give so less
can you think of a way for selling the fish with a script? like fishes from first 5 slots to be sold or something like that

[ragecrysux]

First great job but selling the fishes is so slow and common ones are just pain cuz they give so less
can you think of a way for selling the fish with a script? like fishes from first 5 slots to be sold or something like that

What do you mean selling fish?

if you mean "deconstructing", you can Ctrl+click to deconstruct the whole stack..

and if you want to 'sell fishes', i dont think a script can do that...

[Agrius]

oh my god if it works its life saver i didn't know nothing in game says you can ctrl sell a stack x[ i throw like 200+ common fishes xD almost throw 400 more but game was offline hahahha

[snakewildlife]

Patch out, be careful.

[leviath369]

Patched, not working anymore.

[Takeon]

Updated to new patch. Also contains a failsafe so if it stuffs up with lagg it will attempt to start fishing again. You need to run one version of the script for every new account if using multiple.

I also didn't test out the lava fishing nor do I have time at the moment to test it for a longer period so feedback will be good.


save it with a text editor as whatever.ahk

#NoEnv
SendMode Input
CoordMode, ToolTip, Screen
SetTitleMatchMode, 3
SetKeyDelay, 0, 2

LureCount := 0
Failsafe := 0
Numpad9::
	WinGet, pidn, PID, A
	pid := pidn
	WinGet, hwnds, ID, A
	Handle := hwnds
	InputBox, Lure, Lure's, How many Lure's do you have in inventory?
	Loop %Lure%
	{
		LureCount := LureCount +1
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Catch := 0
		Loop  
		{
			If (Catch = 1)
			{    
				break
			}
				else
			{
				if (Failsafe = 40)
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Failsafe := 0
				}
				Base := getProcessBaseAddress() 
				CaughtWater := ReadMemory((ReadMemory(base + 0x008E6660) + 0xBD150))
				CaughtLava := ReadMemory(((ReadMemory(base + 0x008E6660) + 0xBD150) + 0x4A4))
				If (CaughtWater = 1 or CaughtLava = 1)
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Random, Wait, 2000, 3500
					Sleep, %Wait%
					Failsafe := 0
					Catch := 1
				}
				else 
				{
					Sleep, 1000
					Failsafe := (Failsafe +1)
				}
			}
		}
	}
ExitApp

Numpad7::
ExitApp

getProcessBaseAddress()
{
    Global Handle
    return DllCall( A_PtrSize = 4
                            ? "GetWindowLong"
                            : "GetWindowLongPtr"
                        , "Ptr", Handle
                        , "Int", -6
                        , "Int64") ; Use Int64 to prevent negative overflow when AHK is 32 bit and target process is 64bit
     ; If DLL call fails, returned value will = 0
}   


ReadMemory(MADDRESS)
{
    Global pid
    VarSetCapacity(MVALUE,4,0)
    ProcessHandle := DllCall("OpenProcess", "Int", 24, "Char", 0, "UInt", pid, "UInt")
    ;DllCall("ReadProcessMemory","UInt",ProcessHandle,"UInt",MADDRESS,"Str",MVALUE,"UInt",4,"UInt *",0)
    DllCall("ReadProcessMemory", "UInt", ProcessHandle, "Ptr", MADDRESS, "Ptr", &MVALUE, "Uint",4)
    Loop 4
        result += *(&MVALUE + A_Index-1) << 8*(A_Index-1)
    return, result
}

[snakewildlife]

Are there any signs in this patch of said threats from the devs to include an anti-memoryread Ban countermeasure?

[mahavir111]

Am i doing something wrong ? I created a New .ahk file coyped ur code. Complied it . Ran it. It asked me for how many lures. i typed it. Than it ran for about 30 secs but every time a fish was about to be caught the bot just closed down. it disappeared from my tray bar

[Takeon]

Am i doing something wrong ? I created a New .ahk file coyped ur code. Complied it . Ran it. It asked me for how many lures. i typed it. Than it ran for about 30 secs but every time a fish was about to be caught the bot just closed down. it disappeared from my tray bar

did you type in 1?

[mahavir111]

No i typed 300 for baits

[Takeon]

No i typed 300 for baits

Theres no reason it should close unless you are pressing numpad 7 or it went under the number of baits you typed

[mahavir111]

Theres no reason it should close unless you are pressing numpad 7 or it went under the number of baits you typed

Must be just me than. Anyways thanks for update.


Update: Fixed it. I had the new ahk file in the same folder as the other fishing ahk files. For some reason it was closing the script.
Having it in a new folder seems to fix the problem

[GoodCrafter]

Updated to new patch. Also contains a failsafe so if it stuffs up with lagg it will attempt to start fishing again. You need to run one version of the script for every new account if using multiple.

I also didn't test out the lava fishing nor do I have time at the moment to test it for a longer period so feedback will be good.


save it with a text editor as whatever.ahk

#NoEnv
SendMode Input
CoordMode, ToolTip, Screen
SetTitleMatchMode, 3
SetKeyDelay, 0, 2

LureCount := 0
Failsafe := 0
Numpad9::
	WinGet, pidn, PID, A
	pid := pidn
	WinGet, hwnds, ID, A
	Handle := hwnds
	InputBox, Lure, Lure's, How many Lure's do you have in inventory?
	Loop %Lure%
	{
		LureCount := LureCount +1
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Catch := 0
		Loop  
		{
			If (Catch = 1)
			{    
				break
			}
				else
			{
				if (Failsafe = 40)
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Failsafe := 0
				}
				Base := getProcessBaseAddress() 
				CaughtWater := ReadMemory((ReadMemory(base + 0x008E6660) + 0xBD150))
				CaughtLava := ReadMemory(((ReadMemory(base + 0x008E6660) + 0xBD150) + 0x4A4))
				If (CaughtWater = 1 or CaughtLava = 1)
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Random, Wait, 2000, 3500
					Sleep, %Wait%
					Failsafe := 0
					Catch := 1
				}
				else 
				{
					Sleep, 1000
					Failsafe := (Failsafe +1)
				}
			}
		}
	}
ExitApp

Numpad7::
ExitApp

getProcessBaseAddress()
{
    Global Handle
    return DllCall( A_PtrSize = 4
                            ? "GetWindowLong"
                            : "GetWindowLongPtr"
                        , "Ptr", Handle
                        , "Int", -6
                        , "Int64") ; Use Int64 to prevent negative overflow when AHK is 32 bit and target process is 64bit
     ; If DLL call fails, returned value will = 0
}   


ReadMemory(MADDRESS)
{
    Global pid
    VarSetCapacity(MVALUE,4,0)
    ProcessHandle := DllCall("OpenProcess", "Int", 24, "Char", 0, "UInt", pid, "UInt")
    ;DllCall("ReadProcessMemory","UInt",ProcessHandle,"UInt",MADDRESS,"Str",MVALUE,"UInt",4,"UInt *",0)
    DllCall("ReadProcessMemory", "UInt", ProcessHandle, "Ptr", MADDRESS, "Ptr", &MVALUE, "Uint",4)
    Loop 4
        result += *(&MVALUE + A_Index-1) << 8*(A_Index-1)
    return, result
}

test it now
worked
UDP: Dont work now ._.

[Skazz0]

Dont work on 32 bit system fix it plz!