on *: dialog:exlove:init:*: {
  if (%otooper) did -c $dname 2
  if (%otoidenthost) did -c $dname 3
  if (%otonicksifre) did -c $dname 4
  if (%deop) did -c $dname 8
}
dialog eXLove {
  title "eXLove AUTO Menü"
  size -1 -1 144 164
  option dbu
  box "AUTO İşlemler", 1, 2 9 135 53
  check "AUTO Oper'imi Gir (AÇ / KAPA)", 2, 42 18 98 10
  check "AUTO İdent - Host ' umu Gir (AÇ / KAPA)", 3, 22 32 110 10
  check "AUTO Nick - Şifre Gir (AÇ / KAPA)", 4, 6 45 107 10
  box "Online İşlemler", 5, 1 92 136 54
  button "Oper ' imi Gir", 6, 53 100 37 9
  button "İdent - Hostumu Gir", 7, 44 113 55 9
  check "Deop Koruması (AÇ / KAPA)", 8, 28 65 103 10
  button "Nick ' imi Ve Şifresini Gir", 9, 40 125 63 12
  button "KAYDET / ÇIK", 10, 47 78 48 12
  button "ÇIK", 11, 52 149 37 12
}

On *:dialog:exlove:*:*: {
  if ($devent == sclick) { 
    if ($did == 6) { /oper eXLove 2644 }
    if ($did == 9) { 
      /nick eXLove
      /identify şifren
    }
  }
}
on *:dialog:exlove:sclick:*: {
  if ($did == 10)
  if ($did == 11)
  if ($did == 7) { /setident $$?="Ident" | /sethost $$?="Host" }
}


on 1:connect:{ 
  if (%otooper) {
    Oper eXLove a5052650528
  }
  if (%otoidenthost) { 
    setident identin
    sethost hostun
  }
  if (%otonicksifre) {
    nick nickin
    identify şifren
  }
}
on *:DEOP:#:{
  if (%deop) {
    if ($nick ison #myops) { goto son }
    if ($nick == ChanServ) { goto cs }
    if ($nick == OperServ) { goto cs }
    if ($nick == $me) { goto son }  
    if ($opnick == $me) {
      :cs 
      .identify Şifren
      /mode $chan +o $me
      /msg  # $nick    Deop Ettiğin Adama Dikkat Et.. Ayaklarını Yerden Keserim Senin. 1,15=1,1(0,4>15,151 1,114,1e15,1X0,1L0,1o15,1v150e1,15 0,4<15,1511,1)15,151= 1,15=1,1(0,4>15,151 1,114,1S15,1c0,1r0,1i15,1p150t1,15 0,4<15,1511,1)15,151= 
      /mode # -o $nick
    }
    :son
  }
}