anchor.diff:      property ready:boolean read GetReady;
       property poruchaBP:boolean read fTUStav.poruchaBP write SetPoruchaBP;
       property zastavka:boolean read IsZastavka;
  +    property zastavkaLichy: Boolean read IsZastavkaLichy;
  +    property zastavkaSudy: Boolean read IsZastavkaSudy;
   
    end;//TBlkUsek
   
  
positive.code:       (Self.Souprava.sprLength > Self.TUSettings.Zastavka.max_delka) or (Self.Souprava.front <> self)) then Exit();
  
     // kontrola spravneho smeru
     if (((Self.Souprava.direction = THVSTanoviste.lichy) and (not Assigned(Self.TUSettings.zastavka.ev_lichy))) or
         ((Self.Souprava.direction = THVSTanoviste.sudy) and (not Assigned(Self.TUSettings.zastavka.ev_sudy)))) then Exit();
  
     // kontrola typu soupravy:
     if (Self.TUSettings.zastavka.spr_typ_re.Match(Self.Souprava.typ)) then
  
negative.code:    Self.fTUStav.zast_stopped := false;
    end;
  
   Self.fTUStav.zast_passed := false;
   Self.fTUStav.zast_zpom_ready := false;
  
   if (Self.zastavkaLichy) then
    begin
     Self.TUSettings.zastavka.ev_lichy.zastaveni.Unregister();
     if (Self.TUSettings.zastavka.ev_lichy.zpomaleni.enabled) then
       Self.TUSettings.zastavka.ev_lichy.zpomaleni.ev.Unregister();
    end;
   if (Self.zastavkaSudy) then
    begin
     Self.TUSettings.zastavka.ev_sudy.zastaveni.Unregister();
     if (Self.TUSettings.zastavka.ev_sudy.zpomaleni.enabled) then
  