Kanal Listesi {Dialog} - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

StanteaR · 14 Mayıs 2009, 08:53

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 Kod: Kodu kopyalamak için üzerine çift tıklayın!


        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) }
}

Med Cezir · 14 Mayıs 2009, 12:17

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

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


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 }
}

StanteaR · 14 Mayıs 2009, 12:29

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 }
}

SeRDaR406 · 14 Mayıs 2009, 13:16

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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)))
}

StanteaR · 14 Mayıs 2009, 13:44

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

muratt_aziz · 15 Mayıs 2009, 00:47

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

StanteaR · 15 Mayıs 2009, 18:54

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ı

SeRDaR406 · 15 Mayıs 2009, 19:08

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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: Kodu kopyalamak için üzerine çift tıklayın!

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: Kodu kopyalamak için üzerine çift tıklayın!

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...

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Kanal Koruma Addonu Dialog'lu	DeLiTiM	mIRC Scripting Hazır Kodlar	2	20 Eylül 2016 22:33
Sag kanal listesi rengi	Kimimben	mIRC Scripting Sorunları	0	18 Temmuz 2012 15:04
KorumaLar Dialog. KanaL/KiŞiseL	TİGeR	mIRC Scripting Hazır Kodlar	4	19 Eylül 2010 23:27
Kanal ve User korumaları ( Dialog seklinde )	RNA	mIRC Scripting Hazır Kodlar	15	28 Mart 2007 16:23
Dialog Kanal Listesi	HaLiKaRNaSX	mIRC Scripting Hazır Kodlar	0	29 Mart 2006 21:37

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.