На Хила

[par-vova]

Вкладка Автоматизация --> Скрипты (Ctrl + E) --> Новый скрипт --> Пишим название (НАпримерТанк Бафы) -->Стираем всё что есть, и добавляем скрипты --> Ставим галочку справа , возле названия скрипта.

Активация скилом Карающая молния II Для няхи.
([Ссылки могут видеть только зарегистрированные и активированные пользователи])
var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C CC CC DD 00 FF FF FF FF 00 00 00 00 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);
WriteD(TargetID, 8);
SendToServer;
end;

begin
StartSkill := 2148;
if (FromClient) and (ReadC(1) = $CF) and (ReadH(4) = StartSkill) then
begin
TargetID := ReadD(8);

DoTheSkill(2148, 2);
DoTheSkill(1115, 3);
DoTheSkill(982, 4);
DoTheSkill(1117, 4);
DoTheSkill(1181, 2);
DoTheSkill(1131, 4);
DoTheSkill(2144, 2);
DoTheSkill(1029, 1);
end;
end.


Активация скилом Молния воздаяния II для асмо ([Ссылки могут видеть только зарегистрированные и активированные пользователи])

var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C CC CC DD 00 FF FF FF FF 00 00 00 00 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);
WriteD(TargetID, 8);
SendToServer;
end;

begin
StartSkill := 2147;
if (FromClient) and (ReadC(1) = $CF) and (ReadH(4) = StartSkill) then
begin
TargetID := ReadD(8);

DoTheSkill(2147, 2);
DoTheSkill(1115, 3);
DoTheSkill(982, 4);
DoTheSkill(1117, 4);
DoTheSkill(1181, 2);
DoTheSkill(1132, 4);
DoTheSkill(2145, 2);
DoTheSkill(1029, 1);
end;
end.

Ставим спасибку за старание. :rolleyeyes:

Скрин ([Ссылки могут видеть только зарегистрированные и активированные пользователи])

[genyan]

Описание скрипта , что делает и что дает

[par-vova]

Добавил скрин.

[mansyr]

нормально.Айонфрии пол сервера хилов бегает с таким,но им без палива при масс замесе юзать когда в логах каша получается

[Tomas_Wexler]

что делает этот скрипт?

[Giperion]

На планете юзает только Молнию и гром. Все...Печаль

[Indeos918]

у меня при активации данного скрипта (1) выдает сендлог.Серв фришка.

[Harp]

Уважаемый, как-бы адаптировать твой скрипт под Инф-и где скиллы имеют вид:

Возмездие земли 3
D0 2D 10 B8 1E 17 13 4C 8B 08 1F C8 0F 06 8B 15 0D

Молния 2
D0 2D 10 56 19 17 13 4C 8B 08 1F 3E 09 6A 3C 15 0D
:question:

[killer_919]

так пацаны вот первая тема моя скрипты для хила )) не палевные ссовсем

1.нажимаеш призыв святвя энергия 2 и вылетает 2 моши сразу
var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C CC CC DD 00 FF FF FF FF 00 00 00 00 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);
WriteD(TargetID, 8);
SendToServer;
end;

begin
StartSkill := 2145;
if (FromClient) and (ReadC(1) = $CF) and (ReadH(4) = StartSkill) then
begin
TargetID := ReadD(8);

DoTheSkill(1132, 4);

end;
end.


2. снятие дебафов нажимаеш ясность 2 и снимаются и магические и физические дебафы
var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C CC CC DD 00 FF FF FF FF 00 00 00 00 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);
WriteD(TargetID, 8);
SendToServer;
end;

begin
StartSkill := 2145;
if (FromClient) and (ReadC(1) = $CF) and (ReadH(4) = StartSkill) then
begin
TargetID := ReadD(8);

DoTheSkill(1132, 4);

end;
end.

3.юзаеш правосудие земли затем идет ссерия нажал молнию 4 и сразу же вылетает элекрический разряд 3
var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C CC CC DD 00 FF FF FF FF 00 00 00 00 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);
WriteD(TargetID, 8);
SendToServer;
end;

begin
StartSkill := 1117;
if (FromClient) and (ReadC(1) = $CF) and (ReadH(4) = StartSkill) then
begin
TargetID := ReadD(8);

DoTheSkill(1070, 2);

end;
end.
Пользуйтесь на здоровье )))))))))))))))



жду спасибки )
//Темы со скриптами для одного класса объединяются. Никаких отдельных тем. talala

[kreyker]

хммм.вещь очень полезная особенно против заклов
зачёт/problem

[killer_919]

да против заклов жестококий эфект )) снимаеш бафы хилишся и рвеш их )