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

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

- - Koda ek Yapabilir miyiz (https://www.ircforumlari.net/mirc-scripting-sorunlari/157327-koda-ek-yapabilir-miyiz.html)

Koda ek Yapabilir miyiz

Selam

Kod:

on @8:join:#:{ if ($nick != $me) { .ban $chan $nick | kick $chan $nick %blogo } }

alias shitconf if $dialog(Shitlist) == $null dialog -m shitlist shitlist

dialog shitlist {

  title "Kotu Nick Koruma"

  size -1 -1 200 265 

  button "Tamam", 1, 110 200 70 20,ok

  list 2, 10 20 180 135, sort 

  box "Kotu Nickler", 3, 5 5 190 145 

  edit "*", 4, 10 165 180 20, autohs

  box "Eklenecek Nick'i Girin", 5, 5 150 190 45

  button "Ekle", 6, 20 200 70 20

  box "Not:", 7, 5 225 190 35 

  text "Nick Silmek İcin Nick'e Cift Tiklayin", 8, 25 240 180 45  

}

alias shitsetup if $dialog(shitlist) == $null dialog -m shitlist shitlist

on *:dialog:shitlist:dclick:2:{ .ruser 8 $did(2).seltext | did -d shitlist 2 $did(2).sel }

on *:dialog:shitlist:sclick:6:{ if ($did(4) != $null) { did -a shitlist 2 $did(4) | .auser 8 $did(4) | did -fr shitlist 4 } }

on *:dialog:shitlist:init:*:{ 

  if ($ulist(*,8,0) != $null) { 

    set %cnt.shit 0

    while (%cnt.shit < $ulist(*,8,0)) { 

      inc %cnt.shit 1 

      did -a shitlist 2 $ulist(*,8,%cnt.shit) 

    }      

    unset %cnt.shit 

  } 

}

Bu bendeki bad nick koruması sadece kick / ban şeklinde çalışıyo, Buna Kill ve Zline gibi secenekler ekleyebilir miyiz seceneğe göre çalışşsın istiyorum.
Birde sadece kanala giren badnicke işlem yapıyo kanal içerisinde nick değişince de (normal nickini badnick olarak değişince) çalıştırabilir miyiz.
Tşk ler.

Cevap: Koda ek Yapabilir miyiz

Kod:

on *:NICK:{

  if ($level($newnick) == 8) {

    var %Cnk = 1

    while $comchan($newnick,%Cnk) {

      var %e = $v1

      if $me isop %e {

        mode %e +b $newnick

        kick %e $newnick %blogo

      }

      inc %Cnk

    }

  }

}

Nick değişimlerinde badnick saptarsa op olduğun kanallardan atacaktır.
Gelelim kill ve zline seçeneklerine:
Dialog'un kalıp halde eklediğin bir nicki oto olarak 8 user seviyesinden ekliyor.Şöyle düşünebilirsin,bu dialogu aynen kopya olarak kullan,dialogun ismi,aliasını değiştir :) kendine 2. hatta 3. bir dialog oluştur.
Kill atmak istediklerin için user seviyesini dialogda 9 olarak,
Zline atmak istediklerin için user seviyesini dialogda 10 olarak belirtebilirsin.
Bu durumlara mukabil
on @9:join:#:{ .... kill $nick ...
on @10:join:#:{ .... zline $nick ...

yada if ($level($nick) == 9) ... kill $nick , if ($level($nick) == 10) ... zline $nick

Anlarsın ya ;)

Hadi kolay gelsin...

Cevap: Koda ek Yapabilir miyiz

bu kodu remote ye mi eklicem yoksa koda mı ek yapıcam
+ ikinci secenek sence de biraz hamallık değil mi dialoğa 2 check koysak daha basit olur die düşünüyorum

Cevap: Koda ek Yapabilir miyiz

Yazdığımı kodu,sendeki kodun en üst kısmına ekleyebilirsin.Bir bütün olarak gözünün önünde olmuş olur.
"dialoğa 2 check koysak daha basit olur " demişsin , kim tutar seni ;)
Ben sadece mantığı anlattım,kavradığını umuyorum...

Cevap: Koda ek Yapabilir miyiz

kimse tutmaz ama if ile bi örnek sen koysan eminim diğerlerini ben yapabilirim.
Yap ver demiyorum sadece bir örnek ok :)

