anchor.diff:  procedure TBlkDisconnector.UpdateOutput();
   begin
     try
  -    if (Self.state = TBlkDiscBasicState.active) then
  -      RCSi.SetOutputs(Self.m_settings.RCSAddrs, 1)
  -    else
  -      RCSi.SetOutputs(Self.m_settings.RCSAddrs, 0);
  +    RCSi.SetOutputs(Self.m_settings.RCSAddrs, ite(Self.active, 1, 0));
     except
       Self.m_state.rcsFailed := true;
       Self.state := TBlkDiscBasicState.disabled;
  
positive.code:   if (Self.note <> '') then
      bg := clTeal;
  
    Result := Result + ownConvert.ColorToStr(fg) + ';' + ownConvert.ColorToStr(bg) + ';0;';
  end;
  
  /// /////////////////////////////////////////////////////////////////////////////
  
negative.code:   Self.state := TBlkDiscBasicState.not_selected;
  end;
  
  ////////////////////////////////////////////////////////////////////////////////
  
  function TBlkDisconnector.IsActive(): Boolean;
  begin
    Result := ((Self.state = TBlkDiscBasicState.active) or (Self.state = TBlkDiscBasicState.shortTimeRemaining));
  end;
  
  ////////////////////////////////////////////////////////////////////////////////
  
  end.// unit
  