Harf Uzatma ve Tekrar Koruması

[chain]

on @*:text:*:#:{
if $nick isop $chan { halt }
if ($1- === $upper($1-)) && ($len($1-) > 20) {
.msg # $nick UYARI: $nick  # Kanalında Büyük Harf Kullanmayınız, Lütfen kurallara uyunuz.! Bu şekilde devam etmeniz kanaldan uzaklaştırılmanıza neden olucaktır.!!
}
}
 
on *:text:*:#:{ if $nick isop $chan { .halt } { if $chan == #Ops { .halt } { if $chan == #konsey { .halt } { if $chan == #yonetim { .halt }
if $regex($1-,/([[:print:]])11/gi) >= 8 {
var %< = $+(%,harf.,#,.,$nick) | inc $(%<,1)
if $(%<,2) == 2 { .samode # +b $nick | .msg $nick harfleri uzatma demiştim! }
else {
.msg $chan UYARI: $nick $+ , Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız!
}
}
}
}
}