Arkadaşlar Ben Aşağıdaki Gibi Bir Diyalog'a Ulaştım Ben Bu Diyalog'ta Yaptırmak İstediğim Şu
Nicki Yazdımda Ekle Dedim mi Ekliyecek
Ve Bu Nick'i Bir Not Defterine Kaydedecek Benim Elimde Diyelim ki 15 Nick Var ve Bu Nickleri Her 15 Günde İdentlemem Gerek Bunların Üzerine 1 Kere Tıkladım mı Nicke Geçecek ve Şifresini Girecek.
Şifresi Her Nickimin Aynı Olacak Buna Göre Bir Yardımcı Olabilir misiniz Acaba
Kod: Kodu kopyalamak için üzerine çift tıklayın!
dialog Nick {
title "Nick Listesi"
size -1 -1 150 155
option dbu
box "", 1, 9 9 132 130
box "", 2, 2 3 146 142
list 3, 74 34 62 101, size vsbar
edit "", 4, 74 19 62 12, return autohs autovs
button "Ekle", 5, 39 19 25 11
button "Çıkart", 6, 39 33 25 11
box "", 7, 33 13 39 34
}
on *:dialog:Nick:*:*:{
if ($devent == sclick) {
if ($did == 3) { did -ra $dname 4 $did(3).seltext }
if ($did == 5) {
if ($istok(%l,$did(4),32) == $true) { halt }
if ($did(4) == $null) { halt }
if ($istok(%l,$did(4),32) == $false) { set %l $addtok(%l,$did(4),32) | did -a $dname 3 $did(4) }
did -r $dname 4
}
if ($did == 6) {
if ($istok(%l,$did(4),32) == $false) && ($did(4) != $null) { halt }
if ($did(4) == $null) { halt }
if ($istok(%l,$did(4),32) == $true) { set %l $remtok(%l,$did(4),32) | did -d Nick 3 $did(3).sel }
did -r $dname 4
}
}