# pluck.draw
#
# Praat script that creates figure 2.3 of
#    Boersma (1998): Functional Phonology.
# http://fonsg3.hum.uva.nl/paul/
#
Erase all
Times
10

Axes... 0 100 0 100
Viewport... -0.4 4.1 0 2

Line width... 2
Draw line... 0 0 50 100
Draw line... 50 100 100 0
Line width... 1
One mark left... 0 no no yes
Draw arrow... 50 100 35 70
Draw arrow... 50 100 65 70
Draw arrow... 50 100 50 40

Text... 50 Centre -10 Half %L(0)
Draw arrow... 45 -10 0 -10
Draw arrow... 55 -10 100 -10

Text... 105 Centre 50 Half %y
Draw arrow... 105 60 105 100
Draw arrow... 105 40 105 0

Text... 50 Left 40 Half %F
Draw line... 53 32 53 37
Draw line... 52 32 54 32
Text... 65 Left 70 Bottom %F__//

Text special... 25-2 Centre 50+2*2 Bottom Times 10 50;100 %L/2
Draw arrow... 17 50 -3 10
Draw arrow... 27 70 47 110
Dotted line
Draw line... 47 110 50 100
Draw line... -3 10 0 0
Draw line... 0 -10 0 0
Draw line... 100 -10 100 0
Draw line... 105 0 100 0
Draw line... 105 100 50 100
Draw line... 65 70 50 40
Draw line... 35 70 50 40
Plain line

Viewport... 3.6 6.4 0 2
Create Sound... tension -0.3 0.3 400 x*(1-0.9/sqrt(1+4*x^2))
Draw... 0 0 -0.08 0.08 no
Draw inner box
One mark top... 0 yes yes yes
Text bottom... no displacement
One mark right... 0 yes yes yes
Text left... no tension force
Dotted line
Formula... x*0.1+x^3*1.8
Draw... 0 0 -0.08 0.08 no
Plain line
Remove

Viewport... 0.05 6 0.1 1.9