select Sound s_ata
To Formant (burg)... 0.01 5 5500 0.025 50
mean$ = Get value at time... 1 0.5 Hertz Linear
mean$ >> formant.fmt
fileappend formant.fmt 'newline$'
mean$ = Get value at time... 2 0.5 Hertz Linear
mean$ >> formant.fmt
fileappend formant.fmt 'newline$'
mean$ = Get value at time... 3 0.5 Hertz Linear
mean$ >> formant.fmt
fileappend formant.fmt 'newline$'