############################################################
#  File randomizer for gating experiments 
#  Written by Kyuchul Yoon (kyoon@ling.osu.edu)
#  The script reads in all the .wav files from the current directory, randomizes them, and
#	combines them all into one big file that can be burned into a CD
############################################################

# Get the user input
form Select files and parameters
	comment Add some more options?
	word fileToProcess_(only_extensions) wav
	word subFolderToProcess soundfile
endform

# Randomize all the wav files
Create Strings as file list... fileList 'subFolderToProcess$'\*.'fileToProcess$'
numFiles = Get number of strings
#pause 'numFiles' files identified. Continue?

# Printout the list of randomized files.  The order should be the same as that in the final CD file
for i to numFiles
	select Strings fileList
	strFileName$ = Get string... i
	Read from file... 'subFolderToProcess$'\'strFileName$'
endfor

############ END OF SCRIPT ###############