Kurzick Title Farming - Ferndale Vanquish Bot

[uhlala2323]

Originally Posted by phat34

I have three or four; or perhaps a bit more!

can u give them to me. would try to repair them, if needed.

[xxsquall2]

Originally Posted by rheek

I edited the files to work with another version of GWA2, updated the headers with the patcher, fixed the disappearing bot GUI and changed the cansell so it keeps amber instead of jade.

Should work out of the box now.

Has anyone been able to get this working since latest update? It now crashes on start

[rheek]

Originally Posted by xxsquall2

Has anyone been able to get this working since latest update? It now crashes on start

All you need to do is get the new gwa2_headers file. Check out the GW API Patcher thread.

[xxsquall2]

Well now I feel silly.. Thank you rheek, problem solved <3

[rheek]

Originally Posted by xxsquall2

Well now I feel silly.. Thank you rheek, problem solved <3

If you didnt see the thread you cant really know that you only have to grab the new file.

I added the github link to the gwa2_header file now so people might eventually stumble over it and figure out what to do more easily

Glad it works

[ayyy_lmao]

Global $usePumpkin = True ; set it on true and he use it
Global $useLightbringer = True ; set to true and he use it
Global $ITEM_ID_PUMPKINPIE = 28436
Global Const $ITEM_ID_Scroll_of_the_Lightbringer = 21233
#Region Pcons
Func UsePumpkinPie()
	pconsScanInventory()
	Sleep(GetPing() + 200)
	If $usePumpkin Then
		If (GetMapLoading() == 1) And (GetIsDead(-2) == False) Then
			If $pconsPumpkinPie_slot[0] > 0 And $pconsPumpkinPie_slot[1] > 0 Then
				If DllStructGetData(GetItemBySlot($pconsPumpkinPie_slot[0], $pconsPumpkinPie_slot[1]), "ModelID") == $ITEM_ID_PUMPKINPIE Then
					UseItemBySlot($pconsPumpkinPie_slot[0], $pconsPumpkinPie_slot[1])
				EndIf
			EndIf
		EndIf
	EndIf
	Sleep(GetPing() + 500)
	If $useLightbringer Then
		If (GetMapLoading() == 1) And (GetIsDead(-2) == False) Then
			If $scrollsLightbringer_slot[0] > 0 And $scrollsLightbringer_slot[1] > 0 Then
				If DllStructGetData(GetItemBySlot($scrollsLightbringer_slot[0], $scrollsLightbringer_slot[1]), "ModelID") == $ITEM_ID_Scroll_of_the_Lightbringer Then
					UseItemBySlot($scrollsLightbringer_slot[0], $scrollsLightbringer_slot[1])
				EndIf
			EndIf
		EndIf
	EndIf
EndFunc   ;==>UsePumpkinPie

;~ This searches the bags for the specific pcon you wish to use.
Func pconsScanInventory()
	Local $bag
	Local $size
	Local $SLOT
	Local $item
	Local $ModelID
	$pconsPumpkinPie_slot[0] = $pconsPumpkinPie_slot[1] = 0
	$scrollsLightbringer_slot[0] = $scrollsLightbringer_slot[1] = 0
	For $bag = 1 To 4 Step 1
		If $bag == 1 Then $size = 20
		If $bag == 2 Then $size = 5
		If $bag == 3 Then $size = 10
		If $bag == 4 Then $size = 10
		For $SLOT = 1 To $size Step 1
			$item = GetItemBySlot($bag, $SLOT)
			$ModelID = DllStructGetData($item, "ModelID")
			Switch $ModelID
				Case 0
					ContinueLoop
				Case $ITEM_ID_PUMPKINPIE
					$pconsPumpkinPie_slot[0] = $bag
					$pconsPumpkinPie_slot[1] = $SLOT
				Case $ITEM_ID_Scroll_of_the_Lightbringer
					$scrollsLightbringer_slot[0] = $bag
					$scrollsLightbringer_slot[1] = $SLOT
			EndSwitch
		Next
	Next
EndFunc   ;==>pconsScanInventory

Func UseItemBySlot($aBag, $aSlot)
	Local $item = GetItemBySlot($aBag, $aSlot)
	Return SendPacket(0x8, 0x78, DllStructGetData($item, "ID"))
EndFunc   ;==>UseItemBySlot

Func arrayContains($array, $item)
	For $i = 1 To $array[0]
		If $array[$i] == $item Then
			Return True
		EndIf
	Next
	Return False
EndFunc   ;==>arrayContains
#EndRegion Pcons

If you are lazy can just change pie model id to bu model id but should help you with adding use of BU| Thank Ext3h and Savsuds

[DerMoench14]

Func UseItemBySlot($aBag, $aSlot)
	Local $item = GetItemBySlot($aBag, $aSlot)
	Return SendPacket(0x8, 0x78, DllStructGetData($item, "ID"))
EndFunc   ;==>UseItemBySlot

Thats not the correct Header.

[Retlaw123]

Hello, is this bot able to run different accounts at the same time to farm kurzick points for a complete guild for example?

[DerMoench14]

Spamming the forum with the same question will surely engage people to help you answering a stupid question you could've answered by yourself.

[dschorar]

Im sorry for asking such a dumb question, but Im having an issue. This is my first bot and Im not 100% coding savvy, but I hav e gotten this bot to get as far as the priest to recieve blessing before a crash. If anyone knows what might be causing this, can you give me a detailed fix? Thanks in advance.

[zoidberg1337]

do you have more kurz points than lux points? If not maybe that is causing a crash.

[savsuds]

	If GetLuxonFaction() > GetKurzickFaction() Then
		Dialog(0x84)
		Sleep(500)
	EndIf
	Dialog(0x86)

^ 4D 1's idea to handle faction issues.

Also the pie use functions were made by Ralle1976 not by myself.

[rheek]

Why people dont say WHICH BOT they mean when they complain about being hacked or how a bot looks suspicious is really beyond me.

[mhaendler]

Originally Posted by rheek

Why people dont say WHICH BOT they mean when they complain about being hacked or how a bot looks suspicious is really beyond me.

Probably everything "kazelle62" updated and compiles. didnt decompile it only look through the source which wereclean as far as i can tell.

but he also includes a pre compiled version, which might be the source of all evil?! i dont know but seems fishy to me

[ayyy_lmao]

SummonFireImp(GetItemBySlot(1,1)
;;;;;;; Use Summoning Stone ;;;;;;;
Func SummonFireImp($fItem)
   If Not DllStructGetData($fItem, 'ID') = 0 Then
	  UseItem($fItem)
   EndIf
EndFunc

that's prob easier way to make it use cons