Поработаем вместе?

[Jolume]

Давайте попробуем написать скрипт на скилы с радержкой.
Возмем пример скрипта без задержки.

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 := 572;
if (FromClient) and (ReadC(1) = $CF) and (ReadH(4) = StartSkill) then
begin
TargetID := ReadD(8);

DoTheSkill(813, 7);
DoTheSkill(1988, 5);
DoTheSkill(913, 1);
DoTheSkill(949, 1);
DoTheSkill(927, 1);
DoTheSkill(920, 1);
DoTheSkill(1984, 1);
DoTheSkill(836, 1);
DoTheSkill(850, 1);
DoTheSkill(919, 1);
DoTheSkill(862, 1);
DoTheSkill(2123, 1);
end;
end.

Поможем друг другу... Вылаживаем вашы нароботки...

[talala]

Вы вообще о чем?

[bzzzzz]

Он хочет поставить задержку на использование следующего скила:
...
DoTheSkill(813, 7);
пауза
DoTheSkill(1988, 5);
пауза
DoTheSkill(913, 1);
...

[Jolume]

bzzzzz, именно так...

[Pacan101010]

Если скрипт будет с задержками то какой смысл будет его использовать?/facepalm

[Heavenanvil]

Если скрипт будет с задержками то какой смысл будет его использовать?
Может, чтобы меньше палиться, но получить преимущество по сравнению с макросами?

[ioann]

тоже интересует есть ли возможность такого ?

[Jolume]

Pacan101010, Например смотри... Ты не хочеш палица ставиш например задержку в 1 секунду или менее и просто даже если проверять логи ты не спалишся т.к , можеш сказать я с 3 лет на пианино играю :D

[mahorka]

Пытался между скилами ставить оператор delay ();. В итоге вышла какашка, серия из 3 скилов, между ним ставил делей в 1000, жму скилл активатор и... он стоит 3 секунды, а только потом долбит всеми скиллами. У кого нормально выходило?

[Jolume]

Я думаю тут нужен таймер...

[Limnostro]

Вааах...У меня получилось только сделать "бомбу с таймером" = Скилы бьют, но дамаг на персе отображается через 40-50 секунд. Весчь ваще не нужная))

[Jolume]

Limnostro, Выложы пожалуста посмотрим твое чудо :)

[Limnostro]

Да...ок, вечерочком выложу...Это Скилы- Синтез Скилл+Седлог пакет...Мне надо подождать сендлога и как только, так сразу...

[wools]

Однозначно не нужен, ты или бьешь или бьешь. Если на ранних уровнях у тебя недостача скилов, чтоб сносить сразу всю HP мобу, то и нехер пользоваться скриптами. качни хотяб до 25. А чтоб без палева, так бей по клаве в чем беда?

[vs23]

Начало скрипта с таймером примерно таким должно быть)
const
name = '123456';
var
Timer01: TTimer;
TimerCyrcle: integer;
procedure Init;
begin
Timer01:=TTimer.Create(nil); //выделяем память и т.п.
Timer01.OnTimer:=@OnTimer01; //привязываем процедуру к событию
Timer01.enabled:=true; //начальное положение включен(true)/выключен(false)
Timer01.interval:=2000; //интервал(в миллисекундах) как часто таймер срабатывает
end;

procedure OnTimer01(Sender: TObject);
begin

[barin1]

Начало скрипта с таймером примерно таким должно быть)
const
name = '123456';
var
Timer01: TTimer;
TimerCyrcle: integer;
procedure Init;
begin
Timer01:=TTimer.Create(nil); //выделяем память и т.п.
Timer01.OnTimer:=@OnTimer01; //привязываем процедуру к событию
Timer01.enabled:=true; //начальное положение включен(true)/выключен(false)
Timer01.interval:=2000; //интервал(в миллисекундах) как часто таймер срабатывает
end;

procedure OnTimer01(Sender: TObject);
begin

а теперь разжуй для особых.возьми например любой скрипт и распиши что да как!!!:gordon:

[vs23]

а теперь разжуй для особых.возьми например любой скрипт и распиши что да как!!!:gordon:
Тогда это будет не "давайте вместе" а дайте готовый скрипт с таймером,немного разные вещи не находишь?