GW1 Bots working in July 2017

Page 41 of 152

11/13/2017 15:42 shejesa#601

But in a situation that has random drops, like vaettirs or diessas, I'd have to add all non-exclusive items, right?

11/13/2017 16:06 calypso974fire#602

Well each farm has its valuable items. For Vaettir, i'm not sure any valuable item si dropped.

But yes, you can have a lot of lines. In that case you can use alternatives to code it.
The exemple was meant to be easy to understand and to modify for specific demands.

I can add an important info: If the bot sell automatically the items, you have to exclude the item of the list of item the bot can sell.

exemple with the very good chest run Pongmei:

Spoiler

Code:

Func CANSELL($AITEM)
	Local $RARITY_White = 2621, $RARITY_Blue = 2623, $RARITY_Purple = 2626, $RARITY_Gold = 2624, $RARITY_Green = 2627
	Local $m = DllStructGetData($aItem, 'ModelID')
	Local $q = DllStructGetData($aItem, 'Quantity')
	Local $r = GetRarity($aItem)
	Local $Attribute = GetItemAttribute($aItem)
	Local $Requirement = GetItemReq($aItem)
	Local $ModStruct = GetModStruct($aItem)
	Local $Vigor = StringInStr($ModStruct, "0101082403023025C202EA27", 0, 1) ;~String for Sup Vigor.


	If $M = 146 Then ; teintures noires et blanches
		If DllStructGetData($AITEM, "ExtraId") > 9 Then
			Return False
		Else
			Return True
		 EndIf

   ElseIf $M = 22751 Then ; lockpicks
		Return False
   ElseIf $M = 778 Then ; bouclier � lame
		Return True
   ElseIf $M = 777 Then ; bouclier � lame
		Return True
   ElseIf $M = 735 Then ; bo staff
		Return False
   ElseIf $M = 945 Then ; Echovald
		Return False
   ElseIf $M = 944 Then ; Echovald
		Return False
   ElseIf $M = 940 Then ; Amber
		Return False
   ElseIf $M = 941 Then ; Amber
		Return False
   ElseIf $M = 950 Then ; Gothic
		Return True
   ElseIf $M = 951 Then ; Gothic
		Return True
   ElseIf $M = 1321 Then ; Hunt Gardien
		Return True
   ElseIf $M = 1320 Then ; Hunt Gardien
		Return True
   ElseIf $M = 736 Then ; Dragon staff
		Return False
   ElseIf $M = 794 Then ;Oni Blade
		Return False
   ElseIf $M = 337 Then ;Skeleton Shield
		Return True
   ElseIf $M = 334 Then ;Shield of the Wing
		Return True
   ElseIf $M = 766 Then ;Oni Daggers
		Return False
   ElseIf $M = 795 Then ;Golden Phenix Blade
		Return False
   ElseIf $M = 744 Then ;Shinobi Blade
		Return False
   ElseIf $M = 742 Then ;Katana
		Return False
   ElseIf $M = 741 Then ;Jitte
		Return False
   ElseIf $M = 866 Then ;Paper Fan
		Return False
   ElseIf $M = 775 Then ;Paper Fan
		Return False
   ElseIf $M = 776 Then ;Paper Fan
		Return False
   ElseIf $M = 789 Then ;Paper Fan
		Return False
   ElseIf $M = 858 Then ;Paper Fan
		Return False
   ElseIf $M = 866 Then ;Paper Fan
		Return False
   ElseIf $M = 947 Then ;Emblazoned
		Return True
   ElseIf $M = 955 Then ;Ornate Shield
		Return True
   ElseIf $M = 5899 Then ; necessaire d id
		Return False
   ElseIf $M = 400 Then ; FellBlade
		Return False
   ElseIf $M = 405 Then ; Falchion
		Return False
   ElseIf $M = 2250 Then ; Flamberge
		Return True
   ElseIf $M = 1556 Then ; Colossal Scimitar
		Return True
   ElseIf $M = 791 Then ; Crenellated
		Return False
   ElseIf $M = 1197 Then ; Tatooed Scimitar
		Return False
   ElseIf $M = 1612 Then ; Fiery Dragon Sword
		Return True
   ElseIf $M = 397 Then ; Butterlfy Sword
		Return True
   ElseIf $M = 323 Then ; Aegis
		Return True
   ElseIf $M = 331 Then ; Defender
		Return True
   ElseIf $M = 343 Then ; Tall Shield
		Return True
   ElseIf $M = 326 Then ; Ornate Buckler
		Return True
   ElseIf $M = 338 Then ; Skull Shield
		Return True
   ElseIf $M = 327 Then ; Reinforced Buckler
		Return True
   ElseIf $M = 345 Then ; Tower Shield
		Return True
   ElseIf $M = 871 Then ; Spiked Targe
		Return True
   ElseIf $M = 872 Then ; Spiked Targe
		Return True
   ElseIf $M = 2299 Then ; Irridescent Aegis
		Return False
   ElseIf $M = 2294 Then ; Diamond Aegis
		Return True
   ElseIf $M = 896 Then ; Paper Lantern
		Return False
   ElseIf $M = 603 Then ; Orr Staff
		Return False
   ElseIf $M = 887 Then ; Baton Feu Skin Cantha
		Return False
   ElseIf $M = 5899 Then ; necessaire d id
		Return False
  	ElseIf $m > 21785 And $m < 21806 Then ;Tomes not for sale
		Return False
   	 ElseIf $Attribute = 20 And $Requirement = 8 And GetItemMaxDmg($aItem) = 22 Then ; req8 Swords - Swordsmanship
		Return False
	 ElseIf $Attribute = 17 And $Requirement = 8 And GetItemMaxDmg($aItem) = 16 Then ; req8 Shields - Strength
		Return False
     ElseIf $Attribute = 21 And $Requirement = 8 And GetItemMaxDmg($aItem) = 16 Then ; Req8 Shields - Tactics
		Return False
	 ElseIf $Requirement = 8 Then
		Return False
	 Else
		Return True
	EndIf
 EndFunc

The same way, you have 2 lines per items. exemple for Bo staff:

Code:

   ElseIf $M = 735 Then ; bo staff
		Return False

