TaeJim's Trove Bot Script (Fishing Bot, Auto-HP Bot) [UPDATE 01/08/2015)

[taejim]

Please read the instruction for each bot before you posting question.

IMPORTANT NOTE: Guys my Auto Drop Boots is not yet completed i still need to work on it more and if you think the size of the window is too big please tell i will make one with smaller window size . Thank you for your support

Down there are scripts for Auto-HP and Fishing bot with auto drop boots. For the auto drop boots to work you guys need to download the attachment . Enjoy guys

P/S: If you appreciated what I have done please press the thanks button :P, that is what keep me going

CREDITS:
- Zog for the script for my initial release.
- HaHaItsJake for info on his script and some cheatengine info.
- die254 for his auto drop boot idea.
- konrad for information on the boots images.
- Me for update and code some of the script.

 

THE SCRIPT WILL RESIZE YOUR TROVE WINDOW PLEASE DONOT RESIZE IT AGAIN

How to use:
- Copy the code below and and save it as .ahk format
- make sure you have lures in your inventory
- make sure you are playing as WINDOWED MODE
- numpad 3 to activate anti-afk
- numpad 6 to activate fishing
- numpad 9 to disable the script if you r running antiafk and want to change to fishing just hit numpad 3 dont have to close the script and run again
- numpad 7 to exit the script completely
- You can run it multiples script just copy and change the file name

 

WATER:

#WinActivateForce

Numpad6::
	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  
	Lure := 9999
	Base := getProcessBaseAddress()
	WaterAddress := GetAddressWater(Base,0x009570DC) 
	Loop %Lure%
	{
		ControlSend, , {c down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {c up}, ahk_pid %pid%
		Sleep, 1000
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Sleep, 2000
		CaughtWater := ReadMemory(WaterAddress)
		Timer := 0
		While Timer = 0
		{
			Loop	
			{
				If (CaughtWater = 1)
				{
					Break
				}
				if Timer = 40
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Break
				}
				Sleep, 1000
				CaughtWater := ReadMemory(WaterAddress)
				Timer := Timer + 1
			}
		}
		Timer := 0
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Sleep, 2000
	}
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
}   

GetAddressWater(Base, Address)
{
    pointerBase := base + Address
    y1 := ReadMemory(pointerBase)
    y2 := ReadMemory(y1 + 0x144)
    y3 := ReadMemory(y2 + 0xe4)
    Return WaterAddress := (y3 + 0x70)   
}

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
}

LAVA:

#WinActivateForce

Numpad6::
	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  
	Lure := 9999
	Base := getProcessBaseAddress()
	LavaAddress := GetAddressLava(Base,0x009570DC) 
	Loop %Lure%
	{
		ControlSend, , {c down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {c up}, ahk_pid %pid%
		Sleep, 1000
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Sleep, 2000
		CaughtLava := ReadMemory(LavaAddress)
		Timer := 0
		While Timer = 0
		{
			Loop	
			{
				If (CaughtLava = 1)
				{
					Break
				}
				if Timer = 40
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Break
				}
				Sleep, 1000
				CaughtLava := ReadMemory(LavaAddress)
				Timer := Timer + 1
			}
		}
		Timer := 0
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Sleep, 2000
	}
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
}   

GetAddressLava(Base, Address)
{
    pointerBase := base + Address
    y1 := ReadMemory(pointerBase)
    y2 := ReadMemory(y1 + 0x144)
    y3 := ReadMemory(y2 + 0xe4)
    Return LavaAddress := (y3 + 0x514)   
}

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
}

CHOCO:

#WinActivateForce

Numpad6::
	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  
	Lure := 9999
	Base := getProcessBaseAddress()
	ChocoAddress := GetAddressChoco(Base,0x009570DC) 
	Loop %Lure%
	{
		ControlSend, , {c down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {c up}, ahk_pid %pid%
		Sleep, 1000
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Sleep, 2000
		CaughtChoco := ReadMemory(ChocoAddress)
		Timer := 0
		While Timer = 0
		{
			Loop	
			{
				If (CaughtChoco = 1)
				{
					Break
				}
				if Timer = 40
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Break
				}
				Sleep, 1000
				CaughtChoco := ReadMemory(ChocoAddress)
				Timer := Timer + 1
			}
		}
		Timer := 0
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Sleep, 2000
	}
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
}   

