Vizit0r wrote:if (use_id > 0) and (target_id > 0) then

Огромное спасибо, всё заработало. А как сделать чтобы скрипт не выключался, а то он делате это действаие один раз, а потом скрипт отключается.

Vizit0r wrote:use_id = FindType(use_type, Ground);
target_id = FindType(target_type, Ground);

не = а := должно быть

Теперь вот такая ошибка:
Compiler: [Error] (Sheep.sc at 12:36): Type mismatch

Program a; const use_type = $1234; target_type = $5678; var use_id, target_id :cardinal; Begin use_id = FindType(use_type, Ground); target_id = FindType(target_type, Ground); if use_id > 0 and target_id > 0 then begin WaitTargetObject(target_id); UseObject(use_id); end; Wait(3000); End. Ошибка выле...

Какнибудь можно сделать вот такой скрипт:
ТаргетНекст
ЛастОбжект
ЛастТаргет