07 Февраля 2026 04:42 
Навигация
 +  - 
Скачать игры
Сейчас на сайте
06.02.2026
Mannaya...
10:43:12
offline
05.02.2026
Aloha123
1 день
offline
04.02.2026
Warhangel
3 дней
offline
30.01.2026
tokmakr...
1 неделя
offline
23.01.2026
vg2808
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 темы: 2263
Информация о теме:
Имеются 1 сообщений по данной теме, которая была просмотрена 4683 раз.
Реклама
Обменник Обменник
Просмотр темы
Логин:
Пароль:  
Форум » Игровые форумы » Lineage » Боты и скрипты
Просмотр темы
Текущий рейтинг: (Всего: 0 голосов)  
Ответить
Иконка 
Адреналин: автологин
Наверх Распечатать сообщение #1
Опубликовано 28-01-2020 18:19
Аватар пользователя

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



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

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

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


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

Автологин, проверка по Скрипт проверяет онлайна "CheckMove"

    function ShellExecuteW(hwnd: integer; lpOperation, lpFile, lpParameters, lpDirectory: PChar;  nShowCmd: integer): integer; stdcall;
      external 'Shell32.dll';
     
    const
    /////////////////////////////////////////////////////////////////////// ////////////////////////////
    /////////////////////////////////////////////////////////////////////// ///////////////////////////
    //--------------------------------------НАСТРОЙКИ СКРИПТА----------------------------------------//
     
        LOGIN = 'ваш логин тут'; // логин аккаунта
       
        PASSWORD = 'ваш пароль тут'; // пароль аккаунта
     
        GAMEPATH = 'C:\game\L2\system\l2.exe'; // путь в l2.exe которую надо запускать
     
        DELAY_CHECK = 2; // задержка проверки в секундах
     
        DELAY_LOAD_CLIENT = 10; // задержка перед запуском игры в секундах
     
        DELAY_LOAD_INGAME = 15; // задержка на вход в игру в секундах (после выбора персонажа)
         
    /////////////////////////////////////////////////////////////////////// ///////////////////////////
    /////////////////////////////////////////////////////////////////////// ///////////////////////////
    //---------------------------------------НАЧАЛО СКРИПТА-----------------------------------------//
     
    var
      CountReload: integer;
     
    function CheckMove: boolean;
    var
      x, y : integer;
     
    begin
      result := false;
      x := user.x;
      y := user.y;
      engine.moveto(user.x + 1, user.y + 1, user.z);
      delay (500);
      if not (user.x = x) and not (user.y = y) then begin
        result := true;
      end;
    end;
     
    procedure ReloadWindow;
    begin
        Engine.FaceControl(0, false);
        Delay(300);
        Engine.GameClose;
        Delay(1000);
        ShellExecuteW(0, 'open', PChar(GAMEPATH), nil, nil, 0);
        Delay(DELAY_LOAD_CLIENT * 1000);
        Engine.EnterText(LOGIN);
        Engine.UseKey('Tab');
        Delay(500);
        Engine.EnterText(PASSWORD);
        Delay(500);
        Engine.UseKey('Enter');
        Delay(2000);
        Engine.UseKey('Enter');
        Delay(2000);
        Engine.UseKey('Enter');
        Delay(5000);// задержка на вход в окно выбора персонажа
        Engine.UseKey('Enter');
        Delay(DELAY_LOAD_INGAME * 1000);
    end;
     
     
    procedure ReloadMonitorThread;
    begin
      while delay(DELAY_CHECK*1000) do begin
        if CheckMove then begin
          Engine.Msg('[RELOAD MONITOR]','проверка успешна - мы в игре', $008000);
        end
        else begin
        inc(CountReload);
          Engine.Msg('[RELOAD MONITOR]','проверка провалена - окно вылетело', $0000FF);
          Engine.Msg('[RELOAD MONITOR]','выполняю перезапуск окна', $0000FF);
          ReloadWindow;
        end;
      end;
    end;
     
    begin
      Engine.Msg('[RELOAD MONITOR]','скрипт запущен', $008000);
      script.newthread(@ReloadMonitorThread);
    end.
 Offline
 
Посетить сайт автораОтправить e-mail
Цитировать
Ответить
Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

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

Последние объявления
ФотоЗаголовокГородРазмещено
Игра Stark World 2024
• Игры - Игровые ресурсы Цена: 1 1
Волгоград11.07.2024
(на 24 месяца)
Облако тегов тем форума
ULLtraDIMM: SSD-накопители в формате RAM, Как правильно загадывать желания, Звучат лучше AirPods, стоят 5000р - реально?, Посоветуйте хороший сервисный центр для компа, 24.09, клуб 1Rock, ЭПИДЕМИЯ, КОRSИКА, ЧЕРНЫЙ ОБЕЛИСК, ЛЕГИОН, Взламываем браузерные игры, Разработчики Cardano запустили первую тестовую сеть Alonzo, Подавление заговора балауров, Банк Кореи будет использовать блокчейн для развития экономики, Промышленность, Lineage 2 Баг на дамаг, Лётная погода, Игровой компьютер в облаке, HCM Capital: «Китай запустит цифровую валюту через три месяца», Apple тестирует iPhone 7 без кнопки Home
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Торренты Радио Видеочат

Powered by PHP-Fusion copyright © 2002 - 2026 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.