anchor.diff:    I: Integer;
   begin
     for I := 0 to Count - 1 do
  -  begin
  -    FMob[I].Free;
  -    FMob[I] := nil;
  -  end;
  +    FreeAndNil(FMob[I]);
     inherited;
   end;
   
  
positive.code: implementation
  
  uses Math, SysUtils, uTerminal, uPlayer, uMsgLog, uLanguage,
    uItem, uSkill, uStatistic, uAttribute, uPathFind;
  
  function MyCallback(X, Y: Integer): Boolean; stdcall;
  begin
  
negative.code: 
  FreeAndNil(Mobs);
  
  
  end.
  