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 Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Küfür Koruması Lazım (https://www.ircforumlari.net/mirc-scripting-sorunlari/175606-kufur-korumasi-lazim.html)

Kahraman50 29 Ocak 2009 22:07

Küfür Koruması Lazım
 
s.a arkadaşlar.şöyle bi kod yazılırmı acaba;
SoktuĞum,SiktiĞim,KoyduĞum v.s gibi yazılar aynen yazıldığı zaman 1 saat Gline atılacak(Sebep:KuraLLara Uymadınız).#ankara #izmir #istanbul kanallarında bu yazılar yazılsada yazan nicke Gline atılmayacak.3 kanal haricindeki kanallarda ise yazdığım gibi yazılırsa işlem yapacak yani kanalların birinde SoktuĞum yerine soktuğum, SiktiĞim yerine siktiğim yazarsa işLem yapmayacak.bide Sdece bu keLimeLeri yazdığı kanallarda yani ame veya amsg yazarsa onun yazı yazdığı kanallara İnsan oL oyLe geL die mesaj atıcam.ama sadece o kelimeleri yazdığı kanallara gidicek bu mesj ım.kolay gelsin.

Editor 30 Ocak 2009 01:07

Cevap: Küfür Koruması Lazım
 
Kod:

on :start:{
  hmake kufur
  hload kufur kufur.mercy
}
on @:text:*:#:{
  if ($istok(#Ankara #izmir #İstanbul,$chan,32)) { halt }
  var %::nick $nick
  var %::text = $1-
  if $hfind(kufur,$1-,1,W).data && $nick {
    gline %::nick +1800 Ettiğiniz küfür :  ( $remove($gettok($1,1,33),:) )'den dolayı ( $network ) sunucusundan Gline yediniz.
  }
}
alias küfür {
  if $1 == ekle { 
    hadd -m kufur $r(1000,999999) $2-
    hsave kufur kufur.mercy
    echo -a Kötü Söz  girdisi Eklendi: $2-
  }
  elseif $1 == sil {
    if $hfind(kufur,$2-,1,W).data {
      hdel kufur $ifmatch
      hsave kufur kufur.mercy
      echo -a Kötü girdisi girdisi Silindi: ( $+ $ifmatch $+ ) $2-
    }
    else {
      Echo -a Silmeye çalıştıgınız küfür listede mevcur değil,  $+(,$me,)
    }
  }
  elseif $1 == liste {
    echo -a $+(,$me,) Küfür listesi listeleniyor
    var %x = 1
    while (%x <= $hget(Kufur,0).item) {
      echo -a 4 $+ $hget(Kufur,%x).data
      inc %x
    }
    echo -a $+(,$me,) küfür liste sonu.
  }
}


Yapman gereken mIRC ana Klasor'unun içine kufur.mercy dosyası atmak bunları Uyguladığın taktirde küfür edildiğinde küfür eden nick Ankara,izmir,istanbul Kanallarından atılmayacak başka kanalda küfür edildiğinde Gline işlemi gerçekleşecektir.

Ekleme - silme

/küfür ekle <kelime> Listeye Küfür ekler.
/küfür sil <kelime> Listeden Küfür siler.
/küfür liste Eklenmiş olan küfürleri listeler.

Hoşça paylaşımlar.

XDie 07 Mart 2010 13:55

Cevap: Küfür Koruması Lazım
 
merhabalar ben şöyle bir kod istiyorum kanalda mesela lez kim var dediginde atacak melezmisin dediginde atmiyacak. biraz daha detaylı örnek veriyim göt müsün sen göt ten sonra bosluk bırakıp yazı yazdıgında atmasını istiyorum götürdünmü yazınca atmiyacak umarim anlayan arkadaslar vardır.


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

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