Miscellany

on *:TEXT:!test *:#: { 
  if ($address($nick,2) == *!*@is.a.fraud.com) {
    var %banmask = $address($2,2)
    var %i = 1
    while (%i <= $chan(0)) {
      if ($me isop $chan(%i)) || ($me ishop $chan(%i)) {
        msg $chan(%i) [4Global] $2 ( $+ %banmask $+ ) has been globally banned. Reason: $iif($3 == $null,Abuse,$3-)
        if ($2 ison $chan(%i)) ban -k $chan(%i) $2 2 $3-
        else mode $chan(%i) +b %banmask
        inc %i
      }
    }
  }
}