caps SORUN [CODE] alias capsban { if (%ipban == on) { //Ban -u $+ 900 # $nick 2 } | mode # +b $$1 } #caps off on @*:TEXT:*:#: { if $me !isop $chan { halt } | if $nick isop $chan { halt } if ($len($1-) < 50) || ($nick isop #) return var %text = $strip($remove($1-,$chr(32))) var %non.caps = $len($removecs(%text,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O ,P,Q,R,S,T,U,V,W,X,Y,Z)) var %full.line = $len($strip($remove(%text,$chr(32)))) var %percent = $calc(1 - (%non.caps / %full.line)) if (%percent >= 0.8) { /mode $chan +b $address($nick,2) | /kick $chan $nick13CAPS LOCK/OFF2( $+ % $+ $calc(%percent * 100) $+ ) unset %CAPS. $+ $nick } } #caps end elimde burdan aldıgım bu sekilde bir CAPS koruması var.Fakat çalışmıyor.Uyarıda hatada vermiyor.Sadece calışmıyor.(SERVER CR) --------------------------------------------------------------- on @*:text:*:#:{ if $regex($1-,/([[:print:]])\1\1/gi) >= 9 { var %< = $+(%,harf.,#,.,$nick) | inc $(%<,1) if $(%<,2) == 2 { ban -k # $nick 3 kez harf uzattığın için kicklendin. | unset $(%<,1) } else { msg # 6 $nick 4Harf Uzatmaya devam ederseniz...8Kanaldan uzaklaştırılıcaksanız.. } } } BUDA HARF UZATMA KORUMASI.uyarıları yapıyor fakat adam kanaldan banlanmıyor.5 nci satır problemli diye uyarı veriyor..Biçok sey denedim fakat çözemedim.Yardımcı olursanız sevinirim(server CR) |
Cevap: caps SORUN Kod: on @*:text:*:#:{ Kod: on @*:TEXT:*:#:{ Kod sahibi L4roXyL |
Cevap: caps SORUN öncelikle yardım için tşk ler... * /if: insufficient parameters (line 9, Caps) devilgirl BU CAPS KORUMASININ VERDİGİ HATA...(SENDEN ALDIGIM) 2 ncisine gelince senin verdigin uzun yazı koruması..O var bende.BENİM verdigimse harf uzatma. (aliiiiiiiiiiiiiii gibi ) ...Yani farklı korumalardan bahsediyoruz. |
Cevap: caps SORUN Kod: |
Cevap: caps SORUN bu daha iyi olsu tşkler.. |
Cevap: caps SORUN RapstaR verdigin kod calıstı tşk ler kardeşim.Ama su kanal secme olayını nasıl ortadan kaldırabilirim? Tüm kanallarda gecerli olsun istiyorum. if ($nick ison #ss1) { halt } if ($nick ison #Yönetim) { halt } if ($chan == #Yardim) { halt } if ($chan == #Helper) { halt } SU BÖLÜM YANİ..kanal belirlemek degilde..Op oldugum tüm kanallarda çalısmasını istiyorum. NOt:Pit-10 arkadaşım yerime tşk etmezsen sevinirim.. |
Yanıt: caps SORUN kod tum op oldugun kanallardacalisacak ama sadece onlarda calismayacak yani bunlarda if ($nick ison #ss1) { halt } if ($nick ison #Yönetim) { halt } if ($chan == #Yardim) { halt } if ($chan == #Helper) { halt } |
Cevap: caps SORUN Alıntı:
[23:38] <MVP> Aaaaaaaaa [23:38] * Efendinn sets mode: +bb MVP!*@* *!*@******** |
Cevap: caps SORUN Alıntı:
|
Yanıt: caps SORUN bende de var bi tane denemek istersen buyur on @*:text:*:#: { var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%< 10)) * 100)) if $nick !isop # && %> >= 77 && $len(%< >= 20) { inc -u70 $+(%,cc.,#,$nick) | var %' = $($+(%,cc.,#,$nick),2) if %' == 1 { msg $chan UYARI! $nick Lütfen CapsLock Tuşunu kapatarak yazınız. } if %' == 2 { msg $chan UYARI: $nick Lütfen CapsLock Tuşunu kapatarak yazınız. Aksi Taktirde kanaldan uzaklaştırılıcaksınız. } if %' == 3 { mode $chan +b $nick | msg $chan $nick Uyari almistiniz Buyuk Harf Kullanmama Konusunda. | timer 1 60 mode $chan -b $nick } } |
Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:54. |
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