Save selected files

#====================================================================

# saves all selected sounds in praat into the folder “dir$”

#====================================================================

procedure save_all dir$

n = numberOfSelected(“Sound”)

for i from 1 to n

   s’i’$ = selected$(“Sound”,’i’)

   s’i’ = selected(“Sound”,’i’)

endfor

for i from 1 to n

   s$ = s’i’$

   s = s’i’

   select ‘s’

  Save as WAV file: “‘dir$”s$’.wav”

endfor

endproc

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

w

Connecting to %s