&echo &on &s count := [filelist * outfile -cover] &if %count% <= 0 &then &return Error generating output file. &s unit := [open outfile ok -read] &do I := 1 &to %count% &s cover := [read %unit% ok] EXPORT COVER %cover% %cover% &end /* close and delete output file. &s ok := [close %unit%] &s ok := [delete outfile -file] &echo &off &return