Скрипт l2phx (aion 4.0)

[broker4444]

Вот скрипт:

begin
If FromClient and (pck=Hstr('F8 00 65 07 FF CE 97 B5 00 00 ')) //активация скрипта.
then
begin
buf:=HStr('E4 00 65 1B FF 4E 08 01 00 72 7C 02 00 00 00 98 6C 00 00 '); //скилл 1.
SendToServer;
buf:=HStr('E4 00 65 1B FF 3C 09 01 00 72 7C 02 00 DB 01 B8 FE 00 00 '); //скилл 2.
SendToServer;
buf:=HStr('E4 00 65 1B FF 6B 03 09 00 72 7C 02 00 A3 00 79 81 00 00 '); //скилл 3.
SendToServer;
buf:=HStr('E4 00 65 1B FF 3E 08 09 00 72 7C 02 00 BC 02 79 AD 00 00 '); //скилл 4.
SendToServer;
buf:=HStr('E4 00 65 1B FF AB 09 06 00 72 7C 02 00 7F 01 F9 B3 00 00 '); //скилл 5.
SendToServer;
buf:=HStr('E4 00 65 1B FF 44 02 09 00 72 7C 02 00 D4 01 F9 73 00 00 '); //скилл 6.
SendToServer;
buf:=HStr('E4 00 65 1B FF E8 08 07 00 72 7C 02 00 7E 02 05 78 00 00 '); //скилл 7.
SendToServer;
buf:=HStr('E4 00 65 1B FF E8 09 02 00 72 7C 02 00 77 01 B8 B2 00 00 '); //скилл 8.
SendToServer;
buf:=HStr('E4 00 65 1B FF 3A 03 09 00 72 7C 02 00 3F 02 05 D7 00 00 '); //скилл 9.
SendToServer;
end;
end.

Вот в чем проблема на версии 3.7 такой скрипт юзал при нажатие активации скрипта юзались скилы по одному. Один раз нажал один скил второй раз нажал второй скил и так по порятку. В айоне 4.0 при активации юзаются все скилы за 1 сек. помогите поправить скрипт чтоб паботало как в 3.7 версии.

[anton1233]

Какой сервер?

[broker4444]

Какой сервер?
Я думаю ет не важно.

[broker4444]

UP! Пмогите кто в курсе как

[Usilok77]

это исходник скрипта? или уже измененный под 4.0?
судя по коду он выполняется правильно)
для реализации твоего желания нужно счетчик вклеить в него, как вариант...

var
i:integer;
begin
If FromClient and (pck=Hstr('F8 00 65 07 FF CE 97 B5 00 00 ')) //активация скрипта.
then
begin
case i of
0:
buf:=HStr('E4 00 65 1B FF 4E 08 01 00 72 7C 02 00 00 00 98 6C 00 00 '); //скилл 1.
1:
buf:=HStr('E4 00 65 1B FF 3C 09 01 00 72 7C 02 00 DB 01 B8 FE 00 00 '); //скилл 2.
2:
buf:=HStr('E4 00 65 1B FF 6B 03 09 00 72 7C 02 00 A3 00 79 81 00 00 '); //скилл 3.
3:
buf:=HStr('E4 00 65 1B FF 3E 08 09 00 72 7C 02 00 BC 02 79 AD 00 00 '); //скилл 4.
4:
buf:=HStr('E4 00 65 1B FF AB 09 06 00 72 7C 02 00 7F 01 F9 B3 00 00 '); //скилл 5.
5:
buf:=HStr('E4 00 65 1B FF 44 02 09 00 72 7C 02 00 D4 01 F9 73 00 00 '); //скилл 6.
6:
buf:=HStr('E4 00 65 1B FF E8 08 07 00 72 7C 02 00 7E 02 05 78 00 00 '); //скилл 7.
7:
buf:=HStr('E4 00 65 1B FF E8 09 02 00 72 7C 02 00 77 01 B8 B2 00 00 '); //скилл 8.
8:
begin
buf:=HStr('E4 00 65 1B FF 3A 03 09 00 72 7C 02 00 3F 02 05 D7 00 00 '); //скилл 9.
i:=-1;
end;
end;
SendToServer;
i:=i+1;
end;
end.

вот так как-то, тестируй)

[broker4444]

Етот скрипт уже под 4.0 но скилы юзаются все за 1 сек. А мне нужно чтоб при одном клике один скил юзнулся при втором клике второй скил . А я хз как зделать так.

[Usilok77]

Ёпс! Ты хоть напиши, работает/не работает?

[broker4444]

Бро огромное спс! Все работает =)) как здесь + поставить тебе?)

[Usilok77]

Не стОит...я не стремлюсь за рейтингом)
Словесной благодарности мне вполне достаточно!)