The bot ask itself if it can sell the an item;
If the ModelID is 735 then the function return return false: the bot cannot sell the staff and move to the next item.

For an exemple of alternate methode, you can look at the vaettir bot:
It inclued a lot of diffrent items and allow you to custom it.

You can see either simple conditions like we saw with raptor bot and swich conditions that allow you to chain ModelID to win space and clear the code.

Spoiler

Code:

Func PickUpList($aItemPtr)
   Local $lRarity = GetRarity($aItemPtr)
   If $lRarity = 2624 Or $lRarity = 2626 And $mLeecher Then Return False ; leecher present to pick up loot
   If $lRarity = 2627 Then Return $mRarityGreen ; green items
   If $lRarity = 2624 Then Return $mRarityGold ; gold items
   Local $lModelID = MemoryRead($aItemPtr + 44, 'long')
   If $lModelID = 27977 Then Return $mBattlePlans ; charr battle plans
   If $lModelID = 24629 Then Return $mMapPieces ; map top left
   If $lModelID = 24630 Then Return $mMapPieces ; map top right
   If $lModelID = 24631 Then Return $mMapPieces ; map bottom left
   If $lModelID = 24632 Then Return $mMapPieces ; map bottom right
   If $lModelID = 6104 Then Return $mQuestItems ; Quest item: Urn
   If $lModelID = 6102 Then Return $mQuestItems ; Quest item: Spear
   Local $lType = MemoryRead($aItemPtr + 32, 'byte')
   Switch $lType
	  Case 9, 11, 18, 20, 31 ; consumables, materials and z-coins, keys, gold coins, scrolls
		 Return True
	  Case 10 ; dyes
		 $lExtraID = MemoryRead($aItemPtr + 34, 'short')
		 If $lExtraID = 10 Or $lExtraID = 12 Then
			Return True ; black and white dye
		 Else
			Return $mDyes
		 EndIf
	  Case 21 ; quest items
		 Return $mQuestItems
   EndSwitch
   Switch $lModelID
	  Case 1953, 1956 to 1975 ; froggys
		 Return True
	  Case 21786 to 21795 ; elite tomes
		 Return $mEliteTomes
	  Case 21796 ;  assassin tomes
		 Return $mTomes
	  Case 21797 ; mesmer tomes
		 Return $mMesmerTomes
	  Case 21798 ; necromancer tomes
		 Return $mTomes
	  Case 21799 ; elementalist tomes
		 Return $mElementalistTomes
	  Case 21800 ; monk tomes
		 Return $mTomes
	  Case 21801 ; warrior tomes
		 Return $mTomes
	  Case 21802 ; ranger tomes
		 Return $mTomes
	  Case 21803 ; dervish tomes
		 Return $mTomes
	  Case 21804 ; ritualist tomes
		 Return $mTomes
	  Case 21805 ; paragon tomes
		 Return $mTomes
	  Case 21127 to 21131 ; gems
		 Return True
	  Case 522, 835, 476, 525, 444, 27047 ; dark remains, feathered scalp, demonic remains, umbral skeletal limb, feathered caromi scalp, glacial stones
		 Return $mSalvageTrophies
	  Case 27033, 27035, 27036, 27050, 27974 ; destroyer core, saurian bone, amphibian tongue, elemental dust, undead bone
		 Return True
	  Case 28434, 18345, 21491, 37765, 30855, 22191, 22190 ; Event items
		 Return True
   EndSwitch
   If GetIsIronItem($lModelID) Then Return True
   Return GetIsRareWeapon($aItemPtr)
EndFunc   ;==>PickUpList

Another exemple from vaettir for the "do not sell" part that show you how short it can be even with lots of ModelIDs:

Code:

;~ Description: Returns true for all ModelIDs specified.
Func Keepers($aModelID)
   Switch $aModelID
	  ; mods
	  Case 896,908,15554,15551,15552,894,906,897,909,893,905,6323,6331,895,907,15543,15553,15544,15555,15540,15541,15542,17059,19122,19123
		 Return True
	  Case 5551 ; Rune of Superior Vigor
		 Return True
	  Case 460 ; White Mantle Emblem
		 Return $mWhiteMantleEmblem
	  Case 461 ; White Mantle Badge
		 Return $mWhiteMantleBadge
	  Case Else
		 Return False
   EndSwitch
EndFunc   ;==>Keepers

I take some time to writte all this and try to explain. I hope it will help you and others to understand and upgrade/update the bots.

11/13/2017 16:11 shejesa#603

Quote:
Originally Posted by calypso974fire
Well if you look into the bot, you will find a function "Canpickup" or something like that. You can do it here.

Here is an exemple to understand how it works with the Raptor bot:
Spoiler
you open the bot with a text editor (Notepad++ <3 )

you find the main function :
Code:
Func Main()
	$Return = 0
	Sleep(2000)
	Move(20084, 16854)
	Sleep(4000)
	WaitMapLoading($MAP_ID_RIVEN)

	CheckRep()
	MoveToBaseOfCave()
	KillHero()
	GetRaptors()
	KillRaptors()
	PickUpLoot()
	BackToTown()
EndFunc
You can see that the bot do the actions :

- CheckRep : it should be a function that check the Asura reputation to know if it need to take the blessing
- MoveToBaseOfCave(), KillHero(), GetRaptors(), KillRaptors() : it should be the funcitons used to perform the farm
- PickUpLoot() : it should be the function that... Picks up the loots ;)

You search for the function PickUpLoot() and find this:
Code:
Func PickUpLoot()
	Local $lAgent
	Local $lItem
	Local $lDeadlock

	If GetMapID() <> $MAP_ID_RIVEN Then Return

	For $i = 1 To GetMaxAgents()
		If GetIsDead(-2) Then Return
		$lAgent = GetAgentByID($i)
		If DllStructGetData($lAgent, 'Type') <> 0x400 Then ContinueLoop
		$lItem = GetItemByAgentID($i)
		If CanPickup($lItem) Then
			PickUpItem($lItem)
			$lDeadlock = TimerInit()
			While GetAgentExists($i)
				Sleep(100)
				If GetIsDead($Me) Then Return
				If TimerDiff($lDeadlock) > 25000 Then ExitLoop
			WEnd
		EndIf
	Next
