Please help read Barb fury value

[DarkAngelBGE]

Hey guys,

this is my code:

func ragePercent()
   local $obj = IterateObjectList(0)
   local $percent = 0
   For $i = 0 To UBound($obj, 1) - 1
      If StringInStr($obj[$i][2], "rageSphere") Then
         $percent = mr_float($obj[$i][9] + 0x40c) * 100
         ExitLoop
      EndIf
   Next
   return $percent
EndFunc

The rageSphere value is found, but I guess the 0x40c offset is wrong. Could anyone please help?

Thanks in advance!

[leo11173]

Func GetAttributeOfs($idAttrib, $attrib)
$FAG = GetFAG($idAttrib)
$temp1 = _memoryread(_memoryread($FAG + 0x10, $d3, "ptr") + 8, $d3, "int")
$temp2 = _memoryread(_memoryread($FAG + 0x10, $d3, "ptr") + 0x418, $d3, "int")
$temp3 = BitXOR($attrib, BitShift($attrib, 16))
$temp4 = 4 * BitAND($temp2, $temp3)
$attribEntry = _memoryread($temp1 + $temp4, $d3, "int")

If $attribEntry <> 0 Then
While _memoryread($attribEntry + 4, $d3, "int") <> $attrib
$attribEntry = _memoryread($attribEntry, $d3, "int")
If $attribEntry == 0 Then
Return -1
EndIf
WEnd
Return $attribEntry + 8
EndIf
Return -1
EndFunc ;==>GetAttributeOfs

For barb :

$source = 0x2000
$MaximumFury=_memoryread(GetAttributeOfs($idAttrib, BitOR($Atrib_Resource_Max_Total[0], $source)), $d3, "float")

[DarkAngelBGE]

Thank you!