on !*:JOIN:#:{
  var %x = 1
  while (%x <= $lines($mircdirbadnicks.txt)) {
    if ($read(badnicks.txt,%x) iswm $nick) {
      ban -ku600 $chan $nick 2 12¤1©4»1"طــرد سـريــع- مــطـرود«"4«1©12¤
    }
    inc %x
  }
}


alias checknicks {
  var %x = 1
  while (%x <= $lines($mircdirbadnicks.txt)) {
    if ($read(badnicks.txt,%x) iswm $newnick) {
      /msg #english $nick and $newnick and $comchan
      ban -ku600 #مصر $newnick 2 12¤1©4»1"طــرد سـريــع- مــطـرود«"4«1©12¤
    }
    inc %x
  }
}



on !*:NICK:{ checknicks }