# aiu.draw
#
# Praat script that creates figure 4.1 of
#    Boersma (1998): Functional Phonology.
# http://fonsg3.hum.uva.nl/paul/
#
Erase all
Times
10
Read from file... aiu.Excitation
Formula... if self > 20 then self else 20 fi

select Excitation a
Viewport... 0 3.2 0 2
Draw... 0 25 20 80 yes
Text special... 22 Centre 65 Half Times 14 0 [a]
Formula... if self > 40 then self else 40 fi

select Excitation i
Viewport... 0 3.2 2 4
Draw... 0 25 20 80 yes
Text special... 22 Centre 65 Half Times 14 0 [i]
Formula... if self > 40 then self else 40 fi

select Excitation u
Viewport... 0 3.2 4 6
Draw... 0 25 20 80 yes
Text special... 22 Centre 65 Half Times 14 0 [u]
Formula... if self > 40 then self else 40 fi

Viewport... 3 6.2 0 2
select Excitation a
Draw... 0 25 40 70 yes
One mark left... 50 yes yes yes
Text special... 16 Centre 62.5 Half Times 14 0 [a]
Draw circle... 16 62.5 2
Dotted line
select Excitation i
Draw... 0 25 40 70 no
Text special... 22 Centre 62.5 Half Times 14 0 [i]
Draw circle... 22 62.5 2
Plain line

Viewport... 3 6.2 2 4
select Excitation a
Draw... 0 25 40 70 yes
One mark left... 50 yes yes yes
Text special... 16 Centre 62.5 Half Times 14 0 [a]
Draw circle... 16 62.5 2
Dotted line
select Excitation u
Draw... 0 25 40 70 no
Text special... 22 Centre 62.5 Half Times 14 0 [u]
Draw circle... 22 62.5 2
Plain line

Viewport... 3 6.2 4 6
select Excitation i
Draw... 0 25 40 70 yes
One mark left... 50 yes yes yes
Text special... 16 Centre 62.5 Half Times 14 0 [i]
Draw circle... 16 62.5 2
Dotted line
select Excitation u
Draw... 0 25 40 70 no
Text special... 22 Centre 62.5 Half Times 14 0 [u]
Draw circle... 22 62.5 2
Plain line

Viewport... 0 5.8 0.3 6