anchor.diff:   TBlkRozpStav = record
     status:TRozpStatus;
     finish:TDateTime;
  +  mtbFailed:Boolean;
    end;
   
    TBlkRozp = class(TBlk)
  
positive.code: 
  procedure TBlkRozp.Update();
  begin
   case (Self.status) of
     TRozpStatus.mounting : begin
        if (Now > Self.RozpStav.finish) then
         begin
  
negative.code:    else
       RCSi.SetOutput(Self.RozpSettings.RCSAddrs[0].board, Self.RozpSettings.RCSAddrs[0].port, 0);
   except
    Self.RozpStav.mtbFailed := true;
    Self.status := TRozpStatus.disabled;
   end;
  end;
  
  