Адреналин: полезные мелкие скриптики

Заработай шерингом

Навигация

+ -

Скачать игры

Сейчас на сайте

25.04.2024

V1ad

1 день

25.04.2024

Aloha123

1 день

24.04.2024

Yaposhka

2 дней

22.04.2024

Apollo

4 дней

19.04.2024

Samurai97

1 неделя

Показать статистику

Последние фото

Game of Blocks : WesterosCraft and Game of Thrones

Game of Blocks : Wes...
Альбом: Скриншоты

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

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

Последние видео

Видео THE WORLD LIVE - since 2008 | earthTV : So thank you for the many views of this stream, please enjoy the original classic television version of THE WORLD LIVE, first uploaded here for you in 2008 with just 7 locations.

Онлайн камеры: THE WORLD LIVE - since 2008 | earthTV

$Видео The Best Of Norway's Railway Cab Views : I\$

Онлайн камеры: The Best Of Norway's Railway Cab Views

Видео 130 LIVE World Cameras : 130 LIVE World Cameras, Relaxing Music, Map, Daily Timelapse - Your Armchair Travel

Онлайн камеры: 130 LIVE World Cameras

Наша кнопочка

Код:

<a href="http://faq7.ru/" target="_blank"><img border="0" src="http://faq7.ru/images/banner88.gif" width="88" height="31" alt="FAQ7.ru"></a>

RSS каналы

RU CLICKSРусский трафик

О нет! Где JavaScript?
У Вашего браузера отключен JavaScript или он просто не поддерживает JavaScript. Пожалуйста включите JavaScript на Вашем веб-браузере для нормального просмотра данного веб-сайта,
или обновите свой браузер на поддерживаемый JavaScript; Firefox, Safari, Opera, Chrome или Internet Explorer не ниже, чем версия 6.

Автор темы: Warhangel
ID темы: 1951

Информация о теме:

Имеются 3 сообщений по данной теме, которая была просмотрена 4141 раз.

Просмотр темы

Главная страница

Регистрация

Поиск

Форум » Игровые форумы » Lineage » Боты и скрипты

Просмотр темы

Текущий рейтинг: (Всего: 0 голосов)

Поиск в этой теме

Опции темы

Адреналин: полезные мелкие скриптики

Warhangel

Опубликовано 18-11-2016 16:22

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

Сообщений: 2689
Вас поблагодарили: 23
раз(а) в 23 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5148

Откуда: Россия

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

header=[Награда №1] body=[Медаль Создателя]

Hotkey binding

Код выделить всё

function GetAsyncKeyState(vKey: integer): integer; stdcall; external 'user32.dll';

begin

while true do begin



begin

  while GetAsyncKeyState(код клавиши в Delphi)=0 do Delay(100);

  //то, что будет делать при нажатии на клавишу

end;

delay(100);

end;

end.

[ ссылка скрыта ] ( регистрация | вход )

Warhangel

Опубликовано 18-11-2016 16:22

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

Сообщений: 2689
Вас поблагодарили: 23
раз(а) в 23 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5148

Откуда: Россия

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

RE: Адреналин: полезные мелкие скриптики

Раздача пати через равные интервалы времени

Код выделить всё

var 

buff:tl2buff;

Player:string = 'ник перса'; //вставляем ник того, кого будем бафать

begin

  while delay(1000) do

  while engine.GetFaceState(0) = true do begin //Работает, когда бот ВКЛ. Если не нужно, стереть строку

  begin

    if((user.buffs.byid(1444,buff) and (buff.endtime<15000)) or not user.buffs.byid(1444,buff)) then

    begin

      engine.inviteparty(Player);

    end;

 

    if(user.buffs.byid(1444,buff) and (buff.endtime>160000)) then

    begin

      engine.dismissparty(Player);  

    end;

    delay(3000);

  end; // тут тоже тереть, если нужен постоянный ВКЛ

  delay(1000);

  end;

end.

Warhangel

Опубликовано 18-11-2016 16:24

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

Сообщений: 2689
Вас поблагодарили: 23
раз(а) в 23 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5148

Откуда: Россия

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

RE: Адреналин: полезные мелкие скриптики

Сохранение открытого диалога в файл C:\kod.html

Код выделить всё

uses SysUtils, Classes;

var L:TStringList;



Begin

  print(Engine.DlgText);

  L := TStringList.Create;          //Создаем объект (список для строк)

  L.Add(Engine.DlgText);                 //Добавляем в список строку

  L.SaveToFile('C:/kod.html');  //Сохраняем список в файл

  L.Free;  

end.

Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

« Предыдущая тема | Следующая тема »

Перейти на форум:

Последние объявления

Фото	Заголовок	Город	Размещено
	Филиал «КЧХК» АО «ОХК «УРАЛХИМ» в Кирово-Чепецке реализует неликвиды • Хозяйство - Сырье и материалы Цена: 1 1	Киров	24.04.2024 (на 1 месяц)
	АО «Карельский окатыш», АО «Олкон» и ООО «Яковлевский ГОК» продают неликвиды • Хозяйство - Сырье и материалы Цена: 1 1	Другой	18.04.2024 (на 1 месяц)
	АО «Обуховский завод» реализует неликвиды • Хозяйство - Сырье и материалы Цена: 1 1	Санкт-Петербург	29.03.2024 (на 1 месяц)

Облако тегов тем форума

Квест на Dark Avenger, Баг с сумоном(конём) в Lineage 2, Снижение процентной ставки ФРС США: что это означает для криптоактивов?, Эксклюзивный курорт в Крыму: Новофёдоровка – пансионат «Эдем», Квест на Silver Ranger, Торговая система с новыми возможностями, Руководство по системе Гомункул, Сопротивление Злу, Лимфогранулематоз, RIFT: видео-обращение разработчиков, Король-Лич - тактика, Нарушение осанки, MMO Glider 1.8.0 бот для 2.4.3 - 3.0.3 - 3.0.8 - 3.0.9, Обзор малоизвестных китайских смартфонов, Бот для всех серверов Lineage 2

Game новости

Game сервисы

Инфо сервисы