GetAddressChoco(Base, Address)
{
    pointerBase := base + Address
    y1 := ReadMemory(pointerBase)
    y2 := ReadMemory(y1 + 0x144)
    y3 := ReadMemory(y2 + 0xe4)
    Return ChocoAddress := (y3 + 0x2c0)   
}

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
}

 

#WinActivateForce

Numpad6::
	WinGet, pidn, PID, A
	pid := pidn
	WinGet, hwnds, ID, A
	Handle := hwnds
	Lure := 9999
	Base := getProcessBaseAddress()
	WaterAddress := GetAddressWater(Base,0x0097E114) 
	LavaAddress := GetAddressLava(Base,0x0097E114) 
	ChocoAddress := GetAddressChoco(Base,0x0097E114) 
	
	LureCount := 0
	Loop %Lure%
	{
		LureCount := LureCount +1
		ControlSend, , {c down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {c up}, ahk_pid %pid%
		Sleep, 500
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Catch := 0
		PoleCheck := 40

		Loop  
		{
			If (Catch = 1)
			{	
				break
			}
			else
			{
				If (PoleCheckN = PoleCheck)
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					LureCount := 0
				}
				else
				{
				}
				CaughtWater := ReadMemory(WaterAddress)
				CaughtLava := ReadMemory(LavaAddress)
				CaughtChoco := ReadMemory(ChocoAddress)
				If (CaughtWater = 1 or CaughtLava = 1 or CaughtChoco = 1)
				{
					ControlSend, , {f down}, ahk_pid %pid%
					Sleep, 86
					ControlSend, , {f up}, ahk_pid %pid%
					Random, Wait, 2000, 3500
					Sleep, %Wait%
					Catch := 1
				}
				else 
				{
					PoleCheckN := PoleCheckN +1
					Sleep, 1000
				}
			}
		}
	}
ExitApp

Numpad7::
ExitApp

GetAddressWater(Base, Address)
{
    pointerBase := base + Address
    y1 := ReadMemory(pointerBase)
    y2 := ReadMemory(y1 + 0x144)
    y3 := ReadMemory(y2 + 0xe4)
    Return WaterAddress := (y3 + 0x70)   
}

GetAddressLava(Base, Address)
{
    	pointerBase := base + Address
    	y1 := ReadMemory(pointerBase)
    	y2 := ReadMemory(y1 + 0x144)
    	y3 := ReadMemory(y2 + 0xe4)
    	Return LavaAddress := (y3 + 0x514) 
}

GetAddressChoco(Base, Address)
{
    	pointerBase := base + Address
    	y1 := ReadMemory(pointerBase)
    	y2 := ReadMemory(y1 + 0x144)
    	y3 := ReadMemory(y2 + 0xe4)
    	Return ChocoAddress := (y3 + 0x2c0) 
}

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
}

 

#WinActivateForce

Numpad3::
	WinGet, PID, PID, A
	WinGet, HWND, ID, A
	Break := 0
	
	Loop 
		{
			ControlSend, , {c down}, ahk_pid %PID%
			Sleep, 86
			ControlSend, , {c up}, ahk_pid %PID%
			Random, SleepTime, 3000, 6000
			Sleep, %SleepTime%
			If (Break = 1)
			{
				break
			}
			else
			{
				Sleep, 30
			}
		}
return

