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

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

- - Veriables ten Okutmak. (https://www.ircforumlari.net/mirc-scripting-sorunlari/171811-veriables-ten-okutmak.html)

Veriables ten Okutmak.

Veriables e

Kod:

%KickMsg 4[1!4] 4[3 $chan 4] 12Kanalından 4{3 15 Dk 4} 12Uzaklaştırıldınız.

Bunu Ekledim Kick Msj larının Hepsini
%kickmsg den okutayım diye. Fakat kick yaptığında
[16:28] * oZMoZ Testingg Tarafından Kanaldan Atıldı ([!] [ $chan ] Kanalından { 15 Dk } Uzaklaştırıldınız.)
böyle çıkıyor.

Buradaki $chan ın Yerine Kanalın İsmini Yazsın İstiyorum.

Cevap: Veriables ten Okutmak.

Kodun diğer kısmını paylaşırmısınız.

Cevap: Veriables ten Okutmak.

Remotedeki

Kod:

on @8:join:#:{ if ($nick != $me) { mode $chan +bb $nick $wildsite | kick $chan $nick %kickmsg    } }

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

dialog shitlist {

  title "Karaliste"

  size -1 -1 200 265 

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

  list 2, 10 20 180 135, sort 

  box "Karaliste", 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 Çift Tıklayın", 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 

  } 

}

Veriablesteki

Kod:

%kickmsg karalistedesiniz 4[1!4] 4[3 $chan 4] 12Kanalından 4{3 15 Dk 4} 12Uzaklaştırıldınız.

Kick Yapıncada:

[16:41] * testing RapStar Tarafından Kanaldan Atıldı (karalistedesiniz [!] [ $chan ] Kanalından { 15 Dk } Uzaklaştırıldınız.)

Böyle Çıkıyor. kick msj ındaki $chan kanalı neden göstermiyor ?

Cevap: Veriables ten Okutmak.

Kod:

on @8:join:#:{ if ($nick != $me) { set -e $+(%,kickmsg) 4[1!4] 4[3 $chan 4] 12Kanalından 4{3 15 Dk 4} 12Uzaklaştırıldınız. | mode $chan +bb $nick $wildsite | kick $chan $nick %kickmsg    } }

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

dialog shitlist {

  title "Karaliste"

  size -1 -1 200 265 

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

  list 2, 10 20 180 135, sort 

  box "Karaliste", 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 Çift Tıklayın", 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 

  } 

}

Sadece bu koruma için düşündüyseniz,bence kodda %kickmsg yerine direk
4[1!4] 4[3 $chan 4] 12Kanalından 4{3 15 Dk 4} 12Uzaklaştırıldınız.
yazmanız daha doğru olur.Hani set yaparak ikinci bir işlemle yormuş oluyoruz.
Ama bu %kickmsg olayını başka bir korumada da kullanacağım diyorsanız $chan kısmını kullandığınız kod içerisinde belirttiğim gibi önce bir tanım getirmelisiniz.

İyi forumlar...