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

Alıntı:

XDie Nickli Üyeden Alıntı (Mesaj 1041132028)

Merhabalar Bende Şu Şekilde Bir Kod Var

on @*:text:*:#: {
if $nick isop $chan || $nick isvoice $chan || $nick ishop $chan { return }
var %< = 1 | while (%< <= $lines(kufur.txt)) {
if $read(kufur.txt,%<) iswm $1- {
.mode $chan +b $wildsite | kick # $nick Küfür Yasak.! }
inc %<
}
}
on @*:ban:#: {
if $nick == $me && $1 == +b {
.timer 1 300 mode $chan -b $2
}
}

Ben Bu koda uyarılı sistem yapmak istiyorum mesela birisi küfür etti önce uyaracak 2. kez küfüründe banlayacak

Basit bir şekilde uyarı kodlarından biriyle ilişkilendire bilirsin

Kod:

on *:text:*:#: {

  if ($nick !isreg $chan) { halt }

  var %< = 1 | while %< <= $lines(kufur.txt) {

    if $read(kufur.txt,%<) isin $strip($1-) {

    if (!%say [ $+ [ $nick ] ]) { inc %say [ $+ [ $nick ] ] | set %kelime [ $+ [ $nick ] ] $strip($1-) |  msg $chan 4[ U y a r ı ]1 : $nick : 4Lütfen Seviyeyi Düşürmeyiniz Aksi Taktirde Kanaldan Uzaklaştırılıcaksınız !. }

      else { if (%say [ $+ [ $nick ] ] >= 1) { mode $chan +b $wildsite | kick $chan $nick 0,7 Daha Onceden > $+ %kelime [ $+ [ $nick ] ] $+ < Kelimesinden Dolayi Uyarı Aldınız 2. Olarak > $+ $strip($1-) $+ < Olan Yasak ve Kötü Unsur Içeren Sözcüğü Kullandıgınız Için Kanaldan Uzaklaştırıldınız.. | unset %say [ $+ [ $nick ] ] | unset %kelime [ $+ [ $nick ] ] }

      }

    }

    inc %< 

  } 

}