Eggdrop Broadcast

bind pub n !broadcast pub_do_broadcast
# Broadcasts a message to every channel the bot is on
proc pub_do_broadcast {nick host hand chan text} {
  if {[string length $text] > 0} {
    set text [string trim $text "{}"]
    foreach n [channels] { puthelp "PRIVMSG $n :14(4BROADCAST14): $text" }
  }
}

putlog "Broadcast v1.0 by Wikked Loaded"