Uhparty

Const 
 MinSelf=10000;//if we have less than 600 HP we wont heal others so we wont get exusted. 
 MinHPPercent = 90; // The HP percentage a party member must have to use uh 
 ItemUHID = 3160; // The item number of the healing rune 
var 
   Creature: TCreature; 
 
while not Terminated do 
begin 
   UpdateWorld; 
   for x := 0 to Creatures.Count - 1 do 
   begin 
      if (Creatures.Creature[x].PartyMember) and (Creatures.Creature[x].Name<>Self.Name)  then 
      begin  
         if (Creatures.Creature[x].Health <= MinHPPercent) and (Self.Health>MinSelf) then 
         begin 
            Self.Containers.UseItemWithCreature(ItemUHID, Creatures.Creature[x]); 
            Sleep(2000); 
         end; 
      end; 
   end; 
   Sleep(100); 
end;