dialog sagbar {
  title "Turkiyem"
  size 5 5 18 514
  option dbu
  list 1, 1 -1 42 389, size
}
on *:dialog:sagbar:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style 
  rebar HideToolbar .
  rebar Dock $dialog(sagbar).hwnd > right
  mdx SetControlMDX $dname 1 Progressbar smooth > $ctl
  mdx SetControlMDX $dname 1 ToolBar flat wrap arrows nodivider > $bars
  mdx SetBorderStyle 1
  did -i $dname 1 1 setbkg stretch img\bmw.bmp
  did -i $dname 1 1 setscheme $rgb(57,125,208) $rgb(57,125,208)
  did -i $dname 1 1 bmpsize 32 32
  did -a $dname 1 +a 1 $chr(32) +o $chr(9) $+ Nick Listesinde Seçtiğiniz Nicke Op verir
  did -a $dname 1 +a -
  did -a $dname 1 +a 2 $chr(32) -o $chr(9) $+ Nick Listesinde Seçtiğiniz Nicki Deop Eder 
  did -a $dname 1 +a -
  did -a $dname 1 +a 3 $chr(32) +v $chr(9) $+ Nick Listesinde Seçtiğiniz Nicke +v verir
  did -a $dname 1 +a -
  did -a $dname 1 +a 4 $chr(32) -v $chr(9) $+ Nick Listesinde Seçtiğiniz Nickin Voicesini Alır
  did -a $dname 1 +a -
  did -a $dname 1 +a 5 $chr(32) Kick $chr(9) $+ Nick Listesinde Seçtiğiniz Nicki Atar
  did -a $dname 1 +a -
  did -a $dname 1 +a 6 $chr(32) Ban $chr(9) $+ Nick Listesinde Seçtiğiniz Nicke Ban Atar
  did -a $dname 1 +a -
  did -a $dname 1 +a 7 $chr(32) K.Ban $chr(9) $+ Nick Listesinde Seçtiğiniz Nicke Kick+Ban Uygular
  did -a $dname 1 +a -
  did -a $dname 1 +a 8 $chr(32) +m $chr(9) $+ Kanalı Konuşmaya Kapatır
  did -a $dname 1 +a -
  did -a $dname 1 +a 9 $chr(32) -m $chr(9) $+ Kanalı Konuşmaya Açar
  did -a $dname 1 +a -
  did -a $dname 1 +a 10 $chr(32) whois $chr(9) $+ Kişi Bilgilerini Gösterir
  did -a $dname 1 +a -
  did -a $dname 1 +a 11 $chr(32) +h $chr(9) $+ Halfop Verir
  did -a $dname 1 +a -
  did -a $dname 1 +a 12 $chr(32) -h $chr(9) $+ Halfop Alir
  did -a $dname 1 +a -  
  did -i $dname 1 1 setimage icon large img\Sag\opums.ico
  did -i $dname 1 1 setimage icon large img\Sag\deopum.ico
  did -i $dname 1 1 setimage icon large img\Sag\voicem.ico
  did -i $dname 1 1 setimage icon large img\Sag\devoicem.ico
  did -i $dname 1 1 setimage icon large img\Sag\kickim.ico
  did -i $dname 1 1 setimage icon large img\Sag\banim.ico
  did -i $dname 1 1 setimage icon large img\Sag\kbanim.ico
  did -i $dname 1 1 setimage icon large img\Sag\chkirmizi.ico
  did -i $dname 1 1 setimage icon large img\Sag\chyesil.ico
  did -i $dname 1 1 setimage icon large img\Sag\whoiss.ico
  did -i $dname 1 1 setimage icon large img\Sag\hopum.ico
  did -i $dname 1 1 setimage icon large img\Sag\halfopum.ico    
  dll aniwin.dll anime $dialog($dname).hwnd -hn 650
}
on *:dialog:sagbar:sclick:*: {
  if ($did($dname,1).sel == 2) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12   $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) {
      var %i = 1, %t = $sline($active,0) 
      while (%i <= %t) {
        var %nickler $addtok(%nickler,$sline($active,%i),32) 
        inc %i 
      }
      mode $active $+(+,$str(o,$sline($active,0))) %nickler
    } 
  }
  elseif ($did($dname,1).sel == 4) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) {
      var %i = 1, %t = $sline($active,0) 
      while (%i <= %t) {
        var %nickler $addtok(%nickler,$sline($active,%i),32) 
        inc %i 
      }
      mode $active $+(-,$str(o,$sline($active,0))) %nickler
    } 
  }

  elseif ($did($dname,1).sel == 6) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt } 
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) {
      var %i = 1, %t = $sline($active,0) 
      while (%i <= %t) {
        var %nickler $addtok(%nickler,$sline($active,%i),32) 
        inc %i 
      }
      mode $active $+(+,$str(v,$sline($active,0))) %nickler
    } 
  }
  elseif ($did($dname,1).sel == 8) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) {
      var %i = 1, %t = $sline($active,0) 
      while (%i <= %t) {
        var %nickler $addtok(%nickler,$sline($active,%i),32) 
        inc %i 
      }
      mode $active $+(-,$str(v,$sline($active,0))) %nickler
    } 
  }
  elseif ($did($dname,1).sel == 10) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) {
      var %i = 1, %t = $sline($active,0) 
      while (%i <= %t) {
        kick $active $sline($active,%i) %Name
        inc %i
      }
    }
  }
  elseif ($did($dname,1).sel == 12) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name0,12  $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) {
      var %i = 1, %t = $sline($active,0) 
      while (%i <= %t) {
        var %nickler $addtok(%nickler,$sline($active,%i),32) 
        inc %i 
      }
      mode $active $+(+,$str(b,$sline($active,0))) %nickler
    } 
  }
  elseif ($did($dname,1).sel == 14) { 
    if ($status == disconnected) { Echo -a %Name0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) {
      var %i = 1, %t = $sline($active,0) 
      while (%i <= %t) {
        Echo -a ban -k $active $sline($active,%i) %Name
        inc %i
      }
    }
  }
  elseif ($did($dname,1).sel == 16) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) { mode $active +m }
  }
  elseif ($did($dname,1).sel == 18) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt }
    elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
    elseif ($status != disconnected) && ($window($active).type == channel) { mode $active -m }
  }
  elseif ($did($dname,1).sel == 20) { 
    if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Nick Listesinden Nicke Tıklayıp Whois Butonuna Basınız! | Halt } 
    elseif ($status != disconnected) && ($window($active).type == channel) && $sline($active,0) { whois $sline($active,1) }
    elseif ($status != disconnected) && ($window($active).type == query)  { whois $window($active) }

  } 
}
elseif ($did($dname,1).sel == 22 { 
  if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt }
  elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt } 
  elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
  elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
  elseif ($status != disconnected) && ($window($active).type == channel) {
    var %i = 1, %t = $sline($active,0) 
    while (%i <= %t) {
      var %nickler $addtok(%nickler,$sline($active,%i),32) 
      inc %i 
    }
    mode $active $+(+,$str(h,$sline($active,0))) %nickler

  } 
}
elseif ($did($dname,1).sel == 24) { 
  if ($status == disconnected) { Echo -a %Name 0,12 Sunucuya Bağlı Değilsiniz Bu Komutu Kullanamazsınız! | halt } 
  elseif ($status != disconnected) && ($window($active).type == channel) && (!$regex($nick($active,$me).pnick,&|@|~)) { Echo -a %Name 0,12  $active Kanalında Yetkiniz Yok! | halt }
  elseif ($status != disconnected) && ($window($active).type != channel) { Echo -a %Name 0,12 Bu Özelliği Kanalda Kullanabilirsiniz! | halt }
  elseif ($status != disconnected) && ($window($active).type == channel) && !$sline($active,0) { Echo -a %Name 0,12 Bu Özelliği Kullanıp İşlem Yapmak İçin Nick Listesinde Nick Seçiniz! | Halt } 
  elseif ($status != disconnected) && ($window($active).type == channel) {
    var %i = 1, %t = $sline($active,0) 
    while (%i <= %t) {
      var %nickler $addtok(%nickler,$sline($active,%i),32) 
      inc %i 
    }
    mode $active $+(-,$str(h,$sline($active,0))) %nickler
  }
}