Register for your free account! | Forgot your password?


Go Back   elitepvpers > MMORPGs > Guild Wars > GW Bots
You last visited: Today at 20:38

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

Advertisement



OK to ask for exploit/Scripting help here...

Discussion on OK to ask for exploit/Scripting help here... within the GW Bots forum part of the Guild Wars category.

Reply
 
Old 01/23/2021, 07:08   #286
 
elite*gold: 0
Join Date: Nov 2020
Posts: 16
Received Thanks: 2
Quote:
Originally Posted by list comprehension View Post
Chest run bot such as the pong mei or boreal basically does all of that but instead of flowers looks for chests.
hell yeah i didnt even think thank you very much!!!
Mad head Trip is offline  
Old 01/28/2021, 17:50   #287
 
elite*gold: 0
Join Date: Oct 2015
Posts: 29
Received Thanks: 7
Anyone know what is causing TargetNearestEnemy() in GWA2 to crash the game? :/

Edit: turn off toolbox....
Sky828 is offline  
Old 02/08/2021, 15:15   #288
 
elite*gold: 0
Join Date: Jun 2019
Posts: 2
Received Thanks: 0
Does anyone know if there's a way to get the event system to work?
It seems to me that some relevant region are it are disabled within the "ModifyMemory" function but so far I couldn't find any working version of GWA2 where this is not the case.
makryno is offline  
Old 02/12/2021, 21:15   #289
 
elite*gold: 0
Join Date: Dec 2009
Posts: 45
Received Thanks: 5
hi i would need a working GWA2 for Buying Materials @ Trader
Can anybody help me
Gangstar666 is offline  
Old 02/15/2021, 15:27   #290
 
elite*gold: 0
Join Date: Apr 2017
Posts: 16
Received Thanks: 7
Quote:
Originally Posted by Gangstar666 View Post
hi i would need a working GWA2 for Buying Materials @ Trader
Can anybody help me
Yoshikawa91 posted the solution not so long ago on the forum. I invite you to use the search function.
Pmolik1809 is offline  
Old 03/12/2021, 19:58   #291
 
elite*gold: 0
Join Date: Feb 2021
Posts: 4
Received Thanks: 1
Hey, im looking for help with
Code:
Func ScanForCharname($aModuleBase, $aModuleSize)
	Local $lCharNameCode = BinaryToString('0x8BF86A03680F0000C08BCFE8')
	ConsoleWrite("$lCharNameCode : " & $lCharNameCode &     [MENTION=3576271]CRLF[/MENTION])
	Local $lCurrentSearchAddress = $aModuleBase
	Local $lMBI[7], $lMBIBuffer = DllStructCreate('dword;dword;dword;dword;dword;dword;dword')
	Local $lSearch, $lTmpMemData, $lTmpAddress, $lTmpBuffer = DllStructCreate('ptr'), $i


	While $lCurrentSearchAddress < $aModuleBase + $aModuleSize
		Local $lMBI[7]
		DllCall($mKernelHandle, 'int', 'VirtualQueryEx', 'int', $mGWProcHandle, 'int', $lCurrentSearchAddress, 'ptr', DllStructGetPtr($lMBIBuffer), 'int', DllStructGetSize($lMBIBuffer))
		For $i = 0 To 6
			$lMBI[$i] = StringStripWS(DllStructGetData($lMBIBuffer, ($i + 1)), 3)
			ConsoleWrite("DllStructGetData($lMBIBuffer, (" & $i & " + 1) : " & DllStructGetData($lMBIBuffer, ($i + 1)) &     [MENTION=3576271]CRLF[/MENTION])
		Next
		 _ArrayDisplay($lMBI, "$lMBI")
		If $lMBI[4] = 4096 Then
			Local $lBuffer = DllStructCreate('byte[' & $lMBI[3] & ']')
			DllCall($mKernelHandle, 'int', 'ReadProcessMemory', 'int', $mGWProcHandle, 'int', $lCurrentSearchAddress, 'ptr', DllStructGetPtr($lBuffer), 'int', DllStructGetSize($lBuffer), 'int', '')

			$lTmpMemData = DllStructGetData($lBuffer, 1)
			$lTmpMemData = BinaryToString($lTmpMemData)
			ConsoleWrite("$lTmpMemData : " & $lTmpMemData &     [MENTION=3576271]CRLF[/MENTION])

			$lSearch = StringInStr($lTmpMemData, $lCharNameCode, 2)
			If $lSearch > 0 Then
				$lTmpAddress = $lCurrentSearchAddress + $lSearch - 1
				DllCall($mKernelHandle, 'int', 'ReadProcessMemory', 'int', $mGWProcHandle, 'int', $lTmpAddress - 0x42, 'ptr', DllStructGetPtr($lTmpBuffer), 'int', DllStructGetSize($lTmpBuffer), 'int', '')
				Return DllStructGetData($lTmpBuffer, 1) - $aModuleBase
			EndIf

			$lCurrentSearchAddress += $lMBI[3]
			ConsoleWrite     [MENTION=3576271]CRLF[/MENTION] & "$lCurrentSearchAddress : " & $lCurrentSearchAddress &     [MENTION=3576271]CRLF[/MENTION])
		EndIf
	 WEnd
	 _ArrayDisplay($lMBI)
	 _WinAPI_DisplayStruct($lMBIBuffer,"")

	Return False
 EndFunc   ;==>ScanForCharname
