| |
| //==================================================== |
| // Portuguese/Portugal - based on Portuguese/Brazil |
| //==================================================== |
| |
| |
| |
| phoneme & |
| vwl starttype #@ endtype #@ |
| length 180 |
| ipa ɐ |
| FMT(vowel/a#_3) |
| unstressed |
| endphoneme |
| |
| phoneme &/ // Used for final "a" when next word starts with "a" |
| vwl starttype #@ endtype #@ |
| length 180 |
| ipa ɐ |
| IF nextPh(isVowel) THEN |
| ChangePhoneme(NULL) |
| ENDIF |
| FMT(vowel/a#_3) |
| endphoneme |
| |
| phoneme a |
| vwl starttype #a endtype #a |
| length 180 |
| ChangeIfNotStressed(&) |
| FMT(vowel/a_2) |
| endphoneme |
| |
| phoneme &~ |
| vwl starttype #e endtype #@ |
| ipa ɐU+0303 |
| length 240 |
| FMT(vnasal/ee_n2) |
| endphoneme |
| |
| phoneme &U~ |
| vwl starttype #@ endtype #u |
| ipa ɐU+0303ʊU+0303 |
| length 240 |
| FMT(vnasal/a#u_n) |
| endphoneme |
| |
| |
| |
| phoneme E |
| vwl starttype #e endtype #e |
| length 180 |
| ChangeIfUnstressed(y) |
| FMT(vowel/e_mid) |
| endphoneme |
| |
| phoneme e |
| vwl starttype #e endtype #e |
| length 180 |
| ChangeIfUnstressed(y) |
| FMT(vowel/e) |
| endphoneme |
| |
| phoneme y |
| vwl starttype #@ endtype #@ |
| length 130 |
| ipa ɨ |
| FMT(vowel/i#_5) |
| endphoneme |
| |
| |
| phoneme i |
| vwl starttype #i endtype #i |
| length 170 |
| IfNextVowelAppend(;) |
| FMT(vowel/i) |
| endphoneme |
| |
| |
| phoneme i/ // changes to NULL before a vowel |
| vwl starttype #i endtype #i |
| length 130 |
| ipa ɨ |
| IF nextPh(isVowel) THEN |
| ChangePhoneme(NULL) |
| ENDIF |
| IfNextVowelAppend(;) |
| FMT(vowel/i#_5) |
| endphoneme |
| |
| |
| phoneme O |
| vwl starttype #o endtype #o |
| length 180 |
| // ChangeIfNotStressed(o) |
| FMT(vowel/0_2) |
| endphoneme |
| |
| |
| phoneme o |
| vwl starttype #o endtype #o |
| length 180 |
| ChangeIfNotStressed(u) |
| FMT(vowel/o) |
| endphoneme |
| |
| |
| phoneme u |
| vwl starttype #u endtype #u |
| length 180 |
| FMT(vowel/u_6) |
| endphoneme |
| |
| phoneme U |
| vwl starttype #u endtype #u |
| length 130 |
| IF thisPh(isWordEnd) AND thisPh(isAfterStress) AND nextPh(isVowel) THEN |
| ChangePhoneme(w) |
| ENDIF |
| FMT(vowel/u_6) |
| endphoneme |
| |
| |
| phoneme EU |
| vwl starttype #e endtype #u |
| length 230 |
| FMT(vdiph/eeu_2) |
| endphoneme |
| |
| |
| |
| phoneme w |
| import_phoneme base2/w2 |
| endphoneme |
| |
| |
| phoneme x // [r] for Portugal |
| liquid trl |
| ipa ʁ |
| lengthmod 7 |
| Vowelin f1=0 f2=1500 -400 400 f3=-400 80 |
| IF nextPh(isNotVowel) THEN |
| ChangePhoneme(r/) |
| ENDIF |
| FMT(vwl_fr/@R) addWav(r3/rx, 120) |
| endphoneme |
| |
| |
| phoneme R // for Portugal this is same the as [r] |
| import_phoneme pt/r |
| endphoneme |
| |
| |
| phoneme s# // This is [s] for Brazil, [S] for Portugal |
| IF nextPh(isVoiced) THEN |
| ChangePhoneme(Z) |
| ENDIF |
| CALL base1/S |
| ipa ʃ |
| endphoneme |
| |