EndFunc   ;==>PickUpLoot
A lot of complicated stuff but, even if you dont understand it, you can see those lines :
Code:
		If CanPickup($lItem) Then
			PickUpItem($lItem)
which mean: if i can pickup this item, then i pickup the item.

Then you can deduce that the CanPickup($lItem) is the function that will decide if the bot is allowed to pickup an item or not.

You search for the CanPickup function and find this:
Code:
Func CanPickUp($aItem)
	Local $lModelID = DllStructGetData(($aItem), 'ModelID')
	Local $lRarity = GetRarity($aItem)
	If $lModelID == 2511 And GetGoldCharacter() < 99000 Then Return True	; gold coins (only pick if character has less than 99k in inventory)
	If $lModelID > 21785 And $lModelID < 21806 Then Return True	; Elite/Normal Tomes
    If $lRarity == $RARITY_GOLD 			Then Return True
	If $lModelID == $ITEM_ID_DYES Then	; if dye
		Switch DllStructGetData($aItem, "ExtraID")
			Case $ITEM_EXTRAID_BLACKDYE, $ITEM_EXTRAID_WHITEDYE ; only pick white and black ones
				Return True
			Case Else
				Return False
		EndSwitch
	 EndIf
	 If StackableReturnTrue($lModelID) Then Return True

	Return False
EndFunc
You know that if this function return true, then the bot will pick up the loot.
If you want the bot to pick up all the loots, you could delete all the lines and write "Return True". But it's not the best way to do it: you would pickup lost of trash.

If you look at the function, you can see the line:
Code:
	If $lModelID > 21785 And $lModelID < 21806 Then Return True	; Elite/Normal Tomes
It tells you that if the $lModelID of the item you are looking at is between 21785 and 21806, then the bot will pick up the item.
The comment helps you to understand that those Model ID are refering to the Elite and normal tomes.

a quick rearch in google and you find this:
Code:
21786=Elite Assassin Tome
21787=Elite Mesmer Tome
21788=Elite Necromancer Tome
21789=Elite Elementalist Tome
21790=Elite Monk Tome
21791=Elite Warrior Tome
21792=Elite Ranger Tome
21793=Elite Dervish Tome
21794=Elite Ritualist Tome
21795=Elite Paragon Tome
21796=Assassin Tome
21797=Mesmer Tome
21798=Necromancer Tome
21799=Elementalist Tome
21800=Monk Tome
21801=Warrior Tome
21802=Ranger Tome
21803=Dervish Tome
21804=Ritualist Tome
21805=Paragon Tome
You can see that Elite tomes ID starts at 21787 up to 21795. Then if you don't want the bot to pick up notmal tomes, you can edit the line and replace
Code:
	If $lModelID > 21785 And $lModelID < 21806 Then Return True	; Elite/Normal Tomes
by
Code:
	If $lModelID > 21785 And $lModelID < 21795 Then Return True	; Elite/Normal Tomes
If you want to add a new item to the list, then you need to add a new line in the function.
Code:
Func CanPickUp($aItem)
	Local $lModelID = DllStructGetData(($aItem), 'ModelID')
	Local $lRarity = GetRarity($aItem)
	If $lModelID == 2511 And GetGoldCharacter() < 99000 Then Return True	; gold coins (only pick if character has less than 99k in inventory)
	If $lModelID > 21785 And $lModelID < 21806 Then Return True	; Elite/Normal Tomes
    If $lRarity == $RARITY_GOLD 			Then Return True
	If $lModelID == $ITEM_ID_DYES Then	; if dye
		Switch DllStructGetData($aItem, "ExtraID")
			Case $ITEM_EXTRAID_BLACKDYE, $ITEM_EXTRAID_WHITEDYE ; only pick white and black ones
				Return True
			Case Else
				Return False
		EndSwitch
	 EndIf
	 If StackableReturnTrue($lModelID) Then Return True

	Return False
EndFunc
You can see that the function check a lot of things and return true if the conditions are meet. Else, if all the condition are false, the bot return False on the last line. Then you need to add your line right before this last line.

So you find the Model ID of the Item you want to add and add the line.
I've found a list in google. I did not check all the item ID, but the one i used were correct.

Spoiler

Weapons
Shields:
338=Skull Shield Non Inscribable(tactics)
334=Shield Of The Wing Non Inscribable(tactics)
337=Skeleton Shield Non Inscribable(tactics)
323=Aegis Non Inscribable(tactics)
327=Reinforced Buckler Non Inscribable(tactics)
331=Defender Non Inscribable(str)
330=Crude Shield Non Inscribable(tactics)
345=Tower Shield Non Inscribable(str)
342=Summit Warlord Non Inscribable(tactics)
343=Tall Shield Non Inscribable(tactics)
326=Ornate Buckler Non Inscribable(tactics)
777=Bladed Shield Non Inscribable(str)
778=Bladed Shield Non Inscribable(tactics)
782=Wooden Buckler Non Inscribable(tactics)
781=Wooden Buckler Non Inscribable(str)
328=Wooden Buckler Non Inscribable Alternate(tactics)
871=Spiked Targe Non Inscribable(str)
872=Spiked Targe Non Inscribable(tactics)
950=Gothic Defender Non Inscribable(str)
951=Gothic Defender Non Inscribable(tactics)
945=Echovald Non Inscribable(tactics)
944=Echovald Non Inscribable(str)
940=Amber Aegis Non Inscribable(str)
941=Amber Aegis Non Inscribable(tactics)
955=Ornate Shield Non Inscribable(tactics)
954=Ornate Shield Non Inscribable(str)
1320=Guardian Of The Hunt Non Inscribable(str)
1321=Guardian Of The Hunt Non Inscribable(tactics)
947=Emblazoned Defender Non Inscribable(tactics)
952=Kappa Shield Non Inscribable(str)
953=Kappa Shield Non Inscribable(tactics)
344=Magma Shield Non Inscribable(str)
945=Echovald Shield (Tactics)
951=Gothic Defender
958=Outcast Shield
2415=Great Conch
332=Eternal Shield (strength)
344=Magmas Shield (strength)
860=Eternal Shield (motivation)
861=Eternal Shield (command)
942=Celestial Shield (strength)
943=Celestial Shield (tactics)
1320=Guardian of the Hunt (strength)
1321=Guardian of the Hunt (tactics)
1439=Scarabshell Aegis (motivation)
1442=Scarabshell Aegis (command)
1490=Vabbian Defender (motivation)
1502=tribal Shield (effigy skin) (tactics)
1527=Eagle Defender (command)
1589=Sea Purse Shield (tactics)
1886=Demonic Aegis (motivation)
1888=Shield of the Lion (strength)
1890=Demonic Aegis (command)
1891=Demonic Aegis (strength)
1893=Demonic Aegis (tactics)
2294=Diamond Aegis (tactics)
2295=Gloom Shield (strength)
2296=Gloom Shield (tactics)
2297=Iridescent Aegis (motivation)
2298=Iridescant Aegis (command)
2299=Iridescant Aegis (tactics)
2408=Ebonhand Aegis (strength)
2409=Equine Aegis (command)
2410=Equine Aegis (tactics)
2414=Oaken Aegis (tactics)
2421=Amethyst Aegis (motivation)
2422=Amethyst Aegis (command)
2423=Amethyst Aegis (tactics)
2624=Diamond Aegis (motivation)
25328=Destroyer Shield (strength)

