Вернуться   CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг
Войти через OpenID

Скриптинг Форум посвещенный созданию скриптов для L2PacketHack

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
 
 
Опции темы Опции просмотра
Старый 24.03.2013, 21:42   #1
Новичок
 
Регистрация: 11.03.2013
Сообщений: 16
Сказал Спасибо: 2
Имеет 0 спасибок в 0 сообщенях
Kvik пока неопределено
Сообщение Отключение клиента. помогите разобратся!

Делаю бота он должен виполнять определенние действия в игре сам штоб не нагружать сильно комп и била возможность запустить в окон так 5.
Порился на форуме по поводу команд NoFreeOnClientDisconnect и NoFreeOnServerDisconnect (версия L2phx 3.4.1.83 поетому немного команди другие) нашел такое:
Код:
begin
    case pck[1] of
      #$00: begin 
        NoFreeOnClientDisconnect;
        NoFreeOnServerDisconnect;
        pck:='';
        buf:=#$84;
        SendToClientEx(name);
      end;
      end;
Прилепил к примеру и для проверки к такому скрипту:
Код:
const
name='JPEG';

var
    timer:TTimer;
    TimerStep:byte;
    IDObj:string;
procedure Init; 
begin
    TimerStep:=1;
    timer:=TTimer.Create(nil);
    timer.OnTimer:=@OnTimer;
    timer.enabled:=False;
    timer.interval:=5000; 
end;

procedure Free;
begin
    timer.free;
end;

procedure OnTimer;
    begin
        case TimerStep of
            1: 
                begin
                    timer.interval:=5000;
                    buf:=Hstr('56 00 00 00 00 00 00 00 00 00');
                    SendToServerex(name);
                    Inc(TimerStep);
                end;
            2:
                begin 
                    buf:=Hstr('56 00 00 00 00 00 00 00 00 00');
                    SendToServerex(name);
                    TimerStep:=1;
                    timer.interval:=5000;   
                end;
        end;
    end;
begin
    case pck[1] of
      #$00: begin 
        NoFreeOnClientDisconnect;
        NoFreeOnServerDisconnect;
        pck:='';
        buf:=#$84;
        SendToClientEx(name);
      end;
      end;
      timer.enabled:=true;
end.
сначала запустил во вкладке виполнить такое:
Код:
begin

setname('JPEG');

end.
потом включил виполнения основного скрипта написаного више етого, все вроде работает клиент убил через дистпетчер(хз так ли надо но через простой виход из игри не получилось), смотрел логи все работает получаю и отправляю пакети но одна проблема осталась в игру с другого акк зайти не могу тупо при виборе сервера стоит на месте, а в логе phx пишет постоянно про сокет которого не существует и оно чет там не может отправить.
Помогите пож ето исправить и как настроить а то хз как то точной инфи о NoFreeOnClientDisconnect и NoFreeOnServerDisconnect не нашел а че делать незнаю даже в чем причина. Мож надо какой то пакет отправлять или хз.
Kvik вне форума   Ответить с цитированием
 

  CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг



Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 03:37.

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!