;~ Description: Returns agent ID of a hero.
Func GetHeroID($aHeroNumber)
    If $aHeroNumber == 0 Then Return GetMyID()
    Local $lOffset[6]
    $lOffset[0] = 0
    $lOffset[1] = 0x18
    $lOffset[2] = 0x4C
    $lOffset[3] = 0x54
    $lOffset[4] = 0x24
    $lOffset[5] = 0x18 * ($aHeroNumber - 1)
    Local $lAgentID = MemoryReadPtr($mBasePointer, $lOffset)
    Return $lAgentID[1]
EndFunc   ;==>GetHeroID