Page 1 of 1

Как ни странно Hiding %)

Posted: 31.05.2005 20:28
by Alex
Кушает из бакпака. При жилании можно поменять...

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.