get fileCount long for i = 0 < fileCount get nameSize long getdstring NAMES[i] nameSize next i for i = 0 < fileCount get size long savepos offset goto size 0 SEEK_CUR log NAMES[i] offset size next i