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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Bad nick Küfür ve Harf uzatma yardım. (https://www.ircforumlari.net/mirc-scripting-sorunlari/207192-bad-nick-kufur-ve-harf-uzatma-yardim.html)

Bad nick Küfür ve Harf uzatma yardım.

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.

Cevap: Bad nick Küfür ve Harf uzatma yardım.

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

Cevap: Bad nick Küfür ve Harf uzatma yardım.

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ı

Cevap: Bad nick Küfür ve Harf uzatma yardım.

Kod:

 

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:

/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..)

Alıntı:

muratt_aziz Nickli Üyeden Alıntı (Mesaj 693566)

Kod ları aynı sayfaya koyma ayrı ayrı sayfalara koy

Büyük yazı

Kod:

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:

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...

Cevap: Bad nick Küfür ve Harf uzatma yardım.

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

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

Cevap: Bad nick Küfür ve Harf uzatma yardım.

Kod:

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

Şeklinde dene..

Cevap: Bad nick Küfür ve Harf uzatma yardım.

Selam Ben Bi Addon istiyorum Harfleri uzatma Noktalama Yapildigindada uyuri versin. Yani Örnek :( 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

Cevap: Bad nick Küfür ve Harf uzatma yardım.

Kod:

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 :)

İyi forumlar...