on *:start: { .baglantimenusu } 
 
alias baglantimenusu { dialog -m ayarlar ayarlar | did -v ayarlar 8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23 }
alias otokanal { dialog -m ayarlar ayarlar | did -v ayarlar 24,25,26,27,28,29,30,31,32,33,34,35,36 }
alias otonick { dialog -m ayarlar ayarlar | did -v ayarlar 37,38,39,40,41,42,43,44,45,46,47,48,49 }
 
dialog ayarlar {
  title "  X Script - Genel Ayarlar [ Kısayol Tuşu: F6 ] "
  size -1 -1 252 200
  option dbu
  icon icon\Ayarlar.ico, 0
  ;Yan Liste
  list 1, 5 26 68 149, size extsel
  button "Tamam", 2, 139 180 50 15, OK
  button "Yardım", 3, 20 180 45 15
  ;Üst yazı
  text "", 4, 5 3 241 19
  list 5, 200 2 25 14, size disable
  text " X Script - Genel Ayarlar Merkezi", 6, 7 7 170 12
  box "",7, 5 -1 242 23 
  ;Bağlantı Menüsü  
  combo 8, 90 36 90 120, drop
  box "Sunucu Ayarları", 9, 78 24 168 64
  button "Ekle",10, 195 36 30 11
  button "Sil",11, 195 49 30 11
  button "Düzenle",12, 195 62 30 11
  button "IRC Servere Bağlan", 13, 102 54 55 12
  check "Yeni Sunucu Penceresi Aç", 14, 100 71 96 14, flat
  box "Bağlantı Ayarları", 15, 78 90 168 85
  edit "", 16, 135 100 90 12
  edit "", 17, 135 117 90 12
  edit "", 18, 135 135 90 12
  edit "", 19, 135 154 90 12
  text "İsim :", 20, 113 102 20 10
  text "E-Posta Adresi :", 21, 87 119 48 10
  text "Nick :", 22, 113 137 20 10
  text "Alternatif Nick:", 23, 90 156 45 10
  ;Otomatik Kanal Girişi
  box "Otomatik Kanal Ayarları", 24, 78 24 168 151
  text "Otomatik Kanal  Listesi", 25, 108 38 70 12 
  list 26,85 52 150 75
  check Otomatik Giriş Açık, 27, 173 160 62 11, flat
  button "Ekle", 28, 170 127 30 12
  button "Sil", 29, 170 142 30 12
  Text "Kanal  :", 30, 85 129 18 11, read autohs center
  edit "#", 31, 110 127 55 12, autohs
  Text "Şifre :", 32, 85 144 16 12, read autohs center
  edit "", 33, 110 142 55 12, autohs
  Text "Server :", 34, 85 160 21 11, read autohs center
  edit "irc.", 35, 110 158 55 12, autohs
  icon 36, 85 33 100 57, icon\kanallar.ico, 0
  ;Otomatik Şifre Girişi
  box "Otomatik Şifre Ayarları", 37, 78 24 168 151
  text "Otomatik Nick İdentify", 38, 108 38 70 12
  list 39, 85 52 150 75
  check Otomatik İdentify Açık, 40, 173 160 62 11, flat
  button "Ekle", 41, 170 127 30 12
  button "Sil", 42, 170 142 30 12
  Text "Kanal  :", 43, 85 129 18 11, read autohs center
  edit "#", 44, 110 127 55 12, autohs
  Text "Şifre :", 45, 85 144 16 12, read autohs center
  edit "", 46, 110 142 55 12, autohs
  Text "Server :", 47, 85 160 21 11, read autohs center
  edit "irc.", 48, 110 158 55 12, autohs
  icon 49, 85 33 100 57, icon\key.ico, 0
}
alias mdx return $dll($mircdir $+ \dll\mdx.dll,$1,$2-)
alias views { return $shortfn($mircdirdll\views.mdx) }
alias bars { return $shortfn($mircdirdll\bars.mdx) }
alias ayarlariac {
  var %i = did -i ayarlar 1 1,%a = did -a ayarlar 1 +e
  %i iconsize normal small
  %i seticon normal 0, $+ icon\genel.ico
  %i seticon normal 0, $+ icon\kanallar.ico
  %i seticon normal 0, $+ icon\key.ico
  %i seticon normal 0, $+ icon\gorunum.ico
  %i seticon normal 0, $+ icon\s3.ico
  %i seticon normal 0, $+ icon\toolbar.ico
  %i seticon normal 0, $+ icon\simge.ico
  %i seticon normal 0, $+ icon\balon.ico
  %i cb root 1
  %a 1 1 Bağlantı Menüsü
  %i cb root last 1
  %a 2 2 Oto-Join
  %a 3 3 Oto-Identify
  %i cb root 1
  %a 4 4 Görünümler
  %i cb root last 1
  %a 5 5 Switchbar 
  %a 6 6 Toolbar ve Diğer
  %a 7 7 Nicklistesi
  %a 8 8 Tray
  %i cb root 1
 
}
alias sakla1 { did -h ayarlar 8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49 }
alias goster.baglanti { sakla1 |  did -v ayarlar 8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23 }
alias goster.otokanal { sakla1 |  did -v ayarlar 24,25,26,27,28,29,30,31,32,33,34,35,36 }
alias goster.otonick { sakla1 | did -v ayarlar 37,38,39,40,41,42,43,44,45,46,47,48,49 }
on *:dialog:ayarlar:*:*:{
  if ($devent == init) {
    mdx SetMircVersion $version
    mdx MarkDialog $dname
    mdx SetControlMDX $dname 1 treeview hasbuttons haslines > $views
    mdx SetFont $dname  9,15,24,25,37,38 +a 14 600 Arial
    mdx SetColor $dname 9,15,24,37 text $rgb(0,14,255)
    mdx SetControlMDX $dname 26,39 ListView report grid rowselect showsel single  > $views
    mdx SetFont $dname 26,39 13 600 Tahoma
    did -i $dname 26 1 headerdims 100 85 110
    did -i $dname 26 1 headertext +c Kanal $chr(9) Şifre $chr(9) Server
    did -i $dname 39 1 headerdims 100 85 110
    did -i $dname 39 1 headertext +c Nick $chr(9) Şifre $chr(9) Server
    did -i $dname 26,39 1 setbkg color $rgb(248,248,255)  
    did -i $dname 26,39 1 settxt color $rgb(0,0,0)
    did -i $dname 26,39 1 settxt bgcolor $rgb(230,230,255)
    mdx SetBorderStyle $dname 4,6
    mdx SetControlMDX $dname 5 toolbar flat list nodivider arrows > $bars
    did -i $dname 5 1 bmpsize 30 30
    mdx SetBorderStyle $dname 5
    mdx SetColor $dname 5 background $rgb(245,245,245)
    did -i $dname 5 1 setimage +nhd 0 icon large icon/ayarlar.ico
    did -i $dname 5 1 bwidth 250 250
    did -a $dname 5 1 a
    mdx SetColor $dname 4,6 background $rgb(245,245,245)
    mdx SetColor $dname 4,6 textbg $rgb(245,245,245)
    mdx SetFont $dname 6 17 600 Tahoma
    ayarlariac
    sakla1 
  }
  if ($devent == sclick) {
    if ($did == 1) { 
      tokenize 32 $did(1,1,1)
      if ($4 == 2) { 
        if (!$5) { goster.baglanti }
        if ($5 == 2) { goster.otokanal }
        if ($5 == 3) { goster.otonick }
      }
    }
  }