Суть скрипта в том что бы юзать пакеты черерз клиаент айона... пакет активируеться эмоцией "улыбка".... все необходимые пакеты для отправки закидываем в обычный текстовый файл...
var
temp: tstringlist;
i:integer;
procedure Init; //Вызывается при включении скрипта
begin
temp := tstringlist.create;
temp.LoadFromFile('D:\1.txt');
end;
procedure Free; //Вызывается при выключении скрипта
begin
temp.free;
end;
//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
if pck='' then exit;
if FromClient and (pck=#$CA#$55#$69#$15#$1C#$00#$00#$00#$00#$00) then begin
for i:=0 to temp.count-1 do begin
buf:=hstr(temp[i]);
SendToServer;
end;
pck:='';
end;
end.
Обратите внимание на путь где должен лежать файл (путь и имя файла можно менять)...
Пакет на быстрый бег
A9 55 46 C9 2C 01 00 C9 5E 00 00 07 00 00 00
ставите 2 секунды повтарение в посылке и побежали со скоростью 12 )))
Пакет на самовскрешение
68 55 07 03
SKIvik
06.01.2011, 18:06
За пакеты пасибо а вот полнее можешь объяснить что за скрип и куда его, я не понял как его в программу то засунуть(
darkmaks
06.01.2011, 18:23
За пакеты пасибо а вот полнее можешь объяснить что за скрип и куда его, я не понял как его в программу то засунуть(
Ну в программе есть пункт Автоматизация, там есть скрипты.. создаёш новый скрипт, заменяеш его тект на этот... и всё вот тебе щастье... юзаеш пакеты из игра как скил... НЕ ЗАБЫВАЕМ ставить галочку возле имени скрипта каждый раз когда запускаем прогу)))
ku6ep
06.01.2011, 18:38
как только нажимаешь на улыбку скилы юзаются и сразу соединение с сервером прервано вылазит.
Zits
06.01.2011, 21:17
спасибо! пашет! Скажи пожалуста как поменять на другое действие(эмоцию)?
Можно ли сделать на другое действие пакет с воскрешением или антитаргетом? =)
darkmaks
06.01.2011, 21:20
как только нажимаешь на улыбку скилы юзаются и сразу соединение с сервером прервано вылазит.
Незнаю.. юзаеться беспроблем... может какие то левые пакеты там у тебя... или сервак на котором играеш не катит... пофиксенно.... или же у тебя клиент 2.1 ....
На 2.0.0.3 робит прекрасно... 2.1 там совсем другие пакеты...
Добавлено через 5 минут
спасибо! пашет! Скажи пожалуста как поменять на другое действие(эмоцию)?
Можно ли сделать на другое действие пакет с воскрешением или антитаргетом? =)
if FromClient and (pck=#$CA#$55#$69#$15#$1C#$00#$00#$00#$00#$00) then begin
в этой строчке пакет эмоции ... при появлении этого пакета срабатывает скрипт .. лови любой другой пакет и ставь вместо этого...
Zits
06.01.2011, 21:31
на 2.1.0.3 работает тоже
Очень полезный скрипт! :hd:
D1ss1DenT
07.01.2011, 12:56
чтот я не вьеду подскажи указал путь к пакетам C:\1.txt нажал ран выполнить скрипт в игре жму улыбку но не происходит ничего ..
ku6ep
07.01.2011, 13:14
версия 2.1, пакеты на скилы отлавливал те, пакет на эмоцию тоже отлавливал = сходится ... наверно фикс
Doobroo
07.01.2011, 13:46
все сделал у мя ошибку выдет =(
darkmaks
07.01.2011, 20:05
чтот я не вьеду подскажи указал путь к пакетам C:\1.txt нажал ран выполнить скрипт в игре жму улыбку но не происходит ничего ..
Ну смотри, раз ты такой путь прописал у тебя соответсвенно на диске С должен лежать этот файл с пакетами, и в окне скриптов справа надо поставить галочку - тогда скрипт запуститься
Добавлено через 2 минуты
версия 2.1, пакеты на скилы отлавливал те, пакет на эмоцию тоже отлавливал = сходится ... наверно фикс
ну незнаю... всё может быть... просто человек на 2.1 пробовал сказал что пакеты совсем другие и с этими пакетами вываливается игра... у него вообще пакеты со скилами были не В4 а В5 ... может у него кривой клиент
BioDread
08.01.2011, 16:28
Простенький скрипт можно было бы его и поменьче написать и чтобы без всяких текстовых документов=) Но всё равно спасибо.
Так вот Если ты шаришь писать скрипты напиши плиз скрипт который будет в заданном пакете менять 4й байт на +1 и отправлять через определённый интервал..
К примеру 07>08>09>0a>0b и так до определённого числа которое тоже будет устанавливаться. Сможешь?
П.С. А почему бы этот скрипт не упростить типо
IF fromserver pck xxxxxx
SendToServer;
Buf := HStr('xxxx')
Buf := HStr('xxxx')
и тд. НУ или както так вобщем чтобы без всяких текстовых документов и прочего лишнего добра :)
macter
10.01.2011, 19:29
спасибо за скрипт очень полезная вещичка, если доработать и написать еще пару процедур то можно по "улыбке" например ресатьса а по другим эмоциям выполнять что-то другое.
JusticFly
11.01.2011, 18:21
У меня вместо самовоскрешения, он бегает и мигает о_О
BOEBODA
12.01.2011, 20:02
Спасибо , все действует , но есть минус.
Никак не могу поймать пакет с эмоциями( может кодированы , я хз , не спец) , но улыбка из первой темы подходит , не мог бы ктонить выкинуть несколько пакетов с эмоциями которые можно использовать под скрипты
manyunya
13.01.2011, 10:49
день добрый всем
у меня запарка со скриптом замены одного пакета на другой
приведенный ниже простейший скрипт меняет пакет эмоцыи на пакет бега со скоростью 12.
begin
if FromClient and (pck=HStr('C9 57 66 15 04 00 00 00 00 00')) then begin
buf:=HStr('AC 57 4B C9 2C 01 00 CA 48 00 00 07 00 00 00');
SendToServer;
pck:='';
end;
end.
запарка вот в чем:
если просто посылать пакет то работает все идеально скорость бега становиться 12 и бегать можно довольно таки долго.
если через эмоцию (скрипт замены), то вроде работает (в клиенте скорость меняется на12) но при движении моментально врзвращается к исходной.
В чем может быть проблема?
p.s. с исходным сриптом автора эффект тот же.
решение: заменил пакет эмоции на простой смайл в чате и все заработало идеально.
но всеже почему с эмоцией такой эффект? Проверил в логе отсылает один и тотже пакет(правильный), но эффект почемуто разный.
может у кого нить есть мысли почему так?
venom5506
16.01.2011, 16:35
скрипт сделал, галочку поставил,нажимаю сверху на кнопку "запустить скрипт", а он не запускается...в чем проблема??
ultrazzz
18.01.2011, 13:41
Непонял со скриптом напишите пожалуйста подробней што,куда, и как !
Добавлено через 47 минут
При попытке юза на Легенде быстрого бега в игре пишет Action 7 О_о ?
Tr0y
21.01.2011, 07:06
1. Автор нуб в скриптах пх
2. Список б4 пакетов скилов не для каждого сервера
3. Даже не объяснил остальным нубам для чего сие скрипт делает, а делает он простое действие, при нажатиии в игре соц действия "улыбка", пх лезет в файл D:\1.txt
и считывает там строки пакетов бафов (длиииный список). Причем это все он делает без задержки и т.п. "беспалевных" приемов, т.о. в логах сервера, а также в "чатах - радарах" клиентов гмов эта шняга светится как новогодняя елка, манящая быстрее тебя забанить.
Согласитесь, юзать ВСЕ скилы за 1 секунду это нужно быть таким "умным" + написн скрипт на уровне 1 класса, с подгрузкой лишнего хлама без проверки и всякой фигни.
кароч никаких спасибок в инете на оф сацйте пх этого "добра" навалом, "бери-нихачу".
Какой смысл по 100 раз копипастить одно и тоже, не разбираясь даже в элементарном, подставляя вот такими скриптами нубочитеров
manyunya
21.01.2011, 22:35
откудаж ты такой агресивный умник взялся?
взвлбы и написал какой нибудь полезный скрипт и выложил его, а мы бы оценили на сколько ты крут, а так одни понты и набивание постов
matze
30.01.2011, 11:51
есть у кого пакет пакет на скорость для 2.1 ?
фывраль
11.02.2011, 14:52
Добрый день, хотел бы попросить, если кому не сложно, сделать такой скрипт, на подобии этого... Чтоб при нажатии на эмоцию, у меня мгновенно активировались физ скилы ( которые я сам вставлю ), как в теме юзаем физ скил за 1 сек, чтоб это было непрерывно, пока я не нажму на другую эмоцию, которая это отключит...буду признателен...
vex2865
14.02.2011, 18:28
не судите строго, это моя первая тема))
решил выложить скриптик для lphx для закла, может кому-нить пригодится.
при помощи эмоции можно использовать скиллы.
procedure Init; //Вызывается при включении скрипта
begin
end;
procedure Free; //Вызывается при выключении скрипта
begin
end;
begin
if FromClient and (pck=HStr('C9 57 66 15 1C 00 00 00 00 00'))//эмоция улыбка
then
begin
buf:=HStr('CF 57 6C 08 07 01 00 00 00 00 00 00 00 79 D0 00 00');//Стальной защитный Барьер
SendToServer;
pck:='';
buf:=HStr('CF 57 6C 6E 05 02 00 00 00 00 00 00 00 F9 2F 00 00');//Клятва сопротивления
SendToServer;
pck:='';
end;
begin
if FromClient and (pck=HStr('C9 57 66 15 01 00 00 00 00 00'))//эмоция смех
then
begin
buf:=HStr('CF 57 6C F4 06 01 00 C0 E6 01 00 4B 07 79 2B 00 00');//сжечь чары
P.S. если подредактировать, то с помощью нажатия на эмоцию можно будет заюзать все скиллы например гладу
фывраль
16.02.2011, 13:43
vex2865, вот в скрипте, я так понял пакет эмоции, и ты их заменяешь..но у меня пакеты эмоций не ловит...можешь написать пакеты на эмоции, сколько сможешь :) буду очень признателен...
leonardo1963
16.02.2011, 17:23
Саморес на 2,1
6b 57 08 01 работает почти везде где нет штрафа на смерть=)
PYCCKIY
16.02.2011, 21:05
Ну в программе есть пункт Автоматизация, там есть скрипты.. создаёш новый скрипт, заменяеш его тект на этот... и всё вот тебе щастье... юзаеш пакеты из игра как скил... НЕ ЗАБЫВАЕМ ставить галочку возле имени скрипта каждый раз когда запускаем прогу)))
что такое тект и куда его вставлять в название файла или куда обьянсите тупому куда и как вставлять скрипты:sad:
Retter
17.03.2011, 04:29
не судите строго, это моя первая тема))
решил выложить скриптик для lphx для закла, может кому-нить пригодится.
при помощи эмоции можно использовать скиллы.
procedure Init; //Вызывается при включении скрипта
begin
end;
procedure Free; //Вызывается при выключении скрипта
begin
end;
begin
if FromClient and (pck=HStr('C9 57 66 15 1C 00 00 00 00 00'))//эмоция улыбка
then
begin
buf:=HStr('CF 57 6C 08 07 01 00 00 00 00 00 00 00 79 D0 00 00');//Стальной защитный Барьер
SendToServer;
pck:='';
buf:=HStr('CF 57 6C 6E 05 02 00 00 00 00 00 00 00 F9 2F 00 00');//Клятва сопротивления
SendToServer;
pck:='';
end;
begin
if FromClient and (pck=HStr('C9 57 66 15 01 00 00 00 00 00'))//эмоция смех
then
begin
buf:=HStr('CF 57 6C F4 06 01 00 C0 E6 01 00 4B 07 79 2B 00 00');//сжечь чары
P.S. если подредактировать, то с помощью нажатия на эмоцию можно будет заюзать все скиллы например гладу
В общем большое спасибо,хоть на примере этого скрипта я понял что куда и зачем(примерно),но не понял одного.Зачем этот скрипт нужен? Ведь по сути все это можно произвести в макросе и при этом не использовать стороннюю программу! Кстати на клиенте 2.1 работает.Впервые моя попытка увидеть что то ясное увенчалась успехом.Спасибо!
YaregGlad
22.03.2011, 13:44
Народ я ведь правельно делаю ?
Автоматизация - Скрипты/Скриптинг
Новый скрипт
стираю все что в новом вставляю тот который качаю..
Сохранил поставил голочку там где "Сохранить порядок"
потом запускаю Айон завожу перса .. ухожу подальше от народа дабы непалится ..
запускаю скрипту захожу на айон у меня "соездинение с сервером завершено"
мне кажется это либо полное несовпадение пакетов и при этом админ видет елочку ...
либо это фикс ...
если я все делаю правельно хотя думаю что правельно :)
у меня еще 1 вопросик дабы не создавать зря сообщений спрошу тут же ..
может и не потеме но немогу понять в чем дело ..
как мне говорили так и делаю беру кв на монеты ..
набиваю айтемы подхожу к нпс , тыкаю на него появляется Принять/Отменить кв ..
в это время когда высветилось окно я споймал пакет клиента и кинул на отправку
принимаю кв .. получаю награду затем отправляю пакет и в игре у меня нпс выкидываеш окошко с ошибкой ..
и как не пробую не1 кв не работает с таким вот перехватом ...
зато пакет на эфир работает как бешеный .....
slavikks
09.04.2011, 00:36
Чет я не понял все равно... Создал 1.txt(внутри скиллы лукаря что ты выложил) в скриптах все заменил на твоё и путь указал к моему файлу 1.txt.l2phx включил,в игру зашел,пакеты все отслеживаются,голочку скрипта поставил. Ставлю моба в таргет и жму на улыбку и ниче не происходит,что я не так зделал?