Foci:
181=Flame Artifact (Eye skin)
866=Spawning Power Req Fan
775=Fast Cast Req Fan
776=Soul Reaping Req Fan
789=Energy Storage Req Fan
858=Divine Favor Req Fan
866=Spawning Power Req Fan
896=Paper Lantern
1022=Jug (Divine Favor)
874=Jug (Soul Reaping)
875=Jug (Energy Storage)
905=Divine Scroll
895=Golden Chalice
1055=Celestial Compass (Dom)
1058=Celestial Compass (Fast Casting)
1060=Celestial COmpass (Illusion)
1064=Celestial Compass (Inspiration)
1065=Celestial Compass (Blood)
1752=Celestial Compass (Soul Reaping)
1768=Celestial Compass (Air Magic)
1769=Celestial Compass (Earth Magic)
1770=Celestial Compass (Energy Storage)
1772=Celestial Compass (Water Magic)
1870=Celestial Compass (Healing)
1880=Celestial Compass (Smiting)
1881=Celestial Compass (Communing)
1883=Celestial Compass (Spawning)
1884=Celestial Compass (Restoration)
Hammers:
723=Spiked Club
724=Melon Hammer
728=Wolf Hammer
211=Mursaat Hammer
773=Colossal Pick
2049=Lesser Glyphic Maul
2050=Glyphic Maul
2052=Piranha Hammer
203=Twin Hammer
220=War Hammer (spiky skin)
727=Tetsubo Hammer
769=Celestial hammer
770=Clouded Maul
Rare Staves:
603=Orrish Earth Staff
736=Dragon Staff
735=Bo Staff
785=Celestial Staff
786=Cockatrice Staff
878 = Dark Tendril Staff
883 = Wailing Staff
884=Canthan Air Staff
885=Canthan Earth Staff
887=Canthan Fire Staff
888=Canthan Water Staff
889=Divine Staff
962=Outcast Staff
2325=Modavite Staff (Inspiration)
2327=Modavite Staff (Energy Storage)
21352=Tormented Staff
1987=Bone Dragon Staff (Domination)
1988=Bone Dragon Staff (Fast Casting)
1989=Bone Dragon Staff (Illusion)
1990=Bone Dragon Staff (Inspiration)
1991=Bone Dragon Staff (Soul Reaping)
1992=Bone Dragon Staff (Blood)
1993=Bone Dragon Staff (Curses)
1994=Bone Dragon Staff (Death)
1995=Bone Dragon Staff (Air)
1996=Bone Dragon Staff (Earth)
1997=Bone Dragon Staff (Energy Storage)
1998=Bone Dragon Staff (Fire)
1999=Bone Dragon Staff (Water)
=Bone Dragon Staff (Divine)
=Bone Dragon Staff (Heal)
=Bone Dragon Staff (Prot)
2003=Bone Dragon Staff (smiting)
2006=Bone Dragon Staff (Restoration)
2007=Bone Dragon Staff (Channeling)
=Bone Dragon Staff (Communing)
=Bone Dragon Staff (Spawning Power)
Wands:
1018=Voltaic Wand
1020=Dragon Breath Wand
1021=Water Spirit Rod
925=Amber Wand
784=Amber Staff (Water)
1019=Golden Pillar
729=Eternal Flame Wand
929=Koi Scepter (Air)
730=Baneful Scepter
926=Celestial Scepter
1953=Froggy (Domination)
1956=Froggy (Fast Casting)
1957=Froggy (Illusion)
1958=Froggy (Inspiration)
1959=Froggy (Soul Reaping)
1960=Froggy (Blood)
1961=Froggy (Curses)
1962=Froggy (Death Magic)
1963=Froggy (Air Magic)
1964=Froggy (Earth Magic)
1965=Froggy (Energy Storage)
1966=Froggy (Fire Magic)
1967=Froggy (Water Magic)
1968=Froggy (Divine)
1969=Froggy (Healing Prayers)
1970=Froggy (Protection Prayers)
1971=Froggy (Smite)
1972=Froggy (Communing)
1973=Froggy (Spawning)
1974=Froggy (Restoration Magic)
1975=Froggy (Channeling Magic)
Swords:
399=Crystalline Sword
400=Fellblade
793=Gothic Sword
1045=Eternal Blade
1900=Obsidian Edge
1976=Emerald Blade
790=Celestial Sword
2114=Emerald Edge
1567=Runic Blade
405=Falchion
2250=Flamberge
408=Gladius
2118=Lesser Sage Blade
397=Butterfly Sword
1556=Colossal Scimitar
396=Brute sword
742=Katana
744=Shinobi Blade
791=Crenellated Sword
792=Wicked Blade
794=Oni Blade
795=Golden Phoenix Blade
1195=Fiery Gladius
1197=Tattooed Scimitar
1322=Jade Sword
1557=Dead Sword
1559=Elemental Sword
1564=Golden Machete
1612=Firey Dragon Sword
2121=Embersteel Blade
2129=Platinum Broadsword
2254=Sephis Sword
2304=Legendary Sword
2319=Platinum Blade

