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.
Кто-нибудь подскажите, немогу обойти защиту сервера. Примерно после 30-60 минут после зупуска пх происходит автобан, независемо от того сколько ты находился в игре, хоть 20 минут, хоть 2 минуты. Странно что сразу не выдает бан. Думал сначало что палился в чем-то, но потом решил проверить, просто заходил гг и ничево не делал с включеным пх, все ровно бан через определенный промежуток времени!
Может кто подскажет мне пожалуйста, а то уже 7 аков забанили((((
так кто знал, что надо с точкой переименовывать я без точки переименовывал - ругалось: L2ololo.exe
теперь другой вопрос. при открытии инвентаря приходит довольно большой пакет с повторяющимися блоками. подскажите где взять процедуру обработки этих повторяющихся блоков для поиска ид обьекта по ид предмета по базе.
с заточкой там было все просто - инвентори апдейт присылал всего 2 повторяющихся блока - адена, и эта шмотка. бывало что наоборот сперва шмотка, потом адена - и я сделал два сравнения для обоих случаев. в случае же с перебором инвентаря - то там вариаций будет милион и мой способ не подойдет.
тоже самое касается и чтения бафоф у сопати. там тоже повторяющиеся блоки и их тоже надо перебрать. буду очень признателен за пример подобной процедуры перебора повторяющихся блоков
все. кажись придумал. обьясню на примере перебора бафоф - там блоки повторяются через 10 позиций. следовательно надо поставить все в рипит, прибавлять по 10 и проверять соответвует тому, чего мы ищем. но теперь другая проблема - как остановить рипит? я немогу поставить проверку типа:
если значения не существует, то конец проверки
until bufid = ''; или until bufid = '0'; непомогает.
какой синтаксис если мне надо проверить равно ли чему либо мой bufid?
и с этим вроди разобрался. теперь почемуто не проверяет последний баф. я для проверки сделал вв. и ложу 4 бафа - когда вв любой, но не последний четвертый - срабатывает. когда вв лежит последним - тогда не работает:
Код:
if FromServer and (pck[1]=#$EE) //перебор бафоф
then begin
baf1:=14;
baf2:=15;
baf3:=16;
baf4:=17;
idbafa:=pck[baf1]+pck[baf2]+pck[baf3]+pck[baf4];
repeat
if (idbafa=HStr('B4 04 00 00')) //вв для проверки
then begin
idtela:=pck[6]+pck[7]+pck[8]+pck[9];
buf:=#$4A;
WriteD(0);
WriteD(10);
WriteS('');
WriteS('сработало');
SendToClient;
end;
baf1:= baf1 + 10;
baf2:= baf2 + 10;
baf3:= baf3 + 10;
baf4:= baf4 + 10;
idbafa:=pck[baf1]+pck[baf2]+pck[baf3]+pck[baf4];
until idbafa < '0';
end;
Последний раз редактировалось SeregaZ, 08.01.2010 в 12:41.
Клиент - Interlude
Софтина - l2phx 3.5.33.164
Опер. система - Windows XP
Проблема: запускаю phx, l2 -> тут 2 варианта:
1) включен LSP перехват - при попытке ввода логина\пароля выскакивает окошко с надписью "Invalid_socket"
2) выключен LSP перехват - в игру заходит, но не происходит коннект phx к серверу
Друг играет на серве, юзает пакетхак - никаких проблем не было; клиенты качали одинаковые.
Подскажите плз что я делаю не так или где искать решение проблемы.
пускай он запакует свой ph прям с настройками и пришлет тебе.
alexteam
очень красиво, очень понравилось, и не понятно решил всетаки делать сам - когда сам делаешь код родной и очень понятный. у тебя спер идею читать количество бафоф или слотов и уже отсюда строить рипит с повторением чтения блоков.
и возник сразу вопрос - с бафами count := readd(10); все замечательно работает.
и также аналогично решил сделать с инвентарем - countitem := readd(8); чтоли там было... не помню какой по счету номер с количеством занятых слотов. так вот - все вроди бы тоже самое - но вместо 28 предметов в инвентаре он считывает тыщь 10 и соответсвенно все висит из-за этого.
и также остался вопрос как проверять на "существует ли значение" для обоих случаев цифрового или строчного значений.
Последний раз редактировалось SeregaZ, 09.01.2010 в 07:14.
и также остался вопрос как проверять на "существует ли значение" для обоих случаев цифрового или строчного значений.
Скриптовый движек к сожалению довольно ограничен.. нельзя использовать классы, приходиться извращаться..
попытайся понять что делает этот код
delphi Код:
procedure Init; //will be called on script initializationvar
list : tstringlist;
begin
list := tstringlist.create;
list.add(inttostr(123));
list.add(inttostr(321));
list.add('такая строчка есть');
sendMSG(inttostr(list.indexof(inttostr(123))));
sendMSG(inttostr(list.indexof(inttostr(321))));
sendMSG(inttostr(list.indexof(inttostr(222))));
sendMSG(inttostr(list.indexof(inttostr(222))));
sendMSG(inttostr(list.indexof('такая строчка есть')));
sendMSG(inttostr(list.indexof('а такой строчки в стринглисте нет')));
list.free;
end;
Добавлено через 4 минуты
ps/ в пх давненько появилась вот функция помогающая в составлении чтения пакета с помошью ридмаск Оффтоп
__________________
L2Ext - project closed.
Последний раз редактировалось alexteam, 09.01.2010 в 13:15.
Причина: Добавлено сообщение
В новом пх (3.5.33.164 на момент написания) появились 2 новые строчки:
Можете подсказать на практике где их стоит использовать и для чего они вообще нужны?
Последний раз редактировалось Excellence, 10.01.2010 в 05:58.
Никак не могу разобраться, почему не работает ConnectNameByID.
Скрипт на этой странице делал для l2phx.3.4.1.83 и более старых версий.
Но новый пакетхак тупо вбивает в комбобокс пустые строки, вместо имён законнектеных чаров.