Собствено тут вам нада токо поменять аиди волыны на которои вы будете качатсоd в етом куске:
Code
WaitTargetObject($6FCBDB4D); // ID вещи
Code
Program ItemID;
var t : Integer;
{$Include 'all.inc'}
Begin
SetARStatus(true);
Hungry(1,backpack);
clearjournal;
while not Dead do
begin
if Connected then
begin
for t := 0 to 10 do
begin
if TargetPresent then CancelTarget;
CheckTargetError(2,2);
CheckSave;
UseSkill('item identification');
WaitTargetObject($6FCBDB4D); // ID вещи
Wait(10000);
end;
Hungry(1,backpack);
end;
end;
End.