Добавлено через 3 минуты
17.05.2012 17:48:18 (LSP) Обнаружено соединение (Сокет 8368) IP/port 91.214.69.42:7777. Соединение будет перехвачено
17.05.2012 17:48:18 ServerListen: Обнаружено новое соединение.
17.05.2012 17:48:18 Тунель ($117844048) создан
17.05.2012 17:48:18 Тунель ($117844048) запущен для чтения с сокета № 1388
17.05.2012 17:48:18 Тунель ($117844048), Серверный сокет № 1388 / Клиентский сокет № 1196, Соединение установлено с 91.214.69.42:7777
17.05.2012 17:48:18 Имя соединения для тунеля ($117844048): Login
У меня Это есть это хорошо? Сервер Aion Legend.
Последний раз редактировалось LOL144; 17.05.2012 в 17:58.
Причина: Добавлено сообщение
Хотелось бы спросить автора а можно ли сделать что бы скрипт активировался/отключался на нажатие кнопки ну например "z"???Если да сделайте пожалуйста!!!Заранее благодарен!!!=)
//############################
//Micro Scripting
//class: Archer
//Script Created by miskalin
//version #1.3
//All rights reserved
//############################
var
Timer:TTimer;
TargetID,TimerStep,i,CountSkills:integer;
StartSkill,NewSkill,SkillID:word;
NextSkill:array[1..3] of word;
Level:byte;
name:string;
procedure DoTheSkill(SkillID:word);
begin
buf := HStr('D0 00 57 6F FF CC CC DD 00 60 CA 00 00 00 00 79 8D 00 00');
WriteH(SkillID, 6);
WriteC(Level, 8);
WriteD(TargetID, 10);
SendToServerEx(name);
end;
case TimerStep of
1:
begin
DoTheSkill(NextSkill[TimerStep]);
if TimerStep=CountSkills then
begin
Timer.enabled:=False;
TimerStep:=1;
end
else inc(TimerStep);
end;
2:
begin
DoTheSkill(NextSkill[TimerStep]);
if TimerStep=CountSkills then
begin
Timer.enabled:=False;
TimerStep:=1;
end
else inc(TimerStep);
end;
3:
begin
DoTheSkill(NextSkill[TimerStep]);
if TimerStep=CountSkills then
begin
Timer.enabled:=False;
TimerStep:=1;
end
else inc(TimerStep);
end;
if (FromClient) and (ReadC(1) = $CE) and (ReadC(3) = $57) and (ReadC(4) = $6D) then
begin
name:=ConnectName;
TargetID := ReadD(6);
end;
if (FromClient) and (ReadC(1) = $D0) then
begin
StartSkill:=ReadH(6);
case StartSkill of
//
1554: //id Стартового скила, с которого продолжится серия.
begin
NextSkill[1]:=1442; //
NextSkill[2]:=1588; //
NextSkill[3]:=1432; //
NextSkill[4]:=1434; //
CountSkills:=4; //Кол-во дополнительный скилов в серии, после стартового.
Timer.interval:=250; // Задержка между скилами в мсек. (0,3сек)
Timer.enabled:=True;
У меня вобще странная ситуация, 2 дня назад работал на отлично, потом пришлось переустановить винду, также настроил л2пх, но теперь скрипт начал работать криво, делает 1-ну цепочку и выключается. Подскажите как решить проблему.
[Ссылки могут видеть только зарегистрированные пользователи. ] Не робит проверял Луком 50
а может и я что то не так сделал
Цитата:
//############################
//Micro Scripting
//class: Archer
//Script Created by miskalin
//version #1.3
//All rights reserved
//############################
var
Timer:TTimer;
TargetID,TimerStep,i,CountSkills:integer;
StartSkill,NewSkill,SkillID:word;
NextSkill:array[1..3] of word;
Level:byte;
name:string;
case TimerStep of
1:
begin
DoTheSkill(NextSkill[TimerStep]);
if TimerStep=CountSkills then
begin
Timer.enabled:=False;
TimerStep:=1;
end
else inc(TimerStep);
end;
2:
begin
DoTheSkill(NextSkill[TimerStep]);
if TimerStep=CountSkills then
begin
Timer.enabled:=False;
TimerStep:=1;
end
else inc(TimerStep);
end;
3:
begin
DoTheSkill(NextSkill[TimerStep]);
if TimerStep=CountSkills then
begin
Timer.enabled:=False;
TimerStep:=1;
end
else inc(TimerStep);
end;
if (FromClient) and (ReadC(1) = $CE) and (ReadC(3) = $57) and (ReadC(4) = $6D) then
begin
name:=ConnectName;
TargetID := ReadD(6);
end;
if (FromClient) and (ReadC(1) = $D0) then
begin
StartSkill:=ReadH(6);
case StartSkill of
//Выстрел_721
721: //id Стартового скила, с которого продолжится серия.
begin
NextSkill[1]:=654; //Град стрел(737)
NextSkill[2]:=717; //Спиральный выстрел(2074)
CountSkills:=2; //Кол-во дополнительный скилов в серии, после стартового.
Timer.interval:=300; // Задержка между скилами в мсек. (0,3сек)
Timer.enabled:=True;
end;
//Внезапный выстрел(680)
680:
begin
NextSkill[1]:=719; //Взрывной выстрел(719)
CountSkills:=1;
Timer.interval:=400; //Задержка между скилами
Timer.enabled:=True;
end;
//Сковывающая стрела(672)
672: //id Стартового скила, с которого продолжится серия.
begin
NextSkill[1]:=722; //Аркан(722)
CountSkills:=1; //Кол-во дополнительный скилов в серии, после стартового.
//############################
//Micro Scripting
//class: Assassin
//Script Created by miskalin
//version #1.3
//All rights reserved
//############################
ЭТО ВСТАВЛЯТЬ ТОЖЕ НАДО??????????????????????
можно вставить,можно нет
эти строчки роли не играют в скрипте
Цитата:
Сообщение от Mr.Phoenix
Автор темы, что я делаю не так?
Копировал скрипт, вставил в L2PH, поставил галочку,
Нажимаю Рев зверя(1 скил) для активации серии, но скрипт не срабатывает так и со всеми сериями...
сделал все правильно,может проблема в клиенте(ты на 2.5?)или в серве
Добавлено через 2 минуты
Скрипт для сина работает проверял лично ,а со скриптом для лука не могу понять что не так но не в какую не хочет юзать.
я уже сам переделал скрипт сина для лучника,но та же проблема,не работает!
кто знает в чем может быть проблема?
скрипты то сути одни и те же,только разные ИД скилов и поменять цифры в серии
Последний раз редактировалось bert4ever; 31.05.2012 в 15:10.
Причина: Добавлено сообщение
Для 2.5 сделать не могу, так как нет клиента.
Но просто отловите пакет на взятие в таргет и на скил = и заменить их.
В 2.7 на НьюАйоне работает.
Единственный минус, что Имя соединения считывается когда вы берёте цель в таргет.
Т.е. допустим если выделить цель а потом включить скрипт - он не заработает, пока не возьмёте другую цель в таргет.
Если есть у кого лучник на НьюАйоне = Дайте пароль и логин в личку, потестирую лука и гляну почему у вас не работает...
________________ Мне хорошо известно то, что всем известно давно – тот кому зло причинили, злом ответит на зло.
Регистрация: 28.11.2009
Сообщений: 2
Популярность: 10
Сказал(а) спасибо: 0
Re: Micro Scripting (Микро-серии Скилов)
Re: Micro Scripting (Микро-серии Скилов)
