on *:TEXT:!bl*:#:{ if ($nick isop $chan || $nick ishop $chan) {
    set %bl [ $+ [ $chan ] ] $2-
    mode $chan +b %bl [ $+ [ $chan ] ]
    kick $chan %bl [ $+ [ $chan ] ]
    notice %bl [ $+ [ $chan ] ] 14You have been blacklisted from4 $chan 14please notice an op for an appeal 
  inc %used }
}
on *:JOIN:#:{ if ($nick == %bl [ $+ [ $chan ] ]) {
    mode $chan +b %bl [ $+ [ $chan ] ]
    kick $chan %bl [ $+ [ $chan ] ]
  notice %bl [ $+ [ $chan ] ] 14You are blacklisted from4 $chan 14please notice an op for an appeal }
}
on *:TEXT:!dbl*:#:{ if ($nick isop $chan || $nick ishop $chan) {
    mode $chan -b %bl [ $+ [ $chan ] ]
    notice %bl [ $+ [ $chan ] ] 14You are now un-blacklisted from4 $chan
  unset %bl [ $+ [ $chan ] ] }
}
on *:TEXT:!whoisbl*:#:{ if ($nick isop $chan || $nick ishop $chan) {
  notice $nick 14The current user blacklisted is4 %bl [ $+ [ $chan ] ] }
}