Anonymous

proc msg:say {nick host hand arg} {
  return 0
  set arg1 [lindex $arg 1]
  if {[lindex $arg 0] == ""} {
    notice $nick :Please supply a channel to say this in."
    return 0
  }
  if {[string index $arg 0] != "#"} {
    notice $nick :You need a # in front."
    return 0
  }
  if {[string index $arg 1] == "!"} {
    putserv "NOTICE $nick :Having ! in front has been disabled for security reasons."
    return 0
    } else {
    putserv "PRIVMSG [lindex $arg 0] :[lindex $arg 1]"
    putserv "NOTICE $nick :[string index $arg1]"
  }
}