[AutoIt] Diablo 3 Click To Move, Interaction, Actor Handling. (Version 2)

[shoanimal]

There is an attribute for item level requirement (0x12A), but it's not masked with 0xFFFFF000 instead it is 0x0003B000. I haven't figured out a good way to get the item level besides using the actor name which is a pain.

Here is what i worked out that will get either backpack items or stash items and save the info in an array.

;;--------------------------------------------------------------------------------
;;	Getting Backpack Item Info
;;--------------------------------------------------------------------------------
Func IterateBackpack($bag = 0,$rlvl = 0)
	;$bag = 0 for backpack and 15 for stash
	;$rlvl = 1 for actual level requirement of item and 0 for base required level
	$_Count = _MemoryRead($_LocalActor_Count, $d3, 'int')
	$CurrentOffset = $_LocalActor_3
	Global $__ACDACTOR[$_Count + 1][7]
	For $i = 0 To $_Count
		$__ACDACTOR[$i][0] = _MemoryRead($CurrentOffset, $d3, 'ptr')
		$__ACDACTOR[$i][1] = _MemoryRead($CurrentOffset + 0x4, $d3, 'char[64]')
		$__ACDACTOR[$i][2] = _MemoryRead($CurrentOffset + 0x114, $d3, 'int')
		$__ACDACTOR[$i][3] = _MemoryRead($CurrentOffset + 0x118, $d3, 'int')
		$__ACDACTOR[$i][4] = _MemoryRead($CurrentOffset + 0x11C, $d3, 'int')
		$__ACDACTOR[$i][5] = 0
		$__ACDACTOR[$i][6] = _MemoryRead($CurrentOffset + $ofs_LocalActor_atribGUID, $d3, 'ptr')
		$CurrentOffset = $CurrentOffset + $ofs_LocalActor_StrucSize
	Next
	For $i = $_Count To 0 Step -1
		If $__ACDACTOR[$i][2] <> $bag Then
			_ArrayDelete($__ACDACTOR, $i)
		Else
			$__ACDACTOR[$i][5] = GetPackItemLevel($__ACDACTOR[$i][6], $Atrib_Requirement)
			if $rlvl Then
				$lvlReduce = GetPackItemLevel($__ACDACTOR[$i][6], $Atrib_Item_Level_Requirement_Reduction)
				If $lvlReduce Then $__ACDACTOR[$i][5] = $__ACDACTOR[$i][5] - $lvlReduce
			EndIf
		EndIf
	Next
EndFunc   ;==>IterateBackpack

;get pack info
Func GetPackItemLevel($ACD, $_REQ)
	;IterateLocalActor()
	;$ACDIndex = _ArraySearch($__ACTOR, "0x" & Hex($_guid), 0, 0, 0, 1, 1, 1) ;this bitch is slow as hell
	If $ACD = -1 Then Return False
	$_Count = _MemoryRead($_ActorAtrib_Count, $d3, 'int')
	$CurrentOffset = $_ActorAtrib_4
	Dim $ACTORatrib
	For $i = 0 To $_Count
		$ACTORatrib = _MemoryRead($CurrentOffset, $d3, 'ptr')
		If $ACTORatrib = $ACD Then
			$test = _MemoryRead($CurrentOffset + 0x10, $d3, 'ptr')
			$CurretOffset = $test
			For $i = 0 To 825
				$data = _MemoryRead($CurretOffset, $d3, 'ptr')
				$CurretOffset = $CurretOffset + 0x4
				If $data <> 0x0 Then
					$AtribData = _MemoryRead($data + 0x4, $d3, 'ptr')
					If StringLeft($AtribData, 7) = "0x0003B" Then
						;ConsoleWrite("Debug :" &$data+0x4 & " : " & _MemoryRead($data+0x4, $d3, 'int') &@crlf) ;FOR DEBUGGING
						If "0x" & StringRight($AtribData, 3) = $_REQ[0] Then
							Return _MemoryRead($data + 0x8, $d3, $_REQ[1])
						EndIf
					EndIf
					If StringLeft($AtribData, 7) = "0xFFFFF" Then
						;ConsoleWrite("Debug :" &$data+0x4 & " : " & _MemoryRead($data+0x4, $d3, 'int') &@crlf) ;FOR DEBUGGING
						If "0x" & StringRight($AtribData, 3) = $_REQ[0] Then
							Return _MemoryRead($data + 0x8, $d3, $_REQ[1])
						EndIf
					EndIf
				EndIf
			Next
			Return False
		EndIf
		$CurrentOffset = $CurrentOffset + $ofs_ActorAtrib_StrucSize
	Next
	Return False
