alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false } 
alias randn2 { 
if $1- isalpha && $1- islower { 
if (($count($1,a,e,i,o,u) >= 4)) { return $false } 
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false } 
if ($len($1) >= 4) && ($regex($1,/^[a-z]+$)) { 
if ($regex($1,/^[^aeiou]{3}/)) { return $true } 
elseif ($regex($1,/([a-z])\1{2}/)) { return $true } 
elseif ($regex($1,/[aeiou]{3/)) { return $true } 
elseif ($regex($1,q[^u])) { return $true } 
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true } 
else { return $false } 
} 
} 
} 
alias randn { 
if $1- isalpha && $1- islower { 
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false } 
if ($len($1) == 7) { 
var %son = $mid($1,$len($1),1) 
var %son2 = $mid($1,$calc($len($1) - 1),1) 
if (%son == %son2) { return $false } 
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true } 
else { return $false } 
} 
elseif ($len($1) == 8) { 
var %son = $mid($1,$len($1),1) 
var %son2 = $mid($1,$calc($len($1) - 1),1) 
if (%son == %son2) { return $false } 
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true } 
else { return $false } 
} 
elseif ($len($1) == 9) { 
var %son = $mid($1,$len($1),1) 
var %son2 = $mid($1,$calc($len($1) - 1),1) 
if (%son == %son2) { return $false } 
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true } 
else { return $false } 
} 
elseif ($len($1) == 10) { 
var %son = $mid($1,$len($1),1) 
var %son2 = $mid($1,$calc($len($1) - 1),1) 
if (%son == %son2) { return $false } 
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true } 
elseif $regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true } 
else { return $false } 
} 
if ($regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true } 
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) { 
var %son = $mid($1,$len($1),1) 
var %son2 = $mid($1,$calc($len($1) - 1),1) 
if (%son == %son2) { return $false } 
else { return $true } 
} 
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) { 
var %son = $mid($1,$len($1),1) 
var %son2 = $mid($1,$calc($len($1) - 1),1) 
if (%son == %son2) { return $false } 
else { return $true } 
} 
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true } 
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true } 
else { return $false } 
} 
} 
menu channel,status { 
Random Nick Koruması 
Aç :.enable #random | echo -at Random Nick Koruması Acılmışdır. 
kapat:.disable #random | echo -at Random Nick Koruması Kapatılmışdır. 
} 
#random on 
on *:SNOTICE:*client*connecting*:if ($randomnick($9)) { sajoin $9 #Status } 
#random end