on *:join:#: {
  if ($level($+(*,$nick,*!@*)) == Random) {
    kill $nick : 1 $+ $$me random.
  }
   if ($level($+(*,$nick,*!@*))  == bad) {
    .timer 1 5 /mode # +b $nick
  }
}