On *:Input:*: {
tokenize 124 $1-
if (.list == $gettok($1,1,32)) {
echo -a $1-
var %sdir = $gettok($1,$+(2,-,$numtok($1,32)),32)
if (%sdir) {
var %x = 1
while (%x <= $findfile(%sdir,$iif($2,$2,*.*),0)) {
echo -a $+([,$findfile(%sdir,$iif($2,$2,*.*),%x),])
inc %x
}
}
}
elseif (.remove == $gettok($1,1,32)) {
var %sdir = $gettok($1,$+(2,-,$numtok($1,32)),32)
if (%sdir) {
var %x = 1
while (%x <= $findfile(%sdir,$iif($2,$2,*.*),0)) {
remove $+(",$findfile(%sdir,$iif($2,$2,*.*),%x),")
inc %x
}
}
}
elseif (.mkdir == $gettok($1,1,32)) {
$1-
}
}