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

[Kizzarse]

@Thaelion : Got this error, apparently ActorAtrib_4 is not defined what is it?

[Thaelion]

@Thaelion : Got this error, apparently ActorAtrib_4 is not defined what is it?

I forgot to add $ before the name, porting it from c# code,

[Kizzarse]

I updated the attribute search function in the script a little, this should be a bit quicker, at least it is on my pc.
If you see any issues in this code, lets talk about it

Func IterateActorAtribs2($_GUID, $_REQ)
   $ret = GetAttribute(BitOR($_REQ[0], 0xFFFFF000))
   $val = _MemoryRead($ret, $d3, $_REQ[1])
   return $val
EndFunc

Func GetAttribute($offset)
   $CAttribFormula = _MemoryRead($ActorAtrib_4 + 0x10, $d3, 'ptr')
   $_418 = _MemoryRead($CAttribFormula + 0x418, $d3, 'ptr')
   $AttributesMap = _MemoryRead($CAttribFormula + 0x8, $d3, 'ptr')
   $IndexMask = BitAND($_418, ($offset ^ (BitShift($offset, 0x10))))
   $_res = ($AttributesMap + 4 * $IndexMask)
   $result = _MemoryRead($_res, $d3, 'ptr')
   If $result <> 0 Then
	  While _MemoryRead($result, $d3, 'ptr') <> $offset
		 $result = _MemoryRead($result, $d3, 'ptr')
		 If $result = 0 Then
			ExitLoop
		 EndIf
	  Wend
   EndIf
   return $result
EndFunc

I ran your new code, and tried to find $Atrib_Hitpoints_Cur but it return 0, with the original code it gives me the right value.

[Thaelion]

I ran your new code, and tried to find $Atrib_Hitpoints_Cur but it return 0, with the original code it gives me the right value.

Strange thing is, that exact same code in c# returns the right value.
Well, the c# version of it.
meh AutoIT and signed Int32 vs UInt32 the BitShift operator is a bit well screwy, i will post a updated version of this in the day, there is a work around.

[SYY99]

Hi, im getting errors when i run the script.

NomadMemory.au3
Line 231: Const $TOKEN_ADJUST_PRIFILEGES = 0x0020
Error: Can not redeclare a constant.

I tried to quote the lines in NomadMemory.au3 and i get these errors:

Diablo III.au3 (the script from the first post)
Line 609: global $StringListDB = IndexStringList($Object_File_StringList[$index][0])
Error: Array variable subscript badly formatted.

tried to add this line: If $ACDIndex = -1 Then Return False ;FIX in the function, still no changes

any help please?

[Kizzarse]

Rename it to Line 231: Const $TOKEN_ADJUST_PRIV from whatever it was earlier than rerun the UDF again.

Remember to make change this everywhere in NomadMemory.au3 too.

[SYY99]

Rename it to Line 231: Const $TOKEN_ADJUST_PRIV from whatever it was earlier than rerun the UDF again.

Remember to make change this everywhere in NomadMemory.au3 too.

i renamed it to

    Const $TOKEN_ADJUST_PRIVILEGES2 = 0x0020
    Const $TOKEN_QUERY2 = 0x0008
    Const $SE_PRIVILEGE_ENABLED2 = 0x0002

and now i still get this error:
ImageShack® - Online Photo and Video Hosting

[Kizzarse]

i renamed it to

    Const $TOKEN_ADJUST_PRIVILEGES2 = 0x0020
    Const $TOKEN_QUERY2 = 0x0008
    Const $SE_PRIVILEGE_ENABLED2 = 0x0002

and now i still get this error:
ImageShack® - Online Photo and Video Hosting

