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

Навигация

+ -

Скачать игры

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

23.01.2026

Mannaya...

14:43:51

23.01.2026

tokmakr...

1 день

23.01.2026

vg2808

1 день

21.01.2026

Maksimkaa1

2 дней

19.01.2026

Freedoom

4 дней

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

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

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 сообщений по данной теме, которая была просмотрена 5318 раз.

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

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

Регистрация

Поиск

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

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

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

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

Опции темы

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

Warhangel

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

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

Сообщений: 2693
Вас поблагодарили: 29
раз(а) в 25 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5785

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

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

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

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

Сообщений: 2693
Вас поблагодарили: 29
раз(а) в 25 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5785

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

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

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

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

Сообщений: 2693
Вас поблагодарили: 29
раз(а) в 25 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5785

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

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

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)

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

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

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

Фото	Заголовок	Город	Размещено
	Игра Stark World 2024 • Игры - Игровые ресурсы Цена: 1 1	Волгоград	11.07.2024 (на 24 месяца)

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

ROBOCOP - Official Trailer (2014), Новый журнал о World of Warcraft, Южная Корея одобрила подоходный налог на криптовалюты, GW: Подробная информация по классу Thief, Гайд по хавку. + Freya, Позволим чуду быть!, Быстрая прокачка в Point Blank, Как увеличить онлайн на сервере, Пластическая операция, ЦБ Багамских островов выпустит собственную цифровую валюту к концу 2020 года, ЦБ Австралии протестировал систему на блокчейне Эфириума для межбанковских платежей, Supplier of Reagants, Гайд Lockpicking [1-350], EVE Online - Обнаружен первый инженерный комплекс пиратов Blood Raiders, Магазин аккаунтов!!!

Game новости

Game сервисы

Инфо сервисы