EndFunc   ;==>GetPackItemLevel

[ace1810]

Thanks shoanimal.^^ your code is Good~. but i can't get $Atrib_Intelligence_Item, $Atrib_Vitality_Item. also sometimes $Atrib_Gold_Find is not find. if u know this problem? , plz tell me why

[David]

Wanted to say thanks to UnknOwnd and everyone else who helped add bits and pieces for the patches. I'm really new to this stuff, but eager. So I'm really thankful you decided to share this with the community. ^_^

I did want to ask something though. I'm currently trying to work out a way to read a way point (Minimized or on top of each other) so my character will interact with them. I saw the number 7465(I believe) to interact, but wanted to know if that works as well for a way point if that falls under a portal. I'm not exactly sure how I would go about setting something like that up, so any help from anyone would be greatly appreciated.

[Swarn]

Hello i got some problem to interact with chests

PowerUseGUID($ChestGUID,0x7545)

on 80% no problem but 20% the complete Charakter stuck in the game and i can't move. If i close the script i only can exit game with ESC + LeaveGame, i can not cast a town portal or a move.

How do you loot chests? do i anything wrong?

[Thaelion]

Hello i got some problem to interact with chests

on 80% no problem but 20% the complete Charakter stuck in the game and i can't move. If i close the script i only can exit game with ESC + LeaveGame, i can not cast a town portal or a move.

How do you loot chests? do i anything wrong?

Make sure you have a valid position before you try 'use' it.

[Evozer]

Thanks shoanimal.^^ your code is Good~. but i can't get $Atrib_Intelligence_Item, $Atrib_Vitality_Item. also sometimes $Atrib_Gold_Find is not find. if u know this problem? , plz tell me why

Thats because the attribute group seems to be a hashtable, or atleast a list of lists.

0x0 pointer to next element
0x4 id
0x8 value

You have to read all the elements using the 0x0 pointer aswell.

[Swarn]

Make sure you have a valid position before you try 'use' it.

seems it work's fine now thank you for this tip :=)

[ace1810]

Thanks your reply Evozer. i find it~ Evozer do u know find item type("Head", "Torso", "Feet", "Hands","Shoulders","Bracers","Belt")?

[shoanimal]

Anyone know a good way to get the region my character is in, ie. "New Tristram" or "Dank Cellar"?

[Kizzarse]

Look a bit more into the CTM structure and you will find what you need to change to make it work without having to use the mouse to begin with. The same goes for the 100% stuck bug.
At the time i wrote this i was a bit too lazy to reverse it completely, but now i got almost all of it nailed down.
Its actually quite simple.

Anyone was able to figure out this from UnknOwned, I still new to this hard time figuring it out. Pretty annoying when mob does a charge and knockback and char gets stuck in place.

Thanks.

[GnomBG]

I made bot who farm elites but when nightmarish monsters make my hero fear they completely ****ed up my position and the bot is thinking he is on older position and cast abilities on the wrong direction

How to fix that problem?
How to update the position of my hero?

[Valtharak]

just add a check if your feared from the attribute and get your new position

[GnomBG]

just add a check if your feared from the attribute and get your new position

What is the code for getting new position?

[GnomBG]

Here is what i worked out that will get either backpack items or stash items and save the info in an array.

