/listfolders .echo -q $findfile($mircdir,*,0,listfiles $nofile($1-)) | readfilelist
/listfiles {
var %data = $replace($$1-,$chr(32),$chr(160))
writeini listfiles.ini folders %data %data
echo -s $1-
}
/readfilelist {
var %foldercount = $ini(listfiles.ini,folders,0)
var %i = 1
:Loop
var %getfolder = $replace($ini(listfiles.ini,folders,%i),$chr(160),$chr(32))
echo -a %getfolder has $findfile(%getfolder,*,0) Files
inc %i
if (%i <= %foldercount) { goto Loop }
}