[ChatLı]

Selam ben şöyle birşey istiyorum mümkünmmü acaba?

kufur.txt 'ye /kufurekle küfür

badnick.txt 'ye /badekle badnick

ve bir harfi aliiii gibisinden bir harfi 4 kere peş peşe kullanıldığında kanaldan kicklemek istiyorum.

Tabi bunları kodlar şeklinde verirseniz sevinirim.

yardımcı olurmusunuz, iyi forumlar.

Arama yaparsan, onlarca buna benzer kod yazılmış olduğunu görürsün.

[ChatLı]

Küfür koruması eyvallah'da badnick ve harf uzatma korumasını bulamadım bulduklarımda çalışmıyor zaten. yardımcı olabilecek biri varmı

[Lucifer]

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

 
alias badnicktara {
  if $me isop $1 {
    set %:bulunan 0
    var %s 1
    while %s <= $nick($1,0) {
      %:gnick = $nick($1,%s)
      if %:gnick isreg $1 && $level(%:gnick $+ !*@*) == 8 {
        inc %:bulunan 1
        mode # +b $address($1,2)(%:gnick,666,1)
        kick $1 %:gnick  1BAD Nick Tespit Edildi. Bilgi Icin 4/motd 1Yazınız.. 
      }
      inc %s
    }
    echo -a 2 Badnickler tarandi: $1 - %:bulunan badnick bulundu.
  }
  else {
    echo -a 2 $1 kanalinda OP olmaniz gerekmektedir.
  }
}
raw 8:*: {
  badnicktara $1
}
on *:join:#: {
  if $level($nick $+ !*@*) == 8 {
    mode # +b $address($1,2)($nick,666,1)
    kick # $nick  1BAD Nick Tespit Edildi. Bilgi Icin 4/motd 1Yazınız.. 
  }
}
on *:nick: {
  if $level($newnick $+ !*@*) == 8 {
    mode # +b $address($1,2)($newnick,666,1)
    kickall $nick 1BAD Nick Tespit Edildi. Bilgi Icin 4/motd 1Yazınız.. 
  }
}
alias banall {
  var %i 1
  while %i <= $comchan($1,0) {
    if $1 !isop $comchan($1,%i) { mode $comchan($1,%i) +b $2- }
    inc %i
  }
}
alias kickall {
  var %i 1
  while %i <= $comchan($1,0) {
    if $1 !isop $comchan($1,%i) { kick $comchan($1,%i) $1 $2- }
    inc %i
  }
}
on *:op:#: {
  if $opnick == $me {
    badnicktara #
  }
}

Bu işini görecektir. Kanal'a Op olarak girdiğinde, otomatik olarak Badnick'te ekli olanları kickleyecektir.

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

/auser 8 $$1

BadNick'i eklemek içinde bunu kullanabilirsin...

Örnek;

" f1 /auser 8 $$1 F1 tuşunda ekli olan." Nick üzerine tıkla***** eklendi.

* Deneme Kullanıcı listesine eklendi

2 Badnickler tarandi: #Deneme - 1 badnick bulundu.

[21:47] * Deneme Murat Tarafından Kanaldan Atıldı (Açıklama: BAD Nick Tespit Edildi. Bilgi Icin /motd Yazınız..)

muratt_aziz Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod ları aynı sayfaya koyma ayrı ayrı sayfalara koy Büyük yazı Kod:   Kodu kopyalamak için üzerine çift tıklayın! on @*:text:*:#:{ var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%<)) * 100)) if $nick isreg # && %> >= 75 && $len(%< >= 20) { inc -u600 $+(%,cc.,#,$nick) | var %' = $($+(%,cc.,#,$nick),2) if %' == 1 { msg $chan UYARI: $nick 4UYARI! 4Lütfen 4CapsLock 4Tuşunu 4Kapatarak 4Yazınız.4ßüyük 4Harf 4Kullanmayınız. 4Aksi 4Taktirde 4Kanaldan 4Uzaklaştırılıcaksınız. } if %' >= 2 { mode # +b $nick | kick # $nick <kickban mesajı> | unset $+(%,cc.,#,$nick) } } } uzunyazı Kod:   Kodu kopyalamak için üzerine çift tıklayın! on @*:text:*:#: { if ($regex($1-,/([[:print:]])\1\1/gi) >= 10) { hinc -mu20 uzunharf $+($chan,.,$nick) 1 if $hget(uzunharf,$+($chan,.,$nick)) == 1 { .msg # $nick :4UYARI! 4Lütfen 4UzuN 4Yazı 4Yazmayınız 4Aksi 4Taktirde 4Kanaldan 4Uzaklaştırılıcaksınız. } if $hget(uzunharf,$+($chan,.,$nick)) == 2 { .ban # $nick 5 .kick # $nick Harfleri uzattınız ve(Tekrar ettiniz) .hdel -s uzunharf $+($chan,.,$nick)) } } } alıntı

Arama yaptığını belirtmişsin ama bu codelerin hepsi mIRC Scripting Sorunlarının 2'nci ve 3'ncü Sayfasında mevcut.. iyi forumlar...

[Corpse]

peki bnm badnick listem nickler.txt diye bir dosyaya yazılıyor

attıgım badnickin o listeye eklenmesini nasıl sağlarım?

[TriviuM]

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

on me:*:ban:#:{ .write nickler.txt $iif($bnick,$v1)  }

Şeklinde dene..

[ByAdriaN]

Selam Ben Bi Addon istiyorum Harfleri uzatma Noktalama Yapildigindada uyuri versin. Yani Örnek
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
aliiiiiiiii ) (..........) Harf uzatma Addonu Vardi burda ama büyük harf için Yapilmiş Benim istedigim o Degi lZaten onda Mesela MERT_ALİ nickine Tap Yapildiginda Uyari veriyo Benim istedigim Belirttigim gibi ( aliiiiiiii) (Selammmm) (........) gibi uzatmalara Uyari Versin. Tşk ederim ilgilenen Arklara şimdiden

[Difuzyon]

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

on *:text:*:#:if ($regex($1-,/([\.]{4}+|(.)\2{4}+)($|\s)/Si)) msg $chan pişşt $nick harfleri uzatma bakim

. (nokta) işaretini 4 ve fazlasını
aliiiii örneğindeki gibi sondan 4 harf ve fazlasını
kullanan nicki nazikçe uyarır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


İyi forumlar...