Someone

alias bl { 
  writeini -n bot.ini blacklist $address($1,2) $2- 
  echo -a Blacklisted $address($1,2) under the nickname of: $1 for: $2- 
  amsg [amsg] Blacklisting $address($1,2) (or: $1 $+ ) for: $iif($2-,$2-,N/A) 
  var %a 0 
  while (%a < $chan(0)) { 
    inc %a 
    mode $chan(%a) +bb $1 $address($1,2) 
    kick $chan(%a) $1 [Blacklisted] $readini(bot.ini,blacklist,$address($1,2)) 
  } 
} 
alias debl { 
  remini bot.ini blacklist $address($1,2) 
  echo -a Deblacklisted $address($1,2) under the nickname of: $1 for: $2- 
  amsg [amsg] Deblacklisting $address($1,2) (or: $1 $+ ) for: $iif($2-,$2-,N/A) 
  var %a 0 
  while (%a < $chan(0)) { 
    inc %a 
    mode $chan(%a) -bb $1 $address($1,2) 
  } 
} 
alias blcheck { 
  var %a 0 
  while (%a < $chan(0)) { 
    inc %a 
    var %b 0 
    while (%b < $nick($chan(%a),0)) { 
      if ($readini(bot.ini,blacklist,$address($nick($chan(%a),%b),2))) { 
        mode $chan(%a) +bb $nick($chan(%a),%b) $address($nick($chan(%a),%b),2) 
        msg $chan(%a) The address $address($nick($chan(%a),%b),2) is blacklisted for: $readini(bot.ini,blacklist,$address($nick($chan(%a),%b),2)) $+ , attempting to kick+ban $nick($chan(%a),%b) $+ . 
        kick $chan(%a) $nick($chan(%a),%b) [Blacklisted] $readini(bot.ini,blacklist,$address($nick($chan(%a),%b),2)) 
      } 
    } 
  } 
} 
on *:JOIN:#: { 
  if ($readini(bot.ini,blacklist,$wildsite)) { 
    mode $chan +bb $nick $wildsite 
    msg $chan The address $wildsite is blacklisted for: $readini(bot.ini,blacklist,$wildsite) $+ , attempting to kick+ban $nick $+ . 
    kick $chan $nick [Blacklisted] $readini(bot.ini,blacklist,$address($1,2)) 
  } 
}