Благодарствую за помощ!
Методом научного тыка получилось сделать рабочий скрипт:
procedure quest();
begin
Engine.SetTarget(30342);
delay(1000);
Engine.MoveToTarget(-20);
delay(1000);
Engine.DlgOpen;
delay(1000);
Engine.DlgSel(1);
delay(1000);
Engine.BypassToServer('Quest _325_GrimCollector varsak_q0325_03.htm');
delay(1000);
end;
begin
Script.NewThread(@quest);
end.
Сейчас пойду читать как его запустить по кругу с помощью цикла
Вот как вы советовали обернул квест через while:
procedure quest();
while delay(1000) do begin;
begin
Engine.SetTarget