Global $Object_File_StringList = IndexSNO($ofs_StringListDef, 0) ;//THIS LIST IS HUGE, NO NEED TO DO IT MORE OFTEN THAN ONCE =)
$index = _ArraySearch($Object_File_StringList, Hex($_MonsterNameStringListID), 0, 0, 0, 1, 1, 1)
;; ##### Add this line here START #####
If ( $index > 0 ) Then
Global $StringListDB = IndexStringList($Object_File_StringList[$index][0]) ;$StringListDB is debricated in this code
Else
ConsoleWrite("Offsetlist(): $_MonsterNameStringListID is empty!" & @CRLF)
EndIf
;; ##### Add this line here END #####
$index = _ArraySearch($Object_File_StringList, Hex($_GizmoNameStringListID), 0, 0, 0, 1, 1, 1)
;; ##### Add this line here START #####
If ( $index > 0 ) Then
IndexStringList($Object_File_StringList[$index][0])
Else
ConsoleWrite("Offsetlist(): $_GizmoNameStringListID is empty!" & @CRLF)
EndIf
;; ##### Add this line here END #####

U probably got this error cuz the UDF didnt run and those array were empty just add those lines in and see if it fixes the problem.

[SYY99]

Global $Object_File_StringList = IndexSNO($ofs_StringListDef, 0) ;//THIS LIST IS HUGE, NO NEED TO DO IT MORE OFTEN THAN ONCE =)
$index = _ArraySearch($Object_File_StringList, Hex($_MonsterNameStringListID), 0, 0, 0, 1, 1, 1)
;; ##### Add this line here START #####
If ( $index > 0 ) Then
Global $StringListDB = IndexStringList($Object_File_StringList[$index][0]) ;$StringListDB is debricated in this code
Else
ConsoleWrite("Offsetlist(): $_MonsterNameStringListID is empty!" & @CRLF)
EndIf
;; ##### Add this line here END #####
$index = _ArraySearch($Object_File_StringList, Hex($_GizmoNameStringListID), 0, 0, 0, 1, 1, 1)
;; ##### Add this line here START #####
If ( $index > 0 ) Then
IndexStringList($Object_File_StringList[$index][0])
Else
ConsoleWrite("Offsetlist(): $_GizmoNameStringListID is empty!" & @CRLF)
EndIf
;; ##### Add this line here END #####

U probably got this error cuz the UDF didnt run and those array were empty just add those lines in and see if it fixes the problem.

did this and now i get this error >.<

Diablo III.au3
Line 384
dim $__outputdata[ubound($OBject_Mem_Actor, 1)-1][2]
dim $__outputdata[^ ERROR

Error: Array variable subscript badly formatted.

:/

[rootguy]

Thanks UnknOwned for this valuable information!

[RagnaBaby]

Is there an available flag to check if char's durability flag is yellow or red?

[Kizzarse]

@SYY99 - Did u change these values?

Global $ofs_MonsterDef = 0x15DBE00 ;0x015DCE00 ;0x15DBE00
Global $ofs_StringListDef = 0x015E8808 ;0x015E9808
Global $ofs_ActorDef = 0x15EC108 ;0x015ED108 ;0x15EC108
Global $ofs_ActorAtrib_Base = 0x15A1EA4 ;0x015A2EA4;0x015A1EA4
Global $ofs_ObjectManager = 0x15A0BEC ;0x015A1BEC;0x15A0BEC
Global $ofs_InteractBase = 0x15A0BD4 ;0x015A1BD4;0x15A0BD4

The patch yesterday will break the old UDF, u need to update those offsets.

[SYY99]

@SYY99 - Did u change these values?

Global $ofs_MonsterDef = 0x15DBE00 ;0x015DCE00 ;0x15DBE00
Global $ofs_StringListDef = 0x015E8808 ;0x015E9808
Global $ofs_ActorDef = 0x15EC108 ;0x015ED108 ;0x15EC108
Global $ofs_ActorAtrib_Base = 0x15A1EA4 ;0x015A2EA4;0x015A1EA4
Global $ofs_ObjectManager = 0x15A0BEC ;0x015A1BEC;0x15A0BEC
Global $ofs_InteractBase = 0x15A0BD4 ;0x015A1BD4;0x15A0BD4

The patch yesterday will break the old UDF, u need to update those offsets.

ouh damn, didn't saw that post >.< thanks, it works now

[rootguy]

Is there an available flag to check if char's durability flag is yellow or red?

There is a ui element that is shown so you could simply check its visibility.

[RagnaBaby]

There is a ui element that is shown so you could simply check its visibility.

I'm not really good at knowhow on UI element checking.

Or did you mean by pixel checking? Cause if it's that, it's not what I'm looking.