alias ttb { dialog -m ybar ybar }
dialog ybar {
  title "a"
  size 0 0 1000 0
  option pixels
  list 1, 2 4 145 1, size


  icon 205, 1 8 365 16, SohbetSen\ico\grafik\SohbetSen3.png , noborder
  text "Nick:" , 195, 193 9 38 15
  text "" , 207, 221 9 75 15

  icon 260, 1 8 680 16, SohbetSen\ico\grafik\SohbetSen3.png , noborder
  text "Kanal/Kişi:" , 212, 350 9 55 15
  text "" , 213, 400 9 120 15

  icon 270, 1 7 1760 22, SohbetSen\ico\grafik\SohbetSen4.png , noborder
  icon 280, 1 6 1450 22, SohbetSen\ico\grafik\SohbetSen5.png , noborder
  icon 290, 1 6 1150 22, SohbetSen\ico\grafik\SohbetSen6.png , noborder
  icon 300, 1 6 2050 22, SohbetSen\ico\grafik\SohbetSen7.png , noborder
}


on *:dialog:ybar:*:*: {
  if ($devent == init) {
    mdx MarkDialog $dname
    %atb
    mdx SetFont   1 -12 700  Arial
    mdx SetDialog $dname style 
    mdx SetBorderStyle $dname 2 staticedge
    mdx SetBorderStyle 1
    mdx SetControlMDX $dname 1,3,6 Progressbar smooth >SohbetSen\dll\ctl_gen.mdx
    mdx SetControlMDX $dname 1 ToolBar list flat wrap arrows nodivider > SohbetSen\dll\bars.mdx
    mdx SetColor $dname 4 background $rgb(125,125,125)
    mdx SetColor $dname 4 textbg $rgb(125,125,125)
    mdx SetColor $dname 4  text $rgb(3,2,2)   
    mdx SetFont $dname 4 24  700 Arial

    dll SohbetSen\dll\rebar.dll HideToolbar . 
    dll SohbetSen\dll\rebar.dll Dock $dialog(ybar).hwnd > bottom

    did -i $dname 1 1 setscheme $rgb(0,128,255) $rgb(0,128,255)
    did -i $dname 1 1 bmpsize 16 16
    did -i $dname 1 1 setimage icon large SohbetSen\ico\36.ico


    did -a $dname 1 +a 1 Cafe $chr(9) $+ Windows tipi başlat menüsü sistemi seçenekleri için tıklayınız.
    did -a $dname 1 +a -

  }
  if ($devent == sclick) {
    if ($did == 1) { baslapop  }
    if ($did == 270) { ColorPicker }
    if ($did == 280) { sespop }
    if ($did == 290) { kanalpop }
    if ($did == 300) { HayalTeam }
  }
}


;
on *:start: {
  ttb

}


alias mdx_fullpath { return $+(",SohbetSen\dll\mdx.dll,") }
alias mdx { dll $mdx_fullpath $1- }



on *:active:*:{
  if $active == Status Window {   altaya Status }
  elseif @* iswm $active {   altaya Web }
  elseif #* iswm $active && $me !isop $active  { altaya Kanal }
  elseif #* iswm $active && $me isop $active || $me ishop $active { altaya Kanal   }
  else  {  altaya Ozel }
}


alias altaya {
  if $1 == Status  { 
    did -a ybar 207 $me
    did -a ybar 213 $active
  }
  elseif $1 == Kanal { 
    did -a ybar 207  $me
    did -a ybar 213   $active $nick(#,0 ) Kişi.  
  }
  elseif $1 == Ozel { 
    did -a ybar 207 $active 
  }
}
