Büyük Harf Korumasi ( Regex Caps )

REgex ile yazılmış büyük harf korumasi kod’udur.

on @*:text:*:#: {
if ($len($1-) >= 20 ) {
if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
ban -ku600 $chan $nick Büyük Harf Koruması…! )
}
}
}

Alinti.