L2PacketHack Форум программы L2PacketHack, всё что с ней связано находится тут.
Правила раздела! Категорически запрещено:
* Просить пакеты/скрипты на шмот/адену/другие вещи;
* Просить (помочь) взломать/сломать сервак/аккаунт или раздеть/наказать кого-то на любом серваке;
* Просить научить работать с программой, если не понимаете элементарных вещей в отношениях клиент-сервер (так как, если вы их понимаете, то вопросов по основным возможностям программы быть недолжно);
* Все посты не удовлетворяющие этим запретам, а так же не относящиеся к теме будут удаляться при первой возможности.
* Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы.
* Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.
* Данные запреты неподлежат обсуждению.
Обсуждение багов Lineage ЗАПРЕЩЕНО!
05.10.2007, 22:00
#1
Новичок
Регистрация: 05.10.2007
Адрес: Украина
Сообщений: 19
Сказал Спасибо: 0
Имеет 23 спасибок в 13 сообщенях
Кружок нубов(Вопрос-Ответ)
//QaK:отдельная тема по подкючению пакетхака к серверу >>>>>>>>тут
любые вопросы по данной тематике в этом топе будут удаляться без предупреждения.
Код:
const
mp='8A 1B 15 01 10';
hp='8A 1A 15 01 10';
begin
if fromclient and (pck[1]=#$38#$F5#$00#$EF#$00#$00#$00#$03#$00#$00#$00) then
begin
buf:=hstr(hp);
SendToServer;
end;
if fromclient and (pck[2]=#$33#$F5#$00#$EF#$00#$40#$00#$03#$00#$00#$00) then
begin
buf:=hstr(mp);
SendToServer;
end;
end.
где я ошибся?
Последний раз редактировалось QaK, 30.08.2010 в 18:56 .
За это сообщение DeVolf нажился 6 спасибками от:
29.10.2009, 05:54
#1071
Рыцарь
Регистрация: 28.09.2007
Сообщений: 1,558
Сказал Спасибо: 71
Имеет 351 спасибок в 244 сообщенях
GaremkO , поиск в руки и вперед, на форуме есть гайд
g1zmo , посмотри в ветке про ASI. Та ВРОДЕ был.
За это сообщение QaK нажился спасибкой от:
29.10.2009, 11:26
#1072
Новичок
Регистрация: 16.10.2009
Сообщений: 1
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
Здравствуйте, помогите пожалста...
Запускаю L2ph 3.5.28.151 , настройки брал отсюда
http://coderx.ru/showthread.php?t=423
вообщем ввожу лог/пас -> далее как обычно соглашение-> далее список серверов нажимаю ок - и тут выскакивает фигня "Соединение с сервером прервано.Зайдите в игру пожже."
лог
Оффтоп
29.10.2009 10:11:58 LSP модуль зарегистрирован в системе
29.10.2009 10:11:58 Стартует L2ph v3.5.28.151
29.10.2009 10:11:58 На 7788 зарегистрирован локальный сервер
29.10.2009 10:12:58 (LSP) Обнаружено соединение (Сокет 2020) IP/port 94.79.54.128:4446. Соединение будет перехвачено
29.10.2009 10:12:59 ServerListen: Обнаружено новое соединение.
29.10.2009 10:12:59 Тунель ($24683232) создан
29.10.2009 10:12:59 Тунель ($24683232) запущен для чтения с сокета № 296
29.10.2009 10:12:59 Тунель ($24683232), Серверный сокет № 296 / Клиентский сокет № 336, Соединение установлено с 94.79.54.128:4446
29.10.2009 10:12:59 Тунель ($24683232) Отвалились от сервера
29.10.2009 10:12:59 Тунель ($24683232) Отвалились от клиента
29.10.2009 10:12:59 Тунель ($24683232) уничтожен
29.10.2009 10:13:09 (LSP) Обнаружено соединение (Сокет 2020) IP/port 94.79.54.128:4446. Соединение будет перехвачено
29.10.2009 10:13:09 ServerListen: Обнаружено новое соединение.
29.10.2009 10:13:09 Тунель ($24682880) создан
29.10.2009 10:13:09 Тунель ($24682880) запущен для чтения с сокета № 308
29.10.2009 10:13:09 Тунель ($24682880), Серверный сокет № 308 / Клиентский сокет № 336, Соединение установлено с 94.79.54.128:4446
29.10.2009 10:13:09 Тунель ($24682880) Отвалились от сервера
29.10.2009 10:13:09 Тунель ($24682880) Отвалились от клиента
29.10.2009 10:13:09 Тунель ($24682880) уничтожен
29.10.2009 10:13:15 (LSP) Обнаружено соединение (Сокет 2020) IP/port 94.79.54.128:4446. Соединение будет перехвачено
29.10.2009 10:13:15 ServerListen: Обнаружено новое соединение.
29.10.2009 10:13:15 Тунель ($24682880) создан
29.10.2009 10:13:15 Тунель ($24682880) запущен для чтения с сокета № 352
29.10.2009 10:13:15 Тунель ($24682880), Серверный сокет № 352 / Клиентский сокет № 336, Соединение установлено с 94.79.54.128:4446
29.10.2009 10:13:20 Тунель ($24682880) Отвалились от клиента
29.10.2009 10:13:20 Тунель ($24682880) Отвалились от сервера
29.10.2009 10:13:20 (LSP) Обнаружено соединение (Сокет 2020) IP/port 94.79.54.128:7777. Соединение будет перехвачено
29.10.2009 10:13:20 ServerListen: Обнаружено новое соединение.
29.10.2009 10:13:20 Тунель ($24682000) создан
29.10.2009 10:13:20 Тунель ($24682000) запущен для чтения с сокета № 380
29.10.2009 10:13:20 Тунель ($24682000), Серверный сокет № 380 / Клиентский сокет № 304, Соединение установлено с 94.79.54.128:7777
29.10.2009 10:13:20 Тунель ($24682000) Отвалились от сервера
29.10.2009 10:13:20 Тунель ($24682880) уничтожен
29.10.2009 10:13:20 Тунель ($24682000) уничтожен
Пробовал вставить в поле неигровые порты - порт 4446.
При етом на выборе сервера зависает.
лог
Оффтоп
29.10.2009 10:02:12 LSP модуль зарегистрирован в системе
29.10.2009 10:02:12 Стартует L2ph v3.5.28.151
29.10.2009 10:02:12 На 7788 зарегистрирован локальный сервер
29.10.2009 10:03:33 (LSP) Обнаружено соединение (Сокет 2024) IP/port 94.79.54.128:4446. Соединение будет проигнорировано
29.10.2009 10:03:42 (LSP) Обнаружено соединение (Сокет 2024) IP/port 94.79.54.128:4446. Соединение будет проигнорировано
29.10.2009 10:04:01 (LSP) Обнаружено соединение (Сокет 2096) IP/port 94.79.54.128:4446. Соединение будет проигнорировано
29.10.2009 10:04:10 (LSP) Обнаружено соединение (Сокет 2076) IP/port 94.79.54.128:7777. Соединение будет перехвачено
29.10.2009 10:04:10 ServerListen: Обнаружено новое соединение.
29.10.2009 10:04:10 Тунель ($24028400) создан
29.10.2009 10:04:10 Тунель ($24028400) запущен для чтения с сокета № 300
29.10.2009 10:04:11 Тунель ($24028400), Серверный сокет № 300 / Клиентский сокет № 336, Соединение установлено с 94.79.54.128:7777
29.10.2009 10:04:11 Тунель ($24028400) Отвалились от клиента
29.10.2009 10:04:11 Тунель ($24028400) Отвалились от сервера
29.10.2009 10:04:11 Тунель ($24028400) уничтожен
И еще когда вылетает при последующем входе пишет что персонаж уже в игре.
Cервер valakasworld.com грация финал.
Спс.
Последний раз редактировалось sk8ty, 29.10.2009 в 11:29 .
31.10.2009, 18:53
#1073
Новичок
Регистрация: 04.10.2009
Сообщений: 27
Сказал Спасибо: 14
Имеет 12 спасибок в 10 сообщенях
Считывание хп пета
Приходит пакет "pet status update":
Код:
B6 01 00 00 00 9B 79 0E 10 08 33 02 00 48 3B 02 00 08 D1 FF FF 4B 00 69 00 6C 00 6C 00 43 00 6F 00 6F 00 6C 00 00 00 04 04 98 00 80 96 98 00 D0 41 00 00 D0 41 00 00 31 09 00 00 A9 09 00 00 53 00 00 00 00 19 F5 C1 02 00 00 00 00 19 F5 C1 02 00 00 00 00 31 40 9A 03 00 00 00
Часть скрипта:
Код:
Const name=''
Var a : array[1..100] of string;
i,curhppos,curmppos : integer;
curmp,curhp,maxhp,maxmp,curhphex,curmphex : string;
procedure Send2Msg(msg:string);
begin
buf:=#$4A;
WriteD(0);
WriteD(10);
WriteS('');
WriteS(msg);
SendToClient;
end;
BEGIN
if (connectname=name) and (pck[1]=#$B6) and (fromserver) then
begin
for i:=1 to length(pck) do
a[i]:=pck[i];
{###############analiz curhp###############}
for i:=1 to length(pck) do
begin
if (a[i]=#$86) and (a[i+1]=#$96) and (a[i+2]=#$98) and (a[i+3]=#$00) then
curhppos:=i+4;
end;
curhphex:='#$'+a[curhppos]+'#$'+a[curhppos+1]+'#$'+a[curhppos+2]+'#$'+a[curhppos+3];
curhp:=ReadD(curhphex);
Пишет несоответствие типов.
В чем я ошибся и как считать хп нормально?
31.10.2009, 19:27
#1074
Рыцарь
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
везде...
настоятельно рекомендую прочитать раздел "скриптинг" в хелпе.
Оффтоп
delphi Код:
procedure Init; //Вызывается при включении скрипта
begin
UseForConnectName := 'name' ;
end ;
procedure Free; //Вызывается при выключении скрипта
begin
end ;
var
Values : array[0 ..100 ] of variant ;
x, y, z : integer ;
Title : string ;
HpPercent, MpPercent, FeedPercent, LvlPercent : integer ;
begin
if ( fromserver) then
case pck[1 ] of
#$B6: //PetStatusUpdate
begin
{
[0] 0002 d SummonType: 1 (0x00000001)
[1] 0006 d ObjectID: 269384091 (0x100E799B)
[2] 0010 d X: 144136 (0x00023308)
[3] 0014 d Y: 146248 (0x00023B48)
[4] 0018 d Z: -12024 (0xFFFFD108)
[5] 0022 s Title: KillCool
[6] 0040 d CurrentFed: 9962500 (0x00980404)
[7] 0044 d MaxFed: 10000000 (0x00989680)
[8] 0048 d CurrenHP: 16848 (0x000041D0)
[9] 0052 d MaxHP: 16848 (0x000041D0)
[10] 0056 d CurrenMP: 2353 (0x00000931)
[11] 0060 d MaxMP: 2473 (0x000009A9)
[12] 0064 d Level: 83 (0x00000053)
[13] 0068 q Exp: 11844000000
[14] 0076 q ExpForThisLevel: 11844000000
[15] 0084 q ExpForNextLevel: 15472800000}
readmask( 'dddddsdddddddqqq' ,2 ,Values) ;
//текущие хп пета после этой строчки лежат в values[8]..
//но мы пойдем дальше и выведем краткие сведения о пете в лог пх
x := Values[2 ];
y := Values[3 ];
z := Values[4 ];
Title := Values[5 ];
FeedPercent := round ( Values[6 ]/Values[7 ]*100 ) ;
HpPercent := round ( Values[8 ]/Values[9 ]*100 ) ;
MpPercent := round ( Values[10 ]/Values[11 ]*100 ) ;
LvlPercent := round ( ( Values[14 ]-Values[13 ]) /( Values[15 ]-Values[14 ]) *100 ) ;
sendMSG( format ( 'Pet: "%s" x:%d, y:%d, z:%d, Lvlup: %d%%, Hp: %d%%, Mp: %d%%, feeed: %d%%' ,
[Title, x, y, z, LvlPercent, HpPercent, MpPercent, FeedPercent]) ) ;
end ;
end ;
end .
будет выводить в лог вот такое
Код:
31.10.2009 17:23:11 Script: Pet: "KillCool" x:144136, y:146248, z:-12024, Lvlup: 0%, Hp: 100%, Mp: 95%, feeed: 100%
пакет, для наглядности в качестве коментария оставил, чтобы было понятно откуда беруться values[x] и что это за строчка "dddddsdddddddqqq"
__________________
L2Ext - project closed.
Последний раз редактировалось alexteam, 31.10.2009 в 19:30 .
За это сообщение alexteam нажился 2 спасибками от:
31.10.2009, 22:40
#1075
Новичок
Регистрация: 04.10.2009
Сообщений: 27
Сказал Спасибо: 14
Имеет 12 спасибок в 10 сообщенях
Цитата:
Сообщение от
alexteam
НЕ квотте простыни!!
Еще одна ошибка:
при отправке через скрипт
delphi Код:
buf:='#$39#$67#404#$00#400#400#$00#400#$00#400' ;
SendToServerEx( 'KillCool' ) ;
пакета, к нему добавляется в начале #$23#$24#$33 при чем если отправлять через простую отправку - все нормально. Как этого избежать?
Оффтоп
З.Ы. Спасибо еще раз
Последний раз редактировалось alexteam, 31.10.2009 в 23:42 .
31.10.2009, 23:44
#1076
Рыцарь
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
да ? только в начале ?
еще рекоменду почитать чтото где описыаветься тип string и char
ибо в одной строчке. питцотпидисят ошибок.
приемлемые варианты:
buf := #$HexByte#$HexByte2#$Hexbyte3... где 00<=HexbyteX<=FF
buf := #$Byte#$Byte2#byte3 где 0<=byte<255
buf := hstr('hex string')
а еще лучше задавать их вот так.
я так понимаю речь о
Цитата:
Tип: 0x39 (RequestMagicSkillUse)
Pазмер: 12+2
Время прихода: 21:52:22:858
0002 d skillID: 0
0006 d CtrlPressed: 0 (0x00000000)
0010 c ShiftPressed: 0 (0x00)
Mask : ddc
buf := #$39;
writemask('ddc', [skillID, 0, 0]);
SendToServerEx('KillCool');
и еще.
если задана переменная UseForConnectName то вместо SendToServerEx(''); можно просто вызывать SendToServer;
__________________
L2Ext - project closed.
Последний раз редактировалось alexteam, 31.10.2009 в 23:57 .
За это сообщение alexteam нажился спасибкой от:
01.11.2009, 01:53
#1077
Новичок
Регистрация: 04.10.2009
Сообщений: 27
Сказал Спасибо: 14
Имеет 12 спасибок в 10 сообщенях
Процедура ReadMask
Цитата:
Сообщение от http://l2phx.pp.ru/arhive/l2ph_help/
var
i:integer;
s:string;
c:byte;
d:integer;
h:word;
f:double;
q:int64;
begin
i := 10; //offset;
ReadMask('cdhfqs', i, [c, d, h, f, q, s]);
.....
Нашел
на сайте хелпа по phx в "Разработка>Скриптинг>Перечень поддерживаемых функций"
процедуру ReadMask. Что означает переменная i ? Что такое "offset;" не понял =\
01.11.2009, 03:34
#1078
Новичок
Регистрация: 01.11.2009
Сообщений: 1
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
Здравствуйте, помогите настроить L2PacketHack 3.5.28.151. для cервера lineage.ru The Chaotic Throne – Interlude (сервер 4 x10). Версия L2phx_3.2.0 работает отлично, получилось настроить l2phx.3.4.1.83, а вот 3.5.28.151 ну никак не могу…
Пожалуйста, выложите скриншоты настроек. Заранее Спасибо.
01.11.2009, 05:16
#1079
Рыцарь
Регистрация: 03.03.2009
Сообщений: 773
Сказал Спасибо: 361
Имеет 300 спасибок в 168 сообщенях
spiritofsands ,
Код:
Что означает переменная i ?
i или xxxxxxxxxxxxxxxx
все =
добавлю
вопрос на сайте другом задал ?
может ответ тебе более понятен там !!
__________________
Тут не форум гадалок, если ты делаешь все правильно и по пунктам - то все должно работать
Последний раз редактировалось TAMBIK, 01.11.2009 в 05:18 .
01.11.2009, 05:57
#1080
Новичок
Регистрация: 04.10.2009
Сообщений: 27
Сказал Спасибо: 14
Имеет 12 спасибок в 10 сообщенях
Цитата:
Сообщение от
TAMBIK
i или xxxxxxxxxxxxxxxx
все =
Так смысл какой? Какая функция переменной??
Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
Часовой пояс GMT +4, время: 15:19 .
vBulletin style designed by
MSC Team .
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод:
zCarot
Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!