Something

on *:INVITE:#:{ 
  join $chan 
  timer 1 2 check.blk $nick $chan 
} 
on *:TEXT:!addbadnick *:#: { 
  if ($address($nick,2) == $address($me,2)) { 
    notice $nick Added $2 to Blacklist. 
    writeini badnickslist.ini Nicks $2 $iif($3,$3-,Unknown) 
  } 
} 
on *:TEXT:!delbadnick *:#: { 
  if ($address($nick,2) == $address($me,2)) { 
    notice $nick Deleted $2 from Blacklist. 
    remini badnickslist.ini Nicks $2 
  } 
} 
alias check.blk { 
  var %i = 1 
  while (%i < $1($2,0) || %i == $1($2,0)) { 
    if ($readini(badnickslist.ini,-n,Nicks,$1($2,%i))) { 
      part $2 You have a Blacklisted User Reason: $readini(badnickslist.ini,-n,Nicks,$1($2,%i)) 
    } 
    inc %i 
  } 
}