Files
espeak-ng/phsource/ph_english_us_nyc
T

513 lines
7.9 KiB
Plaintext

//*******************************************************************
// VOWELS
//*******************************************************************
phoneme 3
CALL @
ipa ə
endphoneme
phoneme @ // Schwa
vwl starttype #@ endtype #@
unstressed
length 130
IfNextVowelAppend(r-)
IF thisPh(isWordEnd) THEN
FMT(vowel/@_6)
ENDIF
FMT(vowel/@_4)
endphoneme
phoneme @2 // Schwa, changes to I before a vowel
vwl starttype #@ endtype #@
unstressed
length 120
IF nextPh(isVowel) THEN
ChangePhoneme(I2)
ENDIF
FMT(vowel/@_low2)
endphoneme
phoneme a
vwl starttype #e endtype #@
ipa æ
length 210
ChangeIfDiminished(a#)
IF nextPh(m) OR nextPh(n) OR nextPh(g) OR nextPh(b) OR nextPh(d) OR nextPh(S) OR nextPh(f) OR nextPh(T) OR nextPh(s) THEN
IF NOT next2Ph(isVowel) THEN
ipa ɛə
FMT(vwl_en_us_nyc/a_raised)
ENDIF
ELSEIF nextPh(r) AND thisPh(isStressed) THEN
length 190
FMT(vwl_en_us/ar)
ENDIF
FMT(vwl_en_us_nyc/a)
endphoneme
phoneme aa // 'bath' etc.
import_phoneme en-us-nyc/a
endphoneme
phoneme a#
vwl starttype #@ endtype #@
ipa ɐ
unstressed
length 150
IF thisPh(isStressed) THEN
ChangePhoneme(a)
ENDIF
IF nextPhW(r) THEN
ChangePhoneme(3)
ENDIF
FMT(vowel/a#_3)
endphoneme
phoneme E
vwl starttype #e endtype #e
length 190
IF nextPhW(n) THEN
ChangeIfDiminished(@)
ELSE
ChangeIfDiminished(I2)
ENDIF
FMT(vwl_en_us/ee)
endphoneme
phoneme I
vwl starttype #i endtype #i
length 160
IfNextVowelAppend(;)
ChangeIfDiminished(I2)
IF nextPhW(r) THEN
length 200
ENDIF
FMT(vowel/ii_4)
endphoneme
phoneme I2
vwl starttype #i endtype #i
unstressed
length 160
IfNextVowelAppend(;)
FMT(vowel/ii#_3)
endphoneme
phoneme I#
vwl starttype #i endtype #i
unstressed
length 160
ipa ᵻ
// FMT(vowel/@_fnt)
FMT(vowel/ii#)
endphoneme
phoneme I2#
vwl starttype #i endtype #i
unstressed
ChangePhoneme(I#)
endphoneme
phoneme 0
vwl starttype #a endtype #a
length 140
ChangeIfDiminished(@)
IF nextPhW(r) AND next2PhW(isVowel) THEN
ChangePhoneme(A:)
ELIF nextPh(r) THEN
ChangePhoneme(O:)
ENDIF
FMT(vowel/0)
endphoneme
phoneme 02 // becomes V in en-us
vwl starttype #o endtype #o
length 140
ChangePhoneme(V)
endphoneme
phoneme O2
vwl starttype #o endtype #o
length 220
IF nextPhW(r) AND next2PhW(isVowel) THEN
ChangePhoneme(A:)
ENDIF
FMT(vwl_en_us_nyc/0_3)
endphoneme
phoneme V
vwl starttype #a endtype #@
length 170
ChangeIfDiminished(@)
FMT(vowel/V_6)
endphoneme
phoneme U
vwl starttype #o endtype #o
length 145
FMT(vowel/8_2)
endphoneme
phoneme A:
vwl starttype #a endtype #a
length 220
IF nextPhW(r) THEN
FMT(vwl_en_us/aar)
ENDIF
FMT(vwl_en_us_nyc/aa_8)
endphoneme
phoneme A@
vwl starttype #a endtype #a
ipa ɑː
length 230
IfNextVowelAppend(r-)
FMT(vowel/aa_2)
endphoneme
phoneme A# // [a] in British [A:] in American
vwl starttype #a endtype #a
ChangePhoneme(A:)
endphoneme
phoneme 3:
vwl starttype #@ endtype #i
ipa əɪ
length 210
IfNextVowelAppend(r-)
ChangeIfDiminished(3)
FMT(vwl_en_us_nyc/@i)
endphoneme
phoneme i:
vwl starttype #i endtype #i
length 180
IfNextVowelAppend(;)
FMT(vowel/i_en)
endphoneme
phoneme O:
vwl starttype #o endtype #@
length 220
ChangeIfDiminished(@)
IF nextPhW(r) AND next2PhW(isVowel) THEN
ChangePhoneme(A:)
ENDIF
IF nextPhW(r) THEN
FMT(vwl_en_us/oor)
ENDIF
FMT(vwl_en_us_nyc/0_3)
endphoneme
phoneme O@
vwl starttype #o endtype #@
length 240
ipa ɔː
IfNextVowelAppend(r)
FMT(vowel/oo_en)
endphoneme
phoneme o@
vwl starttype #o endtype #o
length 250
ipa ɔː
IfNextVowelAppend(r)
FMT(vowel/oo_en)
endphoneme
phoneme O
vwl starttype #o endtype #o
length 200
ChangeIfDiminished(@)
IF nextPhW(r) AND next2PhW(isVowel) THEN
ChangePhoneme(A:)
ENDIF
FMT(vwl_en_us_nyc/0_3)
endphoneme
phoneme u:
vwl starttype #u endtype #u
length 190
IF prevPhW(j) AND NOT thisPh(isWordEnd) THEN
length 160
ENDIF
FMT(vdiph2/uw_6)
endphoneme
phoneme aU
vwl starttype #a endtype #o
length 235
FMT(vdiph/aoo)
endphoneme
phoneme oU
vwl starttype #@ endtype #u
length 230
FMT(vdiph/8u)
endphoneme
phoneme aI
vwl starttype #a endtype #i
length 240
IF nextPh(#a) OR nextPh(#o) THEN
AppendPhoneme(;)
ENDIF
FMT(vwl_en_us/ai)
endphoneme
phoneme eI
vwl starttype #e endtype #i
length 220
FMT(vdiph2/ei_4)
endphoneme
phoneme OI
vwl starttype #o endtype #i
length 270
FMT(vdiph/oi)
endphoneme
phoneme e@
vwl starttype #e endtype #@
length 230
IfNextVowelAppend(r-)
FMT(vowel/ee_1)
endphoneme
phoneme i
vwl starttype #i endtype #i
unstressed
ipa i
length 170
IfNextVowelAppend(;)
IF NOT thisPh(isFinalVowel) THEN
length 130
FMT(vowel/ii_4)
ENDIF
FMT(vowel/ii_final)
endphoneme
phoneme i@
vwl starttype #i endtype #@
length 250
FMT(vdiph2/ii@) // don't append [r] before a vowel
endphoneme
phoneme i@3
vwl starttype #i endtype #@
length 250
IF MbrolaSynth THEN
ChangePhoneme(i@)
ENDIF
IfNextVowelAppend(r-)
FMT(vdiph2/ii@)
endphoneme
phoneme U@
vwl starttype #u endtype #@
length 200
IfNextVowelAppend(r-)
IF thisPh(isUnstressed) THEN
FMT(vdiph2/8@)
ENDIF
FMT(vdiph2/uu@)
endphoneme
phoneme aI@
vwl starttype #a endtype #@
length 300
ipa aɪə
IfNextVowelAppend(r-)
FMT(vwl_en_us/ai@)
endphoneme
phoneme aI3
vwl starttype #a endtype #@
length 280
ChangePhoneme(aI@)
endphoneme
phoneme aU@ // h**our**
vwl starttype #a endtype #@
length 280
IfNextVowelAppend(r-)
FMT(vwl_en/aU@)
endphoneme
//==============
// Consonants
//==============
phoneme h
vls glt apr
lengthmod 3
ipa h
IF nextPh(j) THEN
ChangePhoneme(NULL) // drop "h" for "human", "huge", etc.
ELIF nextPh(#@) THEN
WAV(h/h@)
ELIF nextPh(#a) THEN
WAV(h/ha)
ELIF nextPh(#e) THEN
WAV(h/he)
ELIF nextPh(#i) THEN
WAV(h/hi)
ELIF nextPh(#o) THEN
WAV(h/ho)
ELIF nextPh(#u) THEN
WAV(h/hu)
ENDIF
WAV(h/h_, 70) // no vowel following
endphoneme
phoneme r/ // used for [r] when not preceding a vowel
liquid
lengthmod 2 //
// formants NULL
endphoneme
phoneme t# // reduced [t] as in "city"
vcd alv stp
ipa ɾ
lengthmod 5
Vowelin f1=1 f2=1700 -300 300 f3=-100 80
Vowelout f1=2 f2=1700 -300 300 f3=-100 80
IF nextPh(isNotVowel) THEN
ChangePhoneme(t)
ENDIF
IF KlattSynth THEN
IF PreVoicing THEN
FMT(klatt/x_tap)
ENDIF
FMT(klatt/tap2) addWav(x/d, 70)
ENDIF
IF PreVoicing THEN
FMT(d/x_tap)
ENDIF
FMT(d/tap2) addWav(x/d, 50)
endphoneme
phoneme t
vls alv stp
voicingswitch d
lengthmod 2
Vowelin f1=0 f2=1700 -300 300 f3=-100 80
Vowelout f1=0 f2=1700 -300 250 f3=-100 80 rms=20
IF nextPhW(isVowel) AND nextPh(isUnstressed) THEN
IF NOT next2PhW(n) OR nextPhW(3:) THEN
IF prevPhW(isVowel) THEN
ChangePhoneme(t#)
ELIF prevPhW(n) THEN
WAV(ustop/t_hi, 60)
ENDIF
ENDIF
ENDIF
IF nextPh(isPause2) THEN
WAV(ustop/t_dnt)
ELIF nextPh(r) OR nextPh(R) OR nextPh(R2) THEN
WAV(ustop/tr)
ELIF nextPh(@-) THEN
WAV(ustop/t_hi, 50)
ENDIF
WAV(ustop/t_dnt, 90)
endphoneme
phoneme d
CALL d[
endphoneme
phoneme t2 // [t] which doesn't reduce
import_phoneme base1/t
endphoneme
phoneme ? // glottal stp
vls glt stp
lengthmod 1 // 5? longer preceding vowel
nolink
Vowelin glstop
Vowelout glstop
WAV(ustop/null)
endphoneme
phoneme l/2 // 'dark' [l] after a vowel
liquid
lengthmod 7
CALL vowelstart_l
IF prevPhW(j) THEN
FMT(l/L2_eL)
ENDIF
IF prevPhW(w) THEN
FMT(l/L2_uL)
ENDIF
PrevVowelEndings
VowelEnding(l/L2_@L, -60)
VowelEnding(l/L2_aL, -50)
VowelEnding(l/L2_eL, -40)
VowelEnding(l/L2_iL, -30)
VowelEnding(l/L2_oL, -50)
VowelEnding(l/L2_uL, -40)
EndSwitch
endphoneme