menumde hata nerede
 

arkadaşlar soyledim gibi acemiyim. kendi bağlan menumu kodları inceleyrek yapmayı denedim. bulduğum kodları eklediğimde mırc açılışında menu gelmedi. bağlantı menusu hakkında genelde ornek kod verilmiş, hangi kodun ne yaptığı anlatılmamış. bu yuzden anlamakta zorluk çektim aşağıda kodumu veriyorum.
yapmak istediğim mirc açılınca bağlan menusu gelsin, menudeki bağan tuşu ile bağlantı sağlansın
Sorun şu

1.mırc açılında dialog geliyor. Fakat bağlan tuşuna basmadan kendi bağlanmaya çalışıyor ve ekranımda şu hata çıkyor. ( kod içinde server kısmındaki ismi burada reklam olmasın diye deneme yazdım.)

/on: Servera bağlı değilsiniz (Satır 27, script.ini)
-

/// kodum şu şekilde

alias mdx { return $dll(sys\mdx.dll,$1,$2-) }
on 1:start: /baglan


alias baglan { dialog -m baglan baglan }
dialog baglan {
title "Türkçe mIRC Bağlantı Paneli"
size -1 -1 152 75
option dbu
box "", 1, 2 -1 148 74
text "Sohbette kullanacağınız rumuzu kutucuğa yazınız", 2, 4 5 143 14, center
edit "bb", 3, 8 23 135 10, center
button "- S O H B E T E B A Ğ L A N -", 4, 8 34 135 19,default
button "Türkiye", 5, 8 55 66 14
button "Yurt Dışı", 6, 77 55 66 14
}
on *:dialog:baglan:*:*:{
if ($devent == init) {
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetDialog $dname bgcolor $rgb(230,230,230)
mdx SetColor $dname 2,3,4,6,7,12,10 textbg $rgb(230,230,250)
mdx SetColor $dname 2,3,4,6,7,12,10 background $rgb(230,230,250)

}

on 1:dialog:baglan:*:*: {
if ($devent == init) {
if $me == $null {
.nick tutku- $+ $rand(1,999) $+ $rand(1,999)
}
did -a baglan 3 $me
}
if ($devent == sclick) {
if ($did == 4 ) { /!server irc.deneme.net:6667 | .nick $did(3) | /dialog -c baglan baglan }
}
if ($devent == sclick) {
if ($did == 5 ) { /!server irc.deneme.net:6668 | .nick $did(3) | /dialog -c baglan baglan }
}
if ($devent == sclick) {
if ($did == 6 ) { /!server irc.deneme.net:6666 | .nick $did(3) | /dialog -c baglan baglan }
}
}

Cevap: menumde hata nerede
 

(Satır 27, script.ini)

Script ini dosyasında, 27'nci satıra bak, oradaki hatadan dolayı hata alıyorsun.

Cevap: menumde hata nerede
 

:)) dalga geçmeyelim lutfen onu zaten belirttim hata kısmında buradaki hatanın ne olduğunu soruyorum zaten.

satır 27 dediği yer editorden baktığım kadarıyla

on *:dialog:baglan:*:*:{
if ($devent == init) {
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetDialog $dname bgcolor $rgb(230,230,230)
mdx SetColor $dname 2,3,4,6,7,12,10 textbg $rgb(230,230,250)
mdx SetColor $dname 2,3,4,6,7,12,10 background $rgb(230,230,250)
Burada hata olduğunu gosteriyor.
}

Cevap: menumde hata nerede
 

sorunun sadece bir tane "}" işaretinin eksik olması kırmızı yer yani
-------------

kodda fazlalık var bu şekilde kullanmalısın

Cevap: menumde hata nerede
 

teşekkurler hocam şimdi çalıştı. sayende yanlış kod tasarım yaptığımı ve nasıl olması gerektini gördüm. çok teşekkurler.