This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

Begrüßungs script

Help for those learning Tcl or writing their own scripts.
Post Reply
B
Balu_der_Baer
Voice
Posts: 1
Joined: Sat Feb 18, 2006 4:56 am

Begrüßungs script

Post by Balu_der_Baer »

Hallo alle zusammen
Ich suche ein script welches den user bei eintritt in den chan begrüßst und sagt"hallo (nick) schön dich zu sehen setz dich fühl dich wohl du bist person nr (123456) und das ist dein (xxx) login. ich kenne so ein script vom angel bot.Währe super wenn mir jemand helfen könnte.
W
Winters
Voice
Posts: 29
Joined: Sat Jul 09, 2005 12:24 pm

Post by Winters »

Code: Select all

setudef str counter

bind join - * join:greet

proc join:greet {nick host hand chan} {
if {"[channel get $chan counter]" == ""} {
channel set $chan counter "0"
}
set id "[channel get $chan counter]"
channel set $chan counter "[expr $id + 1]"
putserv "privmsg $chan :Moin $nick schön dich in $chan zu sehen. Setz dich und fühl dich wohl. Du bist Person Nr. [expr $id +1]."
}
Das sollte klappen :)
Post Reply