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

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

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
 
 
Опции темы Опции просмотра
Старый 08.12.2011, 16:50   #4
Новичок
 
Регистрация: 07.12.2011
Сообщений: 7
Сказал Спасибо: 2
Имеет 0 спасибок в 0 сообщенях
Vetal пока неопределено
По умолчанию

Спасибо большое всем кто ответил,особенно Samor888, воспользуюсь обязательно.Хотелось бы поподробней на счет как вытащить время отката из пакета. При использовании скила в l2phx у меня идут следующие пакеты:
От клиента: RequestMagicSkillUse(2F 70 00 00 00 00 00 00 00 00)
следом пакеты от серва:
1. SetupGauge(6D 00 00 00 00 87 03 00 00 87 03 00 00)
2. UserInfo(инфа о чаре я так понимаю, большой пакет не буду тут его указывать)
3. AbnormalStatusUpdate(7F 00 00)
4. UserInfo()
5. AbnormalStatusUpdate(7F 01 00 70 00 00 00 04 00 AF 04 00 00)
вот подскажите из какого пакета можно вытащить откат скила, заранее спасибо, сильно не ругайтесь я делаю первые шаги в написании скриптов

Добавлено через 5 часов 43 минуты
Вобщем вроде сообразил как вытянуть откат скила, там от сервера приходит пакет MagicSkillUse в котором есть параметр reuseDelay, вообщем считую его но все равно скрипт не работает, подскажите в чем ошибка,возможно что то неправильно с таймером сделал, заранее благодарен, вот сам скрипт который я своял):


delphi Код:
var i:integer;Timer1 : TTimer; procedure Init; //Вызывается при включении скрипта begin Timer1 := TTimer.Create(nil); //Timer1.Interval :=5000; Timer1.Enabled := False; Timer1.OnTimer := @OnTimer; end; procedure SendMsgs(msg:string); begin   buf:=#$4A;   WriteD(0);   WriteD(10);   WriteS('');   WriteS(msg);   SendToClient; end; procedure Free; //Вызывается при выключении скрипта begin Timer1.Free; end; procedure OnTimer; begin sendMSGs('Откатился'); Timer1.Enabled := false; end; //основная часть скрипта //вызывается при приходе каждого пакета если скрипт включен begin if FromServer and  (pck[1]=#$48) then  begin       i:=Readd(22);  Timer1.Interval:=i; Timer1.Enabled:= True;  end; end.
В скрипте таймер просто не срабатывает, то есть не выполняется procedure OnTimer;, в чем ошибка, кто может помочь?

Добавлено через 12 часов 32 минуты
Вроде разобрался, теперь все работает,еще вопросик появился, а можно как то это сообщение "Откатился" вывести не в системный чат, а предположим в какую то часть окна ла2?

Последний раз редактировалось Breadfan, 11.12.2011 в 08:07. Причина: Добавлено сообщение
Vetal вне форума   Ответить с цитированием
 

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


Опции темы
Опции просмотра

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

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


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

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

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