Someone

alias blist {
  if ($2- == $null) {
    /g I have globally blacklisted $$1 $+ . Reason: None specified. If I do not have Halfop+ in this channel, please ban this person.
    set %blacklist. [ $+ [ $$1 ] ] on
    set %blacklist.reason [ $+ [ $$1 ] ] None specified.
  }
  else {
    /g I have globally blacklisted $$1 $+ . Reason: $2- $+ . If I do not have Halfop+ in this channel, please ban this person.
    set %blacklist. [ $+ [ $$1 ] ] on
    set %blacklist.reason [ $+ [ $$1 ] ] $2- $+ .
  }
}
alias unblist {
  if ($2- == $null) {
    /g I have globally unblacklisted $$1 $+ .
    unset %blacklist. [ $+ [ $$1 ] ]
    unset %blacklist.reason [ $+ [ $$1 ] ]
  }
}
on :JOIN:#: {
  if (%blacklist. [ $+ [ $nick ] ] == on) {
    if ($me isop $chan) || ($me ishop $chan) {
      mode $chan +b $address($nick,2)
      kick $chan $nick Blacklisted. Reason: %blacklist.reason [ $+ [ $$1 ] ]
    }
  }
}