Numpad6::
	WinGet, PID, PID, A
	WinGet, HWND, ID, A
	
	Address := 0x00961904
	Base := getProcessBaseAddress(HWND)
	WaterAddress := GetAddressWater(PID, Base, Address) 
	LavaAddress := GetAddressLava(PID, Base, Address) 
	ChocoAddress := GetAddressChoco(PID, Base, Address)
	
	Break := 0
	
	Loop 
	{
		If (Break = 1)
		{
			Break
		}
		else
		{
			Sleep, 30
		}
		ControlSend, , {c down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {c up}, ahk_pid %pid%
		Sleep, 1000
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Timer := 0
		While Timer = 0
		{
			Loop	
			{
				CaughtWater := ReadMemory(PID, WaterAddress)
				CaughtLava := ReadMemory(PID, LavaAddress)
				CaughtChoco := ReadMemory(PID, ChocoAddress)
				If (CaughtWater = 1 or CaughtLava = 1 or CaughtChoco = 1)
				{
					Break
				}
				if Timer = 40
				{
					Break
				}
				Sleep, 1000
				Timer := Timer + 1
			}
		}
		Timer := 0
		ControlSend, , {f down}, ahk_pid %pid%
		Sleep, 86
		ControlSend, , {f up}, ahk_pid %pid%
		Sleep, 2000
	}
return

Numpad9::
	Break := 1
return

Numpad7::
ExitApp

GetAddressWater(PID, Base, Address)
{
    pointerBase := base + Address
    y1 := ReadMemory(PID, pointerBase)
    y2 := ReadMemory(PID, y1 + 0x144)
    y3 := ReadMemory(PID, y2 + 0xe4)
    Return WaterAddress := (y3 + 0x70)   
}

GetAddressLava(PID, Base, Address)
{
	pointerBase := base + Address
	y1 := ReadMemory(PID, pointerBase)
	y2 := ReadMemory(PID, y1 + 0x144)
	y3 := ReadMemory(PID, y2 + 0xe4)
	Return LavaAddress := (y3 + 0x514) 
}

GetAddressChoco(PID, Base, Address)
{
	pointerBase := base + Address
	y1 := ReadMemory(PID, pointerBase)
	y2 := ReadMemory(PID, y1 + 0x144)
	y3 := ReadMemory(PID, y2 + 0xe4)
	Return ChocoAddress := (y3 + 0x2c0)
}

getProcessBaseAddress(HWND)
{
	return DllCall( A_PtrSize = 4
						? "GetWindowLong"
						: "GetWindowLongPtr"
					, "Ptr", HWND
					, "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(PID, MADDRESS)
{
	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
}

 

#WinActivateForce
SetWorkingDir %A_ScriptDir%

Numpad6::
	WinGet, PID, PID, A
	WinGet, HWND, ID, A
	
	Address := 0x00989230
	Base := getProcessBaseAddress(HWND)
	WaterAddress := GetAddressWater(PID, Base, Address) 
	LavaAddress := GetAddressLava(PID, Base, Address) 
	ChocoAddress := GetAddressChoco(PID, Base, Address)
	
	WinMove, ahk_pid %pid%,, X, Y, 1280, 720
	
	MsgBox, 4,, Would you like to turn on auto drop boots?
	
	Lure := 9999
	Loop %Lure%
	{
		ifMsgBox Yes
   		{
			Sleep, 86
			ControlSend, , {c up}, ahk_pid %pid%
			Sleep, 1000
			ControlSend, , {f down}, ahk_pid %pid%
			Sleep, 86
			ControlSend, , {f up}, ahk_pid %pid%
			Timer := 0
			While Timer = 0
			{
				Loop	
				{
					CaughtWater := ReadMemory(PID, WaterAddress)
					CaughtLava := ReadMemory(PID, LavaAddress)
					CaughtChoco := ReadMemory(PID, ChocoAddress)
					If (CaughtWater = 1 or CaughtLava = 1 or CaughtChoco = 1)
					{
						Break
					}
					if Timer = 40
					{
						Break
					}
					Sleep, 1000
					Timer := Timer + 1
				}
			}
			Timer := 0
			ControlSend, , {f down}, ahk_pid %pid%
			Sleep, 86
			ControlSend, , {f up}, ahk_pid %pid%
			Sleep, 500
			Loop, 15
			{
				WinActivate, ahk_pid %pid%
				CoordMode, Pixel, Screen
				Imagesearch, Foundx, FoundY, 0, 0, A_ScreenWidth, A_ScreenHeight, *50 %A_ScriptDir%\img\%a_index%.png
				
				if ErrorLevel = 0
				{
					CoordMode, Mouse, Screen
					MouseClickDrag, Left, %FoundX%, %FoundY%, 779, 412, 5
					Sleep, 200
					Break
				}
			}
			Sleep, 500
		}
		else 
		{
			ControlSend, , {c down}, ahk_pid %pid%
			Sleep, 86
			ControlSend, , {c up}, ahk_pid %pid%
			Sleep, 1000
			ControlSend, , {f down}, ahk_pid %pid%
			Sleep, 86
			ControlSend, , {f up}, ahk_pid %pid%
			Timer := 0
			While Timer = 0
			{
				Loop	
				{
					CaughtWater := ReadMemory(PID, WaterAddress)
					CaughtLava := ReadMemory(PID, LavaAddress)
					CaughtChoco := ReadMemory(PID, ChocoAddress)
					If (CaughtWater = 1 or CaughtLava = 1 or CaughtChoco = 1)
					{
						Break
					}
					if Timer = 40
					{
						Break
					}
					Sleep, 1000
					Timer := Timer + 1
				}
			}
			Timer := 0
			ControlSend, , {f down}, ahk_pid %pid%
			Sleep, 86
			ControlSend, , {f up}, ahk_pid %pid%
			Sleep, 2000
		}
	}
ExitApp


Numpad7::
ExitApp

GetAddressWater(PID, Base, Address)
{
    pointerBase := base + Address
    y1 := ReadMemory(PID, pointerBase)
    y2 := ReadMemory(PID, y1 + 0x144)
    y3 := ReadMemory(PID, y2 + 0xe4)
    Return WaterAddress := (y3 + 0x70)   
}

GetAddressLava(PID, Base, Address)
{
	pointerBase := base + Address
	y1 := ReadMemory(PID, pointerBase)
	y2 := ReadMemory(PID, y1 + 0x144)
	y3 := ReadMemory(PID, y2 + 0xe4)
	Return LavaAddress := (y3 + 0x514) 
}

GetAddressChoco(PID, Base, Address)
{
	pointerBase := base + Address
	y1 := ReadMemory(PID, pointerBase)
	y2 := ReadMemory(PID, y1 + 0x144)
	y3 := ReadMemory(PID, y2 + 0xe4)
	Return ChocoAddress := (y3 + 0x2c0)
}

getProcessBaseAddress(HWND)
{
	return DllCall( A_PtrSize = 4
						? "GetWindowLong"
						: "GetWindowLongPtr"
					, "Ptr", HWND
					, "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(PID, MADDRESS)
{
	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
}

 

How to use:
- Install AHK if you dont have it
- Creat a new AHK script
- Copy the code below and paste it in the AHK script file you just created
- Make sure you click the Trove window before you press hotkey

- Start: Numpad9 (ONLY HIT HOTKEY ONCE)

- It will ask you what percent(%) health you want it to heal at.

WHEN YOU ENTER DONOT ADD THE "%" SIGN. 20% = 20, 50% = 50, etc.

- Stop:

- Alt + Numpad9: to stop.
- Alt + Numpad7: to exit the script completely

 

#NoEnv
SendMode Input
SetWorkingDir %A_ScriptDir%
CoordMode, Mouse, Screen
SetTitleMatchMode, 3
SetKeyDelay, 0, 2


Numpad9::
    WinGet, Handle, ID, A
    WinGet, pidn, PID, A
    Break := 0
    InputBox, HealAt, Enter Percent, Percent To Heal At?
    SetFormat, float, 1
    BaseHealth := GetHealth(Handle, pidn)
    Heal := (Health * HealAt) / 100
    Loop {
        GetHealth(Handle, pidn)
        If (Health < Heal)
        {
            ControlSend, , {q}, ahk_pid %pidn%
            Sleep, 500
        }
        If (Break = 1)
        {
            break
        }
        else
        {
            Sleep, 30
        }
    }
Return

NumPad7::
    ExitApp

!NumPad9::
    Break := 1
return

GetHealth(Handle, pid)
{ 
    Global Health
    Base := getProcessBaseAddress(Handle)
    pointerBase := base + 0x0098A2EC
    z1 := ReadMemory(pointerBase, pid)
    z2 := ReadMemory(z1 + 0x48, pid)
    z3 := ReadMemory(z2 + 0x208, pid)
    z4 := ReadMemory(z3 + 0x8, pid)
    z5 := z4 + 0xB4
    Health := ReadMemory(z5, pid)
}

getProcessBaseAddress(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, 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
}

Update log:
- 16/07/2015: added fishing in water, lava, choco script. Update the address for the newest patch. Added anti AFK
- 24/07/2015: Update the address for the newest patch. Update the code better than Zog's, no longer use Zog's fishing script. Combine Lava, Water and Choco into 1 script
- 29/07/2015: Update the address for the newest patch. Update the code now with ANTI-AFK function.
- 01/08/2015: Update the address for the newest patch. Added Auto Drop Boots. Added Auto-HP at x% but on a different script


To-do-list:
- Count how many boots dropped.


Virus Scans:
Jotti Scan finished. 0/21 scanners reported malware.
VirusTotal Detection ratio: 0 / 55

[kevincris]

tkz =D D= zz

[taejim]

Just a quick update on the auto drop boots i got it working with my script thanks to @die254 now i just need to work on my images source so you guys wont have to cut the img out urself and every boot has different color code so i need time to collect my images source thank you guys for your patient i will be release the boot drop soon, maybe at the end of today

[florin23187]

Why does this Fishbot don't work with a multiclient loader?

[Marctron]

What does the Auto-HP bot do? It heals you like a cheat?

[taejim]

IMPORTANT NOTE: I UPDATE MY THREAD WITH AUTO DROP BOOTS WAIT FOR IT TO GET APPROVE AND JUST DOWNLOAD IT CHEERS

Why does this Fishbot don't work with a multiclient loader?

I never use the multiclient loader so idk sr

What does the Auto-HP bot do? It heals you like a cheat?

No it is not a cheat it just auto press Q when you are at x% health

[gen.katy]

thanks i hope it will work

[ByKenzo]

Thanks

[maintmax]

I want to use that script~ ty

[taejim]

GUYS COPY THE SCRIPT WONT WORK IF YOU DONT HAVE THE IMAGES SO WAIT FOR THE FILE TO GET APPROVE AND ALSO THE AUTO DROP BOOTS OF MINE IS STILL IN BETA :P I NEED TO IMPROVE MY IMAGES FILES . ALSO IF THE SIZE OF TROVE WINDOW IS TOO BIG LET ME KNOW I WILL MAKE ONE FOR SMALLER RESOLUTION

CHEERS

[konradmm]

Change

if ErrorLevel = 0
				{
					CoordMode, Mouse, Screen
					MouseClickDrag, Left, %FoundX%, %FoundY%, 779, 412, 5
					Sleep, 200
					Break
				}

to:

if ErrorLevel = 0
				{
					Boots += 1
					CoordMode, Mouse, Screen
					MouseClickDrag, Left, %FoundX%, %FoundY%, 779, 412, 5
					Sleep, 200
					Break
				}

Congartulations! You have now boots counter ;D

[taejim]

Change

if ErrorLevel = 0
				{
					CoordMode, Mouse, Screen
					MouseClickDrag, Left, %FoundX%, %FoundY%, 779, 412, 5
					Sleep, 200
					Break
				}

to:

if ErrorLevel = 0
				{
					Boots += 1
					CoordMode, Mouse, Screen
					MouseClickDrag, Left, %FoundX%, %FoundY%, 779, 412, 5
					Sleep, 200
					Break
				}

Congartulations! You have now boots counter ;D

I know what to do man im just too lazy to do it right now so i put it as to-do list lol but thanks anyways

[KayVPZ]

Amazing !!! Nice

[mattsiukin]

Amazing !!! Nice

- - - Updated - - -

Amazing !!! Nice

[douky70]

Thx! Nice DDDD