Const
MinMana = 4000

var
X,Y,Z:integer;
shouldStay: boolean;


while not terminated do
begin
UpdateWorld;
  If Self.Mana <= MinMana  && shouldStay = false Then
  begin
    shouldStay:=true;
    X:=Self.X;
    Y:=Self.Y;
    Z:=Self.Z;
  end
  if shouldStay then Self.MoveTo(X,Y,Z)
sleep(200)
end;