#Get alignment of tones at marked tones in TextGrid
#
#This script retrieves the alignment of each tone labeled in a TextGrid
#and puts them in the info window preceded by the name of the word and
#syllables where they are located, as well as the label they were given.
#
#In this script, tier 6 is the point tier containing the tonal labels,
#tier 1 is the interval tier containing the syllables,
#and tier 2 is the interval tier containing the words.
#
#There must be a selected TextGrid in the objects window
#
#Created by Francisco Torreira - ftorrei2@uiuc.edu
#After an idea by Jessica Sertling Miller - sertling@uiuc.edu
#November 3, 2005
###########################################################################


clearinfo
np6 = Get number of points... 6
for i to np6
	toneTime = Get time of point... 6 i
	toneLabel$ = Get label of point... 6 i
	interval = Get interval at time... 1 toneTime
	sylStart = Get starting point... 1 interval
	sylLabel$ = Get label of interval... 1 interval
	word = Get interval at time... 2 toneTime
	wordLabel$ = Get label of interval... 2 word  
	toneDelay = toneTime - sylStart
	printline 'wordLabel$'	'sylLabel$'	'toneLabel$'	'toneDelay:3'
endfor