IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Büyük harf yazana önce ban sonra ceza (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/1025023-buyuk-harf-yazana-once-ban-sonra-ceza.html)

Forbidden 06 Ocak 2024 03:20

Büyük harf yazana önce ban sonra ceza
 
Başlıkta yazdıgı gibi ilk harf büyükse önce ban atar ban süresi biterse devam ederse uyarır devam ederse shun atar.

Not: Yetkililer ve karakterler muaftır.

Kod kullanmak istemeyenler spam ekleyebilir.


Kod:

on *:text:*:#mirchelp: {
  if $nick($chan,$nick,.~&@%).pnick { return }
  if $istok(Muafnick1 MuafNick2 MuafNick3,$nick,32) { return }
  if $isupper($karaktertemizle($strip($1-))) {
    inc -u300 $+(%,BüyükHarfUyarı.,$nick)
    if $eval($+(%,BüyükHarfUyarı.,$nick),2) = 2 { msg $chan $nick Büyük harf kullanımı yasaktır. 2 Dakika konusmanız yasaklanmistir. | ban -u120 $chan $nick }
    elseif $eval($+(%,BüyükHarfUyarı.,$nick),2) = 3 { msg $chan $nick Büyük harf kullanımı yasaktır. Devam ederseniz sunucuda susturulacaksınız. }
    elseif $eval($+(%,BüyükHarfUyarı.,$nick),2) = 4 { Shun $nick Sunucu kurallarına uymadıgınız için shunlandınız. Lütfen kurallara uyun. }
  }
}
alias karaktertemizle { return $remove($1-,$chr(33),$chr(34),$chr(35),$chr(36),$chr(37),$chr(38),$chr(39),$chr(40),$chr(41),$&
    $chr(42),$chr(43),$chr(44),$chr(45),$chr(46),$chr(47),$chr(58),$&
    $chr(59),$chr(60),$chr(61),$chr(62),$chr(63),$chr(123),$chr(124),$chr(125),$chr(126),$&
    $chr(127),$chr(128),$chr(129),$chr(130),$chr(131),$chr(132),$chr(133),$chr(134),$chr(135),$&
    $chr(136),$chr(137),$chr(138),$chr(139),$chr(140),$chr(145),$chr(146),$chr(147),$chr(148),$chr(149),$chr(150))
}


ZaLiM1979 06 Ocak 2024 14:08

Cevap: Büyük harf yazana önce ban sonra ceza
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] selam.. bu cod caps look yani hepsini büyük yazanlari degilde, tek 1 harf büyük yazan olsa onuda mi atiyor? eger öylese nicklerin büyük harf ile yazilmasinida yasaklamak gerekmezmi? :-)

Forbidden 06 Ocak 2024 15:05

Cevap: Büyük harf yazana önce ban sonra ceza
 
Selam @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yukarıda yanlış yazmışım ilk harf degil ilk kelime büyükse işlem yapar.

Örnek;

Kod:

[14:51:03] <Efsane> Deneme naber
[14:51:05] <Efsane> Deneme naber
[14:51:08] <Efsane> Deneme naber
[14:51:09] <Efsane> -
[14:51:11] <Efsane> DENEME naber
[14:51:12] <Efsane> DENEME naber
[14:51:12] <&Forbidden> Efsane Büyük harf kullanımı yasaktır. 2 Dakika konusmanız yasaklanmistir.
[14:51:12] * Forbidden mod değiştirdi:+b Efsane!*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Şunu ASLA unutma bu hayatta herşeyin bir kolay yolu vardır.

Bu kısmı;

Kod:

  if $isupper($karaktertemizle($strip($1-))) {
Bu şekilde değiştirsen şayet. 1. Kelimeyi baz almaz bu sayede büyük harfli nick yazılsa bile sorun olmaz.
2. kelimeyi baz alır ve işlem yapar zaten bunu flood tarzı büyük harfde saldırılarda kullanmak için yapılmış bir düşünce oldugu için sorun da olmamış olur.

Kod:

  if $isupper($karaktertemizle($strip($2))) {
Örnek;

Kod:

[14:54:25] <Efsane> DENEME naber
[14:54:27] <Efsane> DENEME naber
[14:54:29] <Efsane> DENEME naber
[14:54:30] <Efsane> -
[14:54:37] <Efsane> Deneme NABER
[14:54:39] <Efsane> Deneme NABER
[14:54:39] <&Forbidden> Efsane Büyük harf kullanımı yasaktır. 2 Dakika konusmanız yasaklanmistir.
[14:54:39] * Forbidden mod değiştirdi:+b Efsane!*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[14:56:40] * Forbidden mod değiştirdi:-b Efsane!*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu şekilde olur

Kodu istedigin şekil;

Kod:

on *:text:*:#mirchelp: {
  if $nick($chan,$nick,.~&@%).pnick { return }
  if $istok(Muafnick1 MuafNick2 MuafNick3,$nick,32) { return }
  if $isupper($karaktertemizle($strip($2))) {
    inc -u300 $+(%,BüyükHarfUyarı.,$nick)
    if $eval($+(%,BüyükHarfUyarı.,$nick),2) = 2 { msg $chan $nick Büyük harf kullanımı yasaktır. 2 Dakika konusmanız yasaklanmistir. | ban -u120 $chan $nick }
    elseif $eval($+(%,BüyükHarfUyarı.,$nick),2) = 3 { msg $chan $nick Büyük harf kullanımı yasaktır. Devam ederseniz sunucuda susturulacaksınız. }
    elseif $eval($+(%,BüyükHarfUyarı.,$nick),2) = 4 { Shun $nick Sunucu kurallarına uymadıgınız için shunlandınız. Lütfen kurallara uyun. }
  }
}
alias karaktertemizle { return $remove($1-,$chr(33),$chr(34),$chr(35),$chr(36),$chr(37),$chr(38),$chr(39),$chr(40),$chr(41),$&
    $chr(42),$chr(43),$chr(44),$chr(45),$chr(46),$chr(47),$chr(58),$&
    $chr(59),$chr(60),$chr(61),$chr(62),$chr(63),$chr(123),$chr(124),$chr(125),$chr(126),$&
    $chr(127),$chr(128),$chr(129),$chr(130),$chr(131),$chr(132),$chr(133),$chr(134),$chr(135),$&
    $chr(136),$chr(137),$chr(138),$chr(139),$chr(140),$chr(145),$chr(146),$chr(147),$chr(148),$chr(149),$chr(150))
}


nikotin 13 Ocak 2024 04:15

Cevap: Büyük harf yazana önce ban sonra ceza
 
Burda sadece büyük harf degil kanala giris yasagıda var.
Drekt ip ban yerine ~q: komutu kullanılsa fena olmaz.
Neyseki ban süresi 2 dak.
İnsaflıymıssınız. :)

Forbidden 13 Ocak 2024 18:24

Cevap: Büyük harf yazana önce ban sonra ceza
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Bu kod istek üzerine yapıldı ve buraya da belki birisinin işine yarar diye paylaştım. Sana kodu beğendiremedigimiz için üzgünüm. Sen daha iyisini yapar ve kullanırsın

nikotin 13 Ocak 2024 23:48

Cevap: Büyük harf yazana önce ban sonra ceza
 
Kötü anlamda bir sey demedim pasam sakin ol. Sadece bi fikir sundum. Emek vermissiniz elinize saglık.
Ayrıca tavrınızı begenmesem de kodu begendim.
İyi aksamlar.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 08:01.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk