Давненько собирался забацать скрипт на сдачу квестов под 2.7/3.0.
Да такой, чтоб сразу с таймером, и его было легко редактировать под разные квесты.:pirate:
И вот, что собственно получилось:
//Script by Usilok
var
MyPck:array[1..10] of string; //выделяем память под пакеты квеста (опционально 10 строк)
name:string; //имя соединения (аккаунта)
Timer:TTimer;
i,CountPck:integer; //счетчик пакетов и их количество
procedure Init;
begin
Timer:=TTimer.Create(nil);
Timer.OnTimer:=@OnTimer;
Timer.interval:=100; //интервал отправки пакетов
Timer.enabled:=false;
//тут указываем пакеты, которые будем отправлять
//(поочередно - сначала взятие квеста, потом сдача
//(если необходимо добавить пак на отмену - добавляем в самое начало))
//для примера взял квест "загадочая руда" для Асмо
MyPck[1]:=HStr('FF 01 57 BC FE A7 0A 00 00 '); //отмена квеста (1й пакет в посылку)
MyPck[2]:=HStr('9D 00 57 5A FF 4C 46 01 00 1A 00 01 00 0A 00 A7 0A 00 00 00 00 '); //пакеты
MyPck[3]:=HStr('9D 00 57 5A FF 4C 46 01 00 F1 03 01 00 47 09 A7 0A 00 00 00 00 '); //сдачи
MyPck[4]:=HStr('9D 00 57 5A FF 4C 46 01 00 12 00 01 00 05 00 A7 0A 00 00 00 00 '); //квеста Дулахе
//далее вставляем больше пакетов, если потребуется...
//вставка будет выглядеть примерно так:
//MyPck[5]:=HStr('... ');
//MyPck[6]:=HStr('... ');
//MyPck[7]:=HStr('... ');
// и тогда переменная CountPck будет, само собой, больше! Например равная 7
//CountPck:=7;
CountPck:=4; //количество пакетов всего!
end;
procedure Free;
begin
Timer.enabled:=false;
end;
procedure OnTimer(Sender: TObject);
begin
buf:=MyPck[i];
SendToServerEx(name);
inc(i);
if (i>CountPck) then
i:=1;
end;
begin
//включение/выключение скрипта (команда в чат .ы)
if FromClient and (pck[1]=#$B2) then
begin
if (ReadS(7)='.ы') then //тут можете поменять привязанную к скрипту команду ".ы" на любую другую...
begin
name:=ConnectName;
pck:='';
i:=1;
if(Timer.enabled) then
Timer.enabled:=false
else
Timer.enabled:=true;
end;
end;
end.
Тестилось на нью x75
Все описание собственно в комментариях к скрипту...
Вводите .ы - дюп пошел,
вводите еще раз .ы - дюп остановился!
Для нормального дюпа квестов нужно стоять возле НПС, которому этот квест сдается (вот такая-вот прихоть у корейцев появилась с 2.7 версии/problem)
А вообще, дабы не возникало лишних вопросов - советую прочесть эту тему ([Ссылки могут видеть только зарегистрированные и активированные пользователи])!
И еще, для 3.0 версии м.б. надо будет убрать точку из команды-активатора, т.е. вместо .ы поставить просто ы
Тестируйте - отписывайте ошибки/предложения по доработке! ;)
OTKY
01.03.2012, 07:33
Пару вопрос на где активация или я такой невнимательный
maloi350
01.03.2012, 08:24
Вводите .ы - дюп пошел,
вводите еще раз .ы - дюп остановился!/kidding
daniilka899889
01.03.2012, 11:32
что то не получается вставить больше пакетов,выдает вечно какую то ошибку.а так все робит спасибо автору..)
Usilok77
01.03.2012, 11:51
что то не получается вставить больше пакетов,выдает вечно какую то ошибку.а так все робит спасибо автору..)
Опиши, какая ошибка, и напиши, что получилось.
armagedon1
01.03.2012, 11:57
ПРосто нужно вставить нужные пакеты или надо что-то еще писать?Обьясните я в скриптах плохо шарю.
Usilok77
01.03.2012, 12:03
Ну если у тебя всего 4 пакета на отправку - то просто вставляешь свои пакеты...
а если их больше - (описал-ведь) нужно дописывать строчки, как в примере MyPck[5]:=HStr('сам пакет');
и поменять переменную CountPck (это количество пакетов, т.е. если у тебя 5 пакетов - то строка CountPck:=4; будет выглядеть так CountPck:=5;)
daniilka899889
01.03.2012, 12:26
спасибо с этим разобрался.понял что нид нпц держать в таргете и быть рядом с ним))да и можно ликак то ускорить процесс чтобы быстрее апп шел,пробую на кв загадочная руда??!!если можно то как опиши,..
Usilok77
01.03.2012, 12:35
да и можно ликак то ускорить процесс чтобы быстрее апп шел
можно, но только если у тебя не стоит ограничения на принятые пакеты...
пробуй Timer.interval:=100; поменять на 50 например, или еще меньше...
если все будет норм дюпаться, и почта не будет выскакивать - отпишись плз в этой теме, какой оптимальный интервал!
daniilka899889
01.03.2012, 13:00
почта вылазиет уже на 90...(((((((((
trane_18
01.03.2012, 13:45
Задание провалено пишет, на прайме когда выполняю кв [Ссылки могут видеть только зарегистрированные и активированные пользователи]
Usilok77
01.03.2012, 14:31
Задание провалено пишет, на прайме когда выполняю кв [Ссылки могут видеть только зарегистрированные и активированные пользователи]
Айди Дулахи нужно отловить заново...
у тебя проходит лишь пакет на отмену квеста, а на сдачу пакеты не правильные значит...
Добавлено через 2 минуты
почта вылазиет уже на 90...(((((((((
увы...но значит более никак не ускорить процесс...
priest.nrts
01.03.2012, 15:30
Спс все робит)и еще перед тем как говорить что не робит проверте взят ли у вас этот кв =)
Добавлено через 53 минуты
такс нашел кв который дает по 2к и отловил пакеты, все отлично работает)
вот скрипт
var
MyPck:array[1..10] of string;
name:string;
Timer:TTimer;
i,CountPck:integer;
procedure Init;
begin
Timer:=TTimer.Create(nil);
Timer.OnTimer:=@OnTimer;
Timer.interval:=100;
Timer.enabled:=false;
MyPck[1]:=HStr('FF 01 57 BC FE 1E 0B 00 00 ');
MyPck[2]:=HStr('9D 00 57 5A FF 00 03 00 00 F1 03 01 00 47 09 1E 0B 00 00 00 00 ');
MyPck[3]:=HStr('9D 00 57 5A FF 00 03 00 00 12 00 01 00 05 00 1E 0B 00 00 00 00 '); //сдачи юснеру
CountPck:=3;
end;
procedure Free;
begin
Timer.enabled:=false;
end;
procedure OnTimer(Sender: TObject);
begin
buf:=MyPck[i];
SendToServerEx(name);
inc(i);
if (i>CountPck) then
i:=1;
end;
begin
//включение/выключение скрипта (команда в чат .ы)
if FromClient and (pck[1]=#$B2) then
begin
if (ReadS(7)='.ы') then
begin
name:=ConnectName;
pck:='';
i:=1;
if(Timer.enabled) then
Timer.enabled:=false
else
Timer.enabled:=true;
end;
end;
end.
берем в таргет нпц "юснера" и включаем скрипт и уался 700к апа за 3 мин
вот сылка на базу [Ссылки могут видеть только зарегистрированные и активированные пользователи]
а и еще для ленивых вот пакет тп к юснеру (пандемониум)
9F 00 57 5C FF 62 F5 96 44 9F 29 BC 44 10 D6 55 43 3B 00
68 00 57 07 FF
на newaion х75 (новая сборка) робит на ура, на других серверах не тестил
а и еще народ если не будет работать попробуйте взять кв и снова попробовать, вот пакет на взятие квеста
9D 00 57 5A FF 00 00 00 00 EA 03 01 00 04 00 1E 0B 00 00 00 00
daniilka899889
02.03.2012, 08:23
берем в таргет нпц "юснера"
а где он находится???
Добавлено через 2 минуты
тп отказывается работать((
trane_18
02.03.2012, 10:25
я так понял без этого Предмет, излучающий красноватое сияние ([Ссылки могут видеть только зарегистрированные и активированные пользователи]) нельзя ?
priest.nrts
02.03.2012, 10:53
а где он находится???
Добавлено через 2 минуты
тп отказывается работать((
а ты поставил в пх чтобы каждый пакет - отдельная строчка? там 2 пакета, тп должно работать
Добавлено через 6 минут
я так понял без этого Предмет, излучающий красноватое сияние ([Ссылки могут видеть только зарегистрированные и активированные пользователи]) нельзя ?
все можно, я же написал пакет который берет кв, вот отправь его и не надо никакого предмета
daniilka899889
02.03.2012, 11:07
я так понял без этого Предмет, излучающий красноватое сияние нельзя ?
можно...просто подходишь к нпц берешь его в таргет включаешь скрипт вводишь команду .ы и вот те ап!!!!если не робит либо фикс либо что то не так у тя!!
trane_18
02.03.2012, 11:30
можно...просто подходишь к нпц берешь его в таргет включаешь скрипт вводишь команду .ы и вот те ап!!!!если не робит либо фикс либо что то не так у тя!!
скорее всего фикс(прайм) брал в таргет нпс запускал скрипт и вводил .ы и ничего не происходило:nono:
Usilok77
02.03.2012, 14:10
скорее всего фикс(прайм) брал в таргет нпс запускал скрипт и вводил .ы и ничего не происходило
мож айди НПС поменять надо...
beo18indus
02.03.2012, 15:42
хмм странно все делаю как надо и кстати смотрел в пакетлист в л2 при активации скрипта начинает отсылать кучу пакетов на сервер но ап не идет( пробовал так же брать кв (отсылал данный пакет выше) однако увы..
не стоит ли сначало пройти этот кв а потом пробовать дюпать?
world.ru
02.03.2012, 15:42
MyPck[1]:=HStr('FF*01*57*BC*FE*A7*0A*00*00*');*//отмена*квеста*(1й*пакет*в*посылку)
********MyPck[2]:=HStr('9D*00*57*5A*FF*4C*46*01*00*1A*00*01*00*0A* 00*A7*0A*00*00*00*00*');*//пакеты
********MyPck[3]:=HStr('9D*00*57*5A*FF*4C*46*01*00*F1*03*01*00*47* 09*A7*0A*00*00*00*00*');*//сдачи
********MyPck[4]:=HStr('9D*00*57*5A*FF*4C*46*01*00*12*00*01*00*05* 00*A7*0A*00*00*00*00*');*//квеста*Дулахе
у меня вообще 9 получилось. Такое может быть?
Usilok77
02.03.2012, 17:16
хмм странно все делаю как надо и кстати смотрел в пакетлист в л2 при активации скрипта начинает отсылать кучу пакетов на сервер но ап не идет( пробовал так же брать кв (отсылал данный пакет выше) однако увы..
не стоит ли сначало пройти этот кв а потом пробовать дюпать?
Врят-ли...должно хватить и взятия...
у меня вообще 9 получилось. Такое может быть?
может!
А вот если более 10ти - то еще в строке MyPck:array[1..10] of string; нужно поменять 10 на кол-во пакетов...
StylexD
02.03.2012, 17:36
У меня проблема пишет "квест пройден" хотя я его даже не брал, серв юа
что делать?
Usilok77
02.03.2012, 17:40
а на ЮА траблы какие-то с отменой квестов,
я пока еще не вникал...
Fred_92
03.03.2012, 12:29
в се делаю правильно но пишет што кв уже пройден мб фикс сервер 2.7 =((
Usilok77
03.03.2012, 12:38
в се делаю правильно но пишет што кв уже пройден мб фикс сервер 2.7 =((
ну если точно все правильно делаешь, и ты уверен в своих действиях, дюпал кв ранее, прочитал эту тему ([Ссылки могут видеть только зарегистрированные и активированные пользователи])
то значит точно фикс...)
Fred_92
03.03.2012, 12:47
да дюпал и читал эту тему сам 1 кв нашол для 3 лвл на сервере поставили новую сборку и теперь кончилась лофа может кто не будь подскажет в лс мож пару квестов остались которые можно дюпать !!!
Usilok77
03.03.2012, 13:20
может кто не будь подскажет в лс мож пару квестов остались которые можно дюпать !!!
а сервер-то какой?)
Fred_92
03.03.2012, 13:50
aion-free x70
AngelofDead666
03.03.2012, 16:42
aion-free x70
Такаяже проблема кто знает напишите решение плиз( :bow:
sanya56
03.03.2012, 16:53
напишите полный пример в личку
daniilka899889
04.03.2012, 18:25
вот вам мой скрипт для сдачи голд медалей на ньюшке а то так напряжно когда вручную делаешь))
var
MyPck:array[1..10] of string;
name:string;
Timer:TTimer;
i,CountPck:integer;
procedure Init;
begin
Timer:=TTimer.Create(nil);
Timer.OnTimer:=@OnTimer;
Timer.interval:=100;
Timer.enabled:=false;
procedure OnTimer(Sender: TObject);
begin
buf:=MyPck[i];
SendToServerEx(name);
inc(i);
if (i>CountPck) then
i:=1;
end;
begin
//включение/выключение скрипта (команда в чат .ы)
if FromClient and (pck[1]=#$B2) then
begin
if (ReadS(7)='.ы') then
begin
name:=ConnectName;
pck:='';
i:=1;
if(Timer.enabled) then
Timer.enabled:=false
else
Timer.enabled:=true;
end;
end;
end.
react667
06.03.2012, 14:55
невайон х75 фикс, после активации скрипта сендлог... кончилась халява походу
Usilok77
06.03.2012, 15:41
невайон х75 фикс, после активации скрипта сендлог... кончилась халява походу
[Ссылки могут видеть только зарегистрированные и активированные пользователи]
скрипт который в шапке ток что проверил)
ничего не изменяя!
react667
06.03.2012, 17:10
[Ссылки могут видеть только зарегистрированные и активированные пользователи]
скрипт который в шапке ток что проверил)
ничего не изменяя!
я на квесте юснера делал, выбивало два раза сендлогом
Usilok77
06.03.2012, 17:40
я на квесте юснера делал, выбивало два раза сендлогом
дык этож не значит, что всю тему можно втопку слать!
тем более может просто айди неверный у тебя...
было-бы желание - найдешь, где применить данную тему;)
slavik555777
06.03.2012, 18:30
Ребята, помогите!! Побывал таким образам - не фига не получилось.Вот пакеты:
MyPck[1]:=HStr('FF 01 57 BC FE 5C 06 00 00');
MyPck[2]:=HStr('9B 00 57 58 FF 19 31 00 00');
MyPck[3]:=HStr('9B 00 57 58 FF 19 31 00 00 ');
MyPck[4]:=HStr('9F 00 57 5C FF 67 3F C7 44 4E 9C 2C 45 CD C0 FD 42 1A 00');
Миссия:[Ссылки могут видеть только зарегистрированные и активированные пользователи]
Может, я что-то не правильно делаю?
Usilok77
06.03.2012, 18:39
MyPck[2]:=HStr('9B 00 57 58 FF 19 31 00 00');
MyPck[3]:=HStr('9B 00 57 58 FF 19 31 00 00 ');
а что это за пакеты? и зачем 2 одинаковых?
и пакетов диалога маловато (всего один, последний)...
да, и что конкретно происходит при попытке?
slavik555777
06.03.2012, 18:47
а что это за пакеты? и зачем 2 одинаковых?
и пакетов диалога маловато (всего один, последний)...
да, и что конкретно происходит при попытке?
Просто очень быстро вылетают окна разговора.
Вот все пакеты что я словил:
извини конечно, но эти пакеты - бред сумасшедшего!
тут два варианта:
либо ты чет нето ловишь
либо такой сервер...
я с этим тебе не помогу, проблемы со скриптом у тебя нет, тебе сюда! ([Ссылки могут видеть только зарегистрированные и активированные пользователи])
slavik555777
06.03.2012, 18:58
извини конечно, но эти пакеты - бред сумасшедшего!
тут два варианта:
либо ты чет нето ловишь
либо такой сервер...
я с этим тебе не помогу, проблемы со скриптом у тебя нет, тебе сюда! ([Ссылки могут видеть только зарегистрированные и активированные пользователи])
Сервер аион юа. Мб конечно уже профиксили. Покеты ловил так: подошел к нпц, поговорил, словил все пакеты. Что бы нечаянно что-то не упустить) Подскажи пакеты на 3.0 а то там другие, и сошлись с твоими только на отмены кв.
Mr.Phoenix
06.03.2012, 19:00
Уважаемый автор темы, на New Aion х2 будет работать?
Usilok77
06.03.2012, 19:04
Подскажи пакеты на 3.0 а то там другие, и сошлись с твоими только на отмены кв.
Пакеты на ЮА от 2.7 остались!
Уважаемый автор темы, на New Aion х2 будет работать?
будет!:)
slavik555777
06.03.2012, 19:08
Пакеты на ЮА от 2.7 остались!
будет!:)
Странно, на у меня таких пакетов 9d нет(
У тебя нет пакетов на миссию какаю-нибудь для нях?
Или норм покет хака?
Usilok77
06.03.2012, 19:10
пакетов на миссию какаю-нибудь для нях?
нет
Или норм покет хака?
coderx.ru там есть!
Mystmuse
06.03.2012, 20:07
Каково максимальное кол-во пакетов в списке, сделал 12 не работало... Надо стандартно на сдачу и отмену слать или все?
Usilok77
06.03.2012, 20:39
Каково максимальное кол-во пакетов в списке, сделал 12 не работало... Надо стандартно на сдачу и отмену слать или все?
А вот если более 10ти - то еще в строке MyPck:array[1..10] of string; нужно поменять 10 на кол-во пакетов...
если квест требовательный - тогда все...
но в основном хватает и сдачи...
react667
07.03.2012, 15:01
это пакет на взятие квеста юснера, который уже выкладывали в этой теме на первой странице:
9D 00 57 5A FF 00 00 00 00 EA 03 01 00 04 00 1E 0B 00 00 00 00
так вот что странно, он берет квест на нью х75, он берет квест еще на другом сервере, но почему-то при отправке на сервере невайон х2(после обновы 2.7) ничего не происходит
Usilok77
07.03.2012, 15:05
так вот что странно, он берет квест на нью х75, он берет квест еще на другом сервере, но почему-то при отправке на сервере невайон х2(после обновы 2.7) ничего не происходит
возможно прост еще квест на х2 не добавили этот...
react667
07.03.2012, 15:14
другие квесты проверить не могу, т.к у меня там один перс всего и он 55, а все квесты которые с отменой я давно использовал чтоб прокачать перса =) так что кому не сложно проверьте загадочную руду или еще какой нить квест, и выложите плз пакет на взятие
Usilok77
07.03.2012, 15:16
другие квесты проверить не могу, т.к у меня там один перс всего и он 55, а все квесты которые с отменой я давно использовал чтоб прокачать перса =) так что кому не сложно проверьте загадочную руду или еще какой нить квест, и выложите плз пакет на взятие
кв на загадочную руду в шапке!
там лишь айди Дулахи нужно поменять на действующий на х2!
react667
07.03.2012, 15:38
кв на загадочную руду в шапке!
там лишь айди Дулахи нужно поменять на действующий на х2!
/facepalm а если у меня не будет работать, нужно же взять заново квест...
Mystmuse
07.03.2012, 15:47
Выложите пожалуйста пакет на принятие квеста из шестеренки Ценность ржавого устройства для версии 2.7 (ньюшка икс 2, в идеале). На 9D начинаться должен по идее..
Usilok77
07.03.2012, 16:19
на нью фикс походу дюпа квестов((
Mystmuse
07.03.2012, 22:26
Не фикс ниче, но пакеты на разговоры с НПЦ и сдачу не работают, тобишь словил пакет на чат и пытаешься отправить, а ничего не происходит, поэтому если хочешь сделать 1 и тот же квест 100 раз придется в ручную бегать и болтать...
Usilok77
07.03.2012, 22:59
Не фикс ниче, но пакеты на разговоры с НПЦ и сдачу не работают, тобишь словил пакет на чат и пытаешься отправить, а ничего не происходит, поэтому если хочешь сделать 1 и тот же квест 100 раз придется в ручную бегать и болтать...
т.е. нужно пройти всю цепочку квеста?
тогда, если все НПС находятся в одной локации - могу предложить дописать пакеты ТП к ним, и тогда, думаю пакеты на диалог будут работать, при последовательной их отправке...
react667
08.03.2012, 01:04
т.е. нужно пройти всю цепочку квеста?
тогда, если все НПС находятся в одной локации - могу предложить дописать пакеты ТП к ним, и тогда, думаю пакеты на диалог будут работать, при последовательной их отправке...
Кстати если интересно, они снова ввели команду на рестарт квеста, но сделали хитро, таргет надо на себе держать
Daren1
08.03.2012, 10:36
var
MyPck:array[1..10] of string;
name:dissen; в этой строке пишет ошибка что не так? логин Dissen
Timer:TTimer;
i,CountPck:integer;
Usilok77
08.03.2012, 13:30
var
MyPck:array[1..10] of string;
nameissen; в этой строке пишет ошибка что не так? логин Dissen
Timer:TTimer;
i,CountPck:integer;
свое имя вставлять никуда не надо! оно считывается автоматически!
Lyau
08.03.2012, 13:35
На нью х2 кто-нибудь тестил? Я пробовал 0 эмоций
Daren1
08.03.2012, 14:07
var
MyPck:array[1..10] of string;
name:string;
Timer:TTimer;
i,CountPck:integer;
procedure Init;
begin
Timer:=TTimer.Create(nil);
Timer.OnTimer:=@OnTimer;
Timer.interval:=100;
Timer.enabled:=false;
procedure OnTimer(Sender: TObject);
begin
buf:=MyPck[i];
SendToServerEx(name);
inc(i);
if (i>CountPck) then
i:=1;
end;
begin
//включение/выключение скрипта (команда в чат .ы)
if FromClient and (pck[1]=#$B2) then
begin
if (ReadS(7)='.ы') then
begin
name:=ConnectName;
pck:='';
i:=1;
if(Timer.enabled) then
Timer.enabled:=false
else
Timer.enabled:=true;
end;
end;
end.
ВОт мой скрипт посмотри,что не так?
igorbest88
08.03.2012, 14:11
Подскажите скрипт на newaion X2 на Элийцев плизз
Vetalik1987
08.03.2012, 16:51
Да пожалуйста Элийцам на х2 подскажите)
Usilok77
08.03.2012, 17:14
Та проблема пока со сдачей квестов на нью...
нужно разбираться, а у меня пока на это времени нет...
Mystmuse
09.03.2012, 00:58
т.е. нужно пройти всю цепочку квеста?
тогда, если все НПС находятся в одной локации - могу предложить дописать пакеты ТП к ним, и тогда, думаю пакеты на диалог будут работать, при последовательной их отправке...
Даже если я нахожусь рядом с нпц, посылаю пакет на диалог, ничего не происходит. Даже если держать нпц в таргете, но на х75 все работает.
Tgi_v
15.03.2012, 18:53
На Aion Final 2.7 скрипт кто нить гонял???
maxtopchiev
20.03.2012, 20:13
Есть предложение, а точнее вопрос) Можно ли сделать скрипт на квест который можно вполне легально делать ну скажем 10 раз, как то упразнить этот процесс) или это возможно лишь отменяя квест?
ceed19
25.03.2012, 14:34
Напишите прохождение квеста "Стать даэвом" у асм..
т.е именно пакетами, не скриптами.. Очень прошу плисс)
DarkdalV
14.04.2012, 12:02
Вот моя часть скрипта для Newaion x2 для элов/нях на 17ур Осколок древнего камня ([Ссылки могут видеть только зарегистрированные и активированные пользователи])
MyPck[1]:=HStr('FF 01 57 BC FE 9E 04 00 00 '); //отмена квеста (1й пакет в посылку)
MyPck[2]:=HStr('9D 00 57 5A FF 00 00 00 00 EA 03 01 00 04 00 9E 04 00 00 00 00 '); //получение квеста
MyPck[3]:=HStr('9D 00 57 5A FF C6 29 00 00 1A 00 01 00 0A 00 9E 04 00 00 00 00 '); //пакеты
MyPck[4]:=HStr('9D 00 57 5A FF C6 29 00 00 F1 03 01 00 47 09 9E 04 00 00 00 00 '); //сдачи
MyPck[5]:=HStr('9D 00 57 5A FF C6 29 00 00 12 00 01 00 05 00 9E 04 00 00 00 00 '); //квеста Осколок древнего камня, сдавать нпс Селена
CountPck:=5; //количество пакетов всего!
Но скрипт нефурычит: в л2пх видно как пакеты от клиенты тоннами летят , но в игре ничего не происходит.
Я выбил осколок ([Ссылки могут видеть только зарегистрированные и активированные пользователи]) взял квест, поймал пакет, сдал его, опять отловил пакет. Снова выбил осколок и принял квест, сдал его у нпс, поймал пакеты , затем всё записал в скрипт, сохранил, активировал, подошёл к неписю, взял в таргет, написал в чат .ы И... ничего не произошло! :cry: Чтото не так делаю, или фикс?! Помогите
Skipi1234
17.04.2012, 17:48
Можно спросить насчет того что в невайон х75 не потверждается взятие квеста если отправлять через пакетник ето фикс всех кв или что?
c-lavr
18.04.2012, 10:56
Можно спросить насчет того что в невайон х75 не потверждается взятие квеста если отправлять через пакетник ето фикс всех кв или что?
На нью фикс стоит на все КВ и очень давно(((
Fastfist
22.04.2012, 18:18
На Aion Final 2.7 скрипт кто нить гонял???
На финале не отменяеться кв после здачи :(
cobrakid3
01.06.2012, 09:10
Вопрос,а в скрипте надо писать свое (//имя соединени(аккаунта))
и //счетчик пакетов и их количество ?
Robontosto
23.06.2012, 22:03
Aion free x6 кач с 10 лвла [Ссылки могут видеть только зарегистрированные и активированные пользователи]
При использовании скрипта дает опьіт за ка 1 раз далее ничего не происходит(
Вот скритп посмотрите:
//Script by Usilok
var
MyPck:array[1..11] of string; //выделяем память под пакеты квеста (опционально 10 строк)
name:string; //имя соединения (аккаунта)
Timer:TTimer;
i,CountPck:integer; //счетчик пакетов и их количество
procedure Init;
begin
Timer:=TTimer.Create(nil);
Timer.OnTimer:=@OnTimer;
Timer.interval:=10; //интервал отправки пакетов
Timer.enabled:=false;
procedure OnTimer(Sender: TObject);
begin
buf:=MyPck[i];
SendToServerEx(name);
inc(i);
if (i>CountPck) then
i:=1;
end;
begin
//включение/выключение скрипта (команда в чат .ы)
if FromClient and (pck[1]=#$B2) then
begin
if (ReadS(7)='.ы') then //тут можете поменять привязанную к скрипту команду ".ы" на любую другую...
begin
name:=ConnectName;
pck:='';
i:=1;
if(Timer.enabled) then
Timer.enabled:=false
else
Timer.enabled:=true;
end;
end;
end.
TPOJLFEYS
24.06.2012, 11:00
Автору спасиб ,тестил на aio ultimatum,все отлично робит.
vivalda
29.06.2012, 06:48
сделайте пожалуйста скрипт на aion.gamalka.com или научите пользоваться ( конечно не за бесплатно )
в скайп : mazeisdefaken
Bukana
29.06.2012, 15:16
я так понемаю на евро оффе данная штука робить не будет?или стоит потестить?
как только отсылаю пакет на сброс квеста тут же кикает из игры.можно это как-кто обойти?
fatal_illusion
01.09.2012, 18:33
На newaion x75 не работает.
Либо я что-то неправильно делаю..
aga-aga
03.09.2012, 15:25
я так понемаю на евро оффе данная штука робить не будет?или стоит потестить?
как только отсылаю пакет на сброс квеста тут же кикает из игры.можно это как-кто обойти?
на фришках уже толком не где не работает, а ты за офф спрашиваешь /dgs