eSpeak NG is an open source speech synthesizer that supports more than hundred languages and accents.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

ph_french 17KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069
  1. //====================================================
  2. // French
  3. //====================================================
  4. // Updated 2011-10-14 Michel Such <[email protected]>
  5. phoneme #l virtual
  6. // Used for l and l/
  7. endphoneme
  8. phoneme #r virtual
  9. // Used for "r" sounds
  10. endphoneme
  11. phoneme : // Lengthen previous vowel by "length"
  12. virtual
  13. length 40 // shorter than for fr-ca
  14. endphoneme
  15. phoneme #cFR virtual
  16. // To identify "b k d f g p t v" when before "r"
  17. endphoneme
  18. procedure pre_r
  19. IF prevPh(y) THEN
  20. VowelEnding(vwl_fr/y2r)
  21. ELIF prevPh(E) THEN
  22. VowelEnding(vwl_fr/e_2r)
  23. ELIF prevPh(A~) THEN
  24. VowelEnding(vwl_fr/aa2r)
  25. ELIF prevPh(E~) OR prevPh(W~) THEN
  26. VowelEnding(vwl_fr/ee2r)
  27. ELIF prevPh(O~) THEN
  28. VowelEnding(vwl_fr/oo2r)
  29. ELIF prevPh(isVowel) THEN
  30. PrevVowelEndings
  31. VowelEnding(vwl_fr/@2r)
  32. VowelEnding(vwl_fr/a2r)
  33. VowelEnding(vwl_fr/e2r)
  34. VowelEnding(vwl_fr/i2r)
  35. VowelEnding(vwl_fr/o2r)
  36. VowelEnding(vwl_fr/u2r)
  37. EndSwitch
  38. ENDIF
  39. endprocedure
  40. procedure post_r
  41. IF nextPh(E) THEN
  42. VowelStart(vwl_fr/re2)
  43. ELIF nextPh(W) THEN
  44. VowelStart(vwl_fr/r@2)
  45. ELIF nextPh(A~) THEN
  46. VowelStart(vwl_fr/raa)
  47. ELIF nextPh(E~) OR nextPh(W~) THEN
  48. VowelStart(vwl_fr/ree)
  49. ELIF nextPh(y) THEN
  50. VowelStart(vwl_fr/ry)
  51. ELIF nextPh(w) THEN
  52. VowelStart(vwl_fr/rw)
  53. ELIF nextPh(O~) THEN
  54. VowelStart(vwl_fr/roo)
  55. ELIF nextPh(j) OR nextPh(j/) THEN
  56. VowelStart(vwl_fr/rj)
  57. ELIF nextPh(isVowel) THEN
  58. NextVowelStarts
  59. VowelStart(vwl_fr/r@)
  60. VowelStart(vwl_fr/ra)
  61. VowelStart(vwl_fr/re)
  62. VowelStart(vwl_fr/ri)
  63. VowelStart(vwl_fr/ro)
  64. VowelStart(vwl_fr/ru)
  65. EndSwitch
  66. ENDIF
  67. endprocedure
  68. phoneme r
  69. vcd uvl frc nopause
  70. rhotic
  71. starttype #r endtype #r
  72. Vowelin f1=0 f2=1500 -400 400 f3=-400 80
  73. lengthmod 7
  74. ipa U+0281
  75. IF nextPh(isNotVowel) THEN
  76. ChangePhoneme(r/)
  77. ELIF prevPh(isNotVowel) OR prevPh(isPause) THEN
  78. ChangePhoneme(r/2)
  79. ENDIF
  80. CALL pre_r
  81. CALL post_r
  82. FMT(vwl_fr/r)
  83. endphoneme
  84. phoneme r2 // silent unless followed by vowel
  85. vcd uvl frc
  86. rhotic
  87. starttype #r endtype #r
  88. ipa U+0281
  89. IF nextPh(isNotVowel) THEN
  90. ChangePhoneme(NULL)
  91. ELSE
  92. ChangePhoneme(r)
  93. ENDIF
  94. endphoneme
  95. phoneme r/ // variant of [r] when not preceding a vowel
  96. vcd uvl frc
  97. rhotic
  98. starttype #r endtype #r
  99. lengthmod 7
  100. ipa U+0281
  101. IF prevPhW(t) OR prevPhW(p) OR prevPhW(k) THEN
  102. FMT(vwl_fr/trr) addWav(r3/rx, 15)
  103. ELIF prevPh(isNotVowel) THEN
  104. FMT(vwl_fr/rr) addWav(r3/rx, 15)
  105. ENDIF
  106. PrevVowelEndings
  107. VowelEnding(vwl_fr/r_@)
  108. VowelEnding(vwl_fr/r_a)
  109. VowelEnding(vwl_fr/r_e)
  110. VowelEnding(vwl_fr/r_i)
  111. VowelEnding(vwl_fr/r_o)
  112. VowelEnding(vwl_fr/r_u)
  113. EndSwitch
  114. IF prevPh(y) THEN
  115. VowelEnding(vwl_fr/r_y)
  116. ENDIF
  117. IF nextPh(isNasal) THEN
  118. FMT(vwl_fr/r_n) addWav(r3/rx, 20)
  119. ELIF nextPh(#r) THEN
  120. length 30
  121. ENDIF
  122. FMT(vwl_fr/r_) addWav(r3/rx, 20)
  123. endphoneme
  124. phoneme r/2
  125. liquid rhotic uvl nopause
  126. starttype #r endtype #r
  127. Vowelin f1=0 f2=1500 -400 400 f3=-400 80
  128. ipa U+0281
  129. CALL post_r
  130. IF prevPhW(f) OR prevPhW(k) OR prevPhW(p) OR prevPhW(s) OR prevPhW(t) OR prevPhW(S) THEN
  131. FMT(vwl_fr/tr)
  132. ELIF prevPhW(#cFR) THEN
  133. FMT(vwl_fr/br)
  134. ELSE
  135. length 80
  136. FMT(vwl_fr/r)
  137. ENDIF
  138. endphoneme
  139. phoneme l
  140. liquid
  141. starttype #l endtype #l
  142. lengthmod 7
  143. IF nextPh(isNotVowel) THEN
  144. ChangePhoneme(l/)
  145. ELIF prevPhW(#cFR) THEN
  146. ChangePhoneme(l/2)
  147. ENDIF
  148. NextVowelStarts
  149. VowelStart(l/l@)
  150. VowelStart(l/la, -10)
  151. VowelStart(l/le, -15)
  152. VowelStart(l/li, -15)
  153. VowelStart(vwl_fr/lo, -10)
  154. VowelStart(l/lu, -20)
  155. EndSwitch
  156. IF prevPh(#@) THEN
  157. VowelEnding(l/xl, -50)
  158. ELIF prevPh(isVowel) THEN
  159. VowelEnding(l/xl, -40)
  160. ENDIF
  161. IF prevPh(isPause) OR thisPh(isWordStart) THEN
  162. FMT(l/_l)
  163. ENDIF
  164. IF prevPh(isRhotic) OR prevPh(isNasal) THEN
  165. FMT(l/_l)
  166. ENDIF
  167. IF prevPh(t) THEN
  168. FMT(l/tl)
  169. ENDIF
  170. IF prevPh(l/) THEN
  171. FMT(l/l_long) // double l, make it longer
  172. ENDIF
  173. FMT(l/l)
  174. endphoneme
  175. phoneme l/ // used for [l] when not before a vowel
  176. liquid rfx
  177. starttype #l endtype #l
  178. lengthmod 7
  179. IF nextPh(isVowel) THEN
  180. ChangePhoneme(l)
  181. ENDIF
  182. IF prevPhW(y) THEN
  183. VowelEnding(l/l_y)
  184. ELIF prevPhW(isVowel) THEN
  185. PrevVowelEndings
  186. VowelEnding(l/l_@)
  187. VowelEnding(l/l_a)
  188. VowelEnding(l/l_e)
  189. VowelEnding(l/l_i)
  190. VowelEnding(l/l_o)
  191. VowelEnding(l/l_u)
  192. EndSwitch
  193. ENDIF
  194. IF prevPh(#r) THEN
  195. FMT(l/_l)
  196. ENDIF
  197. FMT(l/l_)
  198. endphoneme
  199. phoneme l/2
  200. liquid
  201. starttype #l endtype #l
  202. IF nextPh(isNotVowel) THEN
  203. ChangePhoneme(l/)
  204. ENDIF
  205. NextVowelStarts
  206. VowelStart(l/l@)
  207. VowelStart(l/la, -10)
  208. VowelStart(l/le, -15)
  209. VowelStart(l/li, -15)
  210. VowelStart(l/lo, -10)
  211. VowelStart(l/lu, -20)
  212. EndSwitch
  213. IF prevPh(t) THEN
  214. FMT(l/tl)
  215. ENDIF
  216. FMT(l/l)
  217. endphoneme
  218. // Vowels
  219. //=======
  220. phoneme @
  221. vowel starttype #@ endtype #@
  222. length 170
  223. FMT(vowel/@_hgh)
  224. endphoneme
  225. phoneme @-
  226. vowel starttype #@ endtype #@
  227. unstressed
  228. length 130
  229. FMT(vowel/@_hgh)
  230. endphoneme
  231. phoneme a
  232. vowel starttype #a endtype #a
  233. IF nextPhW(isVowel) THEN
  234. length 220
  235. ELSE
  236. length 170
  237. ENDIF
  238. FMT(vowel/a_7)
  239. endphoneme
  240. phoneme a-
  241. vowel starttype #a endtype #a
  242. unstressed
  243. length 130
  244. FMT(vowel/a_7, 85)
  245. endphoneme
  246. phoneme a# // For english words
  247. import_phoneme en/a#
  248. endphoneme
  249. phoneme e
  250. vowel starttype #e endtype #e
  251. IF nextPh(l/) THEN
  252. VowelEnding(l/xl, -20)
  253. ELIF nextPh(isVowel) THEN
  254. length 200
  255. ELSE
  256. length 170
  257. ENDIF
  258. FMT(vowel/e_8)
  259. endphoneme
  260. phoneme e-
  261. vowel starttype #e endtype #e
  262. unstressed
  263. length 130
  264. FMT(vowel/e_8)
  265. endphoneme
  266. phoneme E
  267. vowel starttype #e endtype #e
  268. IF nextPhW(j) THEN
  269. length 190
  270. ELSE
  271. length 170
  272. ENDIF
  273. FMT(vowel/e_mid)
  274. endphoneme
  275. phoneme E-
  276. vowel starttype #e endtype #e
  277. unstressed
  278. length 130
  279. FMT(vowel/e_mid)
  280. endphoneme
  281. phoneme i
  282. vowel starttype #i endtype #i
  283. palatal
  284. IF prevPhW(r/2) OR prevPhW(l/2) THEN
  285. IF nextPhW(isVowel) THEN
  286. length 240
  287. ENDIF
  288. ELIF prevPhW(#r) AND nextPhW(isVowel) THEN
  289. IF nextPhW(#i) THEN
  290. length 220
  291. IfNextVowelAppend(;)
  292. ELSE
  293. ChangePhoneme(j/)
  294. ENDIF
  295. ELIF nextPhW(isVowel) THEN
  296. ChangePhoneme(j)
  297. ELSE
  298. length 150
  299. IfNextVowelAppend(;)
  300. ENDIF
  301. FMT(vowel/i_8)
  302. endphoneme
  303. phoneme I // For english words
  304. import_phoneme en/I
  305. endphoneme
  306. phoneme I2 // For english words
  307. import_phoneme en/I2
  308. endphoneme
  309. phoneme j/ // Short "i" between "r" and a vowel
  310. vowel starttype #i endtype #i
  311. length 80
  312. // unstressed
  313. NextVowelStarts
  314. VowelStart(j/j@)
  315. VowelStart(j/ja)
  316. VowelStart(j/je)
  317. VowelStart(j/ji)
  318. VowelStart(j/jo)
  319. VowelStart(j/ju)
  320. EndSwitch
  321. FMT(vwl_fr/j)
  322. endphoneme
  323. phoneme o
  324. vowel starttype #o endtype #o
  325. IF nextPh(isVowel) THEN
  326. length 220
  327. ELSE
  328. length 170
  329. ENDIF
  330. IF thisPh(isFinalVowel) THEN
  331. FMT(vowel/o_8)
  332. ELSE
  333. FMT(vowel/o)
  334. ENDIF
  335. endphoneme
  336. phoneme O
  337. vowel starttype #o endtype #o
  338. length 170
  339. IF thisPh(isFinalVowel) THEN
  340. FMT(vowel/o_mid2)
  341. ENDIF
  342. IF nextPhW(#l) AND next2Ph(isNotVowel) THEN
  343. FMT(vowel/o_mid2)
  344. ENDIF
  345. IF nextPhW(#r) AND next2Ph(isNotVowel) THEN
  346. FMT(vowel/o_mid2)
  347. ENDIF
  348. FMT(vowel/o_mid)
  349. endphoneme
  350. phoneme oU
  351. import_phoneme en/oU
  352. endphoneme
  353. phoneme u
  354. vowel starttype #u endtype #u
  355. IF nextPh(isVowel) OR nextPh(j) THEN
  356. length 220
  357. ELSE
  358. length 180
  359. ENDIF
  360. FMT(vowel/u_bck2)
  361. endphoneme
  362. phoneme u: // slitely longer than u
  363. vowel starttype #u endtype #u
  364. length 240
  365. FMT(vowel/u_bck2)
  366. endphoneme
  367. phoneme y
  368. vowel starttype #u endtype #u
  369. IF nextPhW(E~) OR nextPhW(#i) THEN
  370. length 110
  371. FMT(vowel/y, 80)
  372. ENDIF
  373. length 180
  374. FMT(vowel/y)
  375. endphoneme
  376. phoneme y-
  377. vowel starttype #u endtype #u
  378. unstressed
  379. length 130
  380. FMT(vowel/y)
  381. endphoneme
  382. phoneme W
  383. vowel starttype #@ endtype #@
  384. length 180
  385. FMT(vowel/@_6)
  386. endphoneme
  387. phoneme W2 // For english words
  388. vowel starttype #@ endtype #@
  389. length 100
  390. unstressed
  391. FMT(vowel/@_6)
  392. endphoneme
  393. phoneme Y
  394. vowel starttype #@ endtype #@
  395. length 170
  396. FMT(vowel/y#)
  397. endphoneme
  398. phoneme w
  399. vowel starttype #u endtype #u
  400. IF prevPh(#r) OR prevPhW(#l) THEN
  401. NextVowelStarts
  402. VowelStart(w/w@)
  403. VowelStart(vwl_fr/wa)
  404. VowelStart(w/we)
  405. VowelStart(w/wi)
  406. VowelStart(w/wo)
  407. VowelStart(w/wu)
  408. EndSwitch
  409. ELSE
  410. ChangePhoneme(w/)
  411. ENDIF
  412. endphoneme
  413. phoneme w/
  414. liquid
  415. lengthmod 7
  416. IF nextPh(isVowel) THEN
  417. NextVowelStarts
  418. VowelStart(w/w@)
  419. VowelStart(vwl_fr/wa)
  420. VowelStart(w/we)
  421. VowelStart(w/wi)
  422. VowelStart(w/wo)
  423. VowelStart(w/wu)
  424. EndSwitch
  425. VowelEnding(w/xw, -30)
  426. IF prevPh(isPause) THEN
  427. FMT(w/_w)
  428. ELSE
  429. FMT(w/_w)
  430. ENDIF
  431. ELSE
  432. // no vowel follows
  433. Vowelout len=50
  434. IF prevPh(#i) THEN
  435. FMT(w/iw_)
  436. ENDIF
  437. FMT(w/w_)
  438. ENDIF
  439. endphoneme
  440. phoneme A~
  441. vowel starttype #a endtype #a
  442. length 190
  443. FMT(vnasal/aa_n4)
  444. endphoneme
  445. phoneme E~ // same as W~ for fr-fr
  446. vowel starttype #e endtype #e
  447. length 190
  448. IF nextPh(n2) THEN
  449. FMT(vowel/e_mid)
  450. ENDIF
  451. FMT(vnasal/W_n)
  452. endphoneme
  453. phoneme O~
  454. vowel starttype #o endtype #o
  455. length 190
  456. FMT(vnasal/o_n4)
  457. endphoneme
  458. phoneme W~
  459. vowel starttype #@ endtype #@
  460. length 190
  461. FMT(vnasal/W_n)
  462. endphoneme
  463. // These vowels map to others in fr-fr, but are distinct in fr-ca
  464. phoneme U // same as [u]
  465. import_phoneme fr/u
  466. endphoneme
  467. phoneme y" // same as [y]
  468. import_phoneme fr/y
  469. endphoneme
  470. phoneme E: // slightly longer than [E]
  471. import_phoneme E
  472. endphoneme
  473. phoneme A // same as [a]
  474. import_phoneme a
  475. endphoneme
  476. // CONSONANTS
  477. //===========
  478. // uses the consonants in file "phonemes", unless overridden here
  479. phoneme b
  480. vcd blb stop
  481. starttype #cFR endtype #cFR
  482. voicingswitch p
  483. lengthmod 6
  484. Vowelin f1=2 f2=1000 -300 -200 f3=-100 100
  485. Vowelout f1=2 f2=1000 -500 -300 f3=-300 80 brk
  486. IF KlattSynth THEN
  487. Vowelin f1=1 f2=1000 -500 -300 f3=-300 80
  488. IF nextPh(isPause2) THEN
  489. FMT(klatt/b) addWav(x/b_)
  490. ENDIF
  491. FMT(klatt/b) addWav(x/b)
  492. ENDIF
  493. IF PreVoicing THEN
  494. IF nextPhW(#r) THEN
  495. FMT(b/xbr)
  496. ELSE
  497. FMT(b/xb)
  498. ENDIF
  499. ENDIF
  500. IF nextPh(isPause2) OR nextPh(l) THEN
  501. FMT(b/b_) addWav(x/b_)
  502. ELIF nextPh(l/) THEN
  503. FMT(b/b)
  504. ELIF nextPh(#r) THEN
  505. FMT(b/br) addWav(x/b, 50)
  506. ENDIF
  507. FMT(b/b) addWav(x/b, 70)
  508. endphoneme
  509. phoneme d
  510. vcd alv stop
  511. starttype #cFR endtype #cFR
  512. voicingswitch t
  513. lengthmod 5
  514. Vowelin f1=1 f2=1700 -300 300 f3=-100 80 amp=20
  515. Vowelout f1=2 f2=1700 -300 300 f3=-100 80
  516. IF PreVoicing THEN
  517. IF nextPhW(#r) THEN
  518. FMT(d/xdr)
  519. ELSE
  520. FMT(d/xd)
  521. ENDIF
  522. ENDIF
  523. IF nextPh(isPause2) THEN
  524. FMT(d/d_) addWav(x/d_, 50)
  525. ELIF nextPhW(#r) THEN
  526. FMT(d/dr) addWav(x/d_, 50)
  527. ENDIF
  528. FMT(d/d) addWav(x/d, 40)
  529. endphoneme
  530. phoneme f
  531. vls lbd frc
  532. starttype #cFR endtype #cFR
  533. voicingswitch v
  534. lengthmod 3
  535. Vowelout f1=0 f2=1000 -500 -350 f3=-200 100
  536. IF nextPh(isPause) THEN
  537. WAV(ufric/f_)
  538. ENDIF
  539. WAV(ufric/f, 80)
  540. endphoneme
  541. phoneme g
  542. vcd vel stop
  543. starttype #cFR endtype #cFR
  544. voicingswitch k
  545. lengthmod 5
  546. Vowelin f1=2 f2=2300 200 300 f3=-300 80
  547. Vowelout f1=1 f2=2300 250 300 f3=-300 80 brk
  548. IF PreVoicing THEN
  549. IF nextPhW(#r) THEN
  550. FMT(g/xgr)
  551. ELSE
  552. FMT(g/xg)
  553. ENDIF
  554. ENDIF
  555. IF nextPh(isPause2) THEN
  556. FMT(g/g_) addWav(x/g_)
  557. ELIF nextPhW(#r) THEN
  558. FMT(g/gr) addWav(x/g, 20)
  559. ENDIF
  560. FMT(g/g) addWav(x/g, 20)
  561. endphoneme
  562. phoneme k
  563. vls vel stop
  564. starttype #cFR endtype #cFR
  565. voicingswitch g
  566. length 50
  567. lengthmod 2
  568. Vowelin f1=0 f2=2300 200 400 f3=-100 80
  569. Vowelout f1=0 f2=2300 300 400 f3=-100 80 rms=20
  570. IF nextPh(isPause2) THEN
  571. WAV(ustop/k_)
  572. ELIF nextPh(#i) OR nextPh(;) THEN
  573. WAV(ustop/ki, 45)
  574. ELIF nextPh(#l) THEN
  575. WAV(ustop/kl, 40)
  576. ELIF nextPh(#r) THEN
  577. length 45
  578. WAV(ustop/k, 50)
  579. ENDIF
  580. WAV(ustop/k, 40)
  581. endphoneme
  582. phoneme n
  583. vcd alv nasal
  584. Vowelout f1=2 f2=1700 -300 250 f3=-100 80 rms=20 brk
  585. lengthmod 4
  586. IF KlattSynth THEN
  587. Vowelin f1=0 f2=1500 -200 200 f3=0 80
  588. FMT(klatt/n)
  589. ENDIF
  590. NextVowelStarts
  591. VowelStart(n/n@)
  592. VowelStart(n/na)
  593. VowelStart(n/ne)
  594. VowelStart(n/ni)
  595. VowelStart(n/no)
  596. VowelStart(n/nu)
  597. EndSwitch
  598. IF prevPh(isNotVowel) AND nextPhW(isLiquid) THEN
  599. FMT(n/nj)
  600. ELIF prevPh(isPause) OR prevPh(n) THEN
  601. FMT(n/_n)
  602. ELIF nextPh(isNotVowel) THEN
  603. length 120
  604. FMT(n/n_long_)
  605. ENDIF
  606. endphoneme
  607. phoneme n2
  608. vcd alv nasal
  609. IF nextPh(w) OR nextPh(isVowel) THEN
  610. ChangePhoneme(n)
  611. ELSE
  612. ChangePhoneme(NULL)
  613. ENDIF
  614. endphoneme
  615. phoneme p
  616. vls blb stop
  617. starttype #cFR endtype #cFR
  618. voicingswitch b
  619. lengthmod 2
  620. Vowelin f1=0 f2=1000 -50 -100 f3=-200 80 amp=11
  621. Vowelout f1=0 f2=1000 -500 -350 f3=-300 80 rms=22
  622. IF nextPh(isPause2) THEN
  623. WAV(ustop/p_, 80)
  624. ELIF nextPh(@-) THEN
  625. WAV(ustop/p_unasp, 70)
  626. ELIF nextPh(#l) THEN
  627. WAV(ustop/pl, 50)
  628. ELIF nextPh(#r) THEN
  629. length 40
  630. WAV(ustop/p_, 80)
  631. ENDIF
  632. WAV(ustop/p_unasp_, 90)
  633. endphoneme
  634. phoneme p2 // silent unless followed by vowel
  635. vls blb stop
  636. lengthmod 2
  637. Vowelin f1=0 f2=1000 -50 -100 f3=-200 80 amp=11
  638. Vowelout f1=0 f2=1000 -500 -350 f3=-300 80 rms=22
  639. IF nextPh(isNotVowel) THEN
  640. ChangePhoneme(NULL)
  641. ENDIF
  642. WAV(ustop/p, 45)
  643. endphoneme
  644. phoneme s
  645. vls alv frc sibilant
  646. voicingswitch z
  647. lengthmod 3
  648. Vowelin f1=0 f2=1700 -300 300 f3=-100 80
  649. Vowelout f1=0 f2=1700 -300 250 f3=-100 80 rms=20
  650. IF nextPh(isPause) THEN
  651. WAV(ufric/s_, 45)
  652. ELIF nextPh(p) OR nextPh(t) OR nextPh(k) THEN
  653. WAV(ufric/s!, 45)
  654. ENDIF
  655. WAV(ufric/s, 45)
  656. endphoneme
  657. phoneme S
  658. vls pla frc sibilant
  659. starttype #cFR endtype #cFR
  660. voicingswitch Z
  661. lengthmod 3
  662. Vowelin f1=0 f2=1900 100 300 f3=-100 80
  663. Vowelout f1=0 f2=1900 100 300 f3=-100 80
  664. IF prevPhW(t) THEN
  665. length 60
  666. ENDIF
  667. IF nextPh(isPause) THEN
  668. WAV(ufric/sh_, 45)
  669. ENDIF
  670. WAV(ufric/sh, 45)
  671. endphoneme
  672. phoneme t
  673. vls alv stop
  674. starttype #cFR endtype #cFR
  675. voicingswitch d
  676. lengthmod 2
  677. Vowelin f1=0 f2=1700 -300 300 f3=-100 80
  678. Vowelout f1=0 f2=1700 -300 250 f3=-100 80 rms=20
  679. IF nextPh(isPause2) THEN
  680. WAV(ustop/t_, 40)
  681. ELIF nextPh(#r) THEN
  682. length 40
  683. WAV(ustop/t_short_, 50)
  684. ENDIF
  685. WAV(ustop/t_short, 40)
  686. endphoneme
  687. phoneme t2 // silent unless followed by vowel
  688. vls alv stop
  689. Vowelin f1=0 f2=1600 -300 300 f3=-100 80
  690. Vowelout f1=0 f2=1600 -300 250 f3=-100 80 rms=20
  691. lengthmod 2
  692. IF nextPh(isVowel) OR nextPh(w) OR nextPh(j) THEN
  693. WAV(ustop/t_short, 30)
  694. ELSE
  695. ChangePhoneme(NULL)
  696. ENDIF
  697. endphoneme
  698. phoneme t3 // silent unless followed by vowel or pause
  699. vls alv stop
  700. lengthmod 2
  701. IF nextPh(isPause) THEN
  702. ChangePhoneme(t)
  703. ELIF nextPh(isNotVowel) THEN
  704. ChangePhoneme(NULL)
  705. ELSE
  706. ChangePhoneme(t2)
  707. ENDIF
  708. endphoneme
  709. phoneme v
  710. vcd lbd frc
  711. starttype #cFR endtype #cFR
  712. voicingswitch f
  713. lengthmod 6
  714. length 90
  715. Vowelin f1=0 f2=1000 -300 -200 f3=-300 100
  716. Vowelout f1=0 f2=1000 -500 -300 f3=-300 100
  717. IF KlattSynth THEN
  718. CALL base/v
  719. RETURN
  720. ENDIF
  721. IF nextPh(isPause2) THEN
  722. FMT(voc/v_) addWav(vocw/v)
  723. ENDIF
  724. IF thisPh(isWordStart) AND nextPhW(isLiquid) THEN
  725. Length 70
  726. ELIF nextPhW(w/) OR nextPhW(#r) THEN
  727. Length 60
  728. ENDIF
  729. FMT(voc/v) addWav(vocw/v, 60)
  730. endphoneme
  731. phoneme V // For english words
  732. vowel starttype #a endtype #@
  733. length 140
  734. ChangeIfDiminished(@)
  735. FMT(vowel/V_2)
  736. endphoneme
  737. phoneme z
  738. vcd alv frc sibilant
  739. voicingswitch s
  740. lengthmod 6
  741. Vowelout f1=0 f2=1700 -300 300 f3=-100 60 len=50
  742. IF nextPhW(z) THEN
  743. FMT(d/xd)
  744. ENDIF
  745. IF nextPh(isPause2) OR nextPh(isPause) THEN
  746. FMT(voc/z_) addWav(ufric/s_, 45)
  747. ENDIF
  748. IF prevPhW(t) THEN
  749. length 60
  750. ENDIF
  751. FMT(voc/z) addWav(ufric/s_, 45)
  752. endphoneme
  753. phoneme z2 // silent unless followed by vowel
  754. vcd alv frc sibilant
  755. IF nextPh(isVowel) OR nextPh(w/) OR nextPh(j) THEN
  756. Length 70
  757. FMT(voc/z) addWav(ufric/s, 40)
  758. ELSE
  759. ChangePhoneme(NULL)
  760. ENDIF
  761. endphoneme
  762. phoneme z3 // "six" and "dix". [s] before pause, [z] before vowel, else []
  763. vcd alv frc sibilant
  764. IF nextPh(isPause) THEN
  765. ChangePhoneme(s)
  766. ELIF nextPh(isVowel) OR nextPh(w/) THEN
  767. ChangePhoneme(z)
  768. ELSE
  769. ChangePhoneme(NULL)
  770. ENDIF
  771. endphoneme
  772. phoneme j.
  773. liquid
  774. lengthmod 7
  775. ipa U+0265
  776. endphoneme
  777. // translate from English to French phonemes
  778. equivalents NULL // disable this table
  779. //remove_stress
  780. 0 O
  781. 3 W r
  782. 3: W : r
  783. @ W
  784. @- W
  785. @2 W
  786. @5 W
  787. @L W l
  788. a a
  789. a# a#
  790. A: a :
  791. A@ a r
  792. aa a :
  793. aI a j
  794. aI3 a j W2 r
  795. aI@ a j W2 r
  796. aU a w
  797. aU@ a w @
  798. A~ A~
  799. E E
  800. e: e
  801. e@ E : r
  802. eI E : j/
  803. i i
  804. I I
  805. I2 I2
  806. i: i :
  807. i@ i r
  808. i@3 i : r
  809. O O
  810. O: O :
  811. o: o
  812. O@ O r
  813. o@ O r
  814. OI O j
  815. oU oU
  816. O~ O~
  817. U u
  818. u: u:
  819. U@ u r
  820. V V
  821. IR i r
  822. VR W r
  823. b b
  824. C C
  825. d d
  826. D D
  827. dZ dZ
  828. f f
  829. g g
  830. h h
  831. j j
  832. k k
  833. l l
  834. l# l#
  835. m m
  836. n n
  837. N N
  838. n^ n^
  839. p p
  840. Q Q
  841. r r
  842. r- r
  843. s s
  844. S S
  845. t t
  846. T T
  847. t2 t
  848. tS tS
  849. v v
  850. w w/
  851. x x
  852. z z
  853. Z Z
  854. endphoneme