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

 Kayıt ol  Topluluk
7Beğeni(ler)
  • 1 Post By Mylife
  • 1 Post By YouMyCure
  • 1 Post By Alper
  • 1 Post By Mylife
  • 3 Post By Feragat

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 15 Kasım 2016, 15:00   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Kanal koruma ( text ) 1. Uyarı sonra ban..




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:text:*:#: { set %:Mylife $1- set %:Kod $nick if (!$hget(argo)) { hmake -s argo 300 } if $regex($1-,/Mylife|kelime|kelime|kelime|kelime|kelime|kelime$/Si) && (!$hmatch(argo,%:Kod)) { hadd -s argo %:Kod 1 msg # %:Kod yasaklı kelime kullandınız. ( uyarı ) } else if ($hmatch(argo,%:Kod)) { mode # +b %:Kod kick # %:Kod yasaklı kelime kullandınız. hdel -s argo %:Kod } unset %:Mylife unset %:Kod }

  • Kanalda @(OP) konumunda olmalısınız.
  • regex ile belirlenen kelime leri doldurmanız yeterlidir.
  • Belirlenen kelime ler kanalda yazıldığında ilk yazılmasında uyarı verir, 2. yazılmasında ban atar.
  • İşlem gerçekleştikden sonra kişiye ait kaydı siler.

__________________
i don't care if i'm misfit..
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 19 Kasım 2016, 13:24   #2
Çevrimdışı
Che
~ Gevezeyiz.Net ~
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanal koruma ( text ) 1. Uyarı sonra ban..




Faydalı.

__________________
char *adres = [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] for(int i = 0; *(adres + i); i++) { putchar(toupper(adres[i])); }
 
Alıntı ile Cevapla

Alt 25 Ağustos 2019, 23:50   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanal koruma ( text ) 1. Uyarı sonra ban..




Mylife Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:text:*:#: { set %:Mylife $1- set %:Kod $nick if (!$hget(argo)) { hmake -s argo 300 } if $regex($1-,/Mylife|kelime|kelime|kelime|kelime|kelime|kelime$/Si) && (!$hmatch(argo,%:Kod)) { hadd -s argo %:Kod 1 msg # %:Kod yasaklı kelime kullandınız. ( uyarı ) } else if ($hmatch(argo,%:Kod)) { mode # +b %:Kod kick # %:Kod yasaklı kelime kullandınız. hdel -s argo %:Kod } unset %:Mylife unset %:Kod }

  • Kanalda @(OP) konumunda olmalısınız.
  • regex ile belirlenen kelime leri doldurmanız yeterlidir.
  • Belirlenen kelime ler kanalda yazıldığında ilk yazılmasında uyarı verir, 2. yazılmasında ban atar.
  • İşlem gerçekleştikden sonra kişiye ait kaydı siler.


merhaba 1 uyarı tamam calisiyor. ama uyari alan nick normal konusmaya devam ettiginde yani o yasakli kelimelerden kullanmadiginda otomatik atiliyor.. kod eksik yada hatali mi acaba ?

 
Alıntı ile Cevapla

Alt 26 Ağustos 2019, 15:49   #4
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanal koruma ( text ) 1. Uyarı sonra ban..




Mylife Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:text:*:#: { set %:Mylife $1- set %:Kod $nick if (!$hget(argo)) { hmake -s argo 300 } if $regex($1-,/Mylife|kelime|kelime|kelime|kelime|kelime|kelime$/Si) && (!$hmatch(argo,%:Kod)) { hadd -s argo %:Kod 1 msg # %:Kod yasaklı kelime kullandınız. ( uyarı ) } else if ($hmatch(argo,%:Kod)) { mode # +b %:Kod kick # %:Kod yasaklı kelime kullandınız. hdel -s argo %:Kod } unset %:Mylife unset %:Kod }

  • Kanalda @(OP) konumunda olmalısınız.
  • regex ile belirlenen kelime leri doldurmanız yeterlidir.
  • Belirlenen kelime ler kanalda yazıldığında ilk yazılmasında uyarı verir, 2. yazılmasında ban atar.
  • İşlem gerçekleştikden sonra kişiye ait kaydı siler.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
set %:Mylife $1- set %:Kod $nick

