Квестовый инвентарь

[Skuka.95]

Доброго времени суток. Я решил вспомнить "молодость" и написать что нибуть... Ладно перейду ближе к делу..
Кто подскажет, намекнёт, ну или в крайнем случае ткнёт носом, ну или обьяснит как прочитать квестовый инвентарь и как например узнать id (или название) вещи которая там лежит и тд

Как говарится утро вечера мудреней, но не факт что я завтра сам додумаюсь

п.с. троли лесом..
п.п.с. все и так знают на чём я пиши (эт в крайнем случае).

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

Добавлено через 23 часа 30 минут
Всё, сам разобрался)
кому надо

var
hProcess,PID,buf,ibuf,BC:DWord;
i:Integer;
j:array [0..31] of Integer;
WndHndl:THandle;
begin
 WndHndl:=findwindow(nil,'Perfect World');
 GetWindowThreadProcessId(WndHndl, @PID);
 hProcess:=OpenProcess(PROCESS_ALL_ACCESS, False, PID);
 for i:=0 to 31 do
  begin
  ReadProcessMemory(hProcess,ptr(BA),@ibuf,sizeof(ibuf),BC);
  ReadProcessMemory(hProcess,ptr(ibuf+$1C),@ibuf,sizeof(ibuf),BC);
  ReadProcessMemory(hProcess,ptr(ibuf+$34),@ibuf,sizeof(ibuf),BC);
  ReadProcessMemory(hProcess,ptr(ibuf+$D20),@ibuf,sizeof(ibuf),BC);
   // ReadProcessMemory(hProcess,ptr(ibuf+$C44),@ibuf,sizeof(ibuf),BC); // лишнее =)
  ReadProcessMemory(hProcess,ptr(ibuf+$C),@ibuf,sizeof(ibuf),BC);
  ReadProcessMemory(hProcess,ptr(ibuf+$4*i),@ibuf,sizeof(ibuf),BC);
  ReadProcessMemory(hProcess,ptr(ibuf+$8),@buf,sizeof(buf),BC);
  j[i]:=buf;
  end;
   
CloseHandle(hProcess);


end;

[Morkanus]

=) я так делаю без +С44 то у меня Не "Квестовый инвентарь" рассматривает а Обычный инвентарь.... А если с +С44 то ничего не выходит одни Нули.

Добавлено через 14 минут
сори, невнимательно смотрел адреса=)) +0D28