on *:start: { dialog -m toolbar toolbar }
alias Temadene { echo -a Temam: $iif($temabul,XP Teması,Klasik Windows Teması) }
alias Temabul { .comreg dll/Tema.dll | .comopen toolbar Tema.buL | var %komut = $com(toolbar,TemaBul,1) | var %komut = $com(toolbar).result | .comclose toolbar | .comreg -u dll/Tema.dll | return %komut }
alias mdx { return $dll(DLL\mdx.dll,$1,$2-) }
alias rebar { dll DLL\rebar.dll $$1- }
alias bars { return DLL\bars.mdx }

on *:connect: {
  update.toolbar
}

on *:disconnect: {
  update.toolbar
}

on *:close:*: {
  update.toolbar
}

alias saat { if ($dialog(toolbar)) { did -a toolbar $1 $date $time } }

alias update.toolbar {
  if (!$dialog(toolbar)) { halt }
  else {
    scid $activecid
    if ( $scid($activecid).status = connecting || $scid($activecid).status = connected ) { 
      did -o toolbar 1 3 +a 2 $chr(32) Kes $chr(9) $+ Bağlantıyı Kes  
    }
    else {
      did -o toolbar 1 3 +a 1 $chr(32) Bağlan $chr(9) $+ Servere Bağlan
    }
  }
}


