28 Сентября 2022 10:32 
Заработай шерингом
Навигация
 +  - 
Скачать игры
Сейчас на сайте
28.09.2022
Warhangel
08:32:48
offline
27.09.2022
Kursexpert
1 день
offline
26.09.2022
BullDoz...
1 день
offline
25.09.2022
Bata
2 дней
offline
21.09.2022
zacqawert
6 дней
offline
Последние фото
Game of Blocks : WesterosCraft and Game of Thrones
Game of Blocks : Wes...
Альбом: Скриншоты

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



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

Последние видео
Видео LIVE 24/7 Rolling Cam Venice : The most beautiful Live Cam in Venice Italy - Livecam en direct

Онлайн камеры:  LIVE 24/7 Rolling Cam Venice

Видео Rolling Cam World : Rolling Cam World - Live Webcam around the World

Онлайн камеры:  Rolling Cam World

Видео EarthCam Live: Times Square in 4K : Watch live streaming video in 4K of Times Square, New York City.

Онлайн камеры:  EarthCam Live: Times Square in 4K

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

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



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

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

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


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

Автологин, проверка по Скрипт проверяет онлайна "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
 
Посетить сайт автора
Цитировать
Ответить
Здесь присутствуют: 1 (пользователей: 0, гостей: 1)

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

Последние объявления
ФотоЗаголовокГородРазмещено
Филиал «КЧХК» АО «ОХК «УРАЛХИМ» в Кирово-Чепецке реализует неликвиды
• Хозяйство - Оборудование Цена: 1 1
Киров17.09.2022
(на 1 месяц)
АО «ЗОЛОТОРУДНАЯ КОМПАНИЯ «ПАВЛИК» реализует трансформаторы для прогрева бетона
• Хозяйство - Оборудование Цена: 1 1
Другой16.09.2022
(на 1 месяц)
ООО «Ставролен» реализует неликвиды
• Электроника - Разное Цена: 1 1
Ставрополь14.09.2022
(на 1 месяц)
Средство похудения с помощью проверенной программы LiDa
• Для дома - Здоровье Цена: 1 1
Москва24.11.2021
(на 24 месяца)
Аптека поможет убрать живот быстро и предлагает капсулы для снижения аппетита
• Для дома - Здоровье Цена: 1 1
Москва25.08.2021
(на 24 месяца)
Облако тегов тем форума
Rising Force Online Баг на руны, Изгой-один: Звёздные войны. Истории, Lava Xolo X900: Android-смартфон с процессором Intel Atom, own3D.tv возвращается к работе 1 августа, Бесконечные HP, Бот для всех серверов Lineage 2, RF Online: Передача "непередаваемых" вещей, World of Tanks - об установке шкурок, иконок, ангаров и прочего, Lineage 2 Дюп с Сосками, Фарм кредитов World of Tanks, Разработан первый интубационный робот Kepler, Mists of Pandaria: вся известная информация, Питер Джексон про съёмки Хоббита, В Samsung Galaxy Store появились децентрализованные приложения на базе Tron, Облачная платформа Microsoft Azure представила коллекционные токены
Главная Статьи Файлы Форум Ссылки Новости Фотогалерея Объявления Видео Файлобменник Гороскоп Торренты Радио Видеочат
Яндекс.Метрика
Powered by PHP-Fusion copyright © 2002 - 2022 by Nick Jones. Released as free software without warranties under GNU Affero GPL v3.