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.
Хроники Камаель
Столкнулся с тем что команда в пакете RequestBypassToServer все время разная, и передается в предыдущем пакете от сервера NpcHtmlInfo. Вот сваял процедуру запоминающую содержимое и количество этих команд.
delphi Код:
const
name='';
var
kolvocmd,j,x:integer; //-kolvocmd- итоговое количество команд j,x- вспомогательные переменные
CmdNpc:array[1..50] ofstring; //массив с командами, 50 - взято с большим запасом// у телепортеров обычно примерно всего 20 команд
findt,oldpck:string; //вспомогательные переменные//---------------------procedure SendMsg(msg:string);
begin
buf:=#$4A;
WriteD(0);
WriteD(10);
WriteS('');
WriteS(msg);
SendToClientEx(Name);
end;
//---------------------procedure CmdNpcParc;
Begin
kolvocmd:=0;
for j:=1to50dobegin// предварительная очистка массива
CmdNpc[j]:='';
end;
for j:=1tolength(oldpck)dobegin// побуквенная проверка строки oldpckfor x:=0to9dobegin
findt:=findt+oldpck[j+x];
end;
if findt='bypass -h 'thenbeginfor x:=10to25dobegin
CmdNpc[kolvocmd+1]:=CmdNpc[kolvocmd+1]+oldpck[j+x];
end;
kolvocmd:=kolvocmd+1;
end;
findt:='';
end;
end;
//---------------------------------beginif fromserver and(pck[1]=#$19)thenbegin// в процедуру передается содержимое пакета NpcHtmlInfo
oldpck:=ReadS(6);
CmdNpcParc;
SendMsg('Количество- '+inttostr(kolvocmd));
for j:=1to kolvocmd dobegin
SendMsg(inttostr(j)+'ая- '+CmdNpc[j]);
end;
end;
end.
Не зная точно команд работы с частью строки сделал все через циклы, может как то подправить\сократить?
__________________ На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."
А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
Последний раз редактировалось Breadfan, 28.08.2008 в 16:28.
Как определяется игровое время, это время указанное на карте или показываемое командой /time ?
__________________ На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."
А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
Возник вопрос: делал ли кто нибуть скрипт, для ассистента-"сливателя" (слив дестров)? Принцип: команда в чат -> атака пишушего -> анализ остатка хп ->если меньше X то дважды кликнуть по самому себе (остановить атаку). Может кто выложит наработки?
__________________ На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."
А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
Возник вопрос: делал ли кто нибуть скрипт, для ассистента-"сливателя" (слив дестров)? Принцип: команда в чат -> атака пишушего -> анализ остатка хп ->если меньше X то дважды кликнуть по самому себе (остановить атаку). Может кто выложит наработки?
учитывая то что етот вопрос задан в етой теме ( а не в "ДАА БУДЕТ БОТ") отвечу так.. я имею порядка 30-40 хз их сколько скриптов разных для всех случаев жизни.. самые основные их них я выложил в тему "ДА БУДЕТ БОТ" далее чтоб набросать скрипт вроде твоего я просто беру создаю новый скрипт.. полностью чистый.. и вствляю в него процедуры которые мне пригодятся в новом скрипте.. типа конструктора.. для твоего скрипта нужно определить ИД всех участников (всех или тока одного, пох есть отдельные кусочки кода которые делают ето), запомнить координаты у всех (для етого тоже масса процедурок в готовых скриптах моих.. и не тока моих) , потом нужно туда добавить процедуру котороая за таргетом следит (тоже все готово) , потом нужно что выполнять команды при нажатии на кнопку и останавливать ее при нажатии на другую кнопку...
вапще написание скрипта как я понял блоковое занятие.. и что интересно каждый из наиболее применяющихся скриптов- для работы требует одних и тех же блоков..
сам принцип таков:
при запуске скрипта ниче не делать.. но растопырев уши скрипт слушает трафик и выбирает из него нужную информацию для дольнейшей работы.. как тока вся необходимая информация для работы скрипта собрана из трафика то можно начинать ее пользоваться с помощью процедур и таймеров..
в данной смысле я имею ввиду не полновесную процедуру- обработчик, а условие IF
с помощью IF в линяге мы можем отреагировать на событие в игре.. даже на такое которого не видно на екране (порой).. реакция от скрипта будет вполне адекватной.. за рамки правил- вылезти нельзя!.. некоторые моменты обойти можно.. например..
"у вас 10 окон расставлены как артилерия на поле.. хаотично или по порядку.. вы можете с етих окон сделать РЕДИРЕКТ ИНФЫ на основного чара об том где кто ково видет.. и на основном чаре ты станеш видеть всё поле! прикинь! и ето реально сделать! город на осаде окружить трупами- хотябы 3-4 чарами.. и редирект сделать!
и ты станеш виедеть за 3 километра всех кто там в замке- бегает... жесть"
вопщем твой скрипт собрать из готовых кусочков некуй делать
__________________
Цитата:
Сообщение от pybukon
прежде чета попросить я немнога раскажу чтоб вы понили как мне плоха
Цитата:
Сообщение от Byrger
А как сделать мой скрипт бесконечным?
Цитата:
Сообщение от XKOR
.. каждый день ионизированной ногой протирает больную)
Цитата:
Сообщение от PsyR
Вылоджите пожалуйста скрипт на рыбалку желательно что бы сам в ВХ клал адаптированый под шоки и так же скрипт на ТТ рец, тоже с диалогами
- была надежда что мб кто поделится пока я на работе чтож буду писать
А по поводу темы
Цитата:
Планируется сюда собрать всю разбросанную по разным топам инфу про полезных ботов и скрипты к ним.. и обсуждение перенести сюда чтоб по кусочкам с разных топов информацию не черпать.
- хз, на мой взгляд там выкладывать уже готовые\разрабатываемые скрипты, а не вопросы у кого и что имеется
__________________ На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."
А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
Последний раз редактировалось Breadfan, 08.09.2008 в 22:29.
"у вас 10 окон расставлены как артилерия на поле.. хаотично или по порядку.. вы можете с етих окон сделать РЕДИРЕКТ ИНФЫ на основного чара об том где кто ково видет.. и на основном чаре ты станеш видеть всё поле! прикинь! и ето реально сделать! город на осаде окружить трупами- хотябы 3-4 чарами.. и редирект сделать!
и ты станеш виедеть за 3 километра всех кто там в замке- бегает... жесть"
сам свою мысль продолжу.. таково еще я неделал но думаю ето несложно.. думаю хорошобы 4 трупа вокруг замка вплотную к стене уложить и сних инфу РЕДИРЕКТИТЬ на основного чара.. а еще думаю во время осады сделать РЕНЕЙМ НИКОВ ВАРОВ.. те налету на основном чаре переделывать ник (либо подпись) в что то типа ПРОФА,ШМОТ, и возможно состояние- типа УД.. удобно было бы.. видиш толпу мясо на осаде а в подписях у всех профа написана.. и буква означающая А или Б или Ы сет.. сразу видно кто папко а кто нет.. имхо удобно..
также думаю было бы неплохо какнибудь автоматизировать процес выделения в таргет варов.. ну не автоматически конечно но хотябы както.. лично у меня большая проблема во время осады с тем что в толпе мяса где вары со своими в перемешку- таргет взять врага.. думаю можно над бошкой стрелочку рисовать которая укажет направление откуда по тебе нанесли удар.. а также в дополнение к етому запрограмировать какоето социальное действие на то чтобы взять в таргет того кто по тебе нанес удар- последним.. если по тебе сразу 2-3 бьют то стрелочка над головой будет крутиться и показывать направление последнего удара.. и при желании нажав на социальное действия тот кто бил последним возьмется в таргет.. думаю ето удобно было бы.. также думаю что еще необходимо выделить както тех кто по тебе стреляет.. типа их НИК или подпись переделывать в что то типа "!!АХТУНГ!!" и плюс к етому состояние ПК вешать на него чтоб ник красным был , чтоб он в толпе не потерялся.. на него укажет и стрелочка и ник будет изменен и прижелании нажав кнопку- выделится в таргет
щаз ету мысль в топе "ДА БУДЕТ БОТ ОТПИШУ".. она там уместней..
__________________
Цитата:
Сообщение от pybukon
прежде чета попросить я немнога раскажу чтоб вы понили как мне плоха
Цитата:
Сообщение от Byrger
А как сделать мой скрипт бесконечным?
Цитата:
Сообщение от XKOR
.. каждый день ионизированной ногой протирает больную)
Цитата:
Сообщение от PsyR
Вылоджите пожалуйста скрипт на рыбалку желательно что бы сам в ВХ клал адаптированый под шоки и так же скрипт на ТТ рец, тоже с диалогами
Последний раз редактировалось VORON, 10.09.2008 в 01:09.
хочу сдлать скрипт, который будет заменять имя в пакете 0x32(UserInfo)
Собственно идея в том, чтобы заставить l2contlol видеть другой ник чара. Не уверен пока что что это вообще возможно...
Вот кусочек кода:
if(FromServer)and(pck[1]=#$32)and(CharName=ReadS($16)) then
begin
buf:=copy(pck,1,$16-1);
WriteS(NewName);
delete(pck,1,$16+l{типа длина ника в байтах}-1);
buf:=buf+pck;
pck:='';
SendToClient;
end;
Вообщем он вообще не выполняется, но и ошибок ни каких не выдает, не могу въехать почему...