alias tsk { dialog -m opvotes opvotes }

alias optes { 

  if (%opvote == off) { dialog -m opvotes opvotes 180 200 280 180 | dialog -t opvotes Op-Voice Teşekkür Modu KAPALI. | did -b opvotes 9 | did -b opvotes 10 | did -b opvotes 11 | did -b opvotes 12 }

  if (%opvote == on) { dialog -m opvotes opvotes 180 200 280 180 | dialog -t opvotes Op-Voice Teşekkür Modu AKTİF. }

}

dialog opvotes {

  size 300 250 296 186

  icon icon\mirc.ico

  box "", 505, 1 -5 293 190

  title "Op Vop Teşekür Paneli"

  button "Kaydet",1,55 150 60 25,ok

  button "Kapat",2,180 150 60 25,cancel

  text "Op Mesajı :",3,34 47 100 20

  text "DeOp Mesajı :",4,22 72 100 20

  text "Voice Mesajı :",5,20 97 100 20

  text "Devoice Mesajı :",6,10 119 110 20

  box "",8,15 1 265 43,

  edit %optemsg ,9,105 45 170 20,autohs

  edit %deoptemsg ,10,105 69 170 20,autohs

  edit %votemsg ,11,105 93 170 20,autohs

  edit %devotemsg ,12,105 117 170 20,autohs

  radio "Açık",13,125 13 50 25,group

  radio "Kapalı",14,190 13 50 25

  text "Durum:" 501, 70 18 40 15

} 

on *:dialog:opvotes:sclick:1: { set %optemsg $did(9) | set %deoptemsg $did(10) | set %votemsg $did(11) | set %devotemsg $did(12) }

on *:dialog:opvotes:sclick:13: { set %opvote on | dialog -t opvotes Op-Voice Teşekkür AKTİF. | did -e opvotes 9 | did -e opvotes 10 | did -e opvotes 11 | did -e opvotes 12 }

on *:dialog:opvotes:sclick:14 { set %opvote off | dialog -t opvotes Op-Voice Teşekkür KAPALI. | did -b opvotes 9 | did -b opvotes 10 | did -b opvotes 11 | did -b opvotes 12 }

on *:dialog:opvotes:init:0:{

  dll dll\mdx.dll anime $dialog($dname).hwnd -hn 400

  mdx MarkDialog $dname

  mdx SetDialog [ $dname ] bgcolor $rgb(70,130,180)

  mdx SetDialog bgcolor $rgb(70,130,180)

  mdx SetBorderStyle 

  mdx SetColor 1,2,3,4,5,6,13,14,501 background [ $rgb(70,130,180) ] 

  mdx SetColor 1,2,3,4,5,6,13,14,501 textbg [ $rgb(70,130,180) ]

  mdx SetColor 1,2,3,4,5,6 text [ $rgb(245,200,119) ] 

  mdx SetFont $dname 2 14 Fixedsys

  mdx SetFont $dname 2,14 Tahoma

  mdx SetFont $dname 0,180,255 13 1200 Tahoma

  mdx SetFont $dname 0,180,255 12 1200 Tahomal

 
  if (%opvote == on) { did -c opvotes 13 }

  if (%opvote == off) { did -c opvotes 14 }

}

on ^*:OP:#:{ if ($opnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan %optemsg  $nick    } } 

 
on ^*:DEOP:#:{ if ($opnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan %deoptemsg  $nick    } } 

 
on ^*:VOICE:#:{ if ($vnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan %votemsg  $nick   } } 

 
on ^*:DEVOICE:#:{ if ($vnick == $me) && (%opvote == on) && ($nick != $me) { msg $chan %devotemsg  $nick    } }