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

Навигация

+ -

Скачать игры

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

16.03.2026

Warhangel

03:59:22

15.03.2026

xBaTaKaT

09:35:58

15.03.2026

Aloha123

13:20:11

07.03.2026

denis1212

1 неделя

05.03.2026

cragjkke

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

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

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

Регистрация

Поиск

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

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

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

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

Опции темы

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

Warhangel

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

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

Сообщений: 2702
Вас поблагодарили: 32
раз(а) в 27 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5836

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

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

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

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

Сообщений: 2702
Вас поблагодарили: 32
раз(а) в 27 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5836

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

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

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

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

Сообщений: 2702
Вас поблагодарили: 32
раз(а) в 27 сообщениях
Зарегистрирован: 24.03.10
Со дня регистрации: 5836

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

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

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 месяца)

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

Разработчики программ-вымогателей начинают переходить с BTC на XMR, Полный Мануал Для строителя, The Secret World: Gamescom – Интервью с Рагнаром Торнквистом, APB - All Points Bulletin, Обыкновенная история попрошаек, «Иннова» вернула «Летний пакет» игрокам Aion!, Трубы, В игру добавлена система подбора противников равного уровня мастерства, Линейный дизайн Катаклизма был ошибкой, признала Blizzard, Онкология - нетрадиционные методы лечения, Характеристики (Attribute), Химические реагенты и водоочистка, WoW-игрок предложил $1000 за разбанивание аккаунта, Поиск сэйф-спотов сюрвей сканером, Как переместить пользователя в windows

Game новости

Game сервисы

Инфо сервисы