Do you guys know what exacly parts of memory should i look for and add an offset to base adress to get nickname of account characters or the one that is already logged in?
Thats so far what i've got.





EDIT:

I managed to fix it. Basicaly function returns currently logged in character or if in switch characters window it returns lastly logged-in character. Returns empty String if you are not logged-in into account. I also found the way to return all character names out of logged-in account. For interested:
Code:
 Func MemoryRead($aAddress, $aType = 'dword')
	Local $lBuffer = DllStructCreate($aType)
	DllCall($mKernelHandle, 'int', 'ReadProcessMemory', 'int', $mGWProcHandle, 'int', $aAddress, 'ptr', DllStructGetPtr($lBuffer), 'int', DllStructGetSize($lBuffer), 'int', '')
	Return DllStructGetData($lBuffer, 1)
 EndFunc   ;==>MemoryRead

Func GetModuleInfo(ByRef $aModuleBase, ByRef $aModuleSize)
	Local $lProcName = _WinAPI_GetProcessName($mGWProcId)
	Local $lProcNameLength = StringLen($lProcName)

	Local $lModules = _WinAPI_EnumProcessModules($mGWProcId)
	;_ArrayDisplay($lModules, "$lModules")
	For $i = 1 To $lModules[0][0]
		Local $lModuleName = StringRight($lModules[$i][1], $lProcNameLength)
		ConsoleWrite [MENTION=3576271]CRLF[/MENTION] & "$lModuleName : " & $lModuleName & [MENTION=3576271]CRLF[/MENTION])
		If StringCompare($lModuleName, $lProcName, $STR_NOCASESENSE) = 0 Then
			Local $lModuleInfo = _WinAPI_GetModuleInformation($mGWProcHandle, $lModules[$i][0])
			ConsoleWrite [MENTION=3576271]CRLF[/MENTION] & "$lModuleInfoEntryPoint : " & DllStructGetData($lModuleInfo, "EntryPoint") & [MENTION=3576271]CRLF[/MENTION])
			$aModuleBase = DllStructGetData($lModuleInfo, 'BaseOfDll')
			$aModuleSize = DllStructGetData($lModuleInfo, 'SizeOfImage')
			Return True
		EndIf
	Next
	Return False
 EndFunc   ;==>GetModuleInfo

 Func MyScanForCurrentlyLoggedIn($aModuleBase)
   Local $lCurrentSearchAddress = $aModuleBase + 0x6292D0
   Local $lLoggedInCharacter = MemoryRead($lCurrentSearchAddress,'wchar[30]')
   ;ConsoleWrite("Found logged-in character: " & $lLoggedInCharacter &  [MENTION=3576271]CRLF[/MENTION])
   Return $lLoggedInCharacter
EndFunc	;==>MyScanForCurrentlyLoggedIn
Andreonis is offline  
Old 03/16/2021, 16:49   #292
 
elite*gold: 0
Join Date: Dec 2020
Posts: 1
Received Thanks: 0
Turn to a tool to buy and disassemble materials