dialog toolbar {
  title "x"
  size 0 0 550 $iif($temabul,14,17)
  option dbu
  list 4, 0 -2 600 17, size
  list 1, 0 4 600 17, size
  text "", 2, 518 6 45 16, center
  text "", 3, 521 10 39 11, center
} 
on *:dialog:toolbar:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style

  mdx SetFont $dname 12 17 550 Courier New
  .timersaat 0 1 saat 12


  rebar HideToolbar
  rebar Dock $dialog(toolbar).hwnd > top
  mdx SetControlMDX $dname 1,2,7,9,13 ToolBar flat wrap arrows nodivider > $bars
  mdx SetBorderStyle 1,2,7,9,13


  did -i $dname 2 1 bmpsize 16 16
  did -i $dname 2 1 setimage +nhd 0 icon small icon\1.ico
  did -a $dname 2 +b 1 $chr(32)             $+ $chr(9) $+ OP / DEOP
  did -i $dname 2 1 setimage +nhd 0 icon small icon\7.ico
  did -a $dname 2 +b 2 $chr(32)             $+ $chr(9) $+ VOICE / DEVOICE
  did -i $dname 2 1 setimage +nhd 0 icon small icon\3.ico
  did -a $dname 2 +b 3 $chr(32)             $+ $chr(9) $+ KICK BAN

  did -i $dname 7 1 bmpsize 16 16
  did -i $dname 7 1 setimage +nhd 0 icon small icon\4.ico
  did -a $dname 7 +b 1 $chr(32)             $+ $chr(9) $+ Kick
  did -i $dname 7 1 setimage +nhd 0 icon small icon\5.ico
  did -a $dname 7 +b 2 $chr(32)             $+ $chr(9) $+ Whois Çek
  did -i $dname 7 1 setimage +nhd 0 icon small icon\7.ico
  did -a $dname 7 +b 3 $chr(32)             $+ $chr(9) $+ Özel Aç


  did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
  did -i $dname 1 1 bmpsize 26 26
  did -i $dname 1 1 setimage icon large icon\1.ico
  did -i $dname 1 1 setimage icon large icon\9.ico
  did -i $dname 1 1 setimage icon large icon\3.ico
  did -i $dname 1 1 setimage icon large icon\4.ico
  did -i $dname 1 1 setimage icon large icon\korumalar2.ico
  did -i $dname 1 1 setimage icon large icon\mp3.ico
  did -i $dname 1 1 setimage icon large icon\5.ico
  did -i $dname 1 1 setimage icon large icon\7.ico
  did -i $dname 1 1 setimage icon large icon\1.ico
  did -i $dname 1 1 setimage icon large icon\9.ico
  did -i $dname 1 1 setimage icon large icon\3.ico
  did -i $dname 1 1 setimage icon large icon\4.ico
  did -a $dname 1 +a -
  did -a $dname 1 +a 1  Bağlan $chr(9) $+ Servere Bağlan
  did -a $dname 1 +a -
  did -a $dname 1 +a 3  $chr(32) Ayarlar $chr(9) $+ Bağlantı ve Scriptle İlgili Diğer Ayarları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 4  $chr(32) Nickim $chr(9) $+ Nick Değitirme Ve Şifreleme Panelini Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 5 $chr(32) Korumalar $chr(9) $+ Kanal, Kişisel ve Flood Korumalarını Gösterir.
  did -a $dname 1 +a -
  did -a $dname 1 +a 6 $chr(32) Mp3 Çalar $chr(9) $+ Mp3 Çaları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 7 $chr(32) Medya $chr(9) $+ Mırc Media Panelini açar
  did -a $dname 1 +a -
  did -a $dname 1 +a 8 $chr(32) Özeller $chr(9) $+ Mırc Özel Kabul Sistemini Açar
  did -a $dname 1 +a -
  did -a $dname 1 +a 9 $chr(32) Teşekkür $chr(9) $+ Teşekkür Dialog Panelini Açar
  did -a $dname 1 +a -
  did -a $dname 1 +a 10 $chr(32) Programlar $chr(9) $+ Bilgisayarınızda Yüklü Olan Programları Açar
  did -a $dname 1 +a -
  did -a $dname 1 +a 11 $chr(32) Komutlar $chr(9) $+ Mırc Komutlar Panelini Açar
  did -a $dname 1 +a -
  did -a $dname 1 +a 12 $chr(32) Admin  $chr(9) $+ Adminler İçin Kısayol Komut Panelini Açar
  did -a $dname 1 +a -



}
on *:dialog:toolbar:sclick:*:{
  if $did == 2 {
    if $did(2).sel == 2 {
      if $sline($active,1) isop $active {
        mode $active -o $sline($active,1)
      }
      else {
        mode $active +o $sline($active,1)
      }
    }
    if $did(2).sel == 3 {
      if $sline($active,1) isvoice $active {
        mode $active -v $sline($active,1)
      }
      else {
        mode $active +v $sline($active,1)
      }
    }
    if $did(2).sel == 4 {
      mode $active +b $sline($active,1) $+ !*@*
      kick $active $sline($active,1) 4Bu kanaldan atıldınız. Güle güle derim sana...
    }
  }


  if $did == 7 {
    if $did(7).sel == 2 {
      kick $active $sline($active,1) 4Bu kanaldan atıldınız. Güle güle derim sana...
    } 
  }
  if $did == 7 {
    if $did(7).sel == 3 {
      whois $nick $sline($active,1)
    }
  }
  if $did == 7 {
    if $did(7).sel == 4 {
      query $nick $sline($active,1)
    }
  }


  if $devent == sclick {
    if $did == 1 {
      if ($did($dname,1).sel = 3) {
        if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect }
        else {
          scid $activecid server
        }
        update.toolbar
        did -f $dname 1
        scid $activecid window -a "status window"
      }
      if ($did($dname,1).sel = 5) {
        .serverayar

      }
      if ($did($dname,1).sel = 7) {
        .sifre
      }
      if ($did($dname,1).sel = 9) {
        .prots
      }
      if ($did($dname,1).sel = 11) {
        .pok
      }
      if ($did($dname,1).sel = 13) {
        .mmc
      }

      if ($did($dname,1).sel = 15) {
        .away1

      }
      if ($did($dname,1).sel = 17) {
        .dialog -m opvotes opvotes

      }

      if ($did($dname,1).sel = 19) {
        .program
      }
      if ($did($dname,1).sel = 21) {
        .run help.htm
      }
      if ($did($dname,1).sel = 23) {
        .mastercontrol

      }
    }
  }
}