L2PacketHackФорум программы L2PacketHack, всё что с ней связано находится тут.
Правила раздела!
Категорически запрещено:
* Просить пакеты/скрипты на шмот/адену/другие вещи;
* Просить (помочь) взломать/сломать сервак/аккаунт или раздеть/наказать кого-то на любом серваке;
* Просить научить работать с программой, если не понимаете элементарных вещей в отношениях клиент-сервер (так как, если вы их понимаете, то вопросов по основным возможностям программы быть недолжно);
* Все посты не удовлетворяющие этим запретам, а так же не относящиеся к теме будут удаляться при первой возможности.
* Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы.
* Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.
* Данные запреты неподлежат обсуждению.
//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.
Подскажите как присвоить переменной несколько байт с серидины пакета, просто незнаю команды...
Вот допустим пакет 2A 01 12 34 56 78 99 нужно присвоить переменной 12 56 99 с этого пакета
Sieg, спасибо!, пытаюсь дешифровать свой сервак..
еще возникла небольшая проблемка, ругается на скобочку.
tmp:=pck[4]+pck[5] xor ($FFFF);
Подскажите как пользоваться функцией xor
Последний раз редактировалось Stasrus, 20.03.2009 в 22:36.
Stasrus, Он не на скобочку ругается, а на несовместимость типов. Я вот только не могу понять, какой ему тип надо поставить. String, integer, double, variant, даже boolean попробовал - эффект одинаковый.
Добавлено через 2 минуты ratvier, икх... моя бубен нету. Моя как танцевать шаманский танец низнает.
А если серъезно, то я даже примерно не представляю, что надо делать с такими словами как "хидер".
Добавлено через 1 минуту
Хм.. вот че подумал.. А в твоем этом "хидере" можно подключать .net ? =)
Последний раз редактировалось Sieg, 20.03.2009 в 23:14.
Причина: Добавлено сообщение
тип переменной разные ставил все равно ругается.
Еще такой вопроик как можно убить все пакеты кроме нетпинга сервер-клиент\клиент-сервер после получения 0x03 (EnterWorld)