26 Февраля 2021 21:20 
Заработай шерингом
Навигация
 +  - 
Скачать игры
Сейчас на сайте
26.02.2021
Warhangel
00:44:15
offline
25.02.2021
Aloha123
23:05:11
offline
21.02.2021
d3vgenyi
5 дней
offline
20.02.2021
93alexc...
6 дней
offline
18.02.2021
svet
1 неделя
offline
Последние фото
Game of Blocks : WesterosCraft and Game of Thrones
Game of Blocks : Wes...
Альбом: Скриншоты

Вынос трёх пати куполом
Вынос трёх пати куполом
Альбом: Скриншоты



Альбом: Флора

Последние видео
Видео The Heretic: the complete short film : The Heretic is a short film created by Unity’s Demo team. After debuting its first part at GDC 2019, the completed short is now available to watch in its entirety.

Игрофильмы:  The Heretic: the complete short film

Видео ТРИ СУДЬБЫ - Короткометражный фэнтези-боевик : Короткометражный CGI-фильм, посвященный игре The Elder Scrolls Online.

Игрофильмы:  ТРИ СУДЬБЫ - Короткометражный фэнтези-боевик

Видео Rhine Falls : Rhine Falls Live Camera streeeam

Онлайн камеры:  Rhine Falls

Наша кнопочка
FAQ7.ru
Код:
RSS каналы
Новости
Комменты
Форум
Статьи
Фото
Файлы
Ссылки
Объявления
Реклама
Регистрация сайта в каталогах, раскрутка и оптимизация сайта, контекстная реклама
Автор темы: Warhangel
ID темы: 2108
Информация о теме:
Имеются 1 сообщений по данной теме, которая была просмотрена 970 раз.
Реклама
Обменник
Просмотр темы
Логин:
Пароль:  
Форум » Игровые форумы » Lineage » Боты и скрипты
Просмотр темы
Текущий рейтинг: (Всего: 0 голосов)  
Ответить
Иконка 
Адреналин: продажа айтемов в магазин
Наверх Распечатать сообщение #1
Опубликовано 26-10-2018 05:01
Аватар пользователя

Супер Администратор



Сообщений: 2498
Вас поблагодарили: 21
раз(а) в 21 сообщениях

Зарегистрирован: 24.03.10
Со дня регистрации: 3992
Откуда: Россия

Скрыть награды


Пожаловаться на это сообщение 

Продажа айтемов (кроме нужных) в магазин:
procedure SellTrash;
var
i_OID: integer;
i:integer;
item:TL2item;
begin
for i:= 0 to Inventory.User.Count-1 do begin
if inventory.user.byOID(i_OID, item) and (not (Item.Equipped)) then begin
if not (Inventory.User.Items(i).Name = 'Earring (Novice)') and
not (Inventory.User.Items(i).Name = 'Spiritshot (No-grade) (Novice)') and
not (Inventory.User.Items(i).Name = 'Tunic of Devotion') and
not (Inventory.User.Items(i).Name = 'Stockings of Devotion') and
not (Inventory.User.Items(i).Name = 'Leather Helmet') and
not (Inventory.User.Items(i).Name = 'Wand of Adept (Novice)') and
not (Inventory.User.Items(i).Name = 'Ring (Novice)') and
not (Inventory.User.Items(i).Name = 'Necklace (Novice)') and
not (Inventory.User.Items(i).Name = 'Healing Potion') and
not (Inventory.User.Items(i).Name = 'Healing Potion (Novice)') and
not (Inventory.User.Items(i).Name = 'Adventurer’s Potion - Casting Spd.') and
not (Inventory.User.Items(i).Name = 'Corroded Thread') and
not (Inventory.User.Items(i).Name = 'Corroded Charcoal') and
not (Inventory.User.Items(i).Name = 'Corroded Stem') and
not (Inventory.User.Items(i).Name = 'Corroded Animal Skin') and
not (Inventory.User.Items(i).Name = 'Corroded Iron Ore') and
not (Inventory.User.Items(i).Name = 'Corroded Suede') and
not (Inventory.User.Items(i).Name = 'Spiritshot (No-grade)') then begin
  Engine.NPCTrade(true,[Inventory.User.Items(i).ID,99999]); // Sell Trash
  delay(1000);
  end;
end;
    end;
end;
 Offline
 
Посетить сайт автора
Цитировать
Ответить
Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

« Предыдущая тема | Следующая тема »
 RSS Перейти на форум:
Розыгрыши 728х90

Последние объявления
ФотоЗаголовокГородРазмещено
Тайские Лекарства от целлюлита помагают сбросить лишний вес
• Для дома - Здоровье Цена: 1 1
Санкт-Петербург10.10.2020
(на 24 месяца)
Онлайн аптека поможет правильно сбросить вес и предлагает бады для похудения
• Для дома - Здоровье Цена: 1 1
Москва14.09.2020
(на 6 месяцев)
Магазин абразивных материалов «Абразивмастер»
• Хозяйство - Оборудование Цена: 1 1
Москва17.06.2020
(на 24 месяца)
Самое лучшее для похудения помогают народные рецепты для похудения в аптеке
• Для дома - Здоровье Цена: 1 1
Москва20.02.2020
(на 24 месяца)
Аптека поможет похудеть эффективно и продает капсулы самая лучшая диета
• Для дома - Здоровье Цена: 1 1
Ярославль22.12.2019
(на 24 месяца)
Облако тегов тем форума
Восстановление счетчиков производительности Windows 7, Итальянская мода, 66lvl-Квест на Валакаса - Into the Flame, ММОРПГ Argo!, Китайский бета-тест начнется 22 мая, ФРС Бостона и MIT изучат 30 блокчейнов для развертывания цифрового доллара, Письмо одной очень опытной женщины молодым девушкам., Помощь по читам (Если не работает чит), Серверы discord, Castle Island Ventures запускает фонд для инвестиций в DeFi и стейблкоины, Несколько правил выживания в нулях, Квест на Elven Knight, Сборка ява сервера Gracia Epilogue от команды l2 matrix, La2offline, Квест на профессию Cardinal для Bishop
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Торренты Радио Видеочат
Яндекс.Метрика
Powered by PHP-Fusion copyright © 2002 - 2021 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.