anchor.diff:  
    Self.ORProp.Osvetleni := TList<TOsv>.Create();
    Self.Connected        := TList<TORPanel>.Create();
  - Self.RCSClear();
  + Self.OR_RCS := TORRCSs.Create();
   
    Self.ORStav.dk_click_callback := nil;
    Self.ORStav.reg_please := nil;
  
positive.code:       procedure SetPrivolavackaBlkCnt(new:Integer);
        procedure SetTimerCnt(new:Integer);
  
        procedure RCSClear();                                                     // nastavi vsem RCS modulum, ze nejsou v OR
        procedure RCSUpdate();                                                    // posila souhrnne zpravy panelu o vypadku RCS modulu (moduly, ktere vypadly hned za sebou - do 500 ms, jsou nahlaseny v jedne chybe)
  
        procedure SendStatus(panel:TIdContext);                                   // odeslani stavu IR do daneho panelu, napr. kam se ma posilat klik na DK, jaky je stav zasobniku atp.; je ovlano pri pripojeni panelu, aby se nastavila OR do spravneho stavu
  
negative.code:  end;
  
   // jedno RCS oblasti rizeni
   TORRCS = class
    failed:boolean;                                                               // jestli RCS v OR selhalo (nekomunikuje)
    constructor Create(failed:boolean = false);
   end;
  
   // seznam RCS modulu v OR
   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;
  
   /////////////////////////////////////////////////////////////////////////////
  