genele yazan istemediğim nicklere ban atsın istiyorum - IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

03 Temmuz 2016, 22:28

selam arkadaşlar genele yazan nickler txt dosyasına eklemek istiyorum bu txt eklediğim nickler genele yazdıkları zaman sadece +b ban atsın istiyorum kick atmasın.

birde +b yaptığı zaman msg nickiniz genele uygun olmadığı için banlandınız diye uyarı vermesini istiyorum ben *pasif* boyle nick ekleyince ben_pasif nickler aldıkları zaman algılasın istiyorum txt ben ekleyecem nickleri lez gay pasif gibi sizlere şimdiden teşekkür ederim

**Sessiz** · 03 Temmuz 2016, 22:46

ShiRoi Nickli Üyeden Alıntı

selam arkadaşlar genele yazan nickler txt dosyasına eklemek istiyorum bu txt eklediğim nickler genele yazdıkları zaman sadece +b ban atsın istiyorum kick atmasın.

birde +b yaptığı zaman msg nickiniz genele uygun olmadığı için banlandınız diye uyarı vermesini istiyorum ben *pasif* boyle nick ekleyince ben_pasif nickler aldıkları zaman algılasın istiyorum txt ben ekleyecem nickleri lez gay pasif gibi sizlere şimdiden teşekkür ederim

Merhaba @ShiRoi,

Badnick korumasından yola çıkarak bişiler yaptım badnickleri sadece kendiniz eklemeniz için on *:input:#:{ eventi olarak belirledim eğer kendiniz değil başkaların kullanmasını isterseniz on *:text:*:#:{ eventi ile değiştirebilirsiniz.

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

on *:start: $iif(!$isfile(badnick.tprk),.write badnick.tprk) | .hmake badnick 100 | .hload badnick badnick.tprk

on *:input:#:{
  if $regex($1,/^[!\.]badnick$/Si) {
    if !$regex($2,/^(ekle|s[ıiİ]l|l[ıiİ]st|tara)$/Si) { msg # Lütfen 4!badnick 2ekle|sil|list|tara olarak belirtiniz. }
    elseif $regex($2,/^ekle$/Si) {
      if (!$3) { msg # Lütfen nick belirtiniz | return }        
      if $hfind(badnick,$strip($3),0,W).data { msg # Eklemeye çalıştığınız badnick zaten $+([,$chr(32),$hget(badnick,$hfind(badnick,$strip($3),1,W).data),$chr(32),]) maskesi ile uyuşmakta. | return }
      var %n = $left($calc($ctime * $rand(1000,9999)),7)
      .hadd -m badnick %n $strip($3)
      .hsave -o badnick badnick.tprk
      msg # $strip($3) Badnick listesine eklendi.
    }
    elseif $regex($2,/^s[ıiİ]l$/Si) {
      if (!$3) { msg # Lütfen nick belirtiniz | return }        
      if !$hfind(badnick,$strip($3),0,W).data { msg # Bad nick listesinde bulunmamaktadir. | return }
      .hdel -m badnick $hfind(badnick,$strip($3),1,W).data
      .hsave -o badnick badnick.tprk
      msg # $strip($3) Badnick listesinden silindi.
    }
    elseif $regex($2,/^tara$/Si) {
      if (!$3) { msg # Lütfen nick belirtiniz | return }        
      if !$hfind(badnick,$strip($3),0,W).data { msg # Badnick listem'de $strip($3) ait bir mask yok. | return }
      msg # Nick: $strip($3) - 4Mask: $+([,$chr(32),$hget(badnick,$hfind(badnick,$strip($3),1,W).data),$chr(32),])
    }
    elseif $regex($2,/^l[ıiİ]st$/Si) {
      if ($hget(badnick,0).data == 0) { msg # Badnick listesi boş. | return }
      msg # Badnick listesi
      msg # -
      var %i = 1 | while (%i <= $hget(badnick,0).data) { msg # %i $+ .4) [ $hget(badnick,%i).data ] | inc %i }
      msg # -
      msg # Badnick listesi sonu
    }  
  }
}

on *:text:*:#:{
  if $regex($nick(#,$me).pnick,/[%@&~.]/) && $hfind(badnick,$nick,1,W).data {
    mode # +b $+(~q:,$nick)
    msg $nick Nick'iniz uygun olmadığı için # kanal'ında konuşmanız engellenmiştir.
  }
}

Komut(lar);

!badnick ekle *nick*
!badnick sil *nick*
!badnick list
!badnick tara nick (Nick'e uyan maskları verir.)

03 Temmuz 2016, 22:58

hocam tşk ederim kod tamamdir güzel çalişiyor toprak ustam ama uyarı vermiyor sadece banliyor ? .msg $nick Nick'iniz uygun olmadığı için # kanal'ında konuşmanız engellenmiştir.

hocam bende vermiyor valla

[22:57] <Ben_Pasif> slm
[22:57] *** ShiRoi mod değiştirdi:+b ~q:Ben_Pasif!*@* bak ustam uyarı yok

**Sessiz** · 03 Temmuz 2016, 23:00

ShiRoi Nickli Üyeden Alıntı

hocam tşk ederim kod tamamdir güzel çalişiyor toprak ustam ama uyarı vermiyor sadece banliyor ? .msg $nick Nick'iniz uygun olmadığı için # kanal'ında konuşmanız engellenmiştir.

Uyarı veriyor alt kısmına ekledim =)
Denedim uyarı gidiyor.

@ShiRoi uyarı özel'e gidiyor kanalda uyarı yapması için;

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

msg # $nick kanal da bu nicki kullanamazsınız vs.vs.

Bunun ile değiştirin.

03 Temmuz 2016, 23:09

hoca senin Bu Uyarı Özele gidiyor Desene Bende Genele Gidiyor Sandım tamamir hocam tşk ederim

03 Temmuz 2016, 22:28	#1
ShiRoi Guest	genele yazan istemediğim nicklere ban atsın istiyorum selam arkadaşlar genele yazan nickler txt dosyasına eklemek istiyorum bu txt eklediğim nickler genele yazdıkları zaman sadece +b ban atsın istiyorum kick atmasın. birde +b yaptığı zaman msg nickiniz genele uygun olmadığı için banlandınız diye uyarı vermesini istiyorum ben pasif boyle nick ekleyince ben_pasif nickler aldıkları zaman algılasın istiyorum txt ben ekleyecem nickleri lez gay pasif gibi sizlere şimdiden teşekkür ederim selam arkadaşlar genele yazan nickler txt dosyasına eklemek istiyorum bu txt eklediğim nickler genele yazdıkları zaman sadece +b ban atsın istiyorum kick atmasın. birde +b yaptığı zaman msg nickiniz genele uygun olmadığı için banlandınız diye uyarı vermesini istiyorum ben pasif boyle nick ekleyince ben_pasif nickler aldıkları zaman algılasın istiyorum txt ben ekleyecem nickleri lez gay pasif gibi sizlere şimdiden teşekkür ederim

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.