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

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

- - önemli (https://www.ircforumlari.net/mirc-scripting-sorunlari/21508-onemli.html)

raw 366:*: { var %i 1 | while %i <= $nick($2,0) { if $level($nick($2,%i) $+ !*@*) == 666 { mode $2 +b $nick($2,%i) $+ !*@* | .quote kick $2 $nick($2,%i) Bad Nick Kanallara Giriş Yapamazsınız!!! } | inc %i } } bu kodu LeadeR arkadaşımız yazmış ama buna ilave kanala girdikten 3 4 saniye sonra tarama yapmasını istiyorum timer koymak yani ilk girişte çok kasıyor ilgilenirseniz sevinirim

Alıntı:

ilhan Nickli Üyeden Alıntı

bu kodu sana daha önce yazmıstım ama.... tekrar vereyim

Kod:

on *:join:#: {

  if $nick == $me {

    timer 1 3 nicktara #

  }

}

alias Nicktara {

  .enable #Badnick

  .names $1

  .set %c $1

}

#Badnick off

raw 353:*: {

  set %badnick $4-

}

raw 366:*: {

  var %x 1

  var %y $numtok(%badnick,32)

  while %x <= %y {

    var %a 1 

    var %i $lines(badnick.txt)

    while %a <= %i {

      if ($read(badnick.txt,%a) isin $gettok(%badnick,%x,32)) || $me isop %c {

        inc %a

        if %a >= $lines(badnick.txt) {

        }

      }

      if %x >= %y {

        unset %badnick

        unset %c

        disable #badnick

        halt

      }

      inc %x

    }

  }

  #Badnick end

kanala girdikten 3 saniye sonra bad nick tarar 3'ü istedigin bir sayıyla degiştirebilirsin...
Ayrıca istedigin zaman /nicktara #kanal yaparsan'da çalısır

Cihan kodu names end raw'ından sonra kanalı tekrar tarayacak biçimde yazmış. Aynı kodu names raw'ında nickler teker teker gelirken yazıyor olsaydı kasmayacaktı. Şöyle dene bakalım;

Kod:

raw 353:*: {

  var %i 1, %n $4-

  while %i <= $numtok(%n,32) {

    var %s $gettok(%n,%i,32)

    if $left(%s,1) isalpha && $level(%s $+ !*@*) == 666 {

      mode $3 +b %s

      kick $3 %s Bu rumuz ile kanallarımıza giriş yapamazsınız.

    }

    inc %i

  }

}

* Invalid format: $gettok (line 4, bad.txt)

Özcan seninkinde bu hatayı verdi

Naksuta arkadaş seninkide ELSE hatası verdi script dondu

Kod:

raw 353:*: {

  var %i 1

  %n = $4-

  while %i <= $numtok(%n,32) {

    var %s $gettok(%n,%i,32)

    if $left(%s,1) isalpha && $level(%s $+ !*@*) == 666 {

      mode $3 +b %s

      kick $3 %s Bu rumuz ile kanallarımıza giriş yapamazsınız.

    }

    inc %i

  }

}

Böyle dene ilhancım.

Özcan valla yine olmadı bu sefer hata yok ama atmıyor
raw 366:*: { var %i 1 | while %i <= $nick($2,0) { if $level($nick($2,%i) $+ !*@*) == 666 { mode $2 +b $nick($2,%i) $+ !*@* | .quote kick $2 $nick($2,%i) Bad Nick Kanallara Giriş Yapamazsınız!!! } | inc %i } }

buna ek olmazmı timer girdikten 3 saniye sonra atsa kusura bakma senide yoruyorum ama

NAMES bittiğinde henüz OP olmadığın için atmamıştır. Amacın mIRC'nin kasmamasıysa o kod ile başaramazsın bunu. Test edilmiş biçimde kod dizisini veriyorum:

Kod:

raw 353:*: {

  var %i 1

  %n = $4-

  while %i <= $numtok(%n,32) {

    %s = $gettok(%n,%i,32)

    if $left(%s,1) isalpha && $level(%s $+ !*@*) == 666 {

      %ret. [ $+ [ $3 ] ] = $addtok(%ret. [ $+ [ $3 ] ],%s,44)

    }

    inc %i

  }

}

on *:op:#: {

  if $opnick == $me {

    if %ret. [ $+ [ # ] ] {

      var %i 1

      while %i <= $numtok(%ret. [ $+ [ # ] ],44) {

        %s = $gettok(%ret. [ $+ [ # ] ],%i,44)

        mode # +b %s

        kick # %s Badnick.

        inc %i

      }

      unset %ret. [ $+ [ # ] ]

    }

  }

}

Kanala girdiğinde badnick'leri kaydedecek ve OP olduğunda hepsini teker teker atacaktır. Güle güle kullan.

çok sağol Özcan bu seferki oldu Allah razı olsun toprağım :)