Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias thanks { dialog -m thanks thanks }
alias thanks {
if (%ownerx == off) { dialog -m thanks thanks 180 300 296 336 | dialog -t thanks Teşekkür Diyalogu Modu Kapalı.. | did -b thanks 9 | did -b thanks 10 | did -b thanks 11 | did -b thanks 12 | did -b thanks 15 | did -b thanks 16 | did -b thanks 17 | did -b thanks 18 | did -b thanks 19 | did -b thanks 22 }
if (%ownerx == on) { dialog -m thanks thanks 180 300 296 336 | dialog -t thanks Teşekkür Diyalogu Modu Açık.. }
}
dialog thanks {
size 180 300 296 336
title "Coder By MesqeN"
button "Kaydet ve Çık",1,20 305 125 25,ok
button "Vazgeç",2,155 305 125 25,cancel
text "Owner (+q) Mesajı",3,10 47 100 20
text "Deowner (-q) Mesajı",4,10 72 110 20
text "Protect (+a) Mesajı",5,10 97 100 20
text "DeProtect (-a) Mesajı",6,10 122 110 20
text "Op (+o) Mesajı",21,10 147 110 20
text "Deop (-o) Mesajı",20,10 172 110 20
text "Halfop (+h) Mesajı",23,10 197 100 20
text "Dehalfop (-h) Mesajı",24,10 222 110 20
text "Voice (+v) Mesajı",25,10 247 110 20
text "Devoice (-v) Mesajı",26,10 272 110 20
edit %ownertemsg ,9,125 45 155 20,autohs
edit %deownermsg ,10,125 70 155 20,autohs
edit %promsg ,11,125 95 155 20,autohs
edit %depromsg ,12,125 120 155 20
edit %opmsg ,16,125 145 155 20
edit %deopmsg ,15,125 170 155 20
edit %hopmsg ,19,125 195 155 20
edit %dhmsg ,22,125 220 155 20
edit %vmsg ,17,125 245 155 20
edit %dvmsg ,18,125 270 155 20
radio "Açık",13,125 13 50 25,group
radio "Kapalı",14,190 13 50 25
text "Durum:" 501, 70 18 35 15
}
alias mdx { return $dll(eternal\dll\mdx.dll,$1,$2-) }
on *:dialog:thanks:init:*: {
mdx MarkDialog $dname
mdx SetDialog $dname bgcolor $rgb(99,184,255)
mdx SetFont $dname 1,2,3,4,5,6,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,501 +b Turkish 12 600 Arial
mdx SetColor $dname 1,2,3,4,5,6,13,14,20,21,23,24,25,26,501 textbg $rgb(99,184,255)
mdx SetColor $dname 1,2,3,4,5,6,13,14,20,21,23,24,25,26,501 background $rgb(99,184,255)
mdx SetColor $dname 1,2,3,4,5,6,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,501 text $rgb(0,0,0)
}
on *:dialog:thanks:sclick:1: { set %s1 $did(9) | set %s2 $did(10) | set %s3 $did(11) | set %s4 $did(12) | set %s6 $did(15) | set %s5 $did(16) | set %s9 $did(17) | set %s10 $did(18) | set %s7 $did(19) | set %s8 $did(22) }
on *:dialog:thanks:sclick:13: { set %ownerx on | dialog -t thanks Teşekkür Diyalogu Açıldı. | did -e thanks 9 | did -e thanks 10 | did -e thanks 11 | did -e thanks 12 | did -e thanks 15 | did -e thanks 16 | did -e thanks 17 | did -e thanks 18 | did -e thanks 19 | did -e thanks 22 }
on *:dialog:thanks:sclick:14 { set %ownerx off | dialog -t thanks Teşekkür Diyalogu Kapandı. | did -b thanks 9 | did -b thanks 10 | did -b thanks 11 | did -b thanks 12 | did -b thanks 15 | did -b thanks 16 | did -b thanks 17 | did -b thanks 18 | did -b thanks 19 | did -b thanks 22 }
on *:dialog:thanks:init:0:{
if (%ownerx == on) { did -c thanks 13 }
if (%ownerx == off) { did -c thanks 14 }
}
on ^*:Rawmode:#:{
if ($1 == +oq) || ($1 == +q) || ($1 == +aq) && ($2 == $me) {
msg $chan %s1 $nick
}
if ($1 == -oq) || ($1 == -q) || ($1 == -aq) && ($2 == $me) {
msg $chan %s2 $nick
}
if ($1 == +oa) || ($1 == +a) && ($2 == $me) {
msg $chan %s3 $nick
}
if ($1 == -oa) || ($1 == -a) && ($2 == $me) {
msg $chan %s4 $nick
}
if ($1 == +o) && ($2 == $me) {
msg $chan %s5 $nick
}
if ($1 == -o) && ($2 == $me) {
msg $chan %s6 $nick
}
if ($1 == +h) && ($2 == $me) {
msg $chan %s7 $nick
}
if ($1 == -h) && ($2 == $me) {
msg $chan %s8 $nick k
}
if ($1 == +v) && ($2 == $me) {
msg $chan %s9 $nick
}
if ($1 == -v) && ($2 == $me) {
msg $chan %s10 $nick
}
}
;coder MesqeN
Öncelikle verilen kod için teşekkürlerimi sunarım..Diyalogta bozuk yerler vardı biraz düzelttim ve Renk kodu ekledim elimden geldiğince.. Eklediğim renk kodundaki kırmızı ile yazılı olan eternal kelimesi mircinizdeki mdx.dll dosyasının nerede olduğunu, yerini temsil etmektedir.. Siz mdx.dll dosyanız neredeyse oraya göre düzenleme yapın..