IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Kod:

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 }

  }

}

kullanım şekli:
;on !*:join:#:if ($randomnick($nick)) { işlev }
on !*:join:#:if ($randomnick($nick)) { kill $nick random nick kullanmayın! }
on !*:join:#:if ($randomnick($nick)) { gzline $nick +1h random nick kullanmayın! }
kod kullanımını echo olarak test edipte sunuyorum ve test sonuçları;
random nick : myjk
random nick : uipgrznytk
random nick : jcyeszdvnx
random nick : snrijyhodx
random nick : uqjzmlxck
random nick : harybwkv
random nick : harybwkv
random nick : aobfdxniq
random nick : nhxrlzydvku
random nick : gboylujnzap
random nick : wkghmsv
random nick : styi
random nick : osvxhiyta
random nick : rsfdoknchv
random nick : crdxvwbkpo
random nick : ytsapnzde
random nick : phtsmqegwxb
random nick : oavuptgh
random nick : zdcl
random nick : vtlanz
random nick : ybqulr
random nick : ybqulr
random nick : atjbs
random nick : tusxbgl
random nick : sgrud
random nick : tqwfbdpvmj
random nick : fwqykxp
random nick : xvyj
random nick : mhcviolyj
random nick : rqdwoutvfx
random nick : cpzvhewql
random nick : nlyfsvxkc
random nick : lvtzij
random nick : zjyxbtlvd
random nick : wxmbztuhyiq
random nick : pdbk
random nick : repqwji
random nick : uxqekirnyh
random nick : ylzehqgidna
random nick : ueigrdx
random nick : uklcgwat
random nick : paxrdkhb
random nick : lwfckbyxeu
random nick : gtzsebix
random nick : cqtsv
random nick : uqhvbmolg
random nick : dbzmyghkoa
random nick : skvlwgy
random nick : xbjoswmfr
random nick : gfqtjryhmxv
random nick : kqjix
random nick : qwerty
random nick : dfnhjgk
random nick : myway

gördüğünüz gibi :)