alias test { dialog -m test test }

dialog test {
title ""
option pixels
size -1 -1 306 156
text "Enter or select the modes to delete:", 1, 10 12 290 16
combo 2, 8 92 290 120, sort edit drop result
button "&OK", 3, 141 125 76 23, ok default
button "&Cancel", 4, 223 125 76 23, cancel
}
on *:dialog:test:*:*:{
if ($devent == init) {
var %i 1,%g +n,+t,+T,+P,%f +t,%r $numtok(%g,44)
while (%i <= %r) {
did -a $dname 2 $gettok(%g,%i,44)
if ($gettok(%g,%i,44) != %f) { did -co $dname 2 0 $chr(31) $+ %f | did -f $dname 2 }
inc %i
}
}
elseif ($devent == sclick) {
if ($did == 2) { .timerdsel -h 1 0 did -o $dname $did 0 $chr(31) $+ $left($did(2).seltext,2) | .timerseltext 1 0 did -f $dname 2 }
}
}