on $*:snotice:/.+Client connecting.+([0-9]{4}):\s(.+)\s\x28(.+)@.+/Si: { 
  if !$istok(7000,$regml(1),32) {
    var %t = $remove($regml(2),1,2,3,4,5,6,7,8,9,0,\,`,^,|,-,_),%t2 = $remove($regml(3),1,2,3,4,5,6,7,8,9,0,\,`,^,|,-,_),$&
      %n = $regml(2), %i = $regml(3), %s+ = $regex(%t,/([aeoui])/ig), %s- = $regex(%t,/([^aeoui])/ig), %s2+ = $regex(%t2,/([aeoui])/ig), %s2- $regex(%t2,/([^aeoui])/ig),$&
      %% = $round($iif($round($calc((%s- * 100) / $len(%t)),1) > 100, 100, $round($calc((%s- * 100) / $len(%t)),1)),0), %%2 = $round($iif($round($calc((%s2- * 100) / $len(%t2)),1) > 100, 100, $round($calc((%s2- * 100) / $len(%t2)),1)),0),$&
      %rate = 73
    if ($len(%t) > 4) && (%% > %rate) { 
      gline $+(*@,$regsubex($10,/..+@(.+)\x29/g,\1)) +0 Random Nick Olarak Algılandınız ! | return
    }
    if ($len(%t2) > 4) && (%%2 > %rate) { 
      gline $+(*@,$regsubex($10,/..+@(.+)\x29/g,\1)) +0 Random Ident Olarak Algılandınız !
    }
  }
}