Code: Select all
Compiler: [Error] (loot.sc at 25:17): Type mismatch
Code: Select all
Program loot;
var
n:integer;
i:array[0..3] of Cardinal;
{$Include 'all.inc'}
procedure rezka;
begin
while not Dead do
useobject(findtype($0F51, backpack));
waitfortarget(500);
targettoobject(LastCorpse);
wait(500);
end;
Procedure sbor_luta;
begin
i[0]:=$09F1;
i[1]:=$0F3F;
i[2]:=$1078;
i[3]:=$0DF8;
while not dead do
useobject(LastContainer);
Wait(500);
Grab (i, 99) ;
end;
Begin
while true do
Checksave;
rezka;
Wait (1000);
sbor_luta;
Wait (2000);
End.
Суть. При открытии трупа, скрипт юзает на него дагер из пака(режет кожу), и собирает все шмотки по типам из трупа(массив переменной i).
Пока так.
Подскажите плиз где я ошибся. у меня подозрение, что я накосячил в целом, а не в конкретной строке.
ЧТо-то с массивами у меня не выходит. Буду очень благодарен!