dir$="C:\Lx600.01\KoreanStops\H_files\"
# utt$="HPAM3"
# The following times are for utterance HPAM3
# t1=0.2
# t2=2.1
utt$="HPI3"
# The following times are for utterance HPI3
t1=0.9
t2=3.0
# These f0 floor and ceiling values will work for both
f1=140
f2=340

# Read from file... 'dir$''utt$'.WAV
# Read from file... 'dir$''utt$'.TextGrid
# select Sound 'utt$'
# plus TextGrid 'utt$'
# Edit
# editor TextGrid 'utt$'
# 	Extract visible pitch contour
# endeditor
# select Pitch untitled
# Rename... 'utt$'
# select Sound 'utt$'
# To Spectrogram... 0.005 5000 0.002 20 Gaussian


Select outer viewport... 0 7 0 3
select Spectrogram 'utt$'
Paint... 't1' 't2' 0 0 100 yes 50 6 0 no
Marks left every... 1 1000 yes yes no
Text left... yes spectrogram frequency (Hz)
select Pitch 'utt$'
Navy
Line width... 2
Draw... 't1' 't2' 'f1' 'f2' no
Black
Line width... 1
Marks right every... 1 75 yes yes no
Text right... yes fundamental frequency (Hz)

Select outer viewport... 0 7 0 3.5
select TextGrid 'utt$'
Draw... 't1' 't2' yes yes no
Draw inner box
Marks bottom every... 1 0.5 yes yes no
Text bottom... yes time (seconds)

Text top... no utterance 'utt$'
Select outer viewport... 0 7 0.2 3.5
Write to Windows metafile... 'dir$'ex'utt$'.emf