|
|
 |
Okunma |
|
524 |
Facebookta Paylaş
Kod sayesinde kanal? N? Za giren klonu ve vekil ’ leri istedi? Iniz komut ile atman? Z? sa? l? yor.
takma randomnick if ($ randn2 ($ 1)) | | ($ randn ($ 1)) (return $ true) | else (return $ false)
alias randn2 (
$ 1 - isalpha & & $ 1 IF - islower (
(($ count ($ 1, a, e, i, o, u) if> = 4)) () $ return false
if ($ regex ($ 1 -,/([[: print:]]) \ \ \ \ 1 \ \ \ \ 1/gi)> = 1) () $ return false
($ len ($ 1) if> = 4) & & ($ regex ($ 1, / ^ [az ]+$)) (
if ($ regex ($ 1 ,/^[^ AEIOU] (3) /)) (return $ true)
elseif ($ regex ($ 1, / ([az]) \ \ \ \ 1 (2) /)) (return $ true)
elseif ($ regex ($ 1, / [AEIOU] (3 /)) (return $ true)
elseif ($ regex ($ 1, [^ u] q)) (return $ true)
elseif ($ regex ($ 1, / [^ aeioux] x [^ aeiouyx] /)) (return $ true)
else (return $ false)
)
)
)
alias randn (
$ 1 - isalpha & & $ 1 IF - islower (
if ($ regex ($ 1 -,/([[: print:]]) \ \ \ \ 1 \ \ \ \ 1/gi)> = 1) () $ return false
== 7 ($ len ($ 1)) (if
var% son = $ mid ($ 1, $ len ($ 1), 1)
var% son2 = $ mid ($ 1, $ calc ($ len ($ 1) - 1), 1)
(% son ==% son2) if () $ return false
eğer regex ($ ($ 1,3), sol $ / (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)
(% son ==% son2) if () $ return false
eğer regex ($ ($ 1,3), sol $ / (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)
(% son ==% son2) if () $ return false
eğer regex ($ ($ 1,3), sol $ / (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)
(% son ==% son2) if () $ return false
eğer regex ($ ($ 1,3), sol $ / (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)
)
($ remove ($ 1, eğer / (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)
(% son ==% son2) if () $ 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)
(% son ==% son2) if () $ 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)
)
)
menü kanal durumu (
Random Nick Korumas?
AC:. # | Echo-Random Nick Korumas rasgele izin? Ac? Lm? D? R.
kapat:. # | echo-Random Nick Korumas rasgele devre dışı bırakırım? Kapat? Lm? D? R.
)
|
Yorumlar
