Register for your free account! | Forgot your password?

You last visited: Today at 19:50

  • Please register to post and access all features, it's quick, easy and FREE!

 

[Release] GR Autolooter

Reply
 
Old   #61
 
elite*gold: 0
Join Date: May 2009
Posts: 11
Received Thanks: 1
Quote:
Originally Posted by geshvader View Post
Have not seen how original works before last patch.
Made my own. Looks like it works the same way. On my PC at least.
Someone try and check.
SUPERAntiSpyware Trojan.Agent/Gen-Bifrose 20130502
VIPRE Trojan.Win32.Generic!BT 20130502
TheHacker Trojan/Cosmu.bizd 20130502
VIPRE Trojan.Win32.Generic!BT 20130502



copycatuk is offline  
Old   #62
 
elite*gold: 0
Join Date: Dec 2012
Posts: 48
Received Thanks: 56
Quote:
Originally Posted by copycatuk View Post
SUPERAntiSpyware Trojan.Agent/Gen-Bifrose 20130502
VIPRE Trojan.Win32.Generic!BT 20130502
TheHacker Trojan/Cosmu.bizd 20130502
VIPRE Trojan.Win32.Generic!BT 20130502
Decompiled it and looks safe, seems like its catching on the (of what I think is) NomadMemory library being used.


Deathsnacks is offline  
Thanks
1 User
Old   #63
 
elite*gold: 0
Join Date: Jun 2011
Posts: 7
Received Thanks: 18
It's compiled AutoIt script.
Some functions for work with (read) memory address used.
Maybe this explain?
Checked it with eset nod 32 - clear.
geshvader is offline  
Thanks
1 User
Old   #64
 
elite*gold: 0
Join Date: May 2009
Posts: 11
Received Thanks: 1
Works - Thanks


copycatuk is offline  
Thanks
1 User
Old   #65
 
elite*gold: 0
Join Date: Apr 2013
Posts: 20
Received Thanks: 2
Decompiled:
Code:
Global $title = "Guild Wars 2"
Global $hwnd = WinGetHandle($title)
Global $lootkey = "f"
#Region _Memory

Func _memoryopen($iv_pid, $iv_desiredaccess = 2035711, $iv_inherithandle = 1)
	If NOT ProcessExists($iv_pid) Then
		SetError(1)
		Return 0
	EndIf
	Local $ah_handle[2] = [DllOpen("kernel32.dll")]
	If @error Then
		SetError(2)
		Return 0
	EndIf
	Local $av_openprocess = DllCall($ah_handle[0], "int", "OpenProcess", "int", $iv_desiredaccess, "int", $iv_inherithandle, "int", $iv_pid)
	If @error Then
		DllClose($ah_handle[0])
		SetError(3)
		Return 0
	EndIf
	$ah_handle[1] = $av_openprocess[0]
	Return $ah_handle
EndFunc

Func _memoryread($iv_address, $ah_handle, $sv_type = "dword")
	If NOT IsArray($ah_handle) Then
		SetError(1)
		Return 0
	EndIf
	Local $v_buffer = DllStructCreate($sv_type)
	If @error Then
		SetError(@error + 1)
		Return 0
	EndIf
	DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
	If NOT @error Then
		Local $v_value = DllStructGetData($v_buffer, 1)
		Return $v_value
	Else
		SetError(6)
		Return 0
	EndIf
EndFunc

