anchor.diff:   end;
   
    // jedno RCS oblasti rizeni
  - TORRCS = record
  -  present:boolean;                                                              // jestli je RCS v OR pritomno
  + TORRCS = class
     failed:boolean;                                                               // jestli RCS v OR selhalo (nekomunikuje)
  +  constructor Create(failed:boolean = false);
    end;
   
    // seznam RCS modulu v OR
  - TORRCSs = record
  -  modules: array [0..TRCS._MAX_RCS] of TORRCS;                                     // seznam RCS modulu v OR, indexem je adresa RCS
  + TORRCSs = class
  +  modules: TObjectDictionary<Cardinal, TORRCS>;
     failure:boolean;                                                              // jestli doslo k selhani jakohokoliv RCS modulu v OR
     last_failure_time:TDateTime;                                                  // cas posledniho selhani (pouziva se pro vytvareni souhrnnych zprav o selhani RCS modulu pro dispecera)
  +
  +  constructor Create();
  +  destructor Destroy(); override;
    end;
   
    /////////////////////////////////////////////////////////////////////////////
  
positive.code: 
  ////////////////////////////////////////////////////////////////////////////////
  
  procedure TOR.RCSClear();
  var i:Integer;
  begin
   for i := 0 to TRCS._MAX_RCS do
    Self.OR_RCS.modules[i].present := false;
  end;
  
  procedure TOR.RCSAdd(addr:integer);
  begin
   try
     Self.OR_RCS.modules[addr].present := true;
   except
  
   end;
  
negative.code:  Self.vb.Free();
   Self.MereniCasu.Free();
   Self.Connected.Free();
   Self.OR_RCS.Free();
  
   inherited;
  end;//dtor
  
  constructor TORRCSs.Create();
  begin
   inherited;
   Self.modules := TObjectDictionary<Cardinal, TORRCS>.Create();
  end;
  
  destructor TORRCSs.Destroy();
  begin
   Self.modules.Free();
   inherited;
  end;
  
  constructor TORRCS.Create(failed:boolean = false);
  begin
   inherited Create();
   Self.failed := failed;
  end;
  
  ////////////////////////////////////////////////////////////////////////////////
  
  