Page 1 of 1
Простой скрипт, хелп
Posted: 25.01.2012 13:24
by zzzsnow
Какнибудь можно сделать вот такой скрипт:
ТаргетНекст
ЛастОбжект
ЛастТаргет
Re: Простой скрипт, хелп
Posted: 25.01.2012 14:11
by Alex
Code: Select all
Program a;
var
use_type, target_type : word;
use_id, target_id :cardinal;
Begin
use_type := $1234;
target_type := $5678;
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.
Re: Простой скрипт, хелп
Posted: 27.01.2012 21:08
by zzzsnow
Alex wrote:Code: Select all
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.
Ошибка вылетает:
Compiler: [Error] (Sheep.sc at 10:38): Internal error (20)
Compiling failed
Script Sheep.sc stopped successfuly
Re: Простой скрипт, хелп
Posted: 27.01.2012 21:18
by Vizit0r
use_id = FindType(use_type, Ground);
target_id = FindType(target_type, Ground);
не = а := должно быть
Re: Простой скрипт, хелп
Posted: 27.01.2012 22:20
by zzzsnow
Vizit0r wrote:use_id = FindType(use_type, Ground);
target_id = FindType(target_type, Ground);
не = а := должно быть
Теперь вот такая ошибка:
Compiler: [Error] (Sheep.sc at 12:36): Type mismatch
Re: Простой скрипт, хелп
Posted: 27.01.2012 22:38
by Vizit0r
if (use_id > 0) and (target_id > 0) then
Re: Простой скрипт, хелп
Posted: 28.01.2012 1:24
by zzzsnow
Vizit0r wrote:if (use_id > 0) and (target_id > 0) then
Огромное спасибо, всё заработало. А как сделать чтобы скрипт не выключался, а то он делате это действаие один раз, а потом скрипт отключается.
Re: Простой скрипт, хелп
Posted: 28.01.2012 8:10
by Vizit0r
все нужные действия заключи в цикл
while not Dead
begin
....
end;