bunlar neden anlamış değilim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
, başarılar

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Alt 26 Ağustos 2019, 16:06   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanal koruma ( text ) 1. Uyarı sonra ban..




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
Else if ($hmatch(argo,%:Kod)) {

Bu kısımdan kaynaklı sorun ilk seferde kaydediyor sonra kayıtlı olan kişi ne yazarsa yazsin atılıyor. Yani ek koşul yok üst kısımdaki gibi

 
Alıntı ile Cevapla

Alt 31 Ağustos 2019, 18:38   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanal koruma ( text ) 1. Uyarı sonra ban..




YouMyCure Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
set %:Mylife $1- set %:Kod $nick

bunlar neden anlamış değilim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
, başarılar

valla hangi kafayla yazdım onu bilmiyorum 2016 yılında yazmışım. Muhtemelen hazırlarken kullanıcamı planlamışımdır ama kodun gidişatına göre kullanmamışımdır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Alper Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
Else if ($hmatch(argo,%:Kod)) {

Bu kısımdan kaynaklı sorun ilk seferde kaydediyor sonra kayıtlı olan kişi ne yazarsa yazsin atılıyor. Yani ek koşul yok üst kısımdaki gibi

Evet @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] haklısın gözden kacmış o bazı kodlarda değişim yapıltıktan sonra deneme şansım olmuyor

yaramazadam Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
merhaba 1 uyarı tamam calisiyor. ama uyari alan nick normal konusmaya devam ettiginde yani o yasakli kelimelerden kullanmadiginda otomatik atiliyor.. kod eksik yada hatali mi acaba ?



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:text:*:#: { set %:Mylife $1- set %:Kod $nick if (!$hget(argo)) { hmake -s argo 300 } if $regex($1-,/Mylife|kelime|kelime|kelime|kelime|kelime|kelime$/Si) && (!$hmatch(argo,%:Kod)) { hadd -s argo %:Kod 1 msg # %:Kod yasaklı kelime kullandınız. ( uyarı ) } elseif $regex($1-,/Mylife|kelime|kelime|kelime|kelime|kelime|kelime$/Si) && ($hmatch(argo,%:Kod)) { mode # +b %:Kod kick # %:Kod yasaklı kelime kullandınız. hdel -s argo %:Kod } unset %:Mylife unset %:Kod }

=> olarak düzelttim. Bu kod ile regex çok uzun sürüp gidebilir. Alternatif olarak regex kullanmak yerine text dosyası icine küfürleri yazıp $read ile karşılaştırma yapabilirsiniz, hash tablosu ile uyumlu olur mu şuan bilmiyorum denemek lazım. O dönem bu tur calışmalar yoktu hiç karşılaşmıyordum ama şimdi karşılaşıyorum artık herşey biraz daha kolay farklı yollar kullanabilirsiniz. İyi forumlar dilerim.

__________________
i don't care if i'm misfit..

Konu Mylife tarafından (31 Ağustos 2019 Saat 18:49 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 02 Eylül 2019, 22:05   #7
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanal koruma ( text ) 1. Uyarı sonra ban..




Bu kodu uzun zaman önce yapmışsın ama neden daha güzel olmasın.
Belki çoğu bildiğin şeyler ama konuyu okuyan arkadaşlar için fikir vermesi adına..

- hash table da -s anahtarı, kullanılan komutu ekranda göstermeye yarıyor
mirc.chm dosyasında şöyle söylemiş: The -s switch makes the command display the result.

- unset %değişken %değişken
şeklinde kullanırsan seni 2 unset komutundan kurtarır.

- regex filtrelerinde meta karakter (regex tarafından anlam ifade eden karakterler) olgusuna da dikkat etmek gerek. ". [] ? * " vb. bunları düz metin olarak algılatmak için başlarına \ slash koymak gerekmektedir. Bunu otomatik yapması için bir alias yapabilirsin güzel olur.

- Son olarak şu "else if" neden hatalı olduğu için bi kaç sene önce bir açıklama yapmıştım. Göz atmak isteyen olursa da link burada: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod, geri dönüşler geldikçe gelişir ve daha kararlı hale gelir. Emeğine sağlık Kolay gelsin dostum.

__________________
The Ghost of Christmas Past...

i'm here sometimes

Konu Feragat tarafından (02 Eylül 2019 Saat 22:08 ) değiştirilmiştir. Sebep: Açıklama güncellendi.
 
Alıntı ile Cevapla

Cevapla

Etiketler
ban, kanal, koruma, text, uyar


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Socket bot text'den kanal bulmak Spaw67 mIRC Scripting Sorunları 3 28 Mayıs 2014 09:18
kanal koruma ve kişisel koruma addon isteği Svs1988 mIRC Scripting Sorunları 1 05 Ekim 2011 10:34
Cinsel Kanal Koruma HaKuNa mIRC Scripting Sorunları 24 25 Temmuz 2010 17:51
Kanal Koruma Sorun ? quruR mIRC Scripting Sorunları 1 19 Şubat 2009 20:53