# 3.04.friction.draw # # Praat script that creates figure 3.4 of # Boersma (1998): Functional Phonology. # http://fonsg3.hum.uva.nl/paul/ # Erase all Times 12 Line width... 2 Viewport... 2 5 0 2 Axes... 0 100 0 100 Draw rectangle... 30 100 0 70 Draw line... 0 100 0 30 Draw line... 0 100 70 100 Draw line... 0 30 30 0 Draw line... 0 100 30 70 Draw line... 70 100 100 70 Dotted line Draw line... 0 30 70 30 Draw line... 70 100 70 30 Draw line... 70 30 100 0 Plain line Text... 65 Centre 0 Top %%dx Text special... 15 Centre 15 Top Times 12 1;-1 %%dz Text special... 100 Centre 35 Top Times 12 90 %%dy Text bottom... yes %x \-> Paint circle... 0 60 15 1 Draw arrow... 60 15 150 15 Paint circle... 0 60 85 1 Draw arrow... 60 85 120 85 Paint circle... 0 40 15 1 Draw arrow... 40 15 -50 15 Text... -50 Right 15 Half %%F__friction%,%%below Paint circle... 0 40 85 1 Draw arrow... 40 85 -20 85 Text... -20 Right 85 Half %%F__friction%,%%above Viewport... 0.6 6.5 0.4 2