op ve voicelerde kodu etkisiz kılmak merhaba benim elimde ikitane kod var kodlarin birisi cocorico ya biriside el33t'e ait. cocoriconun kodu reg/regex kanalda birisi kelimeyi uzattigi zaman once uyari yapip sonra atiyor ama ben kanalda op ve voicelerin bu uyari da muaf ollmasini istiyorum yani benim bir opum veyahut voiceli birisi kanalda uzun yazi yazdigi zaman ona uyari yapmamasini ve atmamasini istiyorum reg/regex uzun yazi korumasi assagida belirtilmistir. on *^:text:*:#: { if ($regex($1-,/([[:print:]])\1\1/ig) >= $calc($coconf(U.limit)/3)) { inc $+(-u,$coconf(U.mem)) %uz [ $+ [ $nick ] ] 1 if (%uz [ $+ [ $nick ] ] >= $coconf(U.LM)) { .ban $+(-ku,$calc($coconf(U.kbs)*60)) $chan $nick $coconf(U.sb) .unset %uz [ $+ [ $nick ] ] } if (%uz [ $+ [ $nick ] ] >= $coconf(U.AL)) { msg $chan $nick $coconf(U.yr) } } } alias coconf { goto $1 :U.Limit { ;# harf limiti RETURN 15 } :U.LM { ;# Kac kezde atsın.. RETURN 2 } :U.AL { ;# Uyarı limiti (üstteki deger ile aynı-yüksek olmamalıdır.) RETURN 1 } :U.mem { ;# Hatayı yapan nikc-Adres'in Hafızada kalacagı süre (sn) RETURN 60 } :U.sb { ;# Kick Sebebi.. RETURN Sizi daha Once Harfleri uzatmamaniz icin uyarmistim.! } :U.yr { ;# Uyarı mesajı RETURN : Lutfen Harfleri Uzatmayiniz Aksi Taktirde Kanaldan Uzaklastirilicaksiniz.! } :U.kbs { ;# kikc\ban süresi "Dk." RETURN 15 } ikinci olan kod ise el33t tarafindan yazilmis bir kod oda kanalda birisi büyük harf ile yazdigi zaman once ozelden sonra kanaldan uyarip sonra atiyor. ben gene bu kodda op ve voicelerin muaf olmasini istiyorum yani atilmamasini istiyorum kod assagida belirtilmistir. on @*:text:*:#:{ var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%<)) * 100)) if $nick isreg # && %> >= 75 && $len(%< >= 20) { inc -u600 $+(%,cc.,#,$nick) | var %' = $($+(%,cc.,#,$nick),2) if %' == 1 { msg $nick 4UYARI! 1 Lütfen 4CapsLock1 Tuşunu kapatarak yazınız. } if %' == 2 { msg $chan UYARI: $nick 4Lütfen 1 CAPSLOCK tusunu kapayiniz ! } if %' >= 3 { ban -ku600 # $nick 2 Uyarilmistiniz. 4Lutfen Kucuk Yaziniz. | unset $+(%,cc.,#,$nick) } } } |
if $nick isreg # && %> >= 75 && $len(%< >= 20) { Zaten ikinci kod eğer kanalda normal user ise devam etmesi için ayarlanmış. Bir kodun op ve voice icin uygulanmasını istemiyorsan yapıcağın eklemede burda el33t nin verdiği gibi if $nick isreg # eklediğinde kanalda normal userler o eventten etkilenir. Bu arada lütfen başlıkları acmaya dikkat edelim.Aynı hareketin tekrarlanmasında actığınız başlık silinecektir ,bilginize. |
mael.. peki ya uzun yazi korumasi ? |
on *^:text:*:#: { if ($me isop #) { if ($nick !isop #) { if ($regex($1-,/([[:print:]])\1\1/ig) >= $calc($coconf(U.limit)/3)) { inc $+(-u,$coconf(U.mem)) %uz [ $+ [ $nick ] ] 1 if (%uz [ $+ [ $nick ] ] >= $coconf(U.LM)) { .ban $+(-ku,$calc($coconf(U.kbs)*60)) $chan $nick $coconf(U.sb) .unset %uz [ $+ [ $nick ] ] } if (%uz [ $+ [ $nick ] ] >= $coconf(U.AL)) { msg $chan $nick $coconf(U.yr) } } } } } alias coconf { goto $1 :U.Limit { ;# harf limiti RETURN 15 } :U.LM { ;# Kac kezde atsın.. RETURN 2 } :U.AL { ;# Uyarı limiti (üstteki deger ile aynı-yüksek olmamalıdır.) RETURN 1 } :U.mem { ;# Hatayı yapan nikc-Adres'in Hafızada kalacagı süre (sn) RETURN 60 } :U.sb { ;# Kick Sebebi.. RETURN Sizi daha Once Harfleri uzatmamaniz icin uyarmistim.! } :U.yr { ;# Uyarı mesajı RETURN : Lutfen Harfleri Uzatmayiniz Aksi Taktirde Kanaldan Uzaklastirilicaksiniz.! } :U.kbs { ;# kikc\ban süresi "Dk." RETURN 15 } bu sekilde olmasi gerek |
Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 18:30. |
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net