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.
Помогите пожалуйсто мне) Я так понимаю, читать из пакета можно командой Read(D), но вот скажем как можно выловить по ИДу вещи из инвенторя, ИД объекта? И как потом вставить этот ИД в WriteD...
ЗЫ я уже перерыл полфорума( мб я тупой но не нашел ничего, разжуйте мне пож)
перебор инвентаря обсуждался. где-то тут примеры от alexteam были
я пока плюнул на этот перебор. мне нужен был id свитка пробуждения - пока каждый раз запуская скрипт - тыкаю вручную свиток и он запоминает его айди и дальше уже сам будит на пвп воротах сопати от слипа:
PHP код:
if FromServer and (pck[1]=#$27) and (idsvitka = '0') //чтение id свитка
then begin
iditema:=pck[12]+pck[13]+pck[14]+pck[15];
if (iditema=HStr('95 17 00 00')) //свиток пробуждения
then begin
idsvitka:=pck[8]+pck[9]+pck[10]+pck[11];
buf:=#$4A;
WriteD(0);
WriteD(10);
WriteS('');
WriteS('айди свитка определен: ' + idsvitka);
SendToClient;
end;
end;
Кто может помоч как разобраца в l2phx.3.5.33.164.Во всех придыдуших версиях все понял а в этой не фурычупомагите.Все по Дитально обьяснить или в картинках или в видео ваше не че не понял если че неправильно сори
перебор инвентаря обсуждался. где-то тут примеры от alexteam были
я пока плюнул на этот перебор. мне нужен был id свитка пробуждения - пока каждый раз запуская скрипт - тыкаю вручную свиток и он запоминает его айди и дальше уже сам будит на пвп воротах сопати от слипа:
PHP код:
if FromServer and (pck[1]=#$27) and (idsvitka = '0') //чтение id свитка then begin iditema:=pck[12]+pck[13]+pck[14]+pck[15]; if (iditema=HStr('95 17 00 00')) //свиток пробуждения then begin idsvitka:=pck[8]+pck[9]+pck[10]+pck[11]; buf:=#$4A; WriteD(0); WriteD(10); WriteS(''); WriteS('айди свитка определен: ' + idsvitka); SendToClient; end; end;
95 17 00 00 это айди свитка по базе
13 08 76 40 это айди предмета в игре
реад конечно круче, чем всякие мазохизмы с pck[8]+pck[9]+pck[10]+pck[11] - зато сам делал и мне все понятно
что-то я не понял что он делает, мне надо чтобы он читал из инвенторя по ИДу итема ид объекта. И потом вставить этот ИД в другой пакет. И что за пакет 27? Я просто вообще ничего не знаю
Добавлено через 4 минуты
Блин, а теперь и вовсе ругается(
PHP код:
const Name='10'; var timer:TTimer; procedure Init; begin timer:=TTimer.Create(nil); timer.interval:=2000; timer.OnTimer:=@fireTimer; timer.enabled:=true; end; procedure Free; begin timer.free; end; procedure fireTimer(Sender: TObject); begin
end; begin if FromServer and (pck[1]=#$14) and (idsvitka = '0') //чтение id свитка <<<< Вот на эту строку then begin iditema:=pck[12]+pck[13]+pck[14]+pck[15]; if (iditema=HStr('B6 05 00 00')) //свиток пробуждения then begin idsvitka:=pck[8]+pck[9]+pck[10]+pck[11]; buf:=#$17; WriteD(idsvitka); WriteD(1); WriteD(115176); WriteD(-178666); WriteD(-937); SendToServer;
end; timer.enabled:=false;
end;
end.
Что не так тут?(
Добавлено через 1 час 38 минут
Вообщем мне надо сделать чтобы у меня сканировался инвентарь, и выбрасывался предмет с 1 идом.
Последний раз редактировалось supernewbie, 21.01.2010 в 17:36.
Причина: Добавлено сообщение
как я сделал (точней еще не доделал) - сперва читаем количество предметов - отмечено синим - 16 штук.
потом прогоняем через цикл 16 раз, с выделением в нем ID предмета по базе и сравниваем со своим, который ищем.
это в примере сережка ТТ. к примеру если мы её ищем, то её ID в игре будут предидущие 4 позиции. выделил зеленым.
кароче не ленись. ищи пример от alexteam там про перебор инвентаря.
Последний раз редактировалось SeregaZ, 21.01.2010 в 22:37.
сразу извените за тупой вопрос, но очень нужен скрипт\пакет для телепортации в любой город ... если таков существует ПРоблема в том что я застрял в текстурах на континенте грации сое не пашет, релог непомогает, гм"ам по**й на все а мне перса нада вытащить. Получаеться что летаю (трансформ в сову) под текстурами локаций и немогу "вылететь" наверх. Пробовал прописивать /target и имя гм-шопа\мульта\бафера\тп но ничего не получаеться.
supernewbie
то был еще маленький скрипт в твоем случае он будет гораааааздо больше
Добавлено через 9 минут
вот. нашел за тебя... лентяй... http://coderx.ru/showthread.php?t=25&page=125
начиная с поста #1248 и дальше вниз ищи посты alexteam. как там что работает я незнаю, я буду делать по своему, так что мучай его теперь по этим вопросам
Последний раз редактировалось SeregaZ, 22.01.2010 в 11:36.
Причина: Добавлено сообщение