TCL Neuling benötigt Hilfe

Hier bekommt Ihr Antworten auf Eure Fragen zum Eggdrop-Hosting von Shellfire

Moderatoren: Florian, Matze, Max, Lui

Butterblume
Beiträge: 5
Registriert: 02 Aug 2010 12:42

TCL Neuling benötigt Hilfe

Beitragvon Butterblume » 12 Sep 2011 14:46

Hallo,

ich bin was tcl angeht, absolut unerfahren.
Nun hat mir ein Freund ein Script erstellt, leider funktioniert es nicht so wie es soll.

Der Eggdrop soll bei Änderung der Anzahl der Chatter einfach nur kurz auf eine Internetseite gehen um die Anzahl zu übermitteln.
Dazu soll er vorher die Anzal der Chatter auslesen und diese dann als Variable an die http-Adresse anhängen, dadurch wird dort die Anzahl der Chatter registriert. (Hoffentlich könnt ihr verstehen, wie ich das meine)
Sinn des ganzen soll sein, daß ich die Anzahl der Chatter im Forum anzeigen kann.

Wir haben nun folgendes Script erstellt, doch irgendwo ist der Wurm drin.
Hat jemand eine Idee, woran es liegen könnte?


Code: Alles auswählen

set nickchan "#meinforum.net"

bind join * * on_join
bind part * * on_part
bind nick * * on_nickchange
bind sign * * on_quit
bind kick * * on_kick

proc send_usernumber {args} {
  set chanusers [chanlist $nickchan]
  set x [llength $chanusers]
  set url "http://forum.meinforum.net/misc.php?do=chatstats&ircuser="
  append url $x
  # command option causes ::http::geturl to return immediately
  catch {set token [http::geturl $url -command httpCallback -timeout 3000]} error
}

# HTTP operation is done in the background
proc httpCallback {token} {
    # do nothing but the request itself
    upvar #0 $token state
}

proc on_join {nick uhost hand channel} {
  send_usernumber
}

proc on_part {nick uhost hand channel} {
  send_usernumber
}

proc on_nickchange {nick uhost hand channel} {
  send_usernumber
}

proc on_quit {nick uhost hand channel} {
  send_usernumber
}

proc on_kick {nick uhost hand channel} {
  send_usernumber
}

putlog "user counter loaded"



Oder weiß jemand ein fertiges Script? Ich habe schon auf den einschlägigen Seiten gesucht, aber nichts gefunden.


Vielen Dank
Butterblume

Zurück zu „Eggdrop Support“

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 1 Gast