on $*:TEXT:/^[!@.`]((Del|Rem)B(lacklist|list))/Si:#: {
  if ($nick isop $.chan) { writeini KCount.ini $network $2 0 | remini BlackList.ini $network $2 | notice $nick $2 has been unblacklisted. }
}
on $*:TEXT:/^[!@.`]B(lacklist|list) /Si:#:{
  if ($nick isop $.chan) { writeini KCount.ini $network $2 5 | writeini BlackList.ini $network $2 $iif($3,$3-,No Reason) | notice $nick $2 has been blacklisted for $iif($3,$3-,No Reason) | $iif($me ison $2,part $2 BlackListed) }
}