thank you!
ssinandy is offline  
Old 03/28/2021, 18:36   #293
 
elite*gold: 0
Join Date: Sep 2014
Posts: 351
Received Thanks: 120
what?
phat34 is offline  
Old 04/06/2021, 13:03   #294
 
elite*gold: 0
Join Date: Aug 2014
Posts: 10
Received Thanks: 1
Im looking to add a func to use merch stones for vaettir bot but im not sure how to go about writing it as im newer to coding with 0 background any help would be wonderful. The issue I have is its telling me that on the endfunc its got no matching If Statment but idn where it needs one...Here is what i have so far


Code:
Func UseMercantile()
	If $UseMercantile = True Then
   out("Using Merchant-Stone selected")
   Else
   out("No Merchant-Stone selected")
   EndIf
   GetNumberOfFreeSlots <= 10 Then
   If CountItemInBagsByModelID(31154) > 0 Then
	useitem(31154)
	Sleep(500
    out("Cleaning Ineventory")
   EndIf
    $i = 0;
	  Do
		If FindIDKit() = 0 Then
			EndIf
			BuyIDKit()
			Do
				Sleep(200)
			Until FindIDKit() <> 0
	GetNumberOfFreeSlots = 10 Then
	       Ident()
		Sleep(GetPing())
		$i += 1
	Until FindIDKit() <> 0 Or $i > 4
	Sell()
    Sleep(300)
   EndIf
   If GetGoldCharacter() > 97000 Then
		Out("Buying Lockpick")
		BuyLockPick
	Sleep(GetPing()+500) EndIf
	If GetGoldCharacter() > 10000 Then
 EndFunc
turtlelover1 is offline  
Old 04/13/2021, 13:01   #295
 
elite*gold: 0
Join Date: Dec 2014
Posts: 18
Received Thanks: 2
Quote:
Originally Posted by turtlelover1 View Post
Im looking to add a func to use merch stones for vaettir bot but im not sure how to go about writing it as im newer to coding with 0 background any help would be wonderful. The issue I have is its telling me that on the endfunc its got no matching If Statment but idn where it needs one...Here is what i have so far


If GetGoldCharacter() > 97000 Then
Out("Buying Lockpick")
BuyLockPick
Sleep(GetPing()+500) EndIf
If GetGoldCharacter() > 10000 Then
EndFunc[/code]
What did you want to do with last If? You might not even need it.

I have added this function to an old bot i had and whenever i activate it, rendering is off BUT bot also stops at that location. Am i doing something wrong or did something change in gw?


Code:
Func ToggleRendering()
    $RenderingEnabled = Not $RenderingEnabled
    If $RenderingEnabled Then
        EnableRendering()
        WinSetState(GetWindowHandle(), "", [MENTION=330060]Sw_[/MENTION]SHOW)
    Else
        DisableRendering()
        WinSetState(GetWindowHandle(), "", [MENTION=330060]Sw_[/MENTION]HIDE)
        ClearMemory()
    EndIf
EndFunc   ;==>ToggleRendering
YueNiu is offline  
Old 04/15/2021, 23:55   #296
 
elite*gold: 0
Join Date: Aug 2014
Posts: 10
Received Thanks: 1
Quote:
Originally Posted by YueNiu View Post
What did you want to do with last If? You might not even need it.

I have added this function to an old bot i had and whenever i activate it, rendering is off BUT bot also stops at that location. Am i doing something wrong or did something change in gw?


Code:
Func ToggleRendering()
    $RenderingEnabled = Not $RenderingEnabled
    If $RenderingEnabled Then
        EnableRendering()
        WinSetState(GetWindowHandle(), "", [MENTION=330060]Sw_[/MENTION]SHOW)
    Else
        DisableRendering()
        WinSetState(GetWindowHandle(), "", [MENTION=330060]Sw_[/MENTION]HIDE)
        ClearMemory()
    EndIf
EndFunc   ;==>ToggleRendering
What i was aiming to do is make it so if the gold value is 10k then end the func for merch stone
turtlelover1 is offline  
Old 04/16/2021, 08:41   #297
 
elite*gold: 0
Join Date: Dec 2014
Posts: 18
Received Thanks: 2
Red face

Quote:
Originally Posted by turtlelover1 View Post
What i was aiming to do is make it so if the gold value is 10k then end the func for merch stone
Put option to stop in your buylockpick function.

Code:
If gold > 97k then
    buylockpick()
EndIf
Code:
func buylockpick
    while GetGoldCharacter() > 10000
         buy 1 lockpick part
    WEnd
Endfunc
YueNiu is offline  
Thanks
1 User
Old 06/14/2021, 11:46   #298
 
elite*gold: 0
Join Date: Apr 2015
Posts: 39
Received Thanks: 20
i'd like to setup a func to pull multiple item from inventory to chest (white item)

I have all Global Const ID and Func Canpickup ....

but need help how to pull them from inv to chest

Any help is really appreciated
natanders is offline  
Old 06/16/2021, 10:51   #299
 
elite*gold: 26
Join Date: Apr 2019
Posts: 59
Received Thanks: 25
Quote:
Originally Posted by natanders View Post
i'd like to setup a func to pull multiple item from inventory to chest (white item)

I have all Global Const ID and Func Canpickup ....

but need help how to pull them from inv to chest

Any help is really appreciated
To do so, you need to go through your inventory in order to detect white item, then find the first available slot in your storage and then move item into this slot.

It should look something like this :
Code:
Func StoreWhiteItems()
	Local $aItem
	Local $slot
	Local $full = False
	For $bagIndex = 1 To 4
		For $slotIndex = 1 To DllStructGetData(GetBag($bagIndex), 'Slots')
			$aItem = GetItemBySlot($bagIndex, $slotIndex)

			If DllStructGetData($aItem, 'ID') = 0 Then ContinueLoop

			If GetRarity($aItem) == $RARITY_White Then ;2621
				For $storePan = 8 To 12
					$slot = FindEmptySlot($storePan)
					If $slot <> 0 Then
						ExitLoop
					EndIf
				Next
				If $slot <> 0 Then
					MoveItem($aItem, $storePan, $slot)
					Sleep(GetPing()+500)
				Else
					ExitLoop 2 ;Full storage...
				EndIf
			EndIf
		Next
	Next
EndFunc   ;==>StoreWhiteItems


Func FindEmptySlot($bagIndex)
	Local $aItem
	For $slotIndex = 1 To DllStructGetData(GetBag($bagIndex), 'Slots')
		$aItem= GetItemBySlot($bagIndex, $slotIndex)
		If DllStructGetData($aItem, 'ID') = 0 Then ;Means empty slot
			Return $slotIndex
		EndIf
	Next
	Return 0
EndFunc   ;==>FindEmptySlot
Yoshikawa91 is offline  
Thanks
1 User
Reply


Similar Threads Similar Threads
Hello guys, i got hacked and gm didnt help me :( so i ask for help here
12/22/2009 - Kal Online - 25 Replies
Hello guys, i got hacked 7 days ago, i sent a c/s to gms connected my id card, they told me twrite back after 7 days... GM Reply Hello. This is Kalonline. We checked over your report and blocked hackers.
HELP! I need help scripting
02/06/2007 - Conquer Online 2 - 1 Replies
OK, I want to know how u ppl do it&#33; I what program do u use to make them? cause i wanna help but i dun know how... somone plz reply&#33;
L2Walker, scripting questions/help
12/13/2006 - Lineage 2 - 0 Replies
Hey, just asking a few questions hope you don&#39;t mind ^_^ I&#39;m looking to make a script so when I cast magic on something, the walker bot will cast, say Wind Strike, on the same thing, at the same time. I&#39;ve looked through the options in walker and have it setup now, but it doesn&#39;t cast at the same time, but when I&#39;ve finished casting. If this isn&#39;t possible, last time I checked Walker scripts could not pickup what was said in chat, is this still the case? Thanks. ^_^ Note: If you...
I need help scripting
09/05/2006 - General Coding - 0 Replies
Ok I am tired of leeching I am ready to try my hand at scripting but I dont know where to start and I was wondering if someone could help me get started or tell me a website that can help me learn so I can make my own hacks and contribute to the epvp community that we all love :D



All times are GMT +2. The time now is 20:38.


Powered by vBulletin®
Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2021 elitepvpers All Rights Reserved.