alias kp if !$dialog(kp) { dialog -m kp kp } | else { dialog -x kp kp }

dialog kp {
  title "Kontrol Paneli"
  size -1 -1 233 386
  option pixels
  button "Uyarı1", 1, 10 14 100 25
  button "Uyarı2", 2, 120 14 100 25
  button "Uyarı3", 3, 10 44 100 25
  button "Uyarı4", 4, 120 44 100 25
  button "Uyarı5", 5, 10 74 100 25
  button "Uyarı6", 6, 120 74 100 25
  button "Uyarı7", 7, 10 104 100 25
  button "Uyarı8", 8, 120 104 100 25
  button "Uyarı9", 9, 10 134 100 25
  button "Uyarı10", 10, 120 134 100 25
  button "Uyarı11", 11, 10 164 100 25
  button "Uyarı12", 12, 120 164 100 25
  button "Uyarı13", 13, 10 194 100 25
  button "Uyarı14", 14, 120 194 100 25
  button "Ban1", 15, 10 244 100 25
  button "Ban2", 16, 120 244 100 25
  box "Uyarılar", 19, 4 0 224 228
  box "Banlar", 20, 4 228 224 49
  button "Gline1", 17, 10 295 100 25
  button "Gline2", 18, 120 295 100 25
  box "Gline'lar", 21, 4 279 224 49
  button "Kline", 22, 10 346 100 25
  button "Shun", 23, 120 346 100 25
  box "Diğer", 24, 4 330 224 49
}

on *:dialog:kp:sclick:*: {
  if $did == 1 {
    msg $active $sline($active,1) , $active kanalında Uyarı1
  }
  if $did == 2 {
    msg $active $sline($active,1) , $active kanalında Uyarı2
  }
  if $did == 3 {
    msg $active $sline($active,1) , $active kanalında Uyarı3
  }
  if $did == 4 {
    msg $active $sline($active,1) , $active kanalında Uyarı4
  }
  if $did == 5 {
    msg $active $sline($active,1) , $active kanalında Uyarı5
  }
  if $did == 6 {
    msg $active $sline($active,1) , $active kanalında Uyarı6
  }
  if $did == 7 {
    msg $active $sline($active,1) , $active kanalında Uyarı7
  }
  if $did == 8 {
    msg $active $sline($active,1) , $active kanalında Uyarı8
  }
  if $did == 9 {
    msg $active $sline($active,1) , $active kanalında Uyarı9
  }
  if $did == 10 {
    msg $active $sline($active,1) , $active kanalında Uyarı10
  }
  if $did == 11 {
    msg $active $sline($active,1) , $active kanalında Uyarı11
  }
  if $did == 12 {
    msg $active $sline($active,1) , $active kanalında Uyarı12
  }
  if $did == 13 {
    msg $active $sline($active,1) , $active kanalında Uyarı13
  }
  if $did == 14 {
    msg $active $sline($active,1) , $active kanalında Uyarı14
  }
  if $did == 15 {
    ban $active $sline($active,1) 2 | kick $active $sline($active,1) Banlandınız.!
  }
  if $did == 16 {
    mode $active +b $sline($active,1) | kick $active $sline($active,1) Banlandınız.!
  }
  if $did == 17 {
    gline $sline($active,1) +3h Irc Kurallarına Aykırı Hareket.
  }
  if $did == 18 {
    gline $sline($active,1) +3h Server'a Girişiniz Yasaklanmıştır.
  }
  if $did == 22 {
    kline $sline($active,1) +3h Kline yediniz.
  }
  if $did == 23 {
    shun $sline($active,1) Sebep: Sen sus gözlerin konuşsun..
  }
}

ban $active $sline($active,1) 2 | kick $active $sline($active,1) Banlandınız.!

  if $me isop $chan {
    ban $active $sline($active,1) 2 | kick $active $sline($active,1) Banlandınız.!
  }
  else {
    msg Manowas $active kanalından $address($sline($active,1),2) hostunu banla.
  }