bind notc - nickserv proc nickserv {nick uhost hand text {dest ""}} { global botnick; global owner; if {$dest == ""} {set dest $botnick} if {$nick == "NickServ"} { if [regexp {.+IDENTIFY.+} $text] { putserv "PRIVMSG NickServ :IDENTIFY *******" putserv "NOTICE $owner :identifying...." } } }