Verbindung zum Quakenet klappt nicht!!

[Black-Rider]

Hallo,
ich bin grade dabei einen Bot für das IRC zu schreiben:
Soweit bin ich bis jetzt:

Delphi-Quellcode:

var
  Verbunden         : Boolean = FALSE;
  Nick              : String  = 'BLACKTEST TESTBLACK';
  SERVER_IDENT      : String  = 'bot';
  SERVER_HOST       : String  = '*zensiert*.dyndns.org';
  SERVER_IP         : String  =  'irc.quakenet.org';
  SERVER_Port       : Integer = 6669;
  SERVER_FNAME      : String  = 'TESTY';

procedure TForm1.Btn_ConnectClick(Sender: TObject);
begin  // Btn_ConnectClick
  with TCP_IRC do
    begin
      Host := SERVER_IP;
      Port := SERVER_Port ;
      Connect();
      Verbunden := True;
      WriteLn('nick ' + Nick);
      WriteLn('USER ' + SERVER_IDENT + ' ' + SERVER_HOST + ' ' + SERVER_IP + ' ' + SERVER_FNAME);
      Memo1.Lines.Add(TCP_IRC.ReadLn());
      Memo1.Lines.Add(TCP_IRC.ReadLn());
      Memo1.Lines.Add(TCP_IRC.ReadLn());
      Memo1.Lines.Add(TCP_IRC.ReadLn());
      Memo1.Lines.Add(TCP_IRC.ReadLn());
  end;  // with TCP_IRC do
end;  // Btn_ConnectClick


procedure TForm1.Btn_ReadClick(Sender: TObject);
begin  // Btn_ReadClick
  with TCP_IRC do
  begin
    Memo1.Lines.Add(TCP_IRC.ReadLn());
  end; // TCP_IRC
end;  // Btn_ReadClick

procedure TForm1.Btn_JoinClick(Sender: TObject);
begin  // Btn_JoinClick
  with TCP_IRC do
  begin
    WriteLn('join #loomix');
    Memo1.Lines.Add(TCP_IRC.ReadLn());
  end;  // TCP_IRC
end; // Btn_JoinClick

Nach klicken auf Btn_ConnectClick wird im Memo folgendes ausgegeben:

Zitat:

NOTICE AUTH :*** Looking up your hostname
NOTICE AUTH :*** Checking Ident
NOTICE AUTH :*** Found your hostname
PING :2373891925
NOTICE AUTH :*** No ident response

Und wenn ich dann auf Btn_JoinClick klicke kommt:
:underworld1.no.quakenet.org 451 BLACKTEST BLACKTEST :Register first.

Aber durch USER registier ich den Clienten ja eigl. oder??

MFG
Black-Rider

[PeterPain]

Evtl solltest du sagen was TCP_IRC ist ;)

Wenn es um Indy10 gehehn sollte, dann google einfach mal, das Problem ist bekannt.

gruss

[Die Muhkuh]

Im Quakenet musst Dich doch per /AUTH authentifizieren?

[Black-Rider]

Hey ja! Ist mit Indy! Ich such mal aber viell. kannste mir ja helfen beim Suchen! Hab bis jetzt noch nichts gefunden, viell. such ich auch einfach mitm falschen Suchbegriff!

/auth ist was ganza anderes ;-) Damit meldet sich der Benutzer an um z.B. in L Adminrechte zu bekommen!

[Die Muhkuh]

Naja, wenn Du angemeldet bist, bist Du auch registriert oder?

Ein Versuch wäre es jedenfalls wert ;)

[Black-Rider]

Geht nicht, wie erwartet! Bei einem Noramlen IRC Clienten muss man sich ja auch nicht authen!

[PeterPain]

Der knackpunkt dabei war glaube ich, dass du in regelmässigen abständen und auch einmal direkt nach dem verbinden 'alive' signale senden musst. Wie genau die aussehen müssen weis ich gerade nicht mehr, aber das kannst du dir sicherlich nachlesen.

(kann auch sein, dass ich total daneben liege, aber wie gesagt, das gleiche Problem gibts auch mit der IRC komponente von Indy10)

gruss

[Die Muhkuh]

Hi,

also mit der 9er Version komm ich rein :-/ Ohne /auth oder /user etc. pp.

[PeterPain]

Zitat:

Zitat von Die Muhkuh

Hi,

also mit der 9er Version komm ich rein :-/ Ohne /auth oder /user etc. pp.

Das ist richtig, hat aber auch niemand in Frage gestellt ;)

[Black-Rider]

Könntet ihr mir mal nen Code reinstellen wo die Verbindung klappt??