Вижу предмет, использую его и заношу в игнор лист (GetIgnoreList)
А конкретно, интересует игнор использованного трупа.
Code: Select all
var
  List: TStringList;
  i: Integer;
  corpseID:cardinal;
 begin    
if FindType($2006, ground) <> 0 then
 begin
 while FindType($2006,ground) <> 0 do
begin
AddToSystemJournal('Найден труп ' + IntToStr(finditem));
corpseID := finditem;
If (FindType(Tools[4], backpack) <> -1) or (FindType(Tools[4], self) <> -1) then
 begin
AddToSystemJournal('Режем труп');
WaittargetObject(corpseID);
Wait(1000);
UseObject(findtype(Tools[4],self));
Wait(3300);
UseObject(corpseID); 
      Wait(500); 
Ignore(corpseID);
end;
end;
end;Подскажите плс,
как в данной процедуре использовать интересующую функцию ?

