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

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

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 08.05.2011, 21:15   #1
Новичок
 
Регистрация: 08.05.2011
Сообщений: 3
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
Zoomer88 пока неопределено
По умолчанию нужна консультация:)

игра Aion
скрипт на атаку сумоном по мобу..сумон поидее бьет по массе в 15м 10кк урона

begin
if(fromclient)and(pck[1]=#$29)then
begin
buf:=hstr('23 57 C0 EB D6 12 00 70 07');
writeD(readD(8));
buf:=buf+hstr('00 AB AA 2A 3F');
sendtoserver;
end;
end.

скрипт работал безотказно НО почему то перестал

я практически полный нуб в скриптинге можите подсказать что и где в l2ph посматреть может чтото изменилось на серве ?)они мб как то подстроились к пакету ?)
или скиньте ссылку на подобную тему такого скрипта
Сервер без защиты вообще...

Добавлено через 10 часов 17 минут
что никто не может помочь?

Последний раз редактировалось Zoomer88, 08.05.2011 в 21:15. Причина: Добавлено сообщение
Zoomer88 вне форума   Ответить с цитированием
Старый 10.05.2011, 11:51   #2
Новичок
 
Регистрация: 08.05.2011
Сообщений: 3
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
Zoomer88 пока неопределено
По умолчанию

более менее разобрался в скрипте

только не пойму одну строчку buf:=buf+hstr('00 AB AA 2A 3F');
что за код 00 AB AA 2A 3F откуда он взят можите ктото подсказать ?
Zoomer88 вне форума   Ответить с цитированием
Старый 10.05.2011, 12:04   #3
Местный
 
Аватар для goodvin1709
 
Регистрация: 13.02.2011
Сообщений: 506
Сказал Спасибо: 121
Имеет 100 спасибок в 83 сообщенях
goodvin1709 пока неопределено
По умолчанию

ето пакет взять мона з помощю ПХ ето какоето действие...
там где все пакеты кликни на пакет и там будет разные символы типо твоего 00 AB AA 2A 3F в игре зделай какоето действие и глянь в ПХ...
__________________
---------------------------__--------__-----
---____- ___--____--- ___/'- /__ ___-(__)-____
--/-___-/-__-\/-__--\ /-__--'/--|-/--//---//--__--\
-/-/_/ -/-/_/--/-/_/--/-/_/--/|--|/--'//---//--/-/--/
-\___-/\____/\____/\____/-|____//__'//_'/-/__/
/_-__/
goodvin1709 вне форума   Ответить с цитированием
Старый 10.05.2011, 13:01   #4
Новичок
 
Регистрация: 08.05.2011
Сообщений: 3
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
Zoomer88 пока неопределено
По умолчанию

