Someone

alias global {
  smsg 7(14`14Amsg7) -- $1-
}

alias smsg {
  ; Make sure you are connected to a server and that the command isn't used as an identifier
  if (!$isid && $server) {
    ; Get the total amount of channels you are in on this server
    var %x = $comchan($me,0)
    ; Loop through them
    while (%x) {
      ; If the channel in this iteration is not one of those in the $istok, msg the input
      if (!$istok(#mSL #IRChelp #Help #draynor.net, $comchan($me,%x), 32)) {
        msg $comchan($me, %x) $1-
      }
      dec %x
    }
  }
}