Скрипт на заточку

[semiromid]

Добавлено через 1 час 18 минут
Подскажите .
Я так понял что эта часть скрипта отвечает за то , когда заканчиваються заточки он останавливаеться.

if ScrollOID=-1 then begin
    msg.Lines.Add('Кончились свитки! Прервано!');
    ButtonStartEnchant.Enabled:=true;
    ButtonStopEnchant.Enabled:=false;
    exit;
  end;

Я так понял это делаеться вот так ?

if ScrollOID=-1 then begin
    msg.Lines.Add('Кончились свитки! Прервано!');

  buf:=#$5F; 
  WriteD(ObjectID);
  WriteD(0);
  SendToServer

    ButtonStartEnchant.Enabled:=true;
    ButtonStopEnchant.Enabled:=false;
    exit;
  end;

Где выставляеться таймер что бы после срабатывания RequestEnchantItem
срабатывал пакет UseItem в течении 1000 ?