Kod: Kodu kopyalamak için üzerine çift tıklayın!
dialog nicklist {
title "Nick List"
size -1 -1 131 250
option dbu
text "Kanal Seç", 1, 6 6 25 8
text "Nick Listesi", 2, 61 6 67 9
list 3, 5 17 49 120, size
list 4, 61 29 65 220, size
edit "", 6, 61 18 65 10
button "Kapat", 5, 5 143 48 102, flat cancel
}
alias nicklist { dialog -m nicklist nicklist }
on *:dialog:nicklist:*:*:{
if ($devent = init) { var %i = 1 | while %i <= $chan(0) { did -a $dname 3 $chan(%i) | inc %i } }
elseif ($devent = sclick) && $did = 3 {
if !$did(6) {
did -r $dname 4 | var %i = 1 ,%c = $did(3).seltext
while %i <= $nick(%c,0) { did -a $dname 4 $nick(%c,%i) | inc %i }
}
elseif $did(6) {
did -r $dname 4 | var %i = 1 ,%c = $did(3).seltext
while %i <= $nick(%c,0) { $iif($did(6).text isin $nick(%c,%i),did -a $dname 4 $nick(%c,%i)) | inc %i }
}
}
elseif ($devent = edit) && $did = 6 {
did -r $dname 4 | var %i = 1 ,%c = $did(3).seltext
while %i <= $nick(%c,0) { $iif($did(6).text isin $nick(%c,%i),did -a $dname 4 $nick(%c,%i)) | inc %i }
}
}