text: 
  //====================================================
  // Maltese
  //====================================================
  
  phoneme : //  Lengthen previous vowel by "length"
    virtual
    length 160
  endphoneme
  
  
  
  phoneme i
    vwl starttype #i endtype #i
    length 140
    IfNextVowelAppend(;)
    ChangeIfUnstressed(I)
    FMT(vowel/i_4)
  endphoneme
  
  phoneme I
    vwl  starttype #i  endtype #i
    length 130
    IfNextVowelAppend(;)
    FMT(vowel/ii_2)
  endphoneme
  
  phoneme e
    vwl starttype #e endtype #e
    length 150
    FMT(vowel/e_mid2)
  endphoneme
  
  
  
  phoneme a
    vwl starttype #a endtype #a
    length 170
  //  ChangeIfUnstressed(a2)
    FMT(vowel/aa_9)
  endphoneme
  
  
  
  
  phoneme o
    vwl starttype #o endtype #o
    length 155
    FMT(vowel/oo_1)
  endphoneme
  
  phoneme Y
    vwl starttype #@ endtype #@
    length 155
    FMT(vowel/y#)
  endphoneme
  
  
  phoneme u
    vwl starttype #u endtype #u
    length 140
    FMT(vowel/u_bck)
  endphoneme
  
  
  
  phoneme U    // TEST
    vwl starttype #u endtype #u
    length 140
    FMT(vowel/uu_4)
  endphoneme
  
  
  
  phoneme y
    vwl starttype #u endtype #u
    length 150
    FMT(vowel/y)
  endphoneme
  
  
  
  // Diphthongs
  //===========
  
  phoneme ai
    vwl starttype #a endtype #i
    length 310
    lng
    FMT(vdiph/aai_3)
  endphoneme
  
  phoneme i
    vwl starttype #a endtype #i
    length 290
    lng
    FMT(vdiph/&i)
  endphoneme
  
  phoneme oi
    vwl starttype #o endtype #i
    length 280
    lng
    FMT(vdiph/ooi)
  endphoneme
  
  phoneme ei
    vwl starttype #e endtype #i
    length 280
    lng
    FMT(vdiph/eei_2)
  endphoneme
  
  phoneme Yi
    vwl starttype #@ endtype #i
    length 270
    lng
    FMT(vdiph/y#i)
  endphoneme
  
  phoneme ui
    vwl starttype #u endtype #i
    length 270
    lng
    FMT(vdiph/ui_4)
  endphoneme
  
  phoneme yi
    vwl starttype #u endtype #i
    length 270
    lng
    FMT(vdiph/yi)
  endphoneme
  
  
  phoneme au
    vwl starttype #a endtype #u
    length 300
    lng
    FMT(vdiph/aau)
  endphoneme
  
  phoneme ou
    vwl starttype #o endtype #u
    length 280
    lng
    FMT(vdiph/ou)
  endphoneme
  
  phoneme eu
    vwl starttype #e endtype #u
    length 280
    lng
    FMT(vdiph/eu_2)
  endphoneme
  
  phoneme iu
    vwl starttype #i endtype #u
    length 280
    lng
    FMT(vdiph2/iu_2)
  endphoneme
  
  
  
  phoneme ey
    vwl starttype #e endtype #u
    length 280
    lng
    FMT(vdiph/eey)
  endphoneme
  
  phoneme Yy
    vwl starttype #@ endtype #u
    length 270
    lng
    FMT(vdiph/y#y)
  endphoneme
  
  phoneme iy
    vwl starttype #i endtype #u
    length 260
    lng
    FMT(vdiph2/iy)
  endphoneme
  
  
  phoneme uo
    vwl starttype #u endtype #o
    length 280
    lng
    FMT(vdiph2/uo)
  endphoneme
  
  phoneme ie
    vwl starttype #i endtype #e
    length 280
    lng
    FMT(vdiph2/ie)
  endphoneme
  
  phoneme yY
    vwl starttype #u endtype #@
    length 280
    lng
    FMT(vdiph2/y-y#)
  endphoneme
  
  
  
  
  // CONSONANTS
  //===========
  
  
  phoneme v        // approximant, not fricative
    vcd lbd frc
    lengthmod 6
    voicingswitch f
    Vowelin  f1=0  f2=1000 -300 -200  f3=-300 100
    Vowelout f1=0  f2=1000 -500 -300  f3=-300 60  len=50
    IF nextPh(isPause2) THEN
      FMT(voc/v_)
    ENDIF
    FMT(voc/v)
  endphoneme
  
  
  
  
  phoneme d
    vcd dnt stp
    voicingswitch t
    lengthmod 5
    Vowelin f1=2  f2=1700 -100 200  f3=0 80
    Vowelout f1=2 f2=1700 -100 200  f3=0 80 rms=20
  
    IF PreVoicing THEN
      FMT(d/xd)
    ENDIF
  
    IF nextPh(isPause2) THEN
      FMT(d/d_)  addWav(x/d_)
    ELIF nextPh(r) THEN
      FMT(d/dr) addWav(x/d_dnt, 60)
    ENDIF
  
    FMT(d/d) addWav(x/d_dnt, 60)
  endphoneme
  
  
  
  phoneme p
    import_phoneme base2/p
    voicingswitch b
  endphoneme
  
  
  
  phoneme k
    import_phoneme base2/k
    voicingswitch g
  endphoneme
  
  
  
  
  phoneme h
    vls glt apr
    lengthmod 3
  
    IF 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/hu_fi, 70)
    ELIF nextPh(#u) THEN
      WAV(h/hu_fi, 80)
    ENDIF
    WAV(h/h_, 70)  // no vowel following
  endphoneme
  
  
  