;;--------------------------------------------------------------------------------
;;	Getting Backpack Item Info
;;--------------------------------------------------------------------------------
Func IterateBackpack($bag = 0,$rlvl = 0)
	;$bag = 0 for backpack and 15 for stash
	;$rlvl = 1 for actual level requirement of item and 0 for base required level
	$_Count = _MemoryRead($_LocalActor_Count, $d3, 'int')
	$CurrentOffset = $_LocalActor_3
	Global $__ACDACTOR[$_Count + 1][7]
	For $i = 0 To $_Count
		$__ACDACTOR[$i][0] = _MemoryRead($CurrentOffset, $d3, 'ptr')
		$__ACDACTOR[$i][1] = _MemoryRead($CurrentOffset + 0x4, $d3, 'char[64]')
		$__ACDACTOR[$i][2] = _MemoryRead($CurrentOffset + 0x114, $d3, 'int')
		$__ACDACTOR[$i][3] = _MemoryRead($CurrentOffset + 0x118, $d3, 'int')
		$__ACDACTOR[$i][4] = _MemoryRead($CurrentOffset + 0x11C, $d3, 'int')
		$__ACDACTOR[$i][5] = 0
		$__ACDACTOR[$i][6] = _MemoryRead($CurrentOffset + $ofs_LocalActor_atribGUID, $d3, 'ptr')
		$CurrentOffset = $CurrentOffset + $ofs_LocalActor_StrucSize
	Next
	For $i = $_Count To 0 Step -1
		If $__ACDACTOR[$i][2] <> $bag Then
			_ArrayDelete($__ACDACTOR, $i)
		Else
			$__ACDACTOR[$i][5] = GetPackItemLevel($__ACDACTOR[$i][6], $Atrib_Requirement)
			if $rlvl Then
				$lvlReduce = GetPackItemLevel($__ACDACTOR[$i][6], $Atrib_Item_Level_Requirement_Reduction)
				If $lvlReduce Then $__ACDACTOR[$i][5] = $__ACDACTOR[$i][5] - $lvlReduce
			EndIf
		EndIf
	Next
EndFunc   ;==>IterateBackpack

;get pack info
Func GetPackItemLevel($ACD, $_REQ)
	;IterateLocalActor()
	;$ACDIndex = _ArraySearch($__ACTOR, "0x" & Hex($_guid), 0, 0, 0, 1, 1, 1) ;this bitch is slow as hell
	If $ACD = -1 Then Return False
	$_Count = _MemoryRead($_ActorAtrib_Count, $d3, 'int')
	$CurrentOffset = $_ActorAtrib_4
	Dim $ACTORatrib
	For $i = 0 To $_Count
		$ACTORatrib = _MemoryRead($CurrentOffset, $d3, 'ptr')
		If $ACTORatrib = $ACD Then
			$test = _MemoryRead($CurrentOffset + 0x10, $d3, 'ptr')
			$CurretOffset = $test
			For $i = 0 To 825
				$data = _MemoryRead($CurretOffset, $d3, 'ptr')
				$CurretOffset = $CurretOffset + 0x4
				If $data <> 0x0 Then
					$AtribData = _MemoryRead($data + 0x4, $d3, 'ptr')
					If StringLeft($AtribData, 7) = "0x0003B" Then
						;ConsoleWrite("Debug :" &$data+0x4 & " : " & _MemoryRead($data+0x4, $d3, 'int') &@crlf) ;FOR DEBUGGING
						If "0x" & StringRight($AtribData, 3) = $_REQ[0] Then
							Return _MemoryRead($data + 0x8, $d3, $_REQ[1])
						EndIf
					EndIf
					If StringLeft($AtribData, 7) = "0xFFFFF" Then
						;ConsoleWrite("Debug :" &$data+0x4 & " : " & _MemoryRead($data+0x4, $d3, 'int') &@crlf) ;FOR DEBUGGING
						If "0x" & StringRight($AtribData, 3) = $_REQ[0] Then
							Return _MemoryRead($data + 0x8, $d3, $_REQ[1])
						EndIf
					EndIf
				EndIf
			Next
			Return False
		EndIf
		$CurrentOffset = $CurrentOffset + $ofs_ActorAtrib_StrucSize
	Next
	Return False
EndFunc   ;==>GetPackItemLevel

Can i take the weapon DPS with this?
i want to check blue items for 1000+ dps before sell/salvage

[Anihilis]

really guys thanks alot for your hard work