on *:start: { dialog -m toolbar toolbar }
on *:connect: {
  update.toolbar
}
on *:disconnect: {
  update.toolbar
}
on *:close:*: {
  update.toolbar
}
 
alias update.toolbar {
  if (!$dialog(toolbar)) { halt }
}
 
dialog toolbar {
  title "By uMuT"
  size 5 5 70 285
  option dbu
  box "Op İşlem", 1, 3 3 67 150
  list 2, 7 12 60 14, size
  list 3, 7 29 60 14, size
  list 4, 7 46 60 14, size
  list 5, 7 63 60 14, size
  list 6, 7 81 60 14, size
  list 7, 7 98 60 14, size
  list 8, 7 115 60 14, size
  list 9, 7 133 60 14, size
  box "Ekle\Sil", 10, 3 155 67 120
  list 11, 7 163 60 14, size
  list 12, 7 181 60 14, size
  list 13, 7 200 60 14, size
  list 14, 7 218 60 14, size
  list 15, 7 237 60 14, size
  list 16, 8 256 60 14, size
}
on *:dialog:toolbar:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style 
  mdx SetFont $dname 1 12 700 Verdana
  rebar HideToolbar .
  rebar Dock $dialog(toolbar).hwnd > left
  mdx SetControlMDX $dname 1 Progressbar smooth > $ctl
  mdx SetControlMDX $dname 1 ToolBar flat wrap arrows nodivider > $bars
  mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Toolbar flat wrap arrows nodivider list > $bars
  mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Progressbar smooth > $ctl
  mdx SetBorderStyle $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16
  mdx SetFont 1,2,3,4,5,6,7,8,9,11,12,13,14,15,16 -11 700 Tahoma
  mdx SetDialog [ $dname ] bgcolor $rgb(255,255,255)
  mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16 background $rgb(255,255,255)
  did -i $dname 2 1 bmpsize 24 24
  did -i $dname 2 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 2 +W 175 1    Op Ver
  did -i $dname 3 1 bmpsize 24 24
  did -i $dname 3 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 3 +W 175 1    Deop Et
  did -i $dname 4 1 bmpsize 24 24
  did -i $dname 4 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 4 +W 175 1    Voice Ver
  did -i $dname 5 1 bmpsize 24 24
  did -i $dname 5 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 5 +W 175 1    Devoice Et
  did -i $dname 6 1 bmpsize 24 24
  did -i $dname 6 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 6 +W 175 1    Ban+Kick
  did -i $dname 7 1 bmpsize 24 24
  did -i $dname 7 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 7 +W 175 1    Sebebli Kick
  did -i $dname 8 1 bmpsize 24 24
  did -i $dname 8 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 8 +W 175 1    Kanal Unban
  did -i $dname 9 1 bmpsize 24 24
  did -i $dname 9 1 setimage icon large 0, $+ icon\help.ico
  did -a $dname 9 +W 175 1    Temizle Kanalı
  did -i $dname 11 1 bmpsize 24 24
  did -i $dname 11 1 setimage icon large 0, $+ icon\favori.ico
  did -a $dname 11 +W 175 1    Aop Ekle
  did -i $dname 12 1 bmpsize 24 24
  did -i $dname 12 1 setimage icon large 0, $+ icon\favori.ico
  did -a $dname 12 +W 175 1    Aop Sil 
  did -i $dname 13 1 bmpsize 24 24
  did -i $dname 13 1 setimage icon large 0, $+ icon\favori.ico
  did -a $dname 13 +W 175 1    Uop Ekle
  did -i $dname 14 1 bmpsize 24 24
  did -i $dname 14 1 setimage icon large 0, $+ icon\favori.ico
  did -a $dname 14 +W 175 1    Uop Sil
  did -i $dname 15 1 bmpsize 24 24
  did -i $dname 15 1 setimage icon large 0, $+ icon\favori.ico
  did -a $dname 15 +W 175 1    Akick Ekle
  did -i $dname 16 1 bmpsize 24 24
  did -i $dname 16 1 setimage icon large 0, $+ icon\favori.ico
  did -a $dname 16 +W 175 1    Akick Sil
}
on *:dialog:toolbar:sclick:*: {
  if $did == 2 { mode $active +o $snick($active,1) }
  if $did == 3 { mode $active -o $snick($active,1) }
  if $did == 4 { mode $active +v $snick($active,1) } 
  if $did == 5 { mode $active -v $snick($active,1) }
  if $did == 6 { ban $snick($active,1) | /kick # $snick($active,1) 1Hadi gülüm yandan yandann yandannnnnn.... :)2 $time %logo }
  if $did == 7 { kick $active $snick($active,1) 0,5 $$?="Sebeb?" }
  if $did == 8 { banac $active }
  if $did == 9 { timer 0 40 /msg $active - } 
  if $did == 11 { cs aop $active add $snick($active,1) }
  if $did == 12 { cs aop $active del $snick($active,1) }
  if $did == 13 { cs uop $active add $snick($active,1) }
  if $did == 14 { cs uop $active del $snick($active,1) }
  if $did == 15 { cs akick $active add $$?"nick!*@* veya *!*@Ip.* Şeklinde Yazın" }
  if $did == 16 { cs akick $active del $$? }
}
alias mdx { return $dll(DLL\mdx.dll,$1,$2-) }
alias mdxdll { return $dll(DLL\mdx.dll,$1,$2-) }
alias rebar { dll DLL\rebar.dll $$1- }
alias bars { return DLL\bars.mdx }