GetMobiles
Returns data for all known mobiles as an array of TMobileData records.
Возвращает данные всех известных мобайлов в виде массива записей TMobileData.
function GetMobiles: TArray<TMobileData>;
function GetMobiles: TMobileDataArray;
Type definitions:
TMobileData = packed record
serial: Cardinal;
graphic: Word;
color: Word;
x: Word;
y: Word;
z: ShortInt;
direction: Byte;
world: Byte;
flags: Byte;
notoriety: Byte;
hp: Integer;
hp_max: Integer;
sp: Integer; // stamina
sp_max: Integer;
mp: Integer; // mana
mp_max: Integer;
end;
TMobileDataArray = TArray<TMobileData>;
def GetMobiles() -> list[MobileData]: ...
var
Mobs: TArray<TMobileData>;
i: Integer;
begin
Mobs := GetMobiles;
AddToSystemJournal('Known mobiles: ' + IntToStr(Length(Mobs)));
for i := 0 to Length(Mobs) - 1 do
AddToSystemJournal('$' + IntToHex(Mobs[i].serial, 8) + ' at (' +
IntToStr(Mobs[i].x) + ', ' + IntToStr(Mobs[i].y) + ')');
end.
mobs = GetMobiles()
AddToSystemJournal(f'Known mobiles: {len(mobs)}')
for mob in mobs:
AddToSystemJournal(f'${mob.serial:08X} at ({mob.x}, {mob.y})')