Özel yasak uyarısı - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

06 Ağustos 2011, 06:03

S.a Herkese hayırlı ramazanlar.. şimdi elimde bir cod var oncelikle kodu vereyim

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


#uyarı on
on *:text:*:#:{
  if ($nick isreg $chan) {
    if $istok($1-,ozele,32) || $istok($1-,özeline,32)  || $istok($1-,özelde,32) ||  $istok($1-,özelime,32) || $istok($1-,özele,) {
      if (!%say [ $+ [ $nick ] ]) { inc %say [ $+ [ $nick ] ] | set %kelime [ $+ [ $nick ] ] $strip($1-) | msg $chan  UYARI:  $nick : Kanal Genelinde Kullanıcıları Özele Davet Etmek Yasaktır! Aksi Taktirde Kanaldan Uzaklaştırılacaksınız! }
      else { if (%say [ $+ [ $nick ] ] >= 1) { cs akick $chan add $nick $+ !*@* 2 Daha Onceden > $+ %kelime [ $+ [ $nick ] ] $+ <  Uyarı Aldınız 2. Olarak > $+ $strip($1-) $+ < Kurallara uymadığınız Için Kanaldan Uzaklaştırıldınız.. | cs akick $chan enforce | cs akick $chan del $nick $+ !*@* | unset %say [ $+ [ $nick ] ] | unset %kelime [ $+ [ $nick ] ] }
      }
    }
  }
}
#uyarı end

Şimdi yukardaki kod kanalda kullanıcıları özee davet edenlere 1.de uyarı tekrarı halinde kanaldan banlıyor eklenmis kelimeler ozele,özele,özeline,özelime,özelde.. gibi bunları kullanan kisileri 1.de uyarıyor 2.de kanaldan uzaklastırıo burakaya kadar sorun yok ama mesela bayan özelde konusmuyorum özele bakmıyorum vb dediği zaman oda korumadan etkilenior.. Şimdi benim istediğim kelimeyi tamamen almak yani birisi (özele gelirmisin,özele bak, özelde konusalımmı,) derse şayet kodun calısmasını istiorm lakin yazan kisi illaki bosluk bırakıcak "özele gel" gibi yukardaki codu bu sekilde nasıl ayarlarız bosluguda kapsayacak sekilde.
ikinci istegim ise bu kod ceza uygularken gecici akick eklior ben bunu akick deilde 15dk sora acılması kaydıyla ban+kick olarak nasıl ayarlarım? Sevigli koder arkadaslar ilgilenirse cok sevinirim iyi gunler herkese..
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

WingmaN · 06 Ağustos 2011, 20:51

Kod: Kodu kopyalamak için üzerine çift tıklayın!

#uyarı on
on *:text:*:#:{
  if ($nick isreg $chan) {
    if ($regex($1-,/(ö|Ö|o)zel(e|d|i)/i) &&  $regex($1-,/(konu(s|ş|Ş)(a|c|ç|Ç)|gel|gel(e|i|c|s)|gid(e|c)|bak|bak(c|Ç|ç|ı|i))/i)) {
      if (!%say [ $+ [ $nick ] ]) { inc %say [ $+ [ $nick ] ] | set %kelime [ $+ [ $nick ] ] $strip($1-) | msg $chan  UYARI:  $nick : Kanal Genelinde Kullanıcıları Özele Davet Etmek Yasaktır! Aksi Taktirde Kanaldan Uzaklaştırılacaksınız! }
      else { if (%say [ $+ [ $nick ] ] >= 1) { mode $chan +b $nick | kick $chan $nick Daha Onceden > $+ %kelime [ $+ [ $nick ] ] $+ <  Uyarı Aldınız 2. Olarak > $+ $strip($1-) $+ < Kurallara uymadığınız Için Kanaldan Uzaklaştırıldınız.. | .timer $+ $nick -d 1 900 mode $chan -b $nick | unset %say [ $+ [ $nick ] ] | unset %kelime [ $+ [ $nick ] ] }
      }
    }
  }
}
#uyarı end

