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

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

- - Badnick Koruması Editi Yardım Lütfen (https://www.ircforumlari.net/mirc-scripting-sorunlari/359656-badnick-korumasi-editi-yardim-lutfen.html)

Badnick Koruması Editi Yardım Lütfen

Selam Arkadaslar Soyle bi Kod istiyorum Mümkünmüdür Acaba;
Mesela Remotemde Kullanici Listemde Badnick Listem var
Nick:badnick!*@* Seklinde ekli
Kanalımda mesela nick olarak girdi Ve daha Sonra Badnick listemdeki Nick'i aldıında Yani nick değiştiginde Atılmasini istiyorum. Yardımlarınızı Bekliyorum Teşekkür ediyorum şimdiden Yardimci olan arkadaslara..

Cevap: Badnick Koruması Editi Yardım Lütfen

Kod:

on *:NICK: {

  var %/ = 1

  while ($ulist(*,Nick,%/)) {

    if ($remove($ulist(*,Nick,%/),*,@,!) isin $newnick)) {

      var %i = 1

      while ($comchan($newnick,%i)) {

        mode $comchan($newnick,%i) +b $newnick

        kick $comchan($newnick,%i) $newnick Badnick

        inc %i 1

      }

    }

    inc %/ 1

  }

}

Bu şekilde dene.

Cevap: Badnick Koruması Editi Yardım Lütfen

Sağ'olasin Bir Deniyeyim olumsuzsa Dönerim tekrar Tesekkür ediyorum Arkadasim Emegine sağlık..

----------

Malesef Calısmadi Ve * /if: Geçersiz format (Satır 4, script11.txt)
-
* /if: Geçersiz format (Satır 4, script11.txt)
-
* /if: Geçersiz format (Satır 4, script11.txt)

Ve Hata Verdi
Yardımcı olucak bir Arkadas yok mu?

Cevap: Badnick Koruması Editi Yardım Lütfen

Kod:

on *:NICK:{ 

  if $ulist($+($newnick,!*@*),Nick,0) {

    var %/ = 1 

    while $comchan($newnick,%/) { 

      mode $v1 +b $newnick 

      kick $v1 $newnick Badnick

      inc %/ 

    } 

  } 

}

Bunu dene.

Cevap: Badnick Koruması Editi Yardım Lütfen

Alıntı:

Doktrin Nickli Üyeden Alıntı (Mesaj 1040549411)

Kod:

on *:NICK:{ 

  if $ulist($+($newnick,!*@*),Nick,0) {

    var %/ = 1 

    while $comchan($newnick,%/) { 

      mode $v1 +b $newnick 

      kick $v1 $newnick Badnick

      inc %/ 

    } 

  } 

}

Bunu dene.

bu olmasa birde sunu dene

Kod:

on @badnick:JOIN:*:{

  if ($ulist($fulladdress,koruma,0) >= 1) { return }

  elseif !$istok(#kanal1 #kanal2 #kanal3 #kanal4 #kanal5,$chan,32) {

    mode $chan +b $nick

    kick $chan $nick 5[ 4K2ÖTÜ 4R2UMUZ 4N2ICK 4İ2DENT 4E2MAİL 5] 4S12ebebinden 4 D12oLayı 4 U12zakLaştırıLdınız. 4/nick yeninick 12 Yaparak Giriş yapa biLirsiniz 4Z14aiL 4S14cript 4®

  }

}

on *:NICK:{ 

  if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }

  else {

    if $ulist($+($newnick,!*@*),badnick,0) {

      var %Cnk = 1 

      while $comchan($newnick,%Cnk) { 

        var %e = $v1 

        if $me isop %e && !$istok(#kanal1 #kanal2 #kanal3 #kanal4 #kanal5,%e,32) { 

          mode %e +b $newnick 

          kick %e $newnick 2Şuanda Kanal Seviyesinde Düşürecek ßir Nick Seçtiniz Lütfen 4/Nick Yeninick 2Komutuyla Nickinizi Deyiştirip Tekrar Giriniz.

        } 

        inc %Cnk 

      } 

    } 

  }

}

alias badnickekle {

  auser badnick $1 $+ !*@*

}

alias badnicksil {

  ruser badnick $1 $+ !*@*

}

alias nickkoruma {

  auser koruma $1 $+ !*@*

}

alias badidentekle {

  auser badnick *! $+ $1 $+ @*

}

alias badidentsil {

  ruser badnick *! $+ $1 $+ @*

}

alias identkoruma {

  auser koruma *! $+ $1 $+ @*

}

kodu ekledikten sonra sunlari yap
/badnickekle *gay*
/nickkoruma *turgay*
gibi devam edersin kolay gelsin

alintidir.