GCranK Опубликовано 18 января, 2023 Поделиться Опубликовано 18 января, 2023 Function CheckItemCount (const itemID: Integer; const quest: Boolean = False) : Integer; var tempItem: TL2Item; Begin if quest then Inventory.Quest.ByID(itemID, tempItem) else Inventory.User.ByID(itemID, tempItem); Result := tempItem.Count; End; Begin If Engine.SetTarget(31554) then //Берем в таргет нпс "Kahman" Begin Engine.MoveToTarget(-20); Delay(100); Engine.DlgOpen; Delay(500); Engine.DlgSel(1); Delay(500); Engine.DlgSel(2); Delay(500); Engine.DlgSel(1); Delay(500); end; While CheckItemCount(8085, True) > 20 do //проверка итема Engine.DlgSel(2); //тут выставляем номер строки ресурса до 9 (по дефолту стоит сейчас Асоф) Delay(500); Engine.DlgSel(2); Delay(500); End. 1 Цитата Ссылка на комментарий Поделиться на другие сайты More sharing options...
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Примечание: Ваш пост будет проверен модератором, прежде чем станет видимым.