anchor.diff:    end;
   
     Result := Result + 'STIT,';
  +
  +  if (Self.emLock) then
  +    Result := Result + '!ZAV<,'
  +  else
  +    Result := Result + 'ZAV>,';
   
     if (RCSi.simulation) then
     begin
  
positive.code:     Inc(Self.m_state.emLock);
      if (Self.m_state.emLock = 1) then
      begin
        {if (Self.keyReleased) then
        begin
          Self.m_state.keyReleased := false;
          Self.CallChangeToTurnout();
        end;}
        inherited Change();
      end;
    end else begin
      if (Self.m_state.emLock > 0) then
        Dec(Self.m_state.emLock);
      if (Self.m_state.emLock = 0) then
      begin
        // pokud vyhybky nejsou ve spravne poloze, automaticky uvolnujeme klic
        {if (not Self.IsRightPoloha()) then
          Self.keyReleased := true
        else
        begin
          Self.CallChangeToTurnout();
          inherited Change();
        end;
        Blocks.NouzZaverZrusen(Self);}
      end;
    end;
  end;
  
  
negative.code: 
  function TBlkPst.GetZaver(): Boolean;
  begin
    for var trackId in Self.m_settings.tracks do
    begin
      var blk := Blocks.GetBlkByID(trackId);
      if ((blk <> nil) and ((blk.typ = btTrack) or (blk.typ = btRT)) and (TBlkTrack(blk).zaver > TZaver.no)) then
        Exit(true);
    end;
    Result := false;
  end;
  
  