Ники соклан.

[j091]

Подскажите изменившиеся оффсеты для функции:

function GetClanPersName(PersID: DWORD): WideString;
var
  p1,p2,p3,dwReaded: dword;
  str: array [0..32] of widechar;
begin
  p1 := ReadInt32(base_addr);
  p1 := ReadInt32(p1 + $1C);
  p2 := ReadInt32(p1 + $4C);
  p1 := ReadInt32(p1 + $40);
  p3 := PersID mod p2;
  p1 := ReadInt32(p1 + p3*$4);
  while (p1 <> 0) do
  begin
     p3 := ReadInt32(p1 + $8);
     if p3 = PersID then
     begin
       p1 := ReadInt32(p1 + $4);
       p1 := ReadInt32(p1 + $0);
       Result := ReadString(p1);
       p1 := 0;
     end
     else
       p1 := ReadInt32(p1);
  end;
end;

либо другой способ получить ник соклана по его id.

Заранее благодарен.

[_DVD_]

function GetClanPersName(PersID: DWORD): WideString;
var
  p1,p2,p3,dwReaded: dword;
  str: array [0..32] of widechar;
begin
  p1 := ReadInt32(base_addr);
  p1 := ReadInt32(p1 + $1C);
  p2 := ReadInt32(p1 + $4C);
  p1 := ReadInt32(p1 + $44);
  p3 := PersID mod p2;
  p1 := ReadInt32(p1 + p3*$4);
  while (p1 <> 0) do
  begin
     p3 := ReadInt32(p1 + $8);
     if p3 = PersID then
     begin
       p1 := ReadInt32(p1 + $4);
       p1 := ReadInt32(p1 + $0);
       Result := ReadString(p1);
       p1 := 0;
     end
     else
       p1 := ReadInt32(p1);
  end;
end;

[yushi]

А можно то же самое только на С++?