Chick: Praat Sound File

Amplitude Tier with frequency multiplication and frequency sweep.

do (“Create AmplitudeTier…”, “bird”, 0, 0.3)a = -1
x0 = 1
t0 = 0.01

do (“Create Sound as pure tone…”, “tone”,
… 1, 0.205, 0.295, 44100, 17, 0.2, 0.01, 0.01)

for i from 1 to 5000
le[i] = x0
x0 = x0 *a

do (“Add point…”, t0, le[i]) t0 = t0 + 0.00000125 + t00.00065)
endfor

selectObject (“AmplitudeTier bird”)
plusObject (“Sound tone”)
do (“Multiply”)
Play