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

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

- - Kod yerleştirmede hata (https://www.ircforumlari.net/mirc-scripting-sorunlari/562792-kod-yerlestirmede-hata.html)

Kod yerleştirmede hata

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Sa Resimde görüldüğü bir dialog yapmaya calısıyorum dialog oldu ama kodlarda sorun var yardımcı olursanız sevinirim dialogun görevi kanal isimlerini eklemek ve eklenenleri listede alt alta çıkarmak şuan kanal isimlerini listede deyilde üst kısımda atmış gösteriyor bunu listeye atamadım sonra Gir butonuna basınca girmek birde eklemeyi yapamadım yardımcı olacak arkadaşa simdiden tsk ederim

Kod:

dialog tkgir {

  title "Kanallar Gir"

  size -1 -1 112 86

  option dbu

  box "", 1, 2 2 107 81

  edit "", 2, 5 10 57 68

  button "Gir", 3, 63 41 41 20

  button "Kapat", 4, 63 62 41 15, ok

  edit "", 6, 63 19 40 10

  button "Ekle", 7, 63 30 40 9

  text " Kanal ismi", 8, 64 10 28 8

}

on *:dialog:tkgir:init:*:{ 

  mdx MarkDialog $dname

  mdx SetDialog $dname bgcolor $rgb(222,254,219)

  mdx SetFont $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +b Turkish 11 Tahoma 550

  mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 textbg $rgb(222,154,219)

  mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 background $rgb(222,154,219)

  mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 text $rgb(0,0,100) 

  $iif(%tkall,did -ra $dname 1 %tkall,did -a $dname 1 #Guzyeli #Sohbet #Radyo #Kelime #islam #Test #Bilgi #Yarisma) 

}

on *:dialog:tkgir:sclick:3:{ set %tkall $did(1).text | tokenize 32 $did(1).text | join $* }

Cevap: Kod yerleştirmede hata

Onu Bilemem Ama Zahmetsiz Bir Yöntem Önerebilirim..

/gir /j #chat,#sohbetl,#almanya,#avusturya,#kanalekle,#kan alekle,#kanalekle, vs coğaltabilirsin.

Bunu Ctrl R yaparak Alias kismina ekleyip; serverda iken /gir yazdiğinda eklediğin bütün kanallara otamatik girecektir.. Addon olarakta mirci kasmamiş olursun bu sade bir yöntem..

Cevap: Kod yerleştirmede hata

Kod:

dialog tkgir {

  title "Kanallar Gir"

  size -1 -1 112 86

  option dbu

  list 1, 5 10 57 68

  button "Gir", 3, 63 41 41 20

  button "Kapat", 4, 63 62 41 15, ok

  edit "", 2, 63 19 40 10

  button "Ekle", 7, 63 30 40 9

  text " Kanal ismi", 8, 64 10 28 8

}
 

on *:dialog:tkgir:*:*:{

  if $devent == init {

    mdx MarkDialog $dname

    var %z = 1

    while (%z <= $ulist(*,kanal,0)) { 

      did -a tkgir 1 $ulist(*,kanal,%z)

      inc %z

    }

  }

  if $devent == dclick && $did == 1 {

    ruser Kanal $did(1).seltext

    did -d $dname 1 $did(1).sel

  }

  if $devent == sclick && $did == 7 && $did(2) {

    auser kanal $did(2)

    did -a $dname 1 $did(2)

  }

  if $devent == sclick && $did == 3 {

    join $did(1).seltext

  }

}

Cevap: Kod yerleştirmede hata

DnizaL Tsk ederim kod gayet istediğim gibi sadece kanal isimlerini dialoga atıyor ama gir diyince hepsine girmiyor

Cevap: Kod yerleştirmede hata

Listeden seçili olan kanala girecek şekilde ayarlamıştım.
Tüm kanallara giriş için ;

Kod:

dialog tkgir {

  title "Kanallar Gir"

  size -1 -1 112 86

  option dbu

  list 1, 5 10 57 68

  button "Gir", 3, 63 41 41 20

  button "Kapat", 4, 63 62 41 15, ok

  edit "", 2, 63 19 40 10

  button "Ekle", 7, 63 30 40 9

  text " Kanal ismi", 8, 64 10 28 8

}
 

on *:dialog:tkgir:*:*:{

  if $devent == init {

    mdx MarkDialog $dname

    var %z = 1

    while (%z <= $ulist(*,kanal,0)) { 

      did -a tkgir 1 $ulist(*,kanal,%z)

      inc %z

    }

  }

  if $devent == dclick && $did == 1 {

    ruser Kanal $did(1).seltext

    did -d $dname 1 $did(1).sel

  }

  if $devent == sclick && $did == 7 && $did(2) {

    auser kanal $did(2)

    did -a $dname 1 $did(2)

  }

  if $devent == sclick && $did == 3 {

    var %z = 1

    while (%z <= $ulist(*,kanal,0)) {

    join $ulist(*,kanal,%z)

    }

  }

}

Cevap: Kod yerleştirmede hata

Box yerine yazdırmıssın normaldir :)

Cevap: Kod yerleştirmede hata

Malesef son verilen kodda sanırım ufak bi sorun var gibi Gir diyince Donduruyor mIRC i

Cevap: Kod yerleştirmede hata

Alıntı:

KiMiiMBeN Nickli Üyeden Alıntı (Mesaj 1041387764)

Malesef son verilen kodda sanırım ufak bi sorun var gibi Gir diyince Donduruyor mIRC i

Alt kısımda

Kod:

 if $devent == sclick && $did == 3 {

    var %z = 1

    while (%z <= $ulist(*,kanal,0)) {

    join $ulist(*,kanal,%z)

    }

Olan kısmı

Kod:

 if $devent == sclick && $did == 3 {

    var %z = 1

    while (%z <= $ulist(*,kanal,0)) {

    join $ulist(*,kanal,%z)

    inc %z

    }

olarak degiştir.

Cevap: Kod yerleştirmede hata

pc ye geçince düzeltirim.

Cevap: Kod yerleştirmede hata

Sorun hal olmuştur Teknikshell'in son verdiği ile düzelmiştir önce Dnizal sonrasında Teknikshell Tsk ederim