# 5.04_phonate.make # # Praat script that computes the sound, tube widths, air pressures, and air velocities # for sustained phonation, as shown in figure 5.6 of # Paul Boersma (1998): Functional Phonology, section 5.4. # http://fonsg3.hum.uva.nl/paul/ # form Onset of phonation positive Duration 0.23 endform ! Create 0.23 seconds of [a] with a very high sample rate. ! For figure 5.6 (the onset of phonation) and 5.7 (microscopic events during phonation). Create Speaker... speaker Female 2 Create Artword... a 'Duration' ! Supply lung energy Set target... 0.00 0.1 Lungs Set target... 0.03 0.0 Lungs Set target... 100 0.0 Lungs ! Close velopharyngeal port Set target... 0.0 1 LevatorPalatini Set target... 100 1 LevatorPalatini ! Default glottal actions ! Adduct vocal folds. Set target... 0 0.5 Interarytenoid Set target... 100 0.5 Interarytenoid Set target... 0.0 1 Cricothyroid Set target... 100 1 Cricothyroid ! Shape mouth to [a] Set target... 0.0 0.4 Hyoglossus Set target... 100 0.4 Hyoglossus Set target... 0.0 -0.4 Masseter Set target... 100 -0.4 Masseter plus Speaker speaker To Sound... 550125 1 35 36 37 35 36 37 35 36 37 select Artword a plus Speaker speaker To Sound... 550125 1 38 0 0 38 0 0 38 0 0 ;To Sound... 22050 25 35 36 37 35 36 37 35 36 37 plus Sound width35 plus Sound width36 plus Sound width37 plus Sound pressure35 plus Sound pressure36 plus Sound pressure37 plus Sound velocity35 plus Sound velocity36 plus Sound velocity37 Write to binary file... 5.04_phonate.data