###########################
# string-remover.praat
###########################

form Specify
	word inFile 031.existing.diphones
endform

Read Strings from raw text file... 'inFile$'
Rename... inFile
numLines = Get number of strings
pause 'numLines' identified

for iLine to numLines
	select Strings inFile
	strLine$ = Get string... iLine
	if strLine$ <> "missing"
		fileappend diphones.only 'strLine$''newline$'
	endif
endfor