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

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

- - Kanal Listesi {Dialog} (https://www.ircforumlari.net/mirc-scripting-sorunlari/209107-kanal-listesi-dialog.html)

Kanal Listesi {Dialog}

Merhaba Arkadaslar Bır Dialog Olusturdum Kendımce Bısıler Yaptım Beceremedım Murat_Aziz Arkadasımdan Yardım Aldım Ama Ondada Sorun Cıkdı Ben Butonlara Tıklayınca O Kanala Gırsın Istıyorum Ve Altta Kanal Adını Yazıp gir Butonuna Tıklayınca O Istedıgım kanala Gırsın Yardım Edebılırmısınız Acaba ?

PHP- Kodu:

           dialog Kanalx {
  title "Kanalz"
  size -1 -1 174 181
  option dbu
  button "Turkiye", 2, 57 71 37 12
  button "Heaven", 4, 117 88 37 12
  button "Zurna", 5, 57 88 37 12
  button "Sohbet", 6, 118 72 37 12
  button "Radyo", 7, 57 105 37 12
  icon 8, 0 0 172 51,  C:\Documents and Settings\Administrator\Desktop\Heaven Script\icon\koruma.jpg, 0
  button "Edebiyat", 3, 117 106 37 12
  button "Bulmaca", 17, 57 123 37 12
  button "#Oyun", 18, 116 124 37 12
  text "Baglanmak İstediginiz Sohbet Kanalının İsmine Tıklayın", 9, 5 54 165 8
  text "#Türkiye", 10, 5 72 42 8
  text "#Sohbet", 11, 6 84 43 8
  text "#Zurna", 12, 5 96 44 8
  text "#Heaven", 13, 5 108 43 8
  text "#Radyo", 14, 5 121 43 8
  text "#Edebiyat", 15, 5 134 44 8
  text "#Bulmaca", 16, 5 147 44 8
  text "#Oyun", 19, 5 160 44 8
  edit "", 20, 93 164 50 10
  box "Kanallar", 21, 53 64 116 75
  text "Kanala Gir", 22, 56 164 32 8
  box "List", 1, 1 64 52 108
  button "Gir", 24, 149 164 19 10
}
on *:dialog:kanalx:sclick:2: { 
  /j turkiye
}
on *:dialog:kanalx:sclick:4: { 
  /j heaven
}
on *:dialog:kanalx:sclick:5: { 
  /j zurna
}
on *:dialog:kanalx:sclick:6: { 
  /j sohbet
}
on *:dialog:kanalx:sclick:7: { 
  /join #radyo
}
on *:dialog:kanalx:sclick:3: { 
  /join #edebiyat
}
on *:dialog:kanalx:sclick:17: { 
  /join #bulmaca
}
on *:dialog:kanalx:sclick:18: { 
  /join #oyun
} 
on 1:Dialog:kanalx:Sclick:24: {
  if $did(20) { J $did(20) }
}

Cevap: Kanal Listesi {Dialog}

Basit örnek bir diyalog yaptım, senin diyalogunun özeti bakarak rahatca anlayabilirsin.

PHP- Kodu:

   dialog kanalx {
  title "New Project"
  size -1 -1 77 97
  option dbu
  edit "", 1, 16 12 50 10
  button "Gir", 2, 22 35 37 12
  button "#Kanal", 3, 20 66 37 12
}
on *:dialog:kanalx:sclick:*: {
  if ($did == 2) {  
    if $did(1) != $null { join $did(1) } 
    else { echo -a Kanal Adı Girmediniz. } 
  }
  if ($did == 3) { join #kanal }
}

Cevap: Kanal Listesi {Dialog}

Bu Sekıl Yaptım Ama Gene Olmadı Gırmedı Kanallara.

Alıntı:

dialog Kanalx {
title "Kanalz"
size -1 -1 174 181
option dbu
button "Turkiye", 2, 57 71 37 12
button "Heaven", 4, 117 88 37 12
button "Zurna", 5, 57 88 37 12
button "Sohbet", 6, 118 72 37 12
button "Radyo", 7, 57 105 37 12
icon 8, 0 0 172 51, icon\kanallar.jpg, 0
button "Edebiyat", 3, 117 106 37 12
button "Bulmaca", 17, 57 123 37 12
button "#Oyun", 18, 116 124 37 12
text "Baglanmak İstediginiz Sohbet Kanalının İsmine Tıklayın", 9, 5 54 165 8
text "#Türkiye", 10, 5 72 42 8
text "#Sohbet", 11, 6 84 43 8
text "#Zurna", 12, 5 96 44 8
text "#Heaven", 13, 5 108 43 8
text "#Radyo", 14, 5 121 43 8
text "#Edebiyat", 15, 5 134 44 8
text "#Bulmaca", 16, 5 147 44 8
text "#Oyun", 19, 5 160 44 8
edit "", 20, 93 164 50 10
box "Kanallar", 21, 53 64 116 75
text "Kanala Gir", 22, 56 164 32 8
box "List", 1, 1 64 52 108
text "Kanal İsmini Yazarken (#) Kanal İşaretini Koymayı unutmayınız (Örnek: #Heaven )", 23, 56 140 107 21
button "Gir", 24, 149 164 19 10
}
on *:dialog:Kanalx:*:*:{
dll dll/mdx.dll SetMircVersion $version | dll dll/mdx.dll MarkDialog $dname
dll dll/mdx.dll SetFont 2,4,5,6,7,3,17,18,9,10,11,12,13,14,15,16,19,20,21, 22,23,24, 13 700 Tahoma
dll dll/mdx.dll SetFont +b 3,26,27 700 Tahoma
}
on *:dialog:kanalx:sclick:*: {
if ($did == 24) {
if $did(20) != $null { join $did(20) }
else { echo -a Kanal Adı Girmediniz. }
}
if ($did == 2) { join #turkiye }
if ($did == 3) { join #heaven }
if ($did == 5) { join #zurna }
if ($did == 6) { join #sohbet }
if ($did == 7) { join #radyo }
if ($did == 3) { join #edebiyat }
if ($did == 17) { join #bulmaca }
if ($did == 18) { join #oyun }
}

Cevap: Kanal Listesi {Dialog}

Kod:

on *:dialog:Kanalx:*:init:{

dll system\dlls\mdx.dll SetMircVersion $version | dll system\dlls\mdx.dll MarkDialog $dname

dll system\dlls\mdx.dll SetFont 2,4,5,6,7,3,17,18,9,10,11,12,13,14,15,16,19,20,21, 22,23,24, 13 700 Tahoma

dll system\dlls\mdx.dll SetFont +b 3,26,27 700 Tahoma

}

on *:dialog:kanalx:sclick:*: {

  if ($istok(2 3 5 6 7 3 17 18,$did,32)) $iif($chr(35) !isin $did($did),join $chr(35) $+ $did($did),join $did($did))

  elseif ($did == 24) $iif(!$did(20),echo -a Kanal adı girmediniz!,$iif($chr(35) !isin $did(20),join $chr(35) $+ $did(20),join $did(20)))

}

Cevap: Kanal Listesi {Dialog}

Tamam Oldu Cok Saol Serdar Emegıne Saglık.

Cevap: Kanal Listesi {Dialog}

Benim verdiğim kod kanallara girmiyormu denedim ben onu şimdide denedim çalışıyor neresini beğenmedin anlayamadım

Cevap: Kanal Listesi {Dialog}

Begenmemekle Alakası Yok Denedım Calısmadı Gırmedı Kanallara Bazen Mdx Kullanınca Dıalog Calısmıyor.

Ben Bu Sekıl Yapmısdım Calısmadı

Alıntı:

on *:dialog:Kanalx:*:*:{
dll dll/mdx.dll SetMircVersion $version | dll dll/mdx.dll MarkDialog $dname
dll dll/mdx.dll SetFont 2,4,5,6,7,3,17,18,9,10,11,12,13,14,15,16,19,20,21, 22,23,24, 13 700 Tahoma
dll dll/mdx.dll SetFont +b 3,26,27 700 Tahoma
}

Serdar ise Bu Sekıl Yaptı Oldu .

Alıntı:

on *:dialog:Kanalx:*:init:{
dll system\dlls\mdx.dll SetMircVersion $version | dll system\dlls\mdx.dll MarkDialog $dname
dll system\dlls\mdx.dll SetFont 2,4,5,6,7,3,17,18,9,10,11,12,13,14,15,16,19,20,21, 22,23,24, 13 700 Tahoma
dll system\dlls\mdx.dll SetFont +b 3,26,27 700 Tahoma
}

init Olarak aYarladı yanı

Cevap: Kanal Listesi {Dialog}

Kod:

on *:dialog:x:*:*: { }

olarak kullanırsanız eğer tüm dialog event'larını kapsar ve altına yazacağınız kodlar sclick,dclick,close,vs.. dialog event çeşitlerinde uygulanır.

Bu event varken ayrıca birde

Kod:

on *:dialog:x:sclick:*: { }

event'ını eklerseniz çakışma yapabilir bu event'ın altına yazacağınız kodlar çalışmayabilir.

onun yerine şu şekilde kullanabilirsiniz.

Kod:

on *:dialog:x:*:*: {

if ($devent == init) {

dll mdx.dll MarkDialog $dname

dll mdx.dll SetDialog $dname style

}

if ($devent == sclick) {

if ($did == 2) echo -a selam

}

if ($devent == close) echo -a Dialog kapandı!

}

Bu şekilde tek bir event'ın altında tüm dialog event çeşitlerini kullanırsanız herhangi bir sorun çıkmayacaktır.

Ek bir bilgi...