Axes:
749=Dual Gothic Axe
2206=Serpent Axe
2032=Lesser Jagged Reaver
2033=Jagged Reaver
2034=Greater Jagged Reaver
Daggers:
2040=Savage Daggers
2041=Arrowblade Daggers
2042=Crescent Blades
2043=Crude Daggers
2218=Butterfly Knives
2219=Split Chakrams
2220=Dirks
2222=Korambits
2224=Sai
2225=Stilletos
761=Celestial Daggers
766=Oni Daggers OS
1384=Ancient Daggers
2624=Dragon Kamas
Scythes:
1869=Elegant Scythe
1871=Hooked Scythe
1872=Crennelated Scythe
1873=Bronze Scythe
1874=Embossed Scythe
1875=Briarwood Scythe
1876=Duskblade Scythe
2065=Raven Scythe
2059-Saurian Scythe
Bows:
132=Flatbow
133=Eternal Bow
134=Half Moon
137=Longbow
138=Feathered Longbow
140=(Mursaat)Hornbow
142=Recurve Bow
144=Shortbow
145=Storm Bow
868=Bramble Longbow
1001=Zodiac Longbow
1070=Plagueborn Bow
1759=Bladed Recurve Bow
1761=Caged Shortbow
1762=Feathered Flatbow
1763=Stoneshard Hornbow
1764=Wooden Longbow
1765=Sturdy Recurve Bow
1766=Composite Shortbow
1767=Spiked Recurve Bow
2037=Maplewood Longbow
2038=Forked Hornbow
2039=Silverwing Bow
2264=Aureate Longbow
21298=Tormented Recurve Bow
27017=Bow of the Kinslayer
28608=Tengu Flatbow
30696=Deldrimor Hornbow
868=Bramble Longbow
Spears:
2071=Voltaic Spear
2075=Greater Guardian Spear
2077=Draconic Spear
2270=Skull Spear
2271=Solemn Spear
2076=Ornate Spear
2078=Serrated Spear
1515=Nightmare Spear
15971=Wintergreen Spear
Misc (Need to organize):
Placeholder for large lists of modelids that need to be added.
Tonics
4730=Sinister Automatonic
15837=Transmogrifier
21490=Yuletide
22192=Beetle Juice
30624=Abyssal
30626=Cerebral
30630=Trapdoor
30632=Searing
30634=Automatonic
30636=Skeletonic
30638=Boreal
30640=Gelatinous
30642=Phantasmal
30646=Abominable
30648=Frosty
31020=Mischievious
31141=Mysterious
31142=Cottontail
31144=Zaishen
31172=Unseen
37771=Spooky
37772=Minutely mad King
Consumables
22752=Golden Egg
22269=Birthday Cupcake
28436=Pumpkin Pie
31152=Green Rock Candy
31151=Blue Rock Candy
31153=Red Rock Candy
35121=War Supplies
28433=Pumpkin Cookie
26784=Honeycomb
6370=Peppermint Candy Cane
21488=Wintergreen Candy Cane
21489=Rainbow Candy Cane
22191=Four Leaf Clover
24862=Powerstone of Courage
21492=Fruitcakes
22644=Chocolate Bunny
30855=Bottle of Grog
5585=Dwarven Ale
24593=Aged Dwarven Ale
6375=Eggnogs
22190=Shamrock Ale
6049=Witchs Brews
910=Hunters Ales
28435=Hard Apple Cider
6369=Squash Serum
21809=Rocket
21810=Champagne Popper
21813=Sparkers
6376=Snowman Summoner
6368=Ghost-in-a-box
29436=Crate of Fireworks
21491=Wintersday Gift
28434=Trick or Treat Bag
Collectables
21128=Margonite Gem
21129=Stygian Gem
21130=Titan Gem
21131=Torment Gem
444=Feathered Caromi Scalp
504=Decayed Orr Emblem
1583=Mummy Wrapping
24354=Golden Rin Relic
27033=Destroyer Core
27035=Saurian Bone
27036=Amphibian Tongue
27045=Jotun Pelt
27050=Pile of Elemental Dust
27052=Superior Charr Carving
27062=Flesh Reaver Morsel
27067=Blob of Ooze
27974=Undead Bone
Quest Items
15588=Rune of DOOM
26898=Hero's Handbook
26899=Hero's Handbook [Hard Mode]
24629=Top Left map Piece
24630=Top Right Map Piece
24631=Bottom Left Map Piece
24632=Bottom Right Map Piece
Salvage
525=Umbral Skeletal Limb (Bones)
522=Dark Remains (Dust)
Materials
921=Bones
922=Charcoal
923=Monstrous Claw
925=Cloth
926=Linen
927=Damask
928=Silk
929=Dust
930=Glob of Ectoplasm
931=Monstrous Eye
932=Monstrous Fang
933=Feather
934=Plant Fibers
935=Diamond
936=Onyx
937=Ruby
938=Sapphire
939=Glass Vial
940=Tanned Hide
941=Fur
942=Leather Square
943=Elonian Leather Square
944=Vial of Ink
945=Obsidian Shard
946= Wood Plank
948=Iron Ingot
949=Steel Ingot
950=Deldrimor Steel Ingot
951=Parchment
952=Vellum
953=Scale
954=Chitin
955=Granite Slab
956=Spiritwood Plank
6532=Amber
6533=Jadeite Shard
Minipets
29416=Miniature Celestial Rabbit
29417=Miniature Celestial Dragon
25499=Miniature Black Moa Chick
13784=Miniature Charr Shaman
34397=Miniature Candysmith Marley
Scrolls
3256=Passage Scroll to Urgoz's Warren
3746=Passage Scroll to The Underworld
5594=Scroll of Hero's Insight
5595=Scroll of Berserker's Insight
5611=Scroll of Slayer's Insight
5853=Scroll of Adventurer's Insight
5975=Scroll of Rampager's Insight
5976=Scroll of Hunter's Insight
21233=Scroll of the Lightbringer
22279=Passage Scroll to The Deep
22280=Passage Scroll to Fissure of Woe
Tomes
21786=Elite Assassin Tome
21787=Elite Mesmer Tome
21788=Elite Necromancer Tome
21789=Elite Elementalist Tome
21790=Elite Monk Tome
21791=Elite Warrior Tome
21792=Elite Ranger Tome
21793=Elite Dervish Tome
21794=Elite Ritualist Tome
21795=Elite Paragon Tome
21796=Assassin Tome
21797=Mesmer Tome
21798=Necromancer Tome
21799=Elementalist Tome
21800=Monk Tome
21801=Warrior Tome
21802=Ranger Tome
21803=Dervish Tome
21804=Ritualist Tome
21805=Paragon Tome
Keys
22751=Lockpick

