mirror of
https://github.com/rhasspy/espeak-ng.git
synced 2026-10-31 21:39:47 +00:00
jonsd
473e9abc15
Lang=ml, change aspirated voiced consonants. Lang=ko, define temporary replacements for undefined consonant phonemes. Lang=bn, fix numbers. git-svn-id: https://espeak.svn.sourceforge.net/svnroot/espeak/trunk@334 d46cf337-b52f-0410-862d-fd96e6ae7743
746 lines
15 KiB
Plaintext
746 lines
15 KiB
Plaintext
// PB General rules for vowels:
|
||
// Short vowels
|
||
// ACC: Short "pille" [p?el@-]
|
||
// AC[V]: Short "piler" [p?ilV]
|
||
// A[N]: Short "bange" [b?AN@-]
|
||
// Long vowels
|
||
// A + group #@ OR group #e: Long "ae" "aer" [&:@-]
|
||
// AC + group #@ OR group #e: Long "pile" [pi:l@-]
|
||
// AC[i]: Long "smidig" [smi:Di]
|
||
|
||
phoneme @
|
||
vowel starttype #@ endtype #@
|
||
unstressed
|
||
length 60
|
||
FMT(vowel/@_3)
|
||
endphoneme
|
||
|
||
phoneme @- // very short schwa
|
||
vowel starttype #@ endtype #@
|
||
unstressed nonsyllabic
|
||
ipa ə
|
||
IF nextPhW(*) OR nextPhW(r) THEN
|
||
ipa NULL // @-* is used to make 'r'
|
||
ENDIF
|
||
length 40
|
||
// "femten", "manden" - only a short "n" sound
|
||
IF nextPhW(n) THEN
|
||
length 20
|
||
ENDIF
|
||
IF prevPhW(isNotVowel) AND thisPh(isWordEnd) THEN
|
||
length 15
|
||
ENDIF
|
||
// "lige" [li@-]
|
||
IF prevPhW(i) AND thisPh(isWordEnd) THEN
|
||
length 15
|
||
ENDIF
|
||
FMT(vowel/@-)
|
||
endphoneme
|
||
|
||
// ToDo: change [@] to [a#] if adjacent to [r] or [R]
|
||
phoneme 3
|
||
vowel starttype #a endtype #a
|
||
unstressed
|
||
length 40
|
||
FMT(vowel/a#_3)
|
||
endphoneme
|
||
|
||
// PB sort of schwa [ɐ] (0250+032F)
|
||
// "spurgt" [sp'o3-d] – ipa [spˈoɐ̯d]
|
||
phoneme 3- // used for 'r' after a vowel (to create a diphthong)
|
||
liquid
|
||
lengthmod 7
|
||
ipa ɐ̯
|
||
FMT(r/a_)
|
||
endphoneme
|
||
|
||
phoneme i
|
||
vowel starttype #i endtype #i
|
||
length 140 //225
|
||
// PB long vowel followed by consonant and certain vowels "gide"
|
||
IF nextPhW(isNotVowel) AND next2PhW(#@) OR next2PhW(V) THEN
|
||
length 225
|
||
ENDIF
|
||
// "gider", vrider"
|
||
IF nextPhW(D) AND next2PhW(V) OR next2PhW(?V) THEN
|
||
length 140
|
||
ENDIF
|
||
// PB long vowel followed by [@-] - "pigen" [p'i@-n]
|
||
IF nextPhW(@-) OR nextPhW(V) THEN
|
||
length 225
|
||
ENDIF
|
||
// Only this vowel (in this case [i])
|
||
IF thisPh(isFinalVowel) AND thisPh(isWordEnd) AND thisPh(isWordStart) OR prevPhW(_) THEN
|
||
length 225
|
||
ENDIF
|
||
// This vowel is word end - longer because it sounds too short
|
||
// "sig", "si"
|
||
IF thisPh(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
// "vilje" - short followed by 2 consonants
|
||
IF nextPhW(isNotVowel) AND next2PhW(isNotVowel) THEN
|
||
length 140
|
||
ENDIF
|
||
// PB "tie", "stige", "krige" vowel + vowel: extra length
|
||
// What is causing this very short [i] in words with final [@-]?
|
||
// NOT "galleriet" [g,?&lVR'i@-D]
|
||
IF nextPhW(V) OR nextPhW(@) OR nextPhW(@-) AND NOT next2PhW(D) THEN
|
||
length 240
|
||
ENDIF
|
||
//"skider" short
|
||
IF nextPhW(D) AND next2PhW(V) THEN
|
||
length 140
|
||
ENDIF
|
||
//"skideren" long
|
||
IF nextPhW(D) AND next2PhW(V) AND next3PhW(V) THEN
|
||
length 225
|
||
ENDIF
|
||
|
||
FMT(vowel/i_4)
|
||
endphoneme
|
||
|
||
// PB short i
|
||
// sviret vs. svirret
|
||
phoneme ?i
|
||
vowel starttype #i endtype #i
|
||
length 100
|
||
IfNextVowelAppend(;)
|
||
FMT(vowel/i_4)
|
||
endphoneme
|
||
|
||
// PB English i - Tim
|
||
phoneme I
|
||
vowel starttype #i endtype #i
|
||
length 130
|
||
IfNextVowelAppend(;)
|
||
FMT(vowel/ii_2)
|
||
endphoneme
|
||
|
||
phoneme e
|
||
vowel starttype #e endtype #e
|
||
length 140 //225
|
||
// "delte", "mente"
|
||
IF nextPhW(@-) OR nextPhW(V) OR next2PhW(@-) OR next2PhW(V) THEN
|
||
length 225
|
||
ENDIF
|
||
// PB "ring", "ringe"
|
||
IF nextPhW(N) THEN
|
||
length 140
|
||
ENDIF
|
||
// PB "enig", "enige", "evig"
|
||
IF nextPhW(isNotVowel) AND next2PhW(i) THEN
|
||
length 225
|
||
ENDIF
|
||
// Only "e"
|
||
IF thisPh(isWordEnd) AND thisPh(isWordStart) THEN
|
||
length 225
|
||
ENDIF
|
||
// "nedladende" [n'eDl&D@-n@-] - before 2 consonants: short
|
||
IF nextPhW(isNotVowel) AND next2PhW(isNotVowel) THEN
|
||
length 140
|
||
ENDIF
|
||
// "et"
|
||
IF thisPh(isWordStart) AND nextPhW(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
FMT(vowel/e)
|
||
endphoneme
|
||
|
||
// PB short e
|
||
// "skille" vs. "skele", "pille" vs. "pile"
|
||
phoneme ?e
|
||
vowel starttype #e endtype #e
|
||
length 140
|
||
FMT(vowel/e)
|
||
endphoneme
|
||
|
||
phoneme E
|
||
vowel starttype #e endtype #e
|
||
length 140 //225
|
||
// no link with next vowel
|
||
IF thisPh(isWordEnd) THEN
|
||
IfNextVowelAppend(_!)
|
||
ENDIF
|
||
// "ræve"
|
||
IF nextVowel(#@) OR nextVowel(#e) THEN
|
||
length 160
|
||
ENDIF
|
||
// "ære", "kærester", "ærefrygt" - longer E
|
||
IF nextPhW(V) THEN
|
||
length 180
|
||
ENDIF
|
||
// Only the letter "æ" - long
|
||
IF thisPh(isWordEnd) AND thisPh(isWordStart) THEN
|
||
length 160
|
||
ENDIF
|
||
// "stædig" [st'EDi] long
|
||
IF nextPhW(isNotVowel) AND next2PhW(i) THEN
|
||
length 160
|
||
ENDIF
|
||
// "længe" - short - 2 consonants => 1 consonant
|
||
IF nextPhW(N) THEN
|
||
length 100
|
||
ENDIF
|
||
// "værelse" [v'E3-Vls@_!]
|
||
IF nextPhW(3-) AND next2PhW(V) THEN
|
||
length 100
|
||
ENDIF
|
||
// "mælkebøtte" - short followed by 2 consonants
|
||
IF nextPhW(isNotVowel) AND next2PhW(isNotVowel) THEN
|
||
length 140
|
||
ENDIF
|
||
FMT(vowel/e_mid2)
|
||
endphoneme
|
||
|
||
// PB short E
|
||
// "læsse" vs. "læse"
|
||
phoneme ?E
|
||
vowel starttype #e endtype #e
|
||
ipa ε
|
||
length 140
|
||
FMT(vowel/e_mid2)
|
||
endphoneme
|
||
|
||
phoneme &
|
||
vowel starttype #e endtype #e
|
||
ipa a
|
||
length 140 //225
|
||
// "same", "sale", "bade" - consonant + @-: long
|
||
// but NOT "hinanden"
|
||
IF next2PhW(@-) OR next2PhW(@) AND NOT next3PhW(n) THEN
|
||
length 225
|
||
ENDIF
|
||
// ThisPh + V or group #@
|
||
// "ae", "aer" vowel + vowel: extra length
|
||
IF nextPhW(@-) OR nextPhW(V) THEN
|
||
length 260
|
||
ENDIF
|
||
// This vowel is word end - longer because it sounds too short
|
||
// "ja", "Omaha"
|
||
IF thisPh(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
// Only this vowel (in this case [&])
|
||
IF thisPh(isFinalVowel) AND thisPh(isWordEnd) AND thisPh(isWordStart) OR prevPhW(_) THEN
|
||
length 225
|
||
ENDIF
|
||
// "stadig" [st&Di], "stadigt" [st&Dit]
|
||
IF nextPhW(isNotVowel) AND next2PhW(i) THEN
|
||
length 180
|
||
ENDIF
|
||
// "Alfie", "alfer" - short before 2 consonants
|
||
IF nextPhW(isNotVowel) AND next2PhW(isNotVowel) THEN
|
||
length 140
|
||
ENDIF
|
||
FMT(vowel/ee_2)
|
||
endphoneme
|
||
|
||
// PB Short &
|
||
// e.g. the last a in "staldkarl"
|
||
// "sale" vs. "sal"
|
||
phoneme ?&
|
||
ipa a
|
||
vowel starttype #e endtype #e
|
||
length 140
|
||
FMT(vowel/ee_2)
|
||
endphoneme
|
||
|
||
// PB added for the æ in "dræbt"
|
||
phoneme &#
|
||
vowel starttype #e endtype #e
|
||
length 140 //120
|
||
IF nextPhW(3) OR nextPhW(V) OR nextPhW(@-) THEN
|
||
length 120
|
||
ENDIF
|
||
// "drenge"
|
||
IF nextPhW(N) THEN
|
||
length 140
|
||
ENDIF
|
||
FMT(vowel/&)
|
||
endphoneme
|
||
|
||
// PB short &#
|
||
// "revl" vs. "tremme"
|
||
phoneme ?&#
|
||
vowel starttype #e endtype #e
|
||
length 140
|
||
FMT(vowel/&)
|
||
endphoneme
|
||
|
||
phoneme A // PB changed to a_8
|
||
vowel starttype #a endtype #a
|
||
length 140 //225
|
||
// PB long vowel followed by consonant and certain vowels - "drabelig"
|
||
IF nextPhW(isNotVowel) AND next2PhW(#@) OR next2PhW(V) THEN
|
||
length 225
|
||
ENDIF
|
||
// "far", "bastard" - a bit longer followed by [r]
|
||
IF nextPhW(r) AND nextPhW(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
// "bange" [bAN@-] - [N] = 2 consonants (ng) => short
|
||
IF nextPhW(N) THEN
|
||
length 140
|
||
ENDIF
|
||
// "fare" [f'A:A]
|
||
IF nextPhW(A) THEN
|
||
length 225
|
||
ENDIF
|
||
// "av" [Au] - a bit longer
|
||
IF nextPhW(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
// "magnat" [mAun&d] - sounds too short
|
||
IF nextPhW(u) OR nextPhW(w) THEN
|
||
length 130
|
||
ENDIF
|
||
FMT(vowel/a_8)
|
||
endphoneme
|
||
|
||
// PB short A
|
||
// "drab" vs. "drabelig"
|
||
phoneme ?A
|
||
vowel starttype #a endtype #a
|
||
length 140
|
||
// "straffeattest", "straffe", "rapid" - a bit longer after R
|
||
IF prevPhW(R) AND nextPhW(isNotVowel) AND next2PhW(isVowel) THEN
|
||
length 110
|
||
ENDIF
|
||
FMT(vowel/a_8)
|
||
endphoneme
|
||
|
||
phoneme u
|
||
vowel starttype #u endtype #u
|
||
length 140 //225
|
||
// "fugl" [ful] - a bit longer
|
||
IF nextPhW(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
// "suge", "uge", "bluse", "julegave"
|
||
IF nextPhW(@-) OR nextPhW(V) OR next2PhW(@-) OR next2PhW(V)THEN
|
||
length 225
|
||
ENDIF
|
||
// "umulig" [u:m'uli]
|
||
IF nextVowel(i) AND nextVowel(isFinalVowel) AND nextVowel(isWordEnd) THEN
|
||
length 180
|
||
ENDIF
|
||
// Only "u"
|
||
IF thisPh(isWordEnd) AND thisPh(isWordStart) THEN
|
||
length 225
|
||
ENDIF
|
||
FMT(vowel/u_bck)
|
||
endphoneme
|
||
|
||
// PB glottal u
|
||
// "tude" vs. "tuden" - [tuD3] [t?uD@n]
|
||
phoneme ?u
|
||
vowel starttype #u endtype #u
|
||
length 140
|
||
FMT(vowel/u_bck)
|
||
endphoneme
|
||
|
||
phoneme o
|
||
vowel starttype #o endtype #o
|
||
length 140 //225
|
||
// "bore", "borer"
|
||
IF nextPhW(V) OR nextPhW(#@) THEN
|
||
length 225
|
||
ENDIF
|
||
// "kone", "koner"
|
||
IF next2PhW(V) OR next2PhW(#@) THEN
|
||
length 225
|
||
ENDIF
|
||
// "modig" - long vowel after consonant + [i]
|
||
IF nextPhW(D) AND next2PhW(i) THEN
|
||
length 225
|
||
ENDIF
|
||
// Only "o"
|
||
IF thisPh(isWordEnd) AND thisPh(isWordStart) THEN
|
||
length 120
|
||
ENDIF
|
||
// This vowel is word end - longer because it sounds too short
|
||
// "ko"
|
||
IF thisPh(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
FMT(vowel/o_2)
|
||
endphoneme
|
||
|
||
// PB Short o
|
||
// "patron" vs. "kone"
|
||
phoneme ?o
|
||
vowel starttype #o endtype #o
|
||
length 140
|
||
FMT(vowel/o_2)
|
||
endphoneme
|
||
|
||
phoneme O
|
||
vowel starttype #o endtype #o
|
||
length 140 // 150
|
||
// "sove", "sover" - consonant + #e or #@: long
|
||
IF next2PhW(@-) OR next2PhW(V) THEN
|
||
length 225
|
||
ENDIF
|
||
// PB "gået" - ThisPh + V or @-
|
||
IF nextPhW(V) OR nextPhW(@-) THEN
|
||
length 225
|
||
ENDIF
|
||
// "rådig"
|
||
IF nextVowel(i) AND nextVowel(isFinalVowel) THEN
|
||
length 180
|
||
ENDIF
|
||
// This vowel is word end - longer because it sounds too short
|
||
// "på", "gå"
|
||
IF thisPh(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
// "såre", "sårede" [s'O:?OD@-]
|
||
IF nextPhW(O) OR nextPhW(?O) THEN
|
||
length 225
|
||
ENDIF
|
||
FMT(vowel/o_5)
|
||
endphoneme
|
||
|
||
// Short O
|
||
// "toget" vs. "tåget"
|
||
phoneme ?O
|
||
vowel starttype #o endtype #o
|
||
length 140
|
||
// "hoven"
|
||
IF nextPhW(w) OR nextPhW(?u) AND next2PhW(@-) THEN
|
||
length 120
|
||
ENDIF
|
||
FMT(vowel/o_5)
|
||
endphoneme
|
||
|
||
phoneme V
|
||
vowel starttype #@ endtype #@
|
||
length 140 //225
|
||
// "forlig"
|
||
IF nextPhW(isNotVowel) AND next2PhW(i) THEN
|
||
length 180
|
||
ENDIF
|
||
// PB "konge" - ng=>n
|
||
IF nextPhW(N) THEN
|
||
length 100
|
||
ENDIF
|
||
// Only [V] - "og"
|
||
IF thisPh(isWordEnd) AND thisPh(isWordStart) THEN
|
||
length 120
|
||
ENDIF
|
||
// This vowel is word end - longer because it sounds too short
|
||
// "for" [fV]
|
||
IF thisPh(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
FMT(vowel/V_4)
|
||
endphoneme
|
||
|
||
// PB Short å
|
||
// "forstår" vs. "kåre"
|
||
phoneme ?V
|
||
vowel starttype #@ endtype #@
|
||
length 140
|
||
FMT(vowel/V_4)
|
||
endphoneme
|
||
|
||
phoneme 0
|
||
vowel starttype #o endtype #o
|
||
length 140 //225
|
||
IF nextPhW(3) OR nextPhW(V) OR nextPhW(@-) THEN
|
||
length 225
|
||
ENDIF
|
||
FMT(vowel/oo_2)
|
||
endphoneme
|
||
|
||
// Short 0 "sukker"
|
||
phoneme ?0
|
||
vowel starttype #o endtype #o
|
||
length 140
|
||
FMT(vowel/oo_2)
|
||
endphoneme
|
||
|
||
phoneme y
|
||
vowel starttype #i endtype #i
|
||
// Length changed to short since most vowels are short.
|
||
// It's probably easier only to make rules for long vowels.
|
||
length 140 //225
|
||
|
||
// PB long vowel followed by consonant and certain vowels
|
||
// "gyde", "gyder"
|
||
IF nextPhW(isNotVowel) AND next2PhW(@-) OR next2PhW(V) THEN
|
||
length 225
|
||
ENDIF
|
||
// Only this vowel (in this case [y])
|
||
IF thisPh(isFinalVowel) AND thisPh(isWordEnd) AND thisPh(isWordStart) THEN
|
||
length 225
|
||
ENDIF
|
||
// "dydig" [dyDi]
|
||
IF nextPhW(isNotVowel) AND next2PhW(i) THEN
|
||
length 225
|
||
ENDIF
|
||
// "syge" [sy@-] vowel + vowel: extra length, but NOT "fyret" [fyVD]
|
||
IF nextPhW(@-) OR nextPhW(3) AND NOT next2PhW(D) THEN
|
||
length 200
|
||
ENDIF
|
||
// "tyve"
|
||
IF nextPhW(?u) AND next2PhW(@-) THEN
|
||
length 225
|
||
ENDIF
|
||
FMT(vowel/y)
|
||
endphoneme
|
||
|
||
// PB Short y
|
||
// "kylling" vs. "kyle", "krybbe" vs. "krybe"
|
||
phoneme ?y
|
||
vowel starttype #i endtype #i
|
||
length 140
|
||
FMT(vowel/y)
|
||
endphoneme
|
||
|
||
phoneme Y
|
||
vowel starttype #i endtype #i
|
||
length 225
|
||
IF NOT next2Ph(3) AND NOT next2Ph(V) AND NOT next2PhW(@-) AND nextPhW(isNotVowel) THEN
|
||
glstop
|
||
length 140
|
||
ENDIF
|
||
IF nextPhW(3) OR nextPhW(V) OR nextPhW(@) THEN
|
||
length 225
|
||
ENDIF
|
||
FMT(vowel/yy)
|
||
endphoneme
|
||
|
||
phoneme W
|
||
vowel starttype #@ endtype #@
|
||
length 140 //160
|
||
// "kløe" vowel + vowel: extra length
|
||
IF nextPhW(#@) OR nextPhW(#e) THEN
|
||
length 220
|
||
ENDIF
|
||
// røde" W + 1 consonant + 3 or W or @
|
||
IF next2PhW(#@) OR next2PhW(#e) THEN
|
||
length 160
|
||
ENDIF
|
||
// "røveri" but NOT "surfer" [sWf?V] TEST
|
||
IF next2PhW(V) OR next2PhW(?V) AND NOT next2PhW(isFinalVowel) THEN
|
||
length 140
|
||
ENDIF
|
||
// PB "nødig", "nødigt", "kølige"
|
||
IF nextVowel(i) THEN
|
||
length 160
|
||
ENDIF
|
||
// "møve" [mWw@-]
|
||
IF nextPhW(w) AND nextVowel(@-) THEN
|
||
length 160
|
||
ENDIF
|
||
// "børnebog"
|
||
IF nextPhW(r) AND next2PhW(n) AND nextVowel(@-) THEN
|
||
length 225
|
||
ENDIF
|
||
// This vowel is word end - longer because it sounds too short
|
||
// "dø" [dW]
|
||
IF thisPh(isWordEnd) THEN
|
||
length 120
|
||
ENDIF
|
||
// PB "synge"
|
||
IF nextPhW(N) THEN
|
||
length 140
|
||
ENDIF
|
||
FMT(vowel/oe)
|
||
endphoneme
|
||
|
||
// Short W
|
||
// "prøv" vs. "prøve"
|
||
phoneme ?W
|
||
vowel starttype #@ endtype #@
|
||
length 140
|
||
FMT(vowel/oe)
|
||
endphoneme
|
||
|
||
// Added for the ø in "røv", "røg", "øje" instead of [V3]
|
||
phoneme W#
|
||
vowel starttype #@ endtype #@
|
||
length 140 //225
|
||
// PB long vowel followed by consonant and certain vowels
|
||
IF nextPhW(isNotVowel) AND next2PhW(@-) OR next2PhW(@) OR next2PhW(3) OR next2PhW(V) OR next2PhW(?V) THEN
|
||
length 225
|
||
ENDIF
|
||
FMT(vowel/V)
|
||
endphoneme
|
||
|
||
// Short W#
|
||
// "rømme"
|
||
phoneme ?W#
|
||
vowel starttype #@ endtype #@
|
||
length 140
|
||
FMT(vowel/V)
|
||
endphoneme
|
||
|
||
phoneme aI
|
||
vowel starttype #a endtype #i
|
||
length 300
|
||
IF NOT next2Ph(3) AND NOT next2Ph(V) AND NOT next2Ph(@-) AND nextPhW(isNotVowel) THEN
|
||
glstop
|
||
length 225
|
||
ENDIF
|
||
// "dreje" [dR'aI@-_!]
|
||
IF nextPhW(3) OR nextPhW(V) OR nextPhW(@) OR nextPhW(@-) THEN
|
||
length 280
|
||
ENDIF
|
||
// PB "drej" vs. "dreje"
|
||
IF thisPh(isWordEnd) THEN
|
||
length 140
|
||
ENDIF
|
||
// "lejde" [l'aId@-_!], "lejder" [l'aIdV_!]
|
||
IF nextPhW(isNotVowel) AND next2PhW(@-) OR next2PhW(V) THEN
|
||
length 190
|
||
ENDIF
|
||
FMT(vdiph/ai)
|
||
endphoneme
|
||
|
||
|
||
// CONSONANTS
|
||
|
||
// PB added l/3
|
||
phoneme l
|
||
liquid
|
||
lengthmod 7
|
||
// [ll] => [-l] - avoid double l
|
||
IF nextPhW(l) THEN
|
||
// ChangePhoneme(-)
|
||
ENDIF
|
||
ChangePhoneme(l/3)
|
||
// CALL base/l
|
||
endphoneme
|
||
|
||
phoneme l/3 // Replacement for [l/]
|
||
liquid
|
||
lengthmod 7
|
||
|
||
IF nextPhW(isVowel) THEN
|
||
// ChangePhoneme(l)
|
||
ENDIF
|
||
|
||
PrevVowelEndings
|
||
VowelEnding(l/l_@)
|
||
VowelEnding(l/l_a)
|
||
VowelEnding(l/l_e, -50) // hjælpe
|
||
VowelEnding(l/l_i, -70) // flygte?
|
||
VowelEnding(l/l_o,-35) // stole, skole, pistol
|
||
VowelEnding(l/l_u, -70)
|
||
EndSwitch
|
||
|
||
// IF nextPh(isLiquid) THEN
|
||
// FMT(l/_l)
|
||
// ENDIF
|
||
|
||
FMT(l/l_)
|
||
endphoneme
|
||
|
||
phoneme v // approximant, not fricative
|
||
import_phoneme base/v#
|
||
voicingswitch f
|
||
endphoneme
|
||
|
||
// PB Actually a kind of schwa = [ɐ]? - "byder" [bˈyðɐʌ]
|
||
phoneme r // used for 'r' after a vowel (to create a diphthong)
|
||
liquid
|
||
lengthmod 7
|
||
ipa ɐ̯
|
||
IF nextPhW(isVowel) AND NOT nextPhW(?V) AND NOT nextPhW(V) AND NOT nextPhW(@-) THEN
|
||
ChangePhoneme(R)
|
||
ENDIF
|
||
FMT(r/a_)
|
||
endphoneme
|
||
|
||
phoneme R
|
||
lengthmod 6
|
||
liquid
|
||
ipa ʁ
|
||
FMT(r/aa)
|
||
endphoneme
|
||
|
||
// don't weaken consonants at end of word or before a stop
|
||
|
||
phoneme s
|
||
vls alv frc sibilant
|
||
voicingswitch z
|
||
lengthmod 3
|
||
Vowelin f1=0 f2=1700 -300 300 f3=-100 80
|
||
Vowelout f1=0 f2=1700 -300 250 f3=-100 80 rms=20
|
||
|
||
IF nextPh(p) OR nextPh(t) OR nextPh(k) THEN
|
||
WAV(ufric/s!)
|
||
ENDIF
|
||
WAV(ufric/s)
|
||
endphoneme
|
||
|
||
phoneme p
|
||
vls blb stop
|
||
voicingswitch b
|
||
lengthmod 7
|
||
Vowelin f1=0 f2=1000 -50 -100 f3=-200 80 amp=11
|
||
Vowelout f1=0 f2=1000 -500 -350 f3=-300 80 rms=22
|
||
|
||
IF nextPh(isPause2) THEN
|
||
WAV(ustop/p_unasp)
|
||
ELIF nextPh(r) THEN
|
||
WAV(ustop/pr, 70)
|
||
ELIF nextPh(R) OR nextPh(R2) THEN
|
||
WAV(ustop/pr)
|
||
ELIF nextPh(@-) THEN
|
||
WAV(ustop/p_unasp)
|
||
ELIF nextPh(l) THEN
|
||
WAV(ustop/pl)
|
||
ENDIF
|
||
WAV(ustop/p)
|
||
endphoneme
|
||
|
||
phoneme t
|
||
vls alv stop
|
||
voicingswitch d
|
||
lengthmod 7
|
||
Vowelin f1=0 f2=1700 -300 300 f3=-100 80
|
||
Vowelout f1=0 f2=1700 -300 250 f3=-100 80 rms=20
|
||
|
||
IF nextPh(r) OR nextPh(R) OR nextPh(R2) THEN
|
||
WAV(ustop/tr)
|
||
ENDIF
|
||
// "respekt" [REsp'Egd]
|
||
IF thisPh(isWordEnd) THEN
|
||
// ChangePhoneme(d)
|
||
ENDIF
|
||
WAV(ustop/t, 90)
|
||
endphoneme
|
||
|
||
phoneme j
|
||
liquid palatal
|
||
lengthmod 7
|
||
// no link with next vowel
|
||
IF thisPh(isWordEnd) THEN
|
||
IfNextVowelAppend(_!)
|
||
ENDIF
|
||
IF nextPhW(isVowel) THEN
|
||
NextVowelStarts
|
||
VowelStart(j/j@)
|
||
VowelStart(j/ja)
|
||
VowelStart(j/je,-35)
|
||
VowelStart(j/ji)
|
||
VowelStart(j/jo,-65) // "kjole"
|
||
VowelStart(j/ju)
|
||
EndSwitch
|
||
Vowelout len=70
|
||
VowelEnding(j/xj, -30)
|
||
|
||
IF prevPh(isPause) THEN
|
||
FMT(j/_j)
|
||
ENDIF
|
||
ELSE
|
||
// no vowel follows
|
||
Vowelout len=70
|
||
FMT(j/j_)
|
||
ENDIF
|
||
endphoneme
|