Unnamed

on *:TEXT:.blist *:#: { 
  if ($address($nick,2) = $address($me,2)) {
    /ban $chan -k $2 2 $3-
    /amsg I am Blacklisting $2 because of "4 $+ $3- $+ " If you have a complaint /msg $nick .
    set %ban $+ $2 On
    set %banreason $3-
  }
else { halt } }

on :JOIN:#: {
  if (%ban $+ $nick == on)
  /ban $chan  -k $nick 2 $banreason
}
else { halt } }