ет я как бы в курсе спасибо
просто может кто то конкретно знает откуда этот код...
просто логов оч много (
Zoomer88 вне форума   Ответить с цитированием
Старый 10.05.2011, 13:03   #5
Местный
 
Аватар для supernewbie
 
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
supernewbie пока неопределено
По умолчанию

__________________
Начало.
supernewbie вне форума   Ответить с цитированием
Старый 10.05.2011, 13:14   #6
Местный
 
Аватар для goodvin1709
 
Регистрация: 13.02.2011
Сообщений: 506
Сказал Спасибо: 121
Имеет 100 спасибок в 83 сообщенях
goodvin1709 пока неопределено
По умолчанию

От серва к клиенту
----------------------------------
Tип: 0x00 (KeyInit)
Pазмер: 5+2
Время прихода: 11:12:19:171
0002 c 01: 171 (0xAB)
----------------------------------
от клиента к серву
----------------------------------
Tип: 0x00 (ProtocolVersion)
Pазмер: 5+2
Время прихода: 11:12:55:984
0002 d ProtocolVersion: 1059760811 (0x3F2AAAAB)
---------------------------------------------------
__________________
---------------------------__--------__-----
---____- ___--____--- ___/'- /__ ___-(__)-____
--/-___-/-__-\/-__--\ /-__--'/--|-/--//---//--__--\
-/-/_/ -/-/_/--/-/_/--/-/_/--/|--|/--'//---//--/-/--/
-\___-/\____/\____/\____/-|____//__'//_'/-/__/
/_-__/
goodvin1709 вне форума   Ответить с цитированием
Старый 20.05.2011, 19:22   #7
Новичок
 
Регистрация: 16.02.2010
Сообщений: 20
Сказал Спасибо: 5
Имеет 0 спасибок в 0 сообщенях
0rfin пока неопределено
По умолчанию вопрос по синтаксису

Тема по айону, но напишу по Lineage
Пишу скрипт что бы при нажатии на социал акшион посылал на сервер измененный валидейтпозишн, который постоянно по умолчанию отправляется клиентом при передвижении чара, передает кординаты чара. Дак вот я изменяю Z и отправляю. Но чет не работает. Почему?
В списке перехваченных пакетов не появляется измененный, получается он не отправляется вообще что ли.

59 09 43 02 00 69 1C FF FF 08 F2 0F 00 0C 88 00 00 00 00 00 00
Tèï: 0x59 (ValidatePosition)
Pàçìåð: 21+2
Âðåìÿ ïðèõîäà: 20:04:08:240
0002 d X: 148233 (0x00024309)
0006 d Y: -58263 (0xFFFF1C69)
000A d Z: 1045000 (0x000FF208)
000E d Heading: 34828 (0x0000880C)
0012 d Data: 0 (0x00000000)

dephi Код:
//основная часть скрипта //вызывается при приходе каждого пакета если скрипт включен var x,y,z:integer; begin                   if fromclient and (pck[1]=#$59) then         begin         buf:=pck;         end;                   if fromclient and (pck[1]=#$56) and (pck[2]=#$0D) then //0D social action victory          begin           z:=ReadD(10);           z:=z+1000;           WriteD(z,10);           SendToServer;          end;           end.

Последний раз редактировалось 0rfin, 20.05.2011 в 19:57.
0rfin вне форума   Ответить с цитированием
Старый 20.05.2011, 21:39   #8
Местный
 
Аватар для Breadfan
 
Регистрация: 29.04.2008
Сообщений: 830
Сказал Спасибо: 80
Имеет 230 спасибок в 169 сообщенях
Breadfan пока неопределено
По умолчанию

Z считываетса неверно абсолютно. Команда ReadD читает из pck, но на момент считывания - в том pck не валидейт позишн, а социал экшен. Пробуй в первом блоке сразу формировать итоговый пакет, наподобие
delphi Код:
if fromclient and (pck[1]=#$59) then         begin         x:=readd(2);y:=readd(6);z:=readd(10)+1000;hd:=readd(14);dt:=readd(18);         buf:=#$59;writed(x);writed(y);writed(z);writed(hd);writed(dt);         sendmsg('newpck: '+strtohex(buf));//-- контроль         end;
__________________
На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."

А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?

Последний раз редактировалось Breadfan, 20.05.2011 в 21:47.
Breadfan вне форума   Ответить с цитированием
За это сообщение Breadfan нажился спасибкой от:
Старый 20.05.2011, 22:16   #9
Новичок
 
Регистрация: 16.02.2010
Сообщений: 20
Сказал Спасибо: 5
Имеет 0 спасибок в 0 сообщенях
0rfin пока неопределено
По умолчанию

Я думал readd читает из buf т.к writed пишет в buf.

Так пашет
delphi Код:
begin     if fromclient and (pck[1]=#$59) then          begin         x:=readd(2);y:=readd(6);z:=readd(10)+1000;hd:=readd(14);dt:=readd(18);                 sendmsg('newpck: '+strtohex(buf));//-- контроль         end;                      if fromclient and (pck[1]=#$56) and (pck[2]=#$0D) then //0D pobeda social          begin                      buf:=#$59;writed(x);writed(y);writed(z);writed(hd);writed(dt);            pck:='';           SendToServer;          end; end.

А почему то вот так нет?

delphi Код:
begin        if fromclient and (pck[1]=#$59) then         begin         buf:=pck;         z:=ReadD(10)+1000;         end;                     if fromclient and (pck[1]=#$56) and (pck[2]=#$0D) then //0D pobeda social          begin           WriteD(z,10);           SendToServer;          end;   end.
0rfin вне форума   Ответить с цитированием
Ответ

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



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

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


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

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

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