Dye
146=All Dye
Summoning Stones
30209=Tengu summoning stones
30210=Imperial Guard summoning stones
30846=Automaton summoning stones
30959=Chitinous summoning stones
30960=Mystical summoning stones
30961=Amber summoning stones
30962=Artic summoning stones
30963=Demonic summoning stones
30964=Gelatinous summoning stones
30965=Fossilized summoning stones
30966=Jadeite summoning stones
31022=Mischievous summoning stones
31023=Frosty summoning stones
31154=Merchant summoning stones
31155=Mysterious summoning stones
31156=Zaishen summoning stones
32557=Ghastly summoning stones
34176=Celestial summoning stones
35126=Shining Blade summoning stones
Tokens
21833=Lunar Token
27563=Bison Tournament Token
Bundles
27133=Jar Of Invigoration

If the model ID is 12345 then the line is:
Code:
If $lModelID =  12345 Then Return True
You save this and try. it should work.
Now you know how to edit a bot and add a new item to pickup.
If i'm not clear or if you have a query, just ask.

Sorry for the (very) long post and for my english (everyone know that frensh sucks with foreign languages :D )

Quote:

Originally Posted by calypso974fire

Spoiler

Code:

Func CANSELL($AITEM)
	Local $RARITY_White = 2621, $RARITY_Blue = 2623, $RARITY_Purple = 2626, $RARITY_Gold = 2624, $RARITY_Green = 2627
	Local $m = DllStructGetData($aItem, 'ModelID')
	Local $q = DllStructGetData($aItem, 'Quantity')
	Local $r = GetRarity($aItem)
	Local $Attribute = GetItemAttribute($aItem)
	Local $Requirement = GetItemReq($aItem)
	Local $ModStruct = GetModStruct($aItem)
	Local $Vigor = StringInStr($ModStruct, "0101082403023025C202EA27", 0, 1) ;~String for Sup Vigor.


	If $M = 146 Then ; teintures noires et blanches
		If DllStructGetData($AITEM, "ExtraId") > 9 Then
			Return False
		Else
			Return True
		 EndIf

   ElseIf $M = 22751 Then ; lockpicks
		Return False
   ElseIf $M = 778 Then ; bouclier � lame
		Return True
   ElseIf $M = 777 Then ; bouclier � lame
		Return True
   ElseIf $M = 735 Then ; bo staff
		Return False
   ElseIf $M = 945 Then ; Echovald
		Return False
   ElseIf $M = 944 Then ; Echovald
		Return False
   ElseIf $M = 940 Then ; Amber
		Return False
   ElseIf $M = 941 Then ; Amber
		Return False
   ElseIf $M = 950 Then ; Gothic
		Return True
   ElseIf $M = 951 Then ; Gothic
		Return True
   ElseIf $M = 1321 Then ; Hunt Gardien
		Return True
   ElseIf $M = 1320 Then ; Hunt Gardien
		Return True
   ElseIf $M = 736 Then ; Dragon staff
		Return False
   ElseIf $M = 794 Then ;Oni Blade
		Return False
   ElseIf $M = 337 Then ;Skeleton Shield
		Return True
   ElseIf $M = 334 Then ;Shield of the Wing
		Return True
   ElseIf $M = 766 Then ;Oni Daggers
		Return False
   ElseIf $M = 795 Then ;Golden Phenix Blade
		Return False
   ElseIf $M = 744 Then ;Shinobi Blade
		Return False
   ElseIf $M = 742 Then ;Katana
		Return False
   ElseIf $M = 741 Then ;Jitte
		Return False
   ElseIf $M = 866 Then ;Paper Fan
		Return False
   ElseIf $M = 775 Then ;Paper Fan
		Return False
   ElseIf $M = 776 Then ;Paper Fan
		Return False
   ElseIf $M = 789 Then ;Paper Fan
		Return False
   ElseIf $M = 858 Then ;Paper Fan
		Return False
   ElseIf $M = 866 Then ;Paper Fan
		Return False
   ElseIf $M = 947 Then ;Emblazoned
		Return True
   ElseIf $M = 955 Then ;Ornate Shield
		Return True
   ElseIf $M = 5899 Then ; necessaire d id
		Return False
   ElseIf $M = 400 Then ; FellBlade
		Return False
   ElseIf $M = 405 Then ; Falchion
		Return False
   ElseIf $M = 2250 Then ; Flamberge
		Return True
   ElseIf $M = 1556 Then ; Colossal Scimitar
		Return True
   ElseIf $M = 791 Then ; Crenellated
		Return False
   ElseIf $M = 1197 Then ; Tatooed Scimitar
		Return False
   ElseIf $M = 1612 Then ; Fiery Dragon Sword
		Return True
   ElseIf $M = 397 Then ; Butterlfy Sword
		Return True
   ElseIf $M = 323 Then ; Aegis
		Return True
   ElseIf $M = 331 Then ; Defender
		Return True
   ElseIf $M = 343 Then ; Tall Shield
		Return True
   ElseIf $M = 326 Then ; Ornate Buckler
		Return True
   ElseIf $M = 338 Then ; Skull Shield
		Return True
   ElseIf $M = 327 Then ; Reinforced Buckler
		Return True
   ElseIf $M = 345 Then ; Tower Shield
		Return True
   ElseIf $M = 871 Then ; Spiked Targe
		Return True
   ElseIf $M = 872 Then ; Spiked Targe
		Return True
   ElseIf $M = 2299 Then ; Irridescent Aegis
		Return False
   ElseIf $M = 2294 Then ; Diamond Aegis
		Return True
   ElseIf $M = 896 Then ; Paper Lantern
		Return False
   ElseIf $M = 603 Then ; Orr Staff
		Return False
   ElseIf $M = 887 Then ; Baton Feu Skin Cantha
		Return False
   ElseIf $M = 5899 Then ; necessaire d id
		Return False
  	ElseIf $m > 21785 And $m < 21806 Then ;Tomes not for sale
		Return False
   	 ElseIf $Attribute = 20 And $Requirement = 8 And GetItemMaxDmg($aItem) = 22 Then ; req8 Swords - Swordsmanship
		Return False
	 ElseIf $Attribute = 17 And $Requirement = 8 And GetItemMaxDmg($aItem) = 16 Then ; req8 Shields - Strength
		Return False
     ElseIf $Attribute = 21 And $Requirement = 8 And GetItemMaxDmg($aItem) = 16 Then ; Req8 Shields - Tactics
		Return False
	 ElseIf $Requirement = 8 Then
		Return False
	 Else
		Return True
	EndIf
 EndFunc

