20 Января 2019 01:46 
Навигация
 +  - 
Скачать игры
Сейчас на сайте
19.01.2019
EugeneE...
05:44:35
offline
19.01.2019
Warhangel
19:45:18
offline
18.01.2019
barmole...
1 день
offline
17.01.2019
soraaa
2 дней
offline
16.01.2019
haxorwa...
3 дней
offline
Последние фото
Game of Blocks : WesterosCraft and Game of Thrones
Game of Blocks : Wes...
Альбом: Скриншоты

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



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

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

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

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

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

Видео Live Cam, Central Memorial Park, Calgary, Alberta : Central Memorial Park is a park located in central Calgary\

Онлайн камеры:  Live Cam, Central Memorial Park, Calgary, Alberta

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

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



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

Зарегистрирован: 24.03.10
Со дня регистрации: 3224
Откуда: Россия
Пол: Мужской

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


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

Продажа айтемов (кроме нужных) в магазин:
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
Санкт-Петербург21.12.2018
(на 1 месяц)
Филиал «КЧХК» в Кирово-Чепецке реализует неликвиды
• Хозяйство - Оборудование Цена: 1 1
Киров20.12.2018
(на 1 месяц)
ПАО «Казаньоргсинтез» реализует неликвиды в ассортименте
• Электроника - Эл. инструмент Цена: 1 1
Казань20.12.2018
(на 1 месяц)
Справка о несудимости в Москве
• Работа и бизнес - Разное Цена: 1 1
Москва05.12.2018
(на 24 месяца)
Универсальный гипермаркет Gecsa
• Развлечения - Туризм Цена: 1 1
Казань06.11.2017
(на 24 месяца)
Облако тегов тем форума
Хождение по станциям введут летом 2011-го года, Распрыг в css, Универсальный кабель LMcable подходит для iPhone и Android, Аннулируем штраф на вступление в гильдии, Предупреждение таблеткам для похудания, Новый закон о защите детей и мультфильмы., S80 rar Сеты, Новости Tera (rss), Популярные разводы кидал, Шекспировский Гамлет появится в Mabinogi, Hyperloop - транспортная система будущего, iPhone 5 - информацию случайно разместили на офсайте, Лернинги, The Three Musketeers (2011), Японское шоу
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Поиск по торрентам Радио Видеочат
Яндекс.Метрика
Powered by PHP-Fusion copyright © 2002 - 2019 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.