Func _memorywrite($iv_address, $ah_handle, $v_data, $sv_type = "dword")
	If NOT IsArray($ah_handle) Then
		SetError(1)
		Return 0
	EndIf
	Local $v_buffer = DllStructCreate($sv_type)
	If @error Then
		SetError(@error + 1)
		Return 0
	Else
		DllStructSetData($v_buffer, 1, $v_data)
		If @error Then
			SetError(6)
			Return 0
		EndIf
	EndIf
	DllCall($ah_handle[0], "int", "WriteProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
	If NOT @error Then
		Return 1
	Else
		SetError(7)
		Return 0
	EndIf
EndFunc

Func _memoryclose($ah_handle)
	If NOT IsArray($ah_handle) Then
		SetError(1)
		Return 0
	EndIf
	DllCall($ah_handle[0], "int", "CloseHandle", "int", $ah_handle[1])
	If NOT @error Then
		DllClose($ah_handle[0])
		Return 1
	Else
		DllClose($ah_handle[0])
		SetError(2)
		Return 0
	EndIf
EndFunc

Func setprivilege($privilege, $benable)
	Const $my_token_adjust_privileges = 32
	Const $my_token_query = 8
	Const $my_se_privilege_enabled = 2
	Local $htoken, $sp_auxret, $sp_ret, $hcurrprocess, $ntokens, $ntokenindex, $priv
	$ntokens = 1
	$luid = DllStructCreate("dword;int")
	If IsArray($privilege) Then $ntokens = UBound($privilege)
	$token_privileges = DllStructCreate("dword;dword[" & (3 * $ntokens) & "]")
	$newtoken_privileges = DllStructCreate("dword;dword[" & (3 * $ntokens) & "]")
	$hcurrprocess = DllCall("kernel32.dll", "hwnd", "GetCurrentProcess")
	$sp_auxret = DllCall("advapi32.dll", "int", "OpenProcessToken", "hwnd", $hcurrprocess[0], "int", BitOR($my_token_adjust_privileges, $my_token_query), "int*", 0)
	If $sp_auxret[0] Then
		$htoken = $sp_auxret[3]
		DllStructSetData($token_privileges, 1, 1)
		$ntokenindex = 1
		While $ntokenindex <= $ntokens
			If IsArray($privilege) Then
				$priv = $privilege[$ntokenindex - 1]
			Else
				$priv = $privilege
			EndIf
			$ret = DllCall("advapi32.dll", "int", "LookupPrivilegeValue", "str", "", "str", $priv, "ptr", DllStructGetPtr($luid))
			If $ret[0] Then
				If $benable Then
					DllStructSetData($token_privileges, 2, $my_se_privilege_enabled, (3 * $ntokenindex))
				Else
					DllStructSetData($token_privileges, 2, 0, (3 * $ntokenindex))
				EndIf
				DllStructSetData($token_privileges, 2, DllStructGetData($luid, 1), (3 * ($ntokenindex - 1)) + 1)
				DllStructSetData($token_privileges, 2, DllStructGetData($luid, 2), (3 * ($ntokenindex - 1)) + 2)
				DllStructSetData($luid, 1, 0)
				DllStructSetData($luid, 2, 0)
			EndIf
			$ntokenindex += 1
		WEnd
		$ret = DllCall("advapi32.dll", "int", "AdjustTokenPrivileges", "hwnd", $htoken, "int", 0, "ptr", DllStructGetPtr($token_privileges), "int", DllStructGetSize($newtoken_privileges), "ptr", DllStructGetPtr($newtoken_privileges), "int*", 0)
		$f = DllCall("kernel32.dll", "int", "GetLastError")
	EndIf
	$newtoken_privileges = 0
	$token_privileges = 0
	$luid = 0
	If $sp_auxret[0] = 0 Then Return 0
	$sp_auxret = DllCall("kernel32.dll", "int", "CloseHandle", "hwnd", $htoken)
	If NOT $ret[0] AND NOT $sp_auxret[0] Then Return 0
	Return $ret[0]
EndFunc

#EndRegion
$iv_pid = ProcessExists("Gw2.exe")
$memoryopen = _memoryopen($iv_pid)
While 1
	$mem_read = _memoryread("0x" & "017309EB", $memoryopen)
	Sleep(50)
	If $mem_read = 64 Then
		ControlSend($hwnd, "", "", $lootkey)
	EndIf
WEnd
_memoryclose($memoryopen)

EDIT: Haven't tested that code, but since address seems to be correct, it should work. Though - one should make "chatbox/typing" check as well since it wouldn't be nice for script to spam "f" when chat is open and character is standing on loot.
Still - that script would be enough.
sitapea1337 is offline  
Thanks
1 User
Old   #66
 
elite*gold: 0
Join Date: Jun 2011
Posts: 7
Received Thanks: 18
nMemory2.au3 used
geshvader is offline  
Thanks
1 User
Old   #67
 
elite*gold: 0
Join Date: Jul 2005
Posts: 65
Received Thanks: 16
Quote:
Originally Posted by Whynotzoidberg View Post
buy they have a tool for wvw autoloot.
I donīt want to pay a montly fee ...
sunflight is offline  
Thanks
2 Users
Old   #68
 
elite*gold: 0
Join Date: Aug 2012
Posts: 9
Received Thanks: 1
Quote:
Originally Posted by geshvader View Post
Have not seen how original works before last patch.
Made my own. Looks like it works the same way. On my PC at least.

PM me if someone want donate some gold/gems for newb (me)
Was a bit skeptical at first but it works just as expected, thanks heaps!
Thorid is offline  
Old   #69


 
elite*gold: 2826
Join Date: Mar 2009
Posts: 4,258
Received Thanks: 6,099
Quote:
Originally Posted by sitapea1337 View Post
Decompiled:
Code:
Global $title = "Guild Wars 2"
Global $hwnd = WinGetHandle($title)
Global $lootkey = "f"
#Region _Memory

Func _memoryopen($iv_pid, $iv_desiredaccess = 2035711, $iv_inherithandle = 1)
	If NOT ProcessExists($iv_pid) Then
		SetError(1)
		Return 0
	EndIf
	Local $ah_handle[2] = [DllOpen("kernel32.dll")]
	If @error Then
		SetError(2)
		Return 0
	EndIf
	Local $av_openprocess = DllCall($ah_handle[0], "int", "OpenProcess", "int", $iv_desiredaccess, "int", $iv_inherithandle, "int", $iv_pid)
	If @error Then
		DllClose($ah_handle[0])
		SetError(3)
		Return 0
	EndIf
	$ah_handle[1] = $av_openprocess[0]
	Return $ah_handle
EndFunc

Func _memoryread($iv_address, $ah_handle, $sv_type = "dword")
	If NOT IsArray($ah_handle) Then
		SetError(1)
		Return 0
	EndIf
	Local $v_buffer = DllStructCreate($sv_type)
	If @error Then
		SetError(@error + 1)
		Return 0
	EndIf
	DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
	If NOT @error Then
		Local $v_value = DllStructGetData($v_buffer, 1)
		Return $v_value
	Else
		SetError(6)
		Return 0
	EndIf
EndFunc

Func _memorywrite($iv_address, $ah_handle, $v_data, $sv_type = "dword")
	If NOT IsArray($ah_handle) Then
		SetError(1)
		Return 0
	EndIf
	Local $v_buffer = DllStructCreate($sv_type)
	If @error Then
		SetError(@error + 1)
		Return 0
	Else
		DllStructSetData($v_buffer, 1, $v_data)
		If @error Then
			SetError(6)
			Return 0
		EndIf
	EndIf
	DllCall($ah_handle[0], "int", "WriteProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
	If NOT @error Then
		Return 1
	Else
		SetError(7)
		Return 0
	EndIf
EndFunc

Func _memoryclose($ah_handle)
	If NOT IsArray($ah_handle) Then
		SetError(1)
		Return 0
	EndIf
	DllCall($ah_handle[0], "int", "CloseHandle", "int", $ah_handle[1])
	If NOT @error Then
		DllClose($ah_handle[0])
		Return 1
	Else
		DllClose($ah_handle[0])
		SetError(2)
		Return 0
	EndIf
EndFunc

Func setprivilege($privilege, $benable)
	Const $my_token_adjust_privileges = 32
	Const $my_token_query = 8
	Const $my_se_privilege_enabled = 2
	Local $htoken, $sp_auxret, $sp_ret, $hcurrprocess, $ntokens, $ntokenindex, $priv
	$ntokens = 1
	$luid = DllStructCreate("dword;int")
	If IsArray($privilege) Then $ntokens = UBound($privilege)
	$token_privileges = DllStructCreate("dword;dword[" & (3 * $ntokens) & "]")
	$newtoken_privileges = DllStructCreate("dword;dword[" & (3 * $ntokens) & "]")
	$hcurrprocess = DllCall("kernel32.dll", "hwnd", "GetCurrentProcess")
	$sp_auxret = DllCall("advapi32.dll", "int", "OpenProcessToken", "hwnd", $hcurrprocess[0], "int", BitOR($my_token_adjust_privileges, $my_token_query), "int*", 0)
	If $sp_auxret[0] Then
		$htoken = $sp_auxret[3]
		DllStructSetData($token_privileges, 1, 1)
		$ntokenindex = 1
		While $ntokenindex <= $ntokens
			If IsArray($privilege) Then
				$priv = $privilege[$ntokenindex - 1]
			Else
				$priv = $privilege
			EndIf
			$ret = DllCall("advapi32.dll", "int", "LookupPrivilegeValue", "str", "", "str", $priv, "ptr", DllStructGetPtr($luid))
			If $ret[0] Then
				If $benable Then
					DllStructSetData($token_privileges, 2, $my_se_privilege_enabled, (3 * $ntokenindex))
				Else
					DllStructSetData($token_privileges, 2, 0, (3 * $ntokenindex))
				EndIf
				DllStructSetData($token_privileges, 2, DllStructGetData($luid, 1), (3 * ($ntokenindex - 1)) + 1)
				DllStructSetData($token_privileges, 2, DllStructGetData($luid, 2), (3 * ($ntokenindex - 1)) + 2)
				DllStructSetData($luid, 1, 0)
				DllStructSetData($luid, 2, 0)
			EndIf
			$ntokenindex += 1
		WEnd
		$ret = DllCall("advapi32.dll", "int", "AdjustTokenPrivileges", "hwnd", $htoken, "int", 0, "ptr", DllStructGetPtr($token_privileges), "int", DllStructGetSize($newtoken_privileges), "ptr", DllStructGetPtr($newtoken_privileges), "int*", 0)
		$f = DllCall("kernel32.dll", "int", "GetLastError")
	EndIf
	$newtoken_privileges = 0
	$token_privileges = 0
	$luid = 0
	If $sp_auxret[0] = 0 Then Return 0
	$sp_auxret = DllCall("kernel32.dll", "int", "CloseHandle", "hwnd", $htoken)
	If NOT $ret[0] AND NOT $sp_auxret[0] Then Return 0
	Return $ret[0]
EndFunc

#EndRegion
$iv_pid = ProcessExists("Gw2.exe")
$memoryopen = _memoryopen($iv_pid)
While 1
	$mem_read = _memoryread("0x" & "017309EB", $memoryopen)
	Sleep(50)
	If $mem_read = 64 Then
		ControlSend($hwnd, "", "", $lootkey)
	EndIf
WEnd
_memoryclose($memoryopen)

EDIT: Haven't tested that code, but since address seems to be correct, it should work. Though - one should make "chatbox/typing" check as well since it wouldn't be nice for script to spam "f" when chat is open and character is standing on loot.
Still - that script would be enough.
just call interact or send the lootpacket

however:

Code:
if _memoryread(0x1699834, $hProcess, "dword") == 0 then loot()
buFFy! is offline  
Old   #70
 
elite*gold: 0
Join Date: Jun 2011
Posts: 28
Received Thanks: 24
Buffy you should implement autoloot on midnight paid version. It would be a blast
Lemberac is offline  
Old   #71


 
elite*gold: 2826
Join Date: Mar 2009
Posts: 4,258
Received Thanks: 6,099
Quote:
Originally Posted by Lemberac View Post
Buffy you should implement autoloot on midnight paid version. It would be a blast
Not in the mood for now. Playing Neverwinter.
buFFy! is offline  
Old   #72
 
elite*gold: 0
Join Date: Apr 2009
Posts: 793
Received Thanks: 365
jesus, for those people qqing for an update, i stated that i wont and posted the interact method, if your too lazy to set a bp on it, sorry not my problem.
Xereon is offline  
Old   #73
 
elite*gold: 0
Join Date: Sep 2004
Posts: 88
Received Thanks: 1
how's neverwinter?
darkbluefirefly is offline  
Old   #74


 
elite*gold: 2826
Join Date: Mar 2009
Posts: 4,258
Received Thanks: 6,099
Quote:
Originally Posted by darkbluefirefly View Post
how's neverwinter?
Way better than Guild Wars 2. Offtopic tho.
buFFy! is offline  
Old   #75
 
elite*gold: 0
Join Date: Jul 2010
Posts: 6
Received Thanks: 0
Thanks a lot geshvader. eset shows it as clean and it works as expected.


w00tsauce is offline  
Reply

Tags
autolooter, guildwars2, tool, utility



« Previous Thread | Next Thread »

Similar Threads
[HELP]Autolooter
i already found 2 autolooter and both arent working.. just wanna ask if any of you got the working autolooter program.. im not into CE just want to...
23 Replies - RF Online
Autolooter
Where do i get one?cus i cant find it anywhere.thanks for the help in advance:)
9 Replies - CO2 Main - Discussions / Questions
[release] Autopotter & Autolooter
"OMG noch mehr Bots? Gibts doch schon genug von !?" mir wayne, nehm kein crap von anderen, wenn dann lass ich mich von den Ideen inspirieren... ...
14 Replies - Metin2 Main - Discussions / Questions
AUtolooter
What is the savest and most effective autolooter? Or do i need to Download a Porxy to use just that one feature?
1 Replies - CO2 Main - Discussions / Questions
Autolooter?
hiho, wollte mal wissen, ob es einen Autolooter gibt, der wie bei Glider, die Mobs Lootet...?? mfG Snake2k
2 Replies - WoW Ask the Experts



All times are GMT +2. The time now is 19:50.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy
Copyright ©2017 elitepvpers All Rights Reserved.