| ircop | 06 Kasım 2009 02:31 |
Cevap: selam
Bunu da Kullanabilirsin... (alternatif) PHP- Kodu:
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 } }
|
