bind join - * wjoin proc wjoin {nick host handle chan} { set game "#frihost-games" set channel "#frihost" if {$chan == $channel} { if {$nick == "Rvec"} { putserv "PRIVMSG $nick :This is the short welcome msg. If you have questions ask Rvec." } else { putserv "PRIVMSG $nick :Welcome to $chan $nick. Enjoy your stay here and most of all have FUN !!" }}}