Stuff

alias blacklist {
  writeini blacklist.ini black $address($$1,3) $iif($2,$2-,no reason)
  var %c 1
  while ($chan(%c)) {
    if ($me isop $v1) || ($me ishop $v2) ban -k $chan(%c) $1 3 10Blacklisted2:4 $2-
    inc %c
  }
  msg $chan 10 I am now blacklisting2:4 $$1 $iif($2,10reason2:4 $2-)
}

alias unblacklist {
  var %c 1
  while ($chan(%c)) {
    if ($me isop $v1) || ($me ishop $v2) /mode $chan -b $address($$1,3)
    inc %c
    msg $chan  10 I am now unblacklisting2:4 $$1 $iif($2,10reason2:4 $2-)
    remini blacklist.ini black $address($1,3)
  }

  on *:join:#:{
    if (($me isop $chan || $me ishop $chan)) && ($readini(blacklist.ini,black,$address($nick,3))) {
      ban -k # $nick 3 $v1
    }
  }
}