Denemedim ama, çalışacaktır.

07 Ağustos 2011, 04:24

Teskkurler ilgin için ustat burda özeline,özelime,özelde, kelimelerinide kapsıyormu yoksa sadece "özele" kelimesimi?

WingmaN · 07 Ağustos 2011, 04:37

Daha önce, içinde sadece "özele" kelimesi geçen cümleler kabul oluyordu ama biraz değiştirdim, düzenledim tekrardan.

Düzenleme: içerisinde özelime, özeline, özelde , özele vs vs geçen bütün kelimeleri kapsaycak hale getirilmiştir. Ayrıca boşluklu boşluksuz her türlü yakalayacaktır.

Not: kapsamı geniş olduğundan dolayı, sorun yaşayabilirsin, daha önce o yuzden sadece "o/özele" şeklinde ayarlamıştım. Fakat bu şekilde çok daha hassas olacaktır ve yanlış banlamalara sebeb olabilir.

Örnek:
Bu benim özelim kimse karışamaz -> banlar
bu aracın özellikleri içerisinde motor bozuk -> banlar
benim en iyi özelliğim sessizliktir. -> banlar

Bunu engellemek istiyorsan;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

$regex($1-,/(ö|o)zel([a-z])/i)

Bu kısımdaki (ö|o)zel([a-z]) şu satırı, daraltabilirsin.

Örnek -> (ö|o)zel(e|d|i) yaparsan, özelime, özelde, özeli gibi geçen kelimeleri yakalayacaktır, bunu kafana göre eklediğim harfleri yan yana belirlediğim gibi ekleyebilirsin.

07 Ağustos 2011, 05:30

S.a şimdi burdaki sorunu ilk mesajda belirtmiştim sanırım dikkat etmemişsin ustat
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ben sadece özele,özelde,özelime,özeline kelimeleri değil (özele gel,özeline geleyimmi,özelde konusalımmı,özele gelirmisin) gibi belirli cümleleri almak istiyorum ama aradaki bosluqu kapsayacak yani senin dediğin gibi olduqunda illaki bayanda özele bakmam der ve oda etkilenir sadece parantez içindekileri bosluquda kapsayacak sekilde istiorm eğer mumkun olursa kelimeleri biraz daha coğaltabilirz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iyi sabahlar diliyorum

WingmaN · 07 Ağustos 2011, 12:32

Bu kısmı $regex($1-,/(ö|o)zel([a-z])/i)

Kod: Kodu kopyalamak için üzerine çift tıklayın!

$regex($1-,/(ö|Ö|o)zel(e|d|i)/i) && $regex($1-,/(konu(s|ş|Ş)(a|c|ç|Ç)|gel|gel(e|i|c|s)|gid(e|c)|bak|bak(c|Ç|ç|ı|i))/i)

böyle değiştir o halde.

Kullanımlar;
özelimde konuşalım -> banlar
özele gidelim -> banlar
özele gelmem -> banlamaz
özele bakmıyorum -> banlamaz
özelime bakmıyorum -> banlamaz
özelde konuşalım -> banlar
özelimde konuşmuyorum -> banlamaz

vs vs işini görecektir. İlk mesajımı da editledim, ordan tüm kodu tekrar alabilirsn.

07 Ağustos 2011, 15:06

Cok tesekkur ederim bişey sorayım kanalda genelde özele davet ederken en cok kullanılan kelime (özele gel, özele bak, özele gelirmisin özeline bak) bu kod bunları yazanlarıda banlıyormu?

Yukardaki mesajı kodu denemeden yazmıştım ve denedim gördümki en cok kullanılan (özele bak, özele gel) cümlelerinde calısmıyor birde özelde konusalımmı cümlesinde banlıyor fakat ÖzeLde KonusaLımmı yaznca banlamıor yani büyük harf duyarlı değil bunlarıda ayarladığmızda kod süper olucak
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

