on *:TEXT:~bl*:#: { if ($nick isop $chan) {
    set %ablack $2 
    kick $2 $chan
    notice $2 You Have Been Blacklisted From This Channel
  msg $chan 14 $2 12Has Been Added to the BlackList }
}
on *:Enter:#: { if ($nick == %ablack) {
    mode $chan +b $nick
    kick $chan $nick
  notice $nick 4BlackListed }
}
on *:TEXT:~dbl*:#: { if ($nick isop $chan) {
  set %ablack noone }
}