The same way, you have 2 lines per items. exemple for Bo staff:

Code:

   ElseIf $M = 735 Then ; bo staff
		Return False

The bot ask itself if it can sell the an item;
If the ModelID is 735 then the function return return false: the bot cannot sell the staff and move to the next item.

Spoiler

Code:

Func PickUpList($aItemPtr)
   Local $lRarity = GetRarity($aItemPtr)
   If $lRarity = 2624 Or $lRarity = 2626 And $mLeecher Then Return False ; leecher present to pick up loot
   If $lRarity = 2627 Then Return $mRarityGreen ; green items
   If $lRarity = 2624 Then Return $mRarityGold ; gold items
   Local $lModelID = MemoryRead($aItemPtr + 44, 'long')
   If $lModelID = 27977 Then Return $mBattlePlans ; charr battle plans
   If $lModelID = 24629 Then Return $mMapPieces ; map top left
   If $lModelID = 24630 Then Return $mMapPieces ; map top right
   If $lModelID = 24631 Then Return $mMapPieces ; map bottom left
   If $lModelID = 24632 Then Return $mMapPieces ; map bottom right
   If $lModelID = 6104 Then Return $mQuestItems ; Quest item: Urn
   If $lModelID = 6102 Then Return $mQuestItems ; Quest item: Spear
   Local $lType = MemoryRead($aItemPtr + 32, 'byte')
   Switch $lType
	  Case 9, 11, 18, 20, 31 ; consumables, materials and z-coins, keys, gold coins, scrolls
		 Return True
	  Case 10 ; dyes
		 $lExtraID = MemoryRead($aItemPtr + 34, 'short')
		 If $lExtraID = 10 Or $lExtraID = 12 Then
			Return True ; black and white dye
		 Else
			Return $mDyes
		 EndIf
	  Case 21 ; quest items
		 Return $mQuestItems
   EndSwitch
   Switch $lModelID
	  Case 1953, 1956 to 1975 ; froggys
		 Return True
	  Case 21786 to 21795 ; elite tomes
		 Return $mEliteTomes
	  Case 21796 ;  assassin tomes
		 Return $mTomes
	  Case 21797 ; mesmer tomes
		 Return $mMesmerTomes
	  Case 21798 ; necromancer tomes
		 Return $mTomes
	  Case 21799 ; elementalist tomes
		 Return $mElementalistTomes
	  Case 21800 ; monk tomes
		 Return $mTomes
	  Case 21801 ; warrior tomes
		 Return $mTomes
	  Case 21802 ; ranger tomes
		 Return $mTomes
	  Case 21803 ; dervish tomes
		 Return $mTomes
	  Case 21804 ; ritualist tomes
		 Return $mTomes
	  Case 21805 ; paragon tomes
		 Return $mTomes
	  Case 21127 to 21131 ; gems
		 Return True
	  Case 522, 835, 476, 525, 444, 27047 ; dark remains, feathered scalp, demonic remains, umbral skeletal limb, feathered caromi scalp, glacial stones
		 Return $mSalvageTrophies
	  Case 27033, 27035, 27036, 27050, 27974 ; destroyer core, saurian bone, amphibian tongue, elemental dust, undead bone
		 Return True
	  Case 28434, 18345, 21491, 37765, 30855, 22191, 22190 ; Event items
		 Return True
   EndSwitch
   If GetIsIronItem($lModelID) Then Return True
   Return GetIsRareWeapon($aItemPtr)
EndFunc   ;==>PickUpList

Another exemple from vaettir for the "do not sell" part that show you how short it can be even with lots of ModelIDs:

Code:

;~ Description: Returns true for all ModelIDs specified.
Func Keepers($aModelID)
   Switch $aModelID
	  ; mods
	  Case 896,908,15554,15551,15552,894,906,897,909,893,905,6323,6331,895,907,15543,15553,15544,15555,15540,15541,15542,17059,19122,19123
		 Return True
	  Case 5551 ; Rune of Superior Vigor
		 Return True
	  Case 460 ; White Mantle Emblem
		 Return $mWhiteMantleEmblem
	  Case 461 ; White Mantle Badge
		 Return $mWhiteMantleBadge
	  Case Else
		 Return False
   EndSwitch
EndFunc   ;==>Keepers

I take some time to writte all this and try to explain. I hope it will help you and others to understand and upgrade/update the bots.

This way it's way easier, thank you :3

11/13/2017 17:16 calypso974fire#604

Quote:

Originally Posted by lyscir

So I was experimenting with the raptor bot and I think I finally found the builds for it. So I am going to post them here in case anyone else needs them.

Player: OQQUc4IR16RpFqM9F5FWC6Fja7gA
Hero: OQijEmmMaOD7dMP2Efjp3146NA

Hello all,