Cevap: Koda ek Yapabilir miyiz

[quote=Difuzyon;587228]

Kod:

on *:NICK:{

  if ($level($newnick) == 8) {

    var %Cnk = 1

    while $comchan($newnick,%Cnk) {

      var %e = $v1

      if $me isop %e {

        mode %e +b $newnick

        kick %e $newnick %blogo

      }

      inc %Cnk

    }

  }

}

Difuzyon usta böle bi kod vermiştin
Ben bunu şu şekilde değiştirdim

Kod:

on *:NICK:{

  if ($level($newnick) == rgst) {

    var %Cnk = 1

    while $comchan($newnick,%Cnk) {

      var %e = $v1

      if $me isop %e {

        if (%rgkick == on) { kick # $nick %rglogo }

        if (%rgban == on) { ban # $nick 2 }

        if (%rgShun == on) { shun $nick +1d %rglogo }

        if (%rgSamode == on) { samode # +b $nick  }

        if (%rgakill == on) { os killclones $nick }

        if (%rgkill == on) { kill $nick %rglogo }

        if (%rgK-Line == on) { kline $nick +1d %rglogo }

      }

      inc %Cnk

    }

  }

}

Sanırım yine hata yaptım bi göz atarmısın ?
Tşk ler şimdiden

Cevap: Koda ek Yapabilir miyiz

Alıntı:

WeiLSiDe Nickli Üyeden Alıntı (Mesaj 589513)

Ben bunu şu şekilde değiştirdim

Kod:

on *:NICK:{

  if ($level($newnick) == rgst) {

    var %Cnk = 1

    while $comchan($newnick,%Cnk) {

      var %e = $v1

      if $me isop %e {

        if (%rgkick == on) { kick # $nick %rglogo }

        if (%rgban == on) { ban # $nick 2 }

        if (%rgShun == on) { shun $nick +1d %rglogo }

        if (%rgSamode == on) { samode # +b $nick  }

        if (%rgakill == on) { os killclones $nick }

        if (%rgkill == on) { kill $nick %rglogo }

        if (%rgK-Line == on) { kline $nick +1d %rglogo }

      }

      inc %Cnk

    }

  }

}

Sanırım yine hata yaptım bi göz atarmısın ?
Tşk ler şimdiden

Nick değişimi olduğunda,hangi variables(%var) varsa ona göre işlem yapsın demek istedin sanırım.örneğin, /set %rgban on şeklinde elle eklediğini düşünelim.Bu variables'inde tablonda aşağıda şekilde ekli olduğunu düşünürsek:

%rgban on

Bu durumda aşağıdaki kod işlem yapacaktır;

Kod:

on *:NICK:{

  if ($level($newnick) == rgst) {

    var %Cnk = 1

    while $comchan($newnick,%Cnk) {

      var %e = $v1

      if $me isop %e {

        if (%rgkick == on) { kick %e $nick %rglogo }

        if (%rgban == on) { ban %e $nick 2 }

        if (%rgShun == on) { shun $nick +1d %rglogo }

        if (%rgSamode == on) { samode % +b $nick  }

        if (%rgakill == on) { os killclones $nick }

        if (%rgkill == on) { kill $nick %rglogo }

        if (%rgK-Line == on) { kline $nick +1d %rglogo }

      }

      inc %Cnk

    }

  }

}

Ama yok ben bu variables(%var) değerini "on" yazmıcam da başka bir değer atayacağım ve bu değer ne olursa kod algılasın demek istediysen,bu durumda örnek olarak ;
if $var(%rgban,0) > 0 { ban %e $nick 2 }
şeklinde bir metod uygulamalısın...

Cevap: Koda ek Yapabilir miyiz

emeğine sağlık difuzyon ;)

Cevap: Koda ek Yapabilir miyiz

Difuzyon öncelikle yardımların için tşk ler. Bişey anladım gibi ama tamda anladım sayılmaz.
Benim asıl demek istediğim "Kod da secenekler var göründüğü gibi, Ben istiyorum ki eğer kanal içerisinde biri nick değişti ve koruma algıladığında secili işlemi uygulasın. Daha da acıkcası hangi check aktifse o işlemi yapsın"

Cevap: Koda ek Yapabilir miyiz

Vadesi gelmiş check'lerini bizimle paylaşırmısın :)
Daha sağlıklı çözüm bulmak adına...