Как ни странно Hiding %)
Posted: 31.05.2005 20:28
Кушает из бакпака. При жилании можно поменять...
Code: Select all
program Hiding;
var t:Integer;
{$Include 'all.inc'}
Begin
SetARStatus(true);
Hungry(1,backpack);
while not dead do
begin
if connected then
begin
for t:= 0 to 30 do
begin
CheckSave;
UseSkill('Hiding');
Wait(11000);
end;
CheckSave;
Hungry(1,backpack);
end;
end;
End.