Tekil Mesaj gösterimi
  #2  
Alt 07 Ekim 2011, 12:18
Avatar Yok
L4roXyL L4roXyL isimli Üye şimdilik offline konumundadır
 DirtyCoder 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 34
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 143
Yapılan Teşekkür: 0
Standart

Tarih: 06-12-2007, 20:21

Bu kod özele yazan nick kayıtlı değilse ve kufur.txt dosyasından herhangi bir kelimeyi kullandıysa, tüm kanallardan banlamak için kullanılır.

Kod:
on *:text:*:?: {
  inc -e $+(%,t,$nick) 
  if $($+(%,t,$nick),2) == 1 { 
    .enable #u 
    .who $nick 
  } 
  else {
    var %1 = 1,%2 = $lines(kufur.txt) 
    while %1 <= %2 { 
      if $+(*,$read(kufur.txt,%1),*) iswm $1- && $hmatch(nick,$nick) {
        var %p = $nick 
      } 
      inc %1 
    } 
    var %s = 1,%ss = $comchan($me,0) 
    while %s <= %ss { 
      if $nick ison $comchan($me,%s) { 
        ban -ku900 $comchan($me,%s) %p 2 BAN SEBEBİ.
      } 
      inc %s 
    } 
  } 
}
#u off
raw *:*: { 
  if $numeric == 352 { 
    if r !isincs $7 { 
      haltdef 
      hadd -m nick $6 1 
    } 
  } 
  if $numeric == 315 {
    haltdef 
    .disable #u 
  } 
}
#u end
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
 
1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76