29 Марта 2024 17:41 
Заработай шерингом
Навигация
 +  - 
Скачать игры
Сейчас на сайте
24.03.2024
4071505
5 дней
offline
20.03.2024
V1ad
1 неделя
offline
19.03.2024
nhocly1
1 неделя
offline
17.03.2024
Jevelin
1 неделя
offline
14.03.2024
albinam...
2 недель
offline
Последние фото
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

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

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



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

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

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


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

Вставляем свой id пухи, шмота и биндим на нужную клавишу.

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

function KeyDown(K : byte) : boolean;
begin
 Result := (K = 128) or (K = 129)
end;
function SHIFT : boolean;
begin
 Result := KeyDown(GetKeyState($10));
end;
function CTRL : boolean;
begin
 Result := KeyDown(GetKeyState($11));
end;
function ALT : boolean;
begin
 Result := KeyDown(GetKeyState($12));
end;

procedure CheckPressKey_Q;
begin
 while true do begin
  while (GetAsyncKeyState(ord('Q'))=0)or(Not Alt) do Delay(100);
  Engine.UseItem(2391);
  delay(50);
  Engine.UseItem(2416);
  delay(50);
  Engine.UseItem(5719);
  delay(50);
  Engine.UseItem(5735);
  delay(50);
  Engine.UseItem(189);
  delay(50);
  Engine.UseSkill(1015);
  while GetAsyncKeyState(ord('Q'))<>0 do Delay(100);
 end;
end;
procedure CheckPressKey_W;
begin
 while true do begin
  while (GetAsyncKeyState(ord('W'))=0)or(Not Alt) do Delay(100);
  Engine.UseItem(1101);
  delay(50);
  Engine.UseItem(1104);
  delay(50);
  Engine.UseItem(51);
  delay(50);
  Engine.UseItem(39);
  delay(50);
  Engine.UseItem(44);
  delay(50);
  Engine.UseItem(8117);
  delay(50);
  Engine.UseSkill(1068);
  while GetAsyncKeyState(ord('W'))<>0 do Delay(100);
 end;
end;

begin
 Script.NewThread(@CheckPr essKey_Q);
 Script.NewThread(@CheckPressKey_W);
end.
 Offline
 
Посетить сайт автора
Цитировать
Ответить
Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

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

Последние объявления
ФотоЗаголовокГородРазмещено
АО «Обуховский завод» реализует неликвиды
• Хозяйство - Сырье и материалы Цена: 1 1
Санкт-ПетербургСегодня в 12:07:11
(на 1 месяц)
ООО «ЛУКОЙЛ-Нижневолжскнефть» реализует неликвиды
• Хозяйство - Оборудование Цена: 1 1
Астрахань18.03.2024
(на 1 месяц)
Группа «Илим» реализует неликвиды своих предприятий
• Хозяйство - Оборудование Цена: 1 1
Санкт-Петербург16.03.2024
(на 1 месяц)
ООО «Ставролен» реализует неликвиды
• Хозяйство - Сырье и материалы Цена: 1 1
Ставрополь13.03.2024
(на 1 месяц)
ПАО «Уралкалий» реализует невостребованные ТМЦ в ассортименте
• Хозяйство - Оборудование Цена: 1 1
Пермь09.03.2024
(на 1 месяц)
Облако тегов тем форума
Ripple и консорциум R3 пришли к соглашению, Castle Island Ventures запускает фонд для инвестиций в DeFi и стейблкоины, Penghua Fund подала заявку на открытие первого в Китае биржевого фонда в области блокчейна, Квест на волка и описание питомца., Найден способ бесконечно увеличивать фото на iPhone, На бирже Bitfinex появилась возможность инвестировать в криптовалютный хедж-фонд, Японская финансовая группа SBI запустила сервис кредитования в биткоинах, Секреты Танки Онлайн, E3 2011: дебют гибрида sci-fi MMO и телешоу Defiance от Trion Worlds и Syfy, Банк России и ФСБ договорились о запрете использования криптовалют как платежного средства, Курс биткоина поставил исторический рекорд в паре с рублем, Квест на Abyss Walker, Java сервер Interlude от команды - L2jTomsk, Внутренние факторы, влияющие на релевантность страниц, Не верьте бреду про СВЧ
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Торренты Радио Видеочат
Powered by PHP-Fusion copyright © 2002 - 2024 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.