| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333 |  
//****************************************************************
//redefinition of the : phoneme
phoneme : //  lengthen previous vowel by "length"
  virtual
  length 140
endphoneme
// VOWELS
//****************************************************************
phoneme @    //  Schwa, but always unstressed
  vwl   starttype #@  endtype #@
  unstressed
  length 140
  IF nextPh(r/) THEN
    length 190
    FMT(vwl_af/r@)
  ENDIF
  FMT(vwl_af/@)
endphoneme
phoneme a    // short A
  vwl  starttype #a  endtype #a
  ipa ɐ
  length 140
  FMT(vowel/V_2)
endphoneme
phoneme E    // short E
  vwl  starttype #e  endtype #e
  length 140
  FMT(vowel/e_mid2)
endphoneme
phoneme I     // short I,  Schwa
  vwl   starttype #@  endtype #@
  ipa ə
  length 140
  IF nextPh(r/) THEN
     length 190
     FMT(vwl_af/r@)
  ENDIF
  FMT(vwl_af/I)
endphoneme
phoneme O     // short O
  vwl  starttype #o   endtype #o
  length 140
  FMT(vowel/oo_3)
endphoneme
phoneme W    //  short U
  vwl starttype #@ endtype #@
  length 140
  FMT(vowel/oe)
endphoneme
phoneme u    // short OE
  vwl  starttype #u  endtype #u
  length 110
  FMT(vowel/uu_3)
endphoneme
phoneme &    //  more open [E]
  vwl  starttype #e  endtype #e
  length 150
  IF nextPh(l/2) THEN
     VowelEnding(l/L_eL_af, -30)
  ENDIF
  FMT(vowel/ee_3)
endphoneme
phoneme &:    //  more open [E] longer
  vwl  starttype #e  endtype #e
  length 280
  IF nextPh(l/2) THEN
     VowelEnding(l/L_eL_af, -30)
  ENDIF
  FMT(vowel/ee_3)
endphoneme
phoneme @L   // syllabic L
  vwl  starttype #@  endtype l
  ipa əl
  unstressed
  length 160
  FMT(vwl_en/@L)
endphoneme
phoneme A:   // long A
  vwl  starttype #a  endtype #a
  length 280
  FMT(vowel/aa_3)
endphoneme
phoneme e@    // long E
  vwl  starttype #i  endtype #@
  ipa iə
  length 230
  FMT(vdiph/i@_2)
endphoneme
phoneme i     // long I
  vwl  starttype #i  endtype #i
  length 100
  IfNextVowelAppend(;)
  FMT(vowel/i_3)
endphoneme
phoneme o@    // long O
  vwl  starttype #u  endtype #@
  ipa ʊə
  length 250
  FMT(vdiph2/o@)
endphoneme
phoneme y     // long U
  vwl starttype #i  endtype #i
  length 180
  FMT(vowel/y_3)
endphoneme
phoneme iu
  vwl  starttype #i  endtype #u
  length 220
  FMT(vdiph2/iu_3)
endphoneme
phoneme @U
  vwl  starttype #@  endtype #u
  length 170
  FMT(vdiph/Vu)
endphoneme
phoneme aI
  vwl  starttype #a  endtype #i
  length 220
  IfNextVowelAppend(;)
  FMT(vdiph/ai_4)
endphoneme
phoneme AI
  vwl  starttype #a  endtype #i
  length 310
  IfNextVowelAppend(;)
  FMT(vdiph/aai_2)
endphoneme
phoneme eI
  vwl  starttype #e  endtype #i
  ipa ɛɪ
  length 170
  IfNextVowelAppend(;)
  FMT(vdiph/@i_2)
endphoneme
phoneme OI
  vwl  starttype #o  endtype #i
  length 230
  IfNextVowelAppend(;)
  FMT(vdiph/ooi_2)
endphoneme
phoneme oI
  vwl  starttype #o  endtype #i
  ipa ʊɪ
  length 290
  IfNextVowelAppend(;)
  FMT(vdiph/oi_2)
endphoneme
phoneme uI
  vwl  starttype #u  endtype #i
  length 240
  IfNextVowelAppend(;)
  FMT(vdiph/ui_2)
endphoneme
phoneme Yy
  vwl  starttype #@  endtype #i
  length 220
  IfNextVowelAppend(;)
  FMT(vdiph/y#y_2)
endphoneme
phoneme Y@
  vwl  starttype #i  endtype #@
  length 210
  FMT(vdiph2/y#@)
endphoneme
phoneme aU
  vwl  starttype #a  endtype #u
  length 230
  FMT(vdiph/au)
endphoneme
// circumflex accent vowels
phoneme e:
  vwl  starttype #e  endtype #e
  length 210
  FMT(vowel/e)
endphoneme
phoneme O:
  vwl  starttype #o  endtype #o
  length 280
  FMT(vowel/oo_1)
endphoneme
phoneme 3:
  vwl  starttype #@  endtype #@
  length 230
  FMT(vowel/3_en)
endphoneme
// Nasal vowels
phoneme A~
  vwl  starttype #a endtype #a
  length 240
  FMT(vnasal/aa_n3)
endphoneme
phoneme e~ 
  vwl  starttype #e  endtype #e
  length 240
  FMT(vnasal/e_n)
endphoneme
phoneme o~
  vwl  starttype #o  endtype #o
  length 240
  FMT(vnasal/o_n2)
endphoneme
// CONSONANTS
//===========
phoneme x2
  vls vel frc
  Vowelin f1=0  f2=2300 200 400  f3=-100 100
  Vowelout f1=0 f2=2300 300 400  f3=-100 100  rms=20
  lengthmod 3
  WAV(ufric/x2, 60)      // stronger version of [x]
endphoneme
phoneme r
  liquid rhotic trl
  lengthmod 6
  Vowelin  f1=2  f2=2700 -300 -200  f3=-1300 80  
  Vowelout f1=2  f2=1700 -300 -200  f3=-1300 80
  NextVowelStarts
    VowelStart(r/r@, -15)
    VowelStart(r/ra, -15)
    VowelStart(r/re, -15)
    VowelStart(r/ri, -15)
    VowelStart(r/ro, -15)
    VowelStart(r/ru, -15)
  EndSwitch
  IF prevPh(isVowel) THEN
    VowelEnding(r/xr, -50)
  ENDIF
  FMT(r3/r_trill) addWav(r3/r_trill3.wav, 100)
endphoneme
phoneme r/   // used for [r] when not preceding a vowel
  liquid
  lengthmod 7
  IF prevPh(@) OR prevPh(I) THEN
  ELSE
    FMT(r3/r_) addWav(r3/rx)
  ENDIF
endphoneme
phoneme l
  import_phoneme en/l
endphoneme
phoneme c         // used in -tjie
  vls pal stp pzd
  voicingswitch g
  lengthmod 2
  Vowelin f1=0  f2=2700 400 600  f3= 200 80
  Vowelout f1=0 f2=2700 400 600  f3= 200 80  rms=20
  WAV(ustop/ki)
endphoneme
 |