bind pubm - "* !*" pubm_commands proc pubm_commands {nick host handle channel stuff} { if {[string tolower [lindex $stuff 0]] == "!commands"} { putserv "PRIVMSG $channel :COmmands for bot putserv "PRIVMSG $channel :!hello - says hello putserv "PRIVMSG $channel :!watsup - asks you watsup return 0 } if {[string tolower [lindex $stuff 0]] == "!hello"} { putserv "PRIVMSG $channel :Hello there, $nick! } }