anchor.diff:          if ((Blk as TBlkVyhybka).Poloha <> TVyhPoloha(Self.fproperties.Odvraty[i].Poloha)) then
            begin
             if (stavim >= _JC_MAX_VYH_STAVENI) then
  +           begin
  +            if (nextVyhybka = -1) then
  +              nextVyhybka := i;
               continue;
  +           end;
             Inc(stavim);
            end;
   
  
positive.code:                                    true, false, Self.VyhPrestavenaJCPC, Self.VyhNeprestavenaJCPC);
         end;
  
        Self.fstaveni.nextVyhybka := stavim;
  
        writelog('Krok 10 : zamky: nastavuji zavery', WR_VC);
        for i := 0 to Self.fproperties.zamky.Count-1 do
  
negative.code:       writelog('Krok 10 : vyhybky: zamykam do pozadovanych poloh', WR_VC);
        Self.fstaveni.nextVyhybka := -1;
        stavim := 0;
        nextVyhybka := -1;
        for i := 0 to Self.fproperties.Vyhybky.Count-1 do
         begin
          Blky.GetBlkByID(Self.fproperties.Vyhybky[i].Blok, Blk);
          if ((Blk as TBlkVyhybka).Poloha <> TVyhPoloha(Self.fproperties.Vyhybky[i].Poloha)) then
           begin
            if (stavim >= _JC_MAX_VYH_STAVENI) then
             begin
              if (nextVyhybka = -1) then
                nextVyhybka := i;
              continue;
             end;
            Inc(stavim);
           end;
  
          writelog('Stavim ' + Blk.name, WR_VC);
          (Blk as TBlkVyhybka).SetPoloha(TVyhPoloha(Self.fproperties.Vyhybky[i].Poloha),
                                         true, false, Self.VyhPrestavenaJCPC, Self.VyhNeprestavenaJCPC);
         end;
  