Stealth Client Forum

Code: Select all

Program Anatomy;
var t : Integer;
      enemy : Cardinal;

{$Include 'all.inc'}

Begin
Enemy := $12345678;
SetARStatus(true);
Hungry(1,backpack);
clearjournal;
while not Dead do
 begin
  if Connected then
  begin
   for t := 0 to 10 do
   begin
        if TargetPresent then CancelTarget;
        CheckTargetError(5,2);
        CheckSave;
	UseSkill('Anatomy');
                WaitTargetObject(enemy);
	Wait(10000);
	end;
   Hungry(1,backpack);
   end;
 end;
End.