Это моя первая тема, прошу строго не судить.
на нью прошел апдейт и старые пакеты не работаю, пошарил по темам и придумал, нашел какие пакеты на квесты робят и решил сделать всё по старинке, но с новыми пакетами. Ничего из этого не вышло, так как кучу пакетов теперь отослать нельзя (или просто у меня руки кривые). Пришлось отправлять по два пакета, иначе никак не получается...да бы упростить всю эту конитель решил сделать скрипт:
begin
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 21 00 00 00 00 00')) // Отчитаться (Думать)
then
begin
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00');
buf:=HStr('9D 00 57 5A FF 26 25 00 00 F1 03 01 00 12 27 FE 0C 00 00 00 00');
SendToServer;
pck:='';
end;
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 1C 00 00 00 00 00 ')) // Взять квест (Улыбка)
then
begin
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00');
buf:=HStr('9D 00 57 5A FF 26 25 00 00 EA 03 01 00 04 00 FE 0C 00 00 00 00');
SendToServer;
pck:='';
end;
end.
суть работы его в том, что при нажатие на эмоцию "Улыбка" берётся квест, а по нажатию "Думать" - сдаётся, но есть минусы: после того как нажали команду на квест нужно обязательно жать "Завершить диалог" и только потом на сдачу квеста, после которой приходится выбирать камень. Дело очень неприятное, но лучше я придумать не смог...я поднял 55 лвл за 15 минут, всё быстрее чем квесты бегать делать.
И самое главное! Обязательно нужно находится в лагере золотой ветви и взять таргет на Бакалейщика Гиабрунга
Mystmuse
19.02.2012, 08:36
Эм.. что-то не работает. Поправь пожалуйста. Пробовал без взятия квеста и с ним, подошел к нпц, взял в таргет, сделал скрипт, поставил галку и жму эмоции, но результата нет. Попытался проверить разово часть скрипта на взятие, но сразу кикает.
thedarknes
19.02.2012, 08:48
Да там очерёдность нужна, скрипт верен, работает на все 100%. Смотри :
1. Летим в лагерь Золотой ветви
2. Подходим к нужному НПС
3. Берём таргет
4. Жмём на эмоцию "Улыбка"
5. Появляется окошко, в нём жмём "завершит диалог"
6. Жмём эмоцию думать.
7. Появляется окно с выбором камней, в нём выбираем камень и жмём принять
8. повторяем пункты 1-7
З.Ы. для удобства я вынес эмоции на панель. Улыбка на 1, Думать на 2. (Скрипт писал для Элов. Сервер NewAion x75)
Добавлено через 5 минут
Только что проверил, всё как часики робит)
thedarknes, а на aion-spb что нибудь похожие можно сделать?
thedarknes
19.02.2012, 15:36
такое почти на всех серверах работать должно, главное нужные пакеты отловить, я не помню в какой теме, но где то это было очень подробно описано. на ньюшке пакеты сейчас такие : "9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00" какие на айон SPB я не вкурсе. я делал это всё так : очищал лог с пакетами, говорил с нпс, в итоге получалось 3 или 2 пакета "9D" просто в посылку отправлял и всё и так со всеми НПС, с которыми нужно по квесту поговорить, потом всю эту армаду кидаешь в посылку выставляешь таймер и всё. и ещё, нужно в начале всей этой байды пакет на отмену квеста вставить. Вот пример со старой ньюшки:
FE 57 BD C2 04 00 00 - пакет на отмену
B9 57 76 00 2E 00 71 00 72 00 65 00 73 00 20 00 31 00 32 00 31 00 38 00 00 00 - пакет на рестарт квеста (не всегда он нужен...на нью команда .qres id)
9C 57 5B FA 2F 00 00 1A 00 01 00 0A 00 C2 04 00 00 00 00 - (сам квест)
9C 57 5B FA 2F 00 00 EF 03 01 00 F3 03 C2 04 00 00 00 00
9C 57 5B FA 2F 00 00 EA 03 01 00 04 00 C2 04 00 00 00 00
9C 57 5B FC 2F 00 00 1A 00 01 00 0A 00 C2 04 00 00 00 00
9C 57 5B FC 2F 00 00 49 05 01 00 48 05 C2 04 00 00 00 00
9C 57 5B FC 2F 00 00 10 27 01 00 49 05 C2 04 00 00 00 00
9C 57 5B 14 30 00 00 1A 00 01 00 0A 00 C2 04 00 00 00 00
9C 57 5B 14 30 00 00 F1 03 01 00 47 09 C2 04 00 00 00 00
9C 57 5B 14 30 00 00 12 00 01 00 05 00 C2 04 00 00 00 00
если чего то непонятно, то можно залезть поглубже на форум и найти подробное описанье.
теперь возникает вопрос почему я сделал скрипт. на нью по ходу стоит антифлуд пакетов, ибо большую пачку нельзя отправить, а можно отправлять только 2 пакета. скрипт позволяет не сворачивая айон отправлять кусочки пакетов разными командами.
Добавлено через 2 минуты
я точно не уверен, но если речь идёт о нью х1 то должно работать, там обнова одна и та же вроде стоит.
Nooober
20.02.2012, 16:53
на айон SPB я не вкурсе
ну да проще некуда) главное поймать запросы на принятия и сдачу квеста)
а есть подобные квесты? а то этот квест берёт не бесконечно...
thedarknes
21.02.2012, 11:53
Не знаю, я искал квест, что б в 4 пакета управиться, мне до 55 хватило...если есть предложения то могу ещё что нибудь подумать
Blackallod
27.02.2012, 07:48
Поправь скрипт что то не то написано в эмоциях!
пробовал на Aionlegend
lordzver
27.02.2012, 13:11
буду признателен за скрипт для асмо )
zyxelen
04.03.2012, 09:28
А для X1 скрипт какой??
ZakenxD
06.03.2012, 07:56
А Можно сделать такойже только для английского клиента))) Буду признателен....
Djagernaut
10.03.2012, 17:47
Это моя первая тема, прошу строго не судить.
на нью прошел апдейт и старые пакеты не работаю, пошарил по темам и придумал, нашел какие пакеты на квесты робят и решил сделать всё по старинке, но с новыми пакетами. Ничего из этого не вышло, так как кучу пакетов теперь отослать нельзя (или просто у меня руки кривые). Пришлось отправлять по два пакета, иначе никак не получается...да бы упростить всю эту конитель решил сделать скрипт:
begin
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 21 00 00 00 00 00')) // Отчитаться (Думать)
then
begin
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00');
buf:=HStr('9D 00 57 5A FF 26 25 00 00 F1 03 01 00 12 27 FE 0C 00 00 00 00');
SendToServer;
pck:='';
end;
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 1C 00 00 00 00 00 ')) // Взять квест (Улыбка)
then
begin
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00');
buf:=HStr('9D 00 57 5A FF 26 25 00 00 EA 03 01 00 04 00 FE 0C 00 00 00 00');
SendToServer;
pck:='';
end;
end.
суть работы его в том, что при нажатие на эмоцию "Улыбка" берётся квест, а по нажатию "Думать" - сдаётся, но есть минусы: после того как нажали команду на квест нужно обязательно жать "Завершить диалог" и только потом на сдачу квеста, после которой приходится выбирать камень. Дело очень неприятное, но лучше я придумать не смог...я поднял 55 лвл за 15 минут, всё быстрее чем квесты бегать делать.
И самое главное! Обязательно нужно находится в лагере золотой ветви и взять таргет на Бакалейщика Гиабрунга
...Обязательно нужно находится в лагере золотой ветви и взять таргет на Бакалейщика Гиабрунга
я так понимаю этот НПС завершает квест (если по базе), а кто его даёт? И почему над ним серый (не синий) треугольник? При использовании скрипта --- выдаёт ошибку! В чём может быть беда?
(серв. Aion DarkSun)
Веселин
11.03.2012, 01:10
не работает.всё сделал.в л2пш впихнул скрипит,Выполнил его.полетел в лагерь золотой ветви,взял в таргет бакалейщика,нажал улыбку и...ничего.абсолютно ничего.какова причина может быть?
celsi
11.03.2012, 23:02
Спасибо Работает.
vita123
04.05.2012, 16:53
thedarknes, уважаемый нельзя ли данный скрипт заточить под Легенду?
А то что-то он на ней не работает, а самому разобраться не получается.
kentavr99
05.05.2012, 08:56
Тема ьаян пашет ток на хр или на 32 бита!
lightbearer
05.05.2012, 09:38
Тема ьаян пашет ток на хр или на 32 бита!
причём тут винда?
bruno_123
11.05.2012, 08:39
Сделай скрипт для newaion x2 за асмо плиз, буду очень признателен! =)
Kalmoran
13.07.2012, 10:39
не работает.всё сделал.в л2пш впихнул скрипит,Выполнил его.полетел в лагерь золотой ветви,взял в таргет бакалейщика,нажал улыбку и...ничего.абсолютно ничего.какова причина может быть?
Скажи сервер,может быть починили уже на нем=)
MrAlexys
13.07.2012, 11:51
Автор темы, пожалуйста сделай скрипт для асмов, и на х2 для асмов если можеш, поможеш мне с меня любые 2 пухи теграка за нях,если интересно в личку отпиши
ewe(Roman)
16.07.2012, 10:41
Напиши, пожалуйста для АСм. х75.
sasha1234567890
23.07.2012, 14:08
Зделайте скрипт на легенд!!
KAPRIZzNIK
23.07.2012, 21:59
На Асмов х2 бы такое... и желательно рабочее)
ARTi4
24.07.2012, 00:08
на няъ сделай такое только что б работало , а то этот не пашет
GreenSmoke
05.08.2012, 13:11
На нью х2. х75 по атакой, не робят сервера, Сделай плиз для асм для х1!
буду признателен!
RemoteAccess
06.08.2012, 17:28
Вот так, скрипт правилнее будет.
begin
//не обрабатываем пустые пакеты
if pck='' then exit;
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 21 00 00 00 00 00')) // Отчитаться (Думать)
then
begin
pck:=''; //запрещаем отправление пакета социального действия
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00'); //наполнили пакет данными
SendToServer; //послали пакет
Delay(200); //небольшая пауза (больше 500 не ставить!)
buf:=HStr('9D 00 57 5A FF 26 25 00 00 F1 03 01 00 12 27 FE 0C 00 00 00 00'); //наполнили пакет данными
SendToServer; //послали пакет
Delay(200); //небольшая пауза (больше 500 не ставить!)
end;
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 1C 00 00 00 00 00 ')) // Взять квест (Улыбка)
then
begin
pck:='';
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00');
SendToServer;
Delay(200);
buf:=HStr('9D 00 57 5A FF 26 25 00 00 EA 03 01 00 04 00 FE 0C 00 00 00 00');
SendToServer;
Delay(200);
end;
end.
Rustas
06.08.2012, 20:01
Вот так, скрипт правилнее будет.
begin
//не обрабатываем пустые пакеты
if pck='' then exit;
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 21 00 00 00 00 00')) // Отчитаться (Думать)
then
begin
pck:=''; //запрещаем отправление пакета социального действия
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00'); //наполнили пакет данными
SendToServer; //послали пакет
Delay(200); //небольшая пауза (больше 500 не ставить!)
buf:=HStr('9D 00 57 5A FF 26 25 00 00 F1 03 01 00 12 27 FE 0C 00 00 00 00'); //наполнили пакет данными
SendToServer; //послали пакет
Delay(200); //небольшая пауза (больше 500 не ставить!)
end;
If FromClient and (pck=Hstr('C2 00 57 61 FF 15 1C 00 00 00 00 00 ')) // Взять квест (Улыбка)
then
begin
pck:='';
buf:=HStr('9D 00 57 5A FF 26 25 00 00 1A 00 01 00 0A 00 FE 0C 00 00 00 00');
SendToServer;
Delay(200);
buf:=HStr('9D 00 57 5A FF 26 25 00 00 EA 03 01 00 04 00 FE 0C 00 00 00 00');
SendToServer;
Delay(200);
end;
end.
Это для элов серв х75? поправь меня
RemoteAccess
06.08.2012, 22:56
Это для элов серв х75? поправь меня
Это поправленный скрипт топикстартера.
Присвоение два раза подряд переменной 'BUF' какого-либо значения без SendToServer не дает эффекта.
А для какого сервера - без понятия.