anchor.diff:        procedure SendNickNameListReceived;
         procedure SendParted;
         procedure SendQuit;
  -      procedure SendServerMessage;
  -      procedure SendNotice(const Msg: string); overload;
  +      procedure SendServerMessage; overload;
  +      procedure SendServerMessage(const Msg: string); overload;
         procedure SendUserJoined;
         procedure DoConnect;
         procedure MessageBox(const Msg: string);
  
positive.code:   FNickName := ANickname;
    TIdSync.SynchronizeMethod(@SendUserJoined);
  
    SendNotice(StrJoined + ANickname + ' - ' + AHost + ' - ' + AChannel);
  end;
  
  procedure TIRC.OnLeave(ASender: TIdContext; const ANickname, AHost, AChannel, APartMessage: String);
  
negative.code: 
  procedure TIRC.ConfigureEncoding;
  begin
   FIdIRC.IOHandler.DefStringEncoding := TIdTextEncoding.ASCII;
  end;
  
  function TIRC.FormatarMensagem(const NickName, Message: string): string;
  