alias ipekle { 
  write iptakip.txt $1  | echo -a 06" $1 " eklendi.
}
on *:snotice:*client connecting*: {
  var %tstx = 1 | while $read(iptakip.txt,%tstx) {
    if $v1 iswm $gettok($remove($10,$chr(41)),2,64) { msg #kanal Nick : $9 Ident : $remove($gettok($10,1,64),$chr(40),$chr(41)) IP araligi : $gettok($remove($10,$chr(41)),2,64) | break }
    inc %tstx
  }
}