Mine

on $*:text:/^[!@`.]blacklist */Si:#: { 
  if ($nick isop $chan) { 
    writeini BLACKLIST.ini BLACKLISTED nicks $address($2,2)
    msg $chan $2 has been added to $chan $+ 's blacklist. 
    cs akick $chan add $2
  } 
} 
on $*:text:/^[!@`.]unblacklist */Si:#: { 
  if ($nick isop $chan) { 
    remini BLACKLIST.ini BLACKLISTED nicks $address($2,2)
    msg $chan $2 has been deleted from $chan $+ 's blacklist. 
  } 
} 
on *:JOIN:#: { 
  if ($readini(BLACKLIST.ini,BLACKLISTED,nicks) == $address($2,2)){ 
    ban -k $chan $address($nick,2) You have been blacklisted from $chan $+ . 
  } 
}