Скрипт прокачки ItemID

[Паразит]

Хаюшки, не могу разобраться в скрипре на прокачку item indification.
В скритах не шарю вообще... Наделал полную билиберду...
Каким хотел бы видеть скрит: Беру из контейнера 1 бинт --> использую на него скилл Item ID пока не определит --> как только определил, скидываю его в тот же контейнер ко всем остальным --> снова беру их той же кучи 1 бинт и процесс повторяется до потери пульса...

Code: Select all

:(

Помогите с написанием, если есть время и возможности )) может у кого-то завалялось что-то подобное

[Паразит]

Code: Select all

Program qwe;

const
  iron = $1BF2;
  bpack = $4E44F36A;

Begin
  while not dead do
Begin
if (getquantity(findtype(iron,backpack))<1) then //$xxxx
begin
  moveitem(finditem,2,bpack,0,0,0); //откуда беру
  addtosystemjournal('Взял в пак 2 слитка железа');
  wait(2000);
end;

begin
    UseSkill('Item Identification');
  WaitTargetType(iron);
  wait (10500);
  if TargetPresent then CancelTarget;
  
begin
if (getquantity(findtype(iron,Backpack))>1) then //$xxxx
begin
  moveitem(finditem,0,bpack,0,0,0); //куда скидываю
  addtosystemjournal('Убрал слитки железа на место');
  wait(1000);
end;
end;
end;
end;
end.

Слитки железа брать не хочет, где ошибся, подскажите?

[Alex]

Code: Select all

if (getquantity(findtype(iron,backpack))<1) then //$xxxx

исправь на

Code: Select all

if (getquantity(findtype(iron,backpack))>1) then //$xxxx

[Паразит]

Code: Select all

if (getquantity(findtype(iron,backpack))<1) then //$xxxx

исправь на

Code: Select all

if (getquantity(findtype(iron,backpack))>1) then //$xxxx

Всё равно не берёт

[Паразит]

Всё. Не актуально! Сделал! Работает. Тестирую!