Donate to e Foundation | Murena handsets with /e/OS | Own a part of Murena! Learn more

Commit 09824162 authored by jonsd's avatar jonsd
Browse files

[1.48.05] continued. 

git-svn-id: https://espeak.svn.sourceforge.net/svnroot/espeak/trunk@377 d46cf337-b52f-0410-862d-fd96e6ae7743
parent 24379e02

espeak-data/voices/asia/gu

0 → 100755
+3 −0
Original line number Diff line number Diff line 
name gujarati-test

language gu

espeak-data/voices/asia/te

0 → 100755
+5 −0
Original line number Diff line number Diff line 
name telugu-test

language te



intonation 2

//consonants 80

phsource/ph_arabic

0 → 100755
+518 −0
Original line number Diff line number Diff line 
//  short vowels

phoneme a

  vowel starttype #a endtype #a

  unstressed

  length 180

  CALL ShortVowelLength 

  IF prevPh(s[)  OR prevPh(d[) OR prevPh(t[) OR prevPh(Z) THEN   

    FMT(vowel/0_3) 

  ELSE

	FMT(vowel/a#)	

  ENDIF

  

endphoneme





phoneme i

  vowel starttype #i endtype #i

  length 140

  unstressed  

  CALL ShortVowelLength 

  FMT(vowel/i)

endphoneme



phoneme u

  vowel starttype #u endtype #u

  unstressed  

  length 140

  CALL ShortVowelLength 

  FMT(vowel/u)

endphoneme







phoneme : //  lengthen previous vowel by "length"

  virtual

  length 200

endphoneme









//  long vowels

phoneme a:

  vowel starttype #a endtype #a

  length 300

  //CALL LongVowelLength 

  IF prevPh(s[)  OR prevPh(d[) OR prevPh(t[) OR prevPh(Z) THEN   

    FMT(vowel/0_3) 

  ELSE

	FMT(vowel/a#)	

  ENDIF

  

endphoneme





phoneme i:

  vowel starttype #i endtype #i

  length 300

  //CALL LongVowelLength 

  FMT(vowel/i)

endphoneme



phoneme u:

  vowel starttype #u endtype #u

  length 300

  //CALL LongVowelLength 

  FMT(vowel/u)

endphoneme





// Redifine consnant for arabic 









phoneme l

  liquid

  lengthmod 7



  IF nextPh(isNotVowel) THEN

    ChangePhoneme(l/)

  ENDIF



  IF nextPh(isNotVowel) THEN

    // in case the next phoneme is no longer a vowel, in pass=2

    PrevVowelEndings

      VowelEnding(l/L1_@L, -60)

      VowelEnding(l/L1_aL, -40)

      VowelEnding(l/L1_eL, -30)

      VowelEnding(l/L1_iL, -30)

      VowelEnding(l/L1_oL, -40)

      VowelEnding(l/L1_uL, -40)

    EndSwitch



    FMT(l/l_)

    RETURN

  ENDIF



  CALL vowelstart_l



  IF prevPh(#@) THEN

    VowelEnding(l/xl, -50)

  ELIF prevPh(isVowel) THEN

    VowelEnding(l/xl, -40)

  ENDIF



  IF prevPh(isPause) THEN

    FMT(l/_l)

  ENDIF



  IF prevPh(t) THEN

    FMT(l/tl)

  ENDIF



  IF prevPh(l/) THEN

    FMT(l/l_long)    // double l, make it longer

  ENDIF



  FMT(l/l)

endphoneme











phoneme w

  liquid

  lengthmod 7

  FMT(w/w_)

endphoneme







phoneme j

  liquid palatal

  lengthmod 7

  FMT(j/j_)

endphoneme







//*******************************************************************

// NASAL CONSONANTS

//*******************************************************************





phoneme m

  vcd blb nasal

  Vowelout f1=2  f2=1000 -500 -350  f3=-200 80 brk

  lengthmod 4

  FMT(m/m_)

endphoneme





phoneme n

  vcd alv nasal

  Vowelout f1=2 f2=1700 -300 250  f3=-100 80  rms=20 brk

  lengthmod 4

  FMT(n/n_)

endphoneme





//*******************************************************************

// VOICED STOPS

//*******************************************************************





phoneme b

  vcd blb stop

  voicingswitch p 

  Vowelout f1=2  f2=1000 -500 -300  f3=-300 80 brk

  lengthmod 7

  FMT(b/b) addWav(x/b)

endphoneme





phoneme d

  vcd alv stop

  voicingswitch t

  lengthmod 5

  Vowelin f1=1  f2=1700 -300 300  f3=-100 80

  Vowelout f1=2 f2=1700 -300 300  f3=-100 80 brk



  FMT(d/d) addWav(x/d)

endphoneme





phoneme d[

  vcd dnt stop

  voicingswitch t[

  lengthmod 5

  Vowelin f1=2  f2=1500 -300 300  f3=-150 80

  Vowelout f1=2 f2=1500 -300 300  f3=-150 80

  FMT(d/d) addWav(x/d_dnt, 100)

endphoneme





phoneme dZ

  vcd pla afr sibilant

  voicingswitch tS

  //lengthmod 8

  Vowelin f1=2  f2=2300 200 400  f3=100 80

  Vowelout f1=2  f2=2300 250 300  f3=100 80 brk



  FMT(dzh/dzh) addWav(x/dzh)

endphoneme







phoneme J

  vcd pal afr sibilant palatal

  voicingswitch c

  lengthmod 5

  Vowelin f1=2  f2=2700 400 600  f3=300 80 rate len=70

  Vowelout f1=2 f2=2700 400 600  f3=300 80 colr=1



  IF KlattSynth THEN

    IF nextPh(isPause2) THEN

      FMT(klatt/dz_pzd_) addWav(x/dzh, 35)

    ENDIF

    FMT(klatt/dz_pzd) addWav(x/dzh, 45)

  ENDIF



  FMT(dzh/dz_pzd) addWav(x/dzh, 45)

endphoneme





phoneme g

  vcd vel stop

  voicingswitch k

  lengthmod 5

  Vowelin f1=2  f2=2300 200 300  f3=-300 80

  Vowelout f1=2  f2=2300 250 300  f3=-300 80 brk



  FMT(g/g) addWav(x/g2, 150)

endphoneme



//*******************************************************************

// VOICED fricatives

//*******************************************************************



phoneme D

  vcd dnt frc

  voicingswitch T

  lengthmod 6

  Vowelout f1=0  f2=1700 -300 300  f3=-100 60  len=50



  IF KlattSynth THEN

    Vowelin f1=0 f2=1290 -300 300 f3=0 0

  ENDIF

  FMT(voc/dh) addWav(vocw/dh)

endphoneme





phoneme z

  vcd alv frc sibilant

  //voicingswitch s

  lengthmod 1

  Vowelout f1=0  f2=1700 -300 300  f3=-100 60  len=50



  IF KlattSynth THEN

    Vowelin f1=0 f2=1390 -300 300 f3=0 0

    Vowelout f1=1  f2=1390 -300 300  f3=-100 60  len=50 brk

  ENDIF



  FMT(voc/z) addWav(ufric/s_, 85)

endphoneme





phoneme Z

  vcd pla frc sibilant

  voicingswitch S

  lengthmod 6

  Vowelin  f1=0  f2=2000 0 300  f3=-200 80

  Vowelout f1=2  f2=2000 0 300  f3=-200 80 brk



  IF KlattSynth THEN

    IF nextPh(isPause2) THEN

      FMT(klatt/zh_) addWav(vocw/zh)

    ENDIF

    FMT(klatt/zh) addWav(vocw/zh, 130)

  ENDIF



  FMT(voc/zh) addWav(vocw/zh, 130)

endphoneme











//*******************************************************************

// UNVOICED STOPS

//*******************************************************************



phoneme t

  vls alv stop

  voicingswitch d

  lengthmod 2

  Vowelin f1=0  f2=1700 -300 300  f3=-100 80

  Vowelout f1=0 f2=1700 -300 250  f3=-100 80  rms=20

  WAV(ustop/t, 90)

endphoneme





phoneme t[        // dental variant of /t/

  vls dnt stop

  voicingswitch d[

  lengthmod 2

  Vowelin f1=1  f2=1500 -250 250  f3=-100 80  amp=16

  Vowelout f1=0 f2=1500 -300 250  f3=-100 80  rms=20



  WAV(ustop/t_dnt, 35)

endphoneme









phoneme k

  vls vel stop

  voicingswitch g

  lengthmod 2

  Vowelin f1=0  f2=2300 200 300  f3=-200 80

  Vowelout f1=0 f2=2300 300 400  f3=-200 80  rms=20



  IF KlattSynth THEN

    Vowelout f1=0 f2=2300 200 300  f3=-200 80  rms=20

  ENDIF



  WAV(ustop/k)

endphoneme





phoneme q

  vls uvl stop

  lengthmod 2

  Vowelin f1=1  f2=1700 0 200  f3=-300 80 gpaus f4 rms=30

  Vowelout f1=1 f2=1700 -100 200  f3=-300 80  f4 rms=35

  WAV(ustop/q, 48)

endphoneme







//*******************************************************************

// UNVOICED fricatives

//*******************************************************************



phoneme f

  vls lbd frc

  voicingswitch v

  lengthmod 3

  Vowelout f1=0  f2=1000 -500 -350  f3=-200 80

  WAV(ufric/f)

endphoneme





phoneme T

  vls dnt frc

  voicingswitch D

  lengthmod 3

  Vowelin f1=0  f2=1700 -300 300  f3=-100 80

  Vowelout f1=0 f2=1700 -300 250  f3=-100 80  rms=20

  WAV(ufric/th)

endphoneme





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

  WAV(ufric/s)

endphoneme





phoneme S

  vls pla frc sibilant

  voicingswitch Z

  lengthmod 3

  Vowelin  f1=0  f2=2100 100 300  f3=-100 80

  Vowelout f1=0  f2=2100 100 300  f3=-100 80



  WAV(ufric/sh)

endphoneme













phoneme x

  vls vel frc

  voicingswitch Q

  lengthmod 3

  Vowelin f1=0  f2=2300 200 400  f3=-100 80

  Vowelout f1=0 f2=2300 300 400  f3=-100 80  rms=20

  //WAV(ufric/x)

  WAV(vwl_ar/kha)

endphoneme







phoneme h

  vls glt apr

  lengthmod 3

  ipa h

  WAV(h/h_, 70)  // no vowel following

endphoneme

















// Added specific consnant to arabic

phoneme H	// arabic Hah

  vls phr frc

  ipa U+0127

  lengthmod 5 

  WAV(vwl_ar/H2) 

endphoneme



phoneme Z // arabic ZAH .Todo

  vls phr frc

  lengthmod 5 

  voicingswitch z  

  WAV(vwl_ar/ZH4) 

endphoneme



phoneme E	// arabic Ain

  vls phr frc

  //ipa U+0127

  //voicingswitch a  

  lengthmod 5   

  //WAV(vwl_ar/AN2,50) 

 WAV(vwl_ar/ain2) 



endphoneme



phoneme G	//arabic Ghain

  //vcd uvl frc

  vls uvl frc

  lengthmod 3

  Vowelin f1=0  f2=2300 200 400  f3=-100 80

  Vowelout f1=0 f2=2300 300 400  f3=-100 80  rms=20

  voicingswitch R  

  //lengthmod 5 

  //ipa U+0280

  WAV(vwl_ar/ghain6)

  //FMT(voc/Q_ulv) addWav(vwl_ar/gh, 100)

	//FMT(voc/Q_ulv) addWav(vwl_ar/ghain3, 100)

    

endphoneme



phoneme d[	//arabic Dhad

  vls dnt stop

  voicingswitch d

  length 120

  WAV(vwl_ar/da7)

endphoneme



phoneme s[

  vls dnt stop 

  //voicingswitch s

  lengthmod 7

  WAV(vwl_ar/SA1)

endphoneme







phoneme r

  liquid rhotic

  ipa ?

  lengthmod 7

  IF nextPh(a) OR nextPh(a:) THEN

  FMT(r/ra)  

  ENDIF

  FMT(r/r_)

endphoneme



procedure ShortVowelLength 



  //IF prevPhW(isVoiced) AND nextPhW(isVoiced) THEN // voiced 

  IF prevPhW(isNotVowel) AND nextPhW(isNotVowel) THEN // consonants 

		length 140 

		RETURN

	//ENDIF

	ELSE

		IF prevPh(isStressed) THEN

			length 160

		ELSE

			length 175

		ENDIF

		

   ENDIF

endprocedure

procedure LongVowelLength 



  //IF prevPhW(isVoiced) AND nextPhW(isVoiced) THEN // voiced 

	IF nextPhW(:) THEN

		length 300 

		RETURN

	//ENDIF

	ELIF prevPhW(isNotVowel) AND nextPhW(isNotVowel) THEN // consonants 

		length 340 

		RETURN

	//ENDIF

	ELSE

		IF prevPh(isStressed) THEN

			length 360

		ELSE

			length 375

		ENDIF

		

   ENDIF

endprocedure
 
 No newline at end of file