[ Новые сообщения · Участники · Правила форума · Поиск · RSS ] |
|
Форум Lineage 2 Adrenalin бот Скрипты для Adrenalin Проверка количества итемов обычных и квестовых |
Проверка количества итемов обычных и квестовых |
Вставляем функцию в код:
Код 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; Чтобы проверить итемы: Код CheckItemCount(57); // item id Чтобы проверить квест итемы: Код CheckItemCount(1087, True) // quest item id Пример 1 (Простой итем): Код 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 CheckItemCount(57) < 1000 then print('low adena'); end. Пример 2 (Квестовый итем): Код 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 CheckItemCount(1087, True) < 8 then Engine.FaceControl(0, True); end. Также можно использовать и с while: Код while CheckItemCount(1087, True) < 8 do … Отключение бота при достижении определенного количества итемов Код 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 while true do begin if CheckItemCount(3423, True) >= 50 then Engine.FaceControl(0, false); Delay(1000); end; end. |
| |||
| |||