anchor.diff:        Result := H.GetEntrance.X;
     end
     else
  -    LogError('States.HouseX', [aHouseID]);
  +    LogError('States.HousePositionX', [aHouseID]);
   end;
   
   
  
positive.code:       Result := H.GetEntrance.Y;
    end
    else
      LogError('States.HouseY', [aHouseID]);
  end;
  
  
  
negative.code:       Result := U.GetPosition.Y;
    end
    else
      LogError('States.UnitPositionY', [aUnitID]);
  end;
  
  
  