#bind <type> - <command> <procedure>


#bind pub <flags> <command> <proc>
#procname <nick> <user@host> <handle> <channel> <text> 



bind pub - !n nickfunc
 
proc nickfunc {nick uhost hand chan text} {
 	if {![validuser $nick]} { return "" }
 	set nicklwr [string tolower $nick]
 	foreach user [userlist] {
 		if {[string tolower $user] == $nicklwr} {
 			return "$user"
 		}
 	}
 	putserv "PRIVMSG $chan :$nick: hello"
 	return ""
}


