alias tesekkur { dialog -m tsk tsk }
dialog tsk {
title "Op-Voice-Hop ( Tesekkür Dialog ) | www.mircturk.com ( Coded : LeadeR )"
size -1 -1 243 170
option dbu
tab "Op - Deop ( Tesekkür )", 1, 0 -2 241 160
button "Ekle", 8, 30 21 17 10, tab 1
edit "", 4, 55 20 178 13, tab 1 return autohs autovs
button "Sil", 9, 30 34 17 10, tab 1
button "Ekle", 10, 31 88 17 10, tab 1
edit "", 6, 55 87 178 13, tab 1 return autohs autovs
button "Sil", 11, 31 101 17 10, tab 1
list 5, 55 34 178 50, tab 1 size
list 7, 55 101 178 50, tab 1 size
check "Check Box", 31, 9 53 7 10, tab 1
edit "+(@) , -(@)", 32, 18 52 36 11, tab 1
tab "Voice - Devoice ( Tesekkür )", 2
button "Ekle", 15, 30 21 17 10, tab 2
edit "", 16, 55 20 178 13, tab 2 return autohs autovs
button "Sil", 17, 30 34 17 10, tab 2
button "Ekle", 19, 31 88 17 10, tab 2
edit "", 20, 55 87 178 13, tab 2 return autohs autovs
button "Sil", 21, 31 101 17 10, tab 2
list 18, 55 34 178 50, tab 2 size
list 22, 55 101 178 50, tab 2 size
check "Check Box", 33, 9 53 7 10, tab 2
edit "+(v) , -(v)", 34, 18 52 36 11, tab 2
tab "Hop-Dehop ( Tesekkür )", 3
button "Ekle", 23, 30 21 17 10, tab 3
edit "", 24, 55 20 178 13, tab 3 return autohs autovs
button "Sil", 25, 30 34 17 10, tab 3
button "Ekle", 27, 31 88 17 10, tab 3
edit "", 28, 55 87 178 13, tab 3 return autohs autovs
button "Sil", 29, 31 101 17 10, tab 3
list 26, 55 34 178 50, tab 3 size
list 30, 55 101 178 50, tab 3 size
check "Check Box", 35, 9 53 7 10, tab 3
edit "+(%) ,-(%)", 36, 18 52 36 11, tab 3
button "Kapat", 14, 217 159 25 11, ok
box "", 13, 2 10 238 147
box "", 12, 7 14 228 139
}
on *:dialog:tsk:*:*: {
if ($devent == sclick) {
if ($did == 5) { did -ra $dname 4 $did(5).seltext }
if ($did == 8) {
if ($did(4) != $null) { write op.txt $did(4) | did -a $dname 5 $did(4) }
did -r $dname 4
}
if ($did == 9) {
if ($did(4) != $null) { write $+(-,d,s,$did(4)) op.txt | did -d tsk 5 $did(5).sel }
did -r $dname 4
}
if ($did == 7) { did -ra $dname 6 $did(7).seltext }
if ($did == 10) {
if ($did(6) != $null) { write deop.txt $did(6) | did -a $dname 7 $did(6) }
did -r $dname 6
}
if ($did == 11) {
if ($did(6) != $null) { write $+(-,d,s,$did(6)) deop.txt | did -d tsk 7 $did(7).sel }
did -r $dname 6
}
if ($did == 18) { did -ra $dname 16 $did(18).seltext }
if ($did == 15) {
if ($did(16) != $null) { write v.txt $did(16) | did -a $dname 18 $did(16) }
did -r $dname 16
}
if ($did == 17) {
if ($did(16) != $null) { write $+(-,d,s,$did(16)) v.txt | did -d tsk 18 $did(18).sel }
did -r $dname 16
}
if ($did == 22) { did -ra $dname 20 $did(22).seltext }
if ($did == 19) {
if ($did(20) != $null) { write dv.txt $did(20) | did -a $dname 22 $did(20) }
did -r $dname 20
}
if ($did == 21) {
if ($did(20) != $null) { write $+(-,d,s,$did(20)) dv.txt | did -d tsk 22 $did(22).sel }
did -r $dname 20
}
if ($did == 26) { did -ra $dname 24 $did(26).seltext }
if ($did == 23) {
if ($did(24) != $null) { write h.txt $did(24) | did -a $dname 26 $did(24) }
did -r $dname 24
}
if ($did == 25) {
if ($did(24) != $null) { write $+(-,d,s,$did(24)) h.txt | did -d tsk 26 $did(26).sel }
did -r $dname 24
}
if ($did == 30) { did -ra $dname 28 $did(30).seltext }
if ($did == 27) {
if ($did(28) != $null) { write dh.txt $did(28) | did -a $dname 30 $did(28) }
did -r $dname 28
}
if ($did == 29) {
if ($did(28) != $null) { write $+(-,d,s,$did(28)) dh.txt | did -d tsk 30 $did(30).sel }
did -r $dname 28
}
if ($did == 14) {
if ($did(31).state == 1) { .enable #op }
if ($did(31).state == 0) { .disable #op }
if ($did(33).state == 1) { .enable #vop }
if ($did(33).state == 0) { .disable #vop }
if ($did(35).state == 1) { .enable #hop }
if ($did(35).state == 0) { .disable #hop }
}
}