I ran tests on this bot this weekend.
Here is the builds and the stuff i used. the longuest session I had was 370 runs (85 fails our of 370 runs) in about 8 hours.

Your build: OQQUc4IR16RpFqM9F5FWC6Fja7gA
Hero build: OQijEymM6MD7dMP2Efjp3146NA

Armor: Full Knight's and heal + 3 sword +1 strength +1 tactic
Sword: +7 armor vs physical dmgs +5 energy
Shield: Q9 (idealy Q8) tactic hp+30 Armor +10 vs piercing dmgs
Hero: Armor +1 +3 Command

Stuff is very very important with this bot, especially the +7 vs physical.

hope it helps

Calypso

11/14/2017 00:46 samq#605

ok again :D sry that i post again and cant clear my prob alone :(

little story again , i load a Ministerial Commandation bot 6 month befor and cant find him again. I fixt him that he fails maby 25/200 runs on HM , than i must reset my pc and forget to pic that bot, now ive got only the skript and GWA2 was lost.

I load another GWA2 but he dont want run with it.
Every time he was cryin error here , error there, so i search for guids last weekend , the holy complet :D watch tuts and more.

the end of story is:

now he runs on NM atm (assasin)

but i lost the part of script which him says searchenemynearagent (-2, 2000)
every time i insert it he cry on run with an error,

so i give him first a send (tab) / send (space) to do some thing at this moment

ok, now hes run from a-z he's clean first mobs with tab,space :D, run 2 stairs and kill all mobs, now my next prob, i test it with 3 GWA2 dats but no one want pick my loot and at other GWA2 / scrips isnt the ministeral itemid, and cant find it at this list:

if any one need a itemid look here :D

[Only registered and activated users can see links. Click Here To Register...]
revision.com/index.php/Model_IDs

!!u have 2 copie from wiki - model_Ids i dont know why i cant post it complet here?

so the story is :

need a new include:

search enemy nearst agent at start!

and pick up loot

im a noob at write scrips and would be sooooooo happy if anyone can help . i would be donate it for some help

Here is the old script and the new,with New loadet GWA2.

PLS help 2 Reborn the Ministerial Commandation Farm Bot

Spoiler

If it works i would share it so every one can use it!!!

11/14/2017 09:19 calypso974fire#606

Thanks for your first analysis on this. I'll take a lot at the script and see if I can help you to fix it. I'll try to post the corrections i make as a small tuto as above in order to help you and other to fix their old bots.

11/14/2017 13:19 samq#607

thx!!

im a scrub :D

now i must go 2 work :(

11/14/2017 21:49 sly611#608

Quote:

Originally Posted by calypso974fire

Hello all,

I ran tests on this bot this weekend.
Here is the builds and the stuff i used. the longuest session I had was 370 runs (85 fails our of 370 runs) in about 8 hours.

Your build: OQQUc4IR16RpFqM9F5FWC6Fja7gA
Hero build: OQijEymM6MD7dMP2Efjp3146NA

Armor: Full Knight's and heal + 3 sword +1 strength +1 tactic
Sword: +7 armor vs physical dmgs +5 energy
Shield: Q9 (idealy Q8) tactic hp+30 Armor +10 vs piercing dmgs
Hero: Armor +1 +3 Command

Stuff is very very important with this bot, especially the +7 vs physical.

hope it helps

Calypso

Hello calypso974fire , sorry for my bad English i'm from Switzerland ....
I say thank you for your help, and the build I like a lot. I asked a friend Vikingkong to help me but she is absente a few days again for this bot Raptor.
Or could I download it please ?
I would give you a present on guild wars if you want to say thank you !!!!!

11/15/2017 09:05 calypso974fire#609

@[Only registered and activated users can see links. Click Here To Register...]: pas de probl�me, Mia m'avait demand� de regarder le bot raptor pour quelqu'un. Je suppose que c'�tait pour toi.

Va sur la premi�re page de ce thread et tu vas trouver un package de bots GW_BOTS_July17.rar. Le bot raptor est dedans.

Quote:

Originally Posted by samq

thx!!

im a scrub :D

now i must go 2 work :(

The only character i have that finished Faction is my E and i never did WoC.

I'm doing it atm to test the bot. So far i replaced the funcitons in the bot by the last versions of GWA2.

I'll let you know the result as soon as i get the quest.

11/16/2017 22:12 teejay89#610

sorry to be a noob here but how do i run these bots? i download the RAR file and what do i do from there?

11/16/2017 22:47 samq#611

Quote:

sorry to be a noob here but how do i run these bots? i download the RAR file and what do i do from there?

HI!
U have 2 download and install autoit v3.!
Unzip the rar,
start gw ,
enter the spot,
give ur char the skill bar + hero�s if u need,
open the folder where u unzip the files, right klick on ur script and let run this with:
( RUN SCript (x86) . thats all.

11/16/2017 23:21 teejay89#612

got it working thank you!!

whats the raptor build please? and will it pick up event items?

EDIT: Nvm found it

so the raptor one is not working for me... does it have to be in HM?

11/17/2017 07:52 tjubutsi#613

I seem to be having an issue with the last fiber run posted. It sometimes gets stuck in the outpost against the wall after which it will fail to reset.

11/17/2017 09:01 calypso974fire#614

Quote:

Originally Posted by teejay89

got it working thank you!!

whats the raptor build please? and will it pick up event items?

EDIT: Nvm found it

so the raptor one is not working for me... does it have to be in HM?

Yes it does. Look at my post on 11/13/2017 17:16 for the stuff. it's very important to have the correct stuff to have it works.

Quote:

Originally Posted by tjubutsi

I seem to be having an issue with the last fiber run posted. It sometimes gets stuck in the outpost against the wall after which it will fail to reset.

Yes, i had this issue to. I need to correct this bot.

11/17/2017 10:38 ilikecookehz#615

Hello guys, i have a small problem with the ReFeathers bot , it stops working and it says "Not enough inventory space" however my character inventory is empty.

Any help on how to fix it or what am i doing wrong would be greatly appreciated.

Also a BIG thank you to all the coders helping to fix the problems (for free) !!

Page 41 of 152

« First

141

Last »