## BINDS bind pub n|n "% $nick !nick" pub:nick bind pub n|n "% !nick" pub:nick bind pub n|n "% $nick !join" pub:join bind pub n|n "% !join" pub:join bind pub n|n "% $nick !part" pub:part bind pub n|n "% !part" pub:part bind pub n|n "% $nick !c" pub:cmd bind pub n|n "% !c" pub:cmd ## PROCS proc pub:nick {n u h c a} { if {[lindex $a 1] == $nick} { putserv "nick [lindex $a 3]" } else { putserv "nick [lindex $a 2]" } } proc pub:join {n u h c a} { } proc pub:part {n u h c a} { } proc pub:cmd {n u h c a} { }