# Specify files and folders
form Select files
	word longSoundFolder_(should_be_a_subfolder) 302000.txt
	word longSoundFile_(without_extension) 302000
	word textGridName 302000-01.rom.TextGrid
	word textGridDoneFolder_(should_be_a_subfolder) TextGridDone
endform

Open long sound file... 'longSoundFolder$'\'longSoundFile$'.wav
Read from file... 'longSoundFolder$'\TextGrid\'textGridName$'
Rename... textGrid

select LongSound 'longSoundFile$'
plus TextGrid textGrid

Edit
pause Click when done
pause TextGrid to be written as .done in TextGridDone folder

select TextGrid textGrid
Write to text file... 'longSoundFolder$'\'textGridDoneFolder$'\'textGridName$'.done
Remove

Read from file... 'longSoundFolder$'\'textGridDoneFolder$'\'textGridName$'.done
plus LongSound 'longSoundFile$'
Edit

pause Verify the TextGrid that you just wrote

select LongSound 'longSoundFile$'
Remove