WingmaN · 07 Ağustos 2011, 16:29

Kod: Kodu kopyalamak için üzerine çift tıklayın!

$regex($1-,/(ö|Ö|o)zel(e|d|i)/i) &&  $regex($1-,/(konu(s|ş|Ş)(a|c|ç|Ç)|gel|gel(e|i|c|s)|gid(e|c)|bak|bak(c|Ç|ç|ı|i))/i)

al bakalım.

07 Ağustos 2011, 19:51

WingmaN 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!

$regex($1-,/(ö|Ö|o)zel(e|d|i)/i) &&  $regex($1-,/(konu(s|ş|Ş)(a|c|ç|Ç)|gel|gel(e|i|c|s)|gid(e|c)|bak|bak(c|Ç|ç|ı|i))/i)

al bakalım.

Üstat kod bu sefer hic bir tepki vermedi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[19:47] <Caki> ÖzeLe Ge
[19:47] <Caki> ÖzeLe Gel
[19:47] <Caki> ÖzeLe Bak
[19:47] <Caki> ÖzeLde KonusaLımmı
[19:48] <Caki> özele bak
[19:48] <Caki> özele gel
[19:48] <Caki> özelde konusalımmı
*** Remote Açık (Ctcps,Events,Raw)
[19:48] <Caki> özele gel
[19:48] <Caki> özelde konusalımmı
[19:48] <Caki> özele gelirmisin
[19:48] <Caki> özeline bak
[19:48] <Caki> özelimde konusalımm

WingmaN · 08 Ağustos 2011, 02:31

Kod: Kodu kopyalamak için üzerine çift tıklayın!

#uyarı on
on *:text:*:#:{
  if ($nick isreg $chan) {
  if ($regex($1-,/(ö|Ö|o)zel(e|d|i)/i) &&  $regex($1-,/(konu(s|ş|Ş)(a|c|ç|Ç)|ge(c|ç|Ç)|gel|gel(e|i|c|s)|gid(e|c)|bak|bak(c|Ç|ç|ı|i))/i)) {
      if (!%say [ $+ [ $nick ] ]) { inc %say [ $+ [ $nick ] ] | set %kelime [ $+ [ $nick ] ] $strip($1-) | msg $chan  UYARI:  $nick : Kanal Genelinde Kullanıcıları Özele Davet Etmek Yasaktır! Aksi Taktirde Kanaldan Uzaklaştırılacaksınız! }
      else { if (%say [ $+ [ $nick ] ] >= 1) { mode $chan +b $nick | kick $chan $nick Daha Onceden > $+ %kelime [ $+ [ $nick ] ] $+ <  Uyarı Aldınız 2. Olarak > $+ $strip($1-) $+ < Kurallara uymadığınız Için Kanaldan Uzaklaştırıldınız.. | .timer $+ $nick -d 1 900 mode $chan -b $nick | unset %say [ $+ [ $nick ] ] | unset %kelime [ $+ [ $nick ] ] }
      }
    }
  }
}
#uyarı end

Böyle ekleyeceksin, denedim hiç bir problemi yok, kusursuz çalışıyor şuan için. Yalnız kırmızıyla işaretlediğim yerleri kaldırsan iyi olur biraz saçma.

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
mIRC Özel Mesaj Ses Uyarısı	Forbidden	mIRC Parça Kodlar	0	24 Kasım 2021 21:09
Yasak saatinde hırsızlık yapanlara çaldıklarının 10 katı yasak ve maske cezası	NurSima	Güncel ve Son Dakika Haberler	0	01 Mart 2021 22:10
özel penceresinde önceki nick uyarısı	LavdegoN	mIRC Scripting Sorunları	0	01 Şubat 2016 01:49
özel penceresinde klon uyarısı	LavdegoN	mIRC Scripting Sorunları	5	29 Ekim 2012 14:52
Özel kalem müdürünün yasak aşkı!	Lucifer	Haber Arşivi	0	28 Ağustos 2010 21:05

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.