mahta.fetrat
/
HomoFast-eSpeak-Persian
Watch 1
Star 0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
Browse Source

ru: revert to d1ce948058

master
Reece H. Dunn 7 years ago
parent
55d001514e
commit
5461b09ea5
3 changed files with 291 additions and 367 deletions
Split View Show Diff Stats
  1. 62
    156
      dictsource/ru_list
  2. 51
    75
      dictsource/ru_rules
  3. 178
    136
      phsource/ph_russian

+ 62
- 156
dictsource/ru_list View File

@@ -2,21 +2,21 @@

// Numbers
_0 n'ojl^
_1 od;'in
_1 ojd;'in
_1f odn'a
_2 dv'A
_2f dv;'e
_3 tr;'i
_4 tS;It'yr;I
_3 tR;'i
_4 tS;It'yR;I
_5 p;'jat;
_6 S'Es;t;
_7 s;'em;
_7 s;'ejm
_8 v'os;E2m
_9 d;'evI3t;
_10 d;'es;It;
_11 Od;'innVttsVt;
_12 dv;In'AttsVt;
_13 tr;In'AttsVt;
_13 tR;In'AttsVt;
_14 tS;It'y@-*nVttsVt;
_15 p;Itn'AttsVt;
_16 SE#stn'AttsVt;
@@ -89,140 +89,32 @@ _» z'akr uglof
* zvezd'a $max3
_, zVpit'aja

// particles
а $u+ $pause // and
без $u
будто $u
бы $u
в $u // to,in,at
вдруг $u
ведь $u
весь $u
вместо $u
во $u
вовсе $u
вот $u
все $u
где $u
(где то) $u
даже $u
// prepositions
в v $u // to,in,at
для $u // for
до $u
едва $u2
если $u $pause
ещё $u2+
ж $u
же $u
за $u+
и $u $pause // and
ибо $u $pause // if, for
из $u
(из за) $u
или $u $pause
к $u
как $u+
какой $u2+
ко $u
когда $u+
кстати $u
(кто то) $u
ли $u
либо $u
лишь $u
на $u // on
надо $u
не $u // negative
нет $u+
ни $u
никак $u2
ничто $u+
но $u $pause // but
ну $u+
о $u+
об $u
однако $u2
от $u // from
очень $u
по $u
под $u
пока $u2+
пора $u2+
после $u
потом $u2+
почти $u2+
прежде $u
при $u
про $u
пусть $u+
раз $u+
с $u // with,from,since
сей $u
со $u
так $u+
также $u $pause
то $u
только $u
туда $u2+
тут $u+
у $u // by
уж $u
уже $u2+ // already
хоть $u
хотя $2 $pause // although
что $u+ $pause // what, that
чтоб $u
чтобы $u $pause // in order that
с s $u // with,from,since
у u $u // by

// conjunctions
а $atend
а $u $pause // and
и i $u $pause // and
ибо $u $pause // for
ибо $u $pause // if
но $u $pause // but
хотя $2 $pause // although
чтобы $pause // in order that

// pronouns
вам $u+
вами $u+
вас $u+
ваш $u+
вы $u+
другой $u+
его $u2+
её $u2+
ей $u+
ему $u2+
им $u+
ими $u+
их $u+
который $u2
кто $u+
меня $u2+
мне $u+
мной $u+
мой $u+
мы $u+
нам $u+
нами $u+
нас $u+
наш $u+
ней $u+
некий $u
нём $u+
никто $u2+
них $u+
обо $u+
он $u+
она $u+
они $u+
оно $u+
сам $u+
самый $u+
свой $u+
себя $u2+
такой $u2+
там $u+
тебе $u2+
тебя $u2+
тобой $u2+
тот $u+
ты $u+
чем $u+
это $u+
этот $u+
я $u+
я $u // I

// questions
что Sto $u $pause // what, that

// misc.
не $u // negative

// auxillary verbs
будем $u1
@@ -240,7 +132,6 @@ _, zVpit'aja
есмь $u1
есте $u1
есть $u1
иметь $u2
мог $u1
могла $u2
могли $u2
@@ -251,7 +142,6 @@ _, zVpit'aja
может $u1
можете $u1
можешь $u1
можно $u
мочь $u // can
побудем $u2
побудет $u2
@@ -275,29 +165,45 @@ _, zVpit'aja
сможете $u1
сможешь $u1
смочь $u1
стать $u
суть $u1
хотеть $u2


// Common names where 'е' is written instead of 'ё'
еще jIStS;'8
(не о чем) n^i||o||tS'im
чем tS;'8m
ее jIj'8
// Cyrillic letter names
а a
б bE
_в vE
в vE $atend
г gE
д dE
е je
ё j8
ж ZE
з zE
и i
й ,i'k@-*'AtkOjI
к kA
л El^
м Em
н En_
о o
п pE
р Er
_с Es
с Es $atend
т tE
у u
ф Ef
х xA
ц tsE
ч tS;e
ш SA
щ S;ja
ъ tv;'8@-*dyjzn'Ak
ы y
ь m;'jak;I#jzn'Ak
э e
ю ju
я ja

// exceptions
радио r'ad;Io

// letters (these are reduced to schwa when used as particles)
_б bE
б bE $atend
_в vE
в vE $atend
_ж ZE
ж ZE $atend
_к kA
к kA $atend
_с Es
с Es $atend


+ 51
- 75
dictsource/ru_rules View File

@@ -31,30 +31,14 @@
// Y iotated vowel, softsign: ь ю я ё


.L11 а ы е ой ою ~ ам ами ах // suffixes for 1. declination words ending а (e.g. страна, Юра)
.L12 я и е ю ёй ею ь ям ями ях // suffixes for 1. declination words ending я (e.g. земля, дядя)
.L13 я и ю ей ею й ям ями ях // suffixes for 1. declination words ending Aя (e.g. ария) A means vowel

.L21 ~ а у ом е ы ов ам ами ах // suffixes for 2. declination masculine words without ending (e.g. стол)
.L22 ь я ю ем ём е и ей ями ях // suffixes for 2. declination masculine words without ending (e.g. конь)
.L23 й я ю ем и ев ям ями ях // suffixes for 2. declination masculine words with ending й (герой)
.L24 о а у ом е ам ами ах // suffixes for 2. declination neuter words with ending о (e.g. окно, note about ок_он_!)
.L25 е я ю ем ей ям ями ях // suffixes for 2. declination neuter words with ending е (e.g. поле)
.L26 е я ю ем и й ям ями ях // suffixes for 2. declination neuter words with ending Aе (e.g. здание)

.L31 ь и ью ей ам ами ах // suffixes for 2. declination feminine words without ending (e.g. ночь)


.group а
а V
B) а (_ V
_) а a
_) а (_ a
а (_ a

.group б
б b
_) б (_ b@- // бы/б
б (Y b;
б (_ p
б (бY b;
@@ -78,7 +62,6 @@
в v
в (_ f
в (Y v;
_) в (_ v@-
в (бY v;
в (вY v;
в (вбY v;
@@ -100,7 +83,6 @@
Cе) г (о_ v
Cо) г (о_ v
_все) г (о_ v
_) г (_ gE
г (Y g;
г (_ k
г (к x
@@ -111,13 +93,17 @@
г (ффY k
г (хY k
г (хкY k
е) г (о_ v
_е) г (о_ v
е) г (ося_ v
_мно) г (о_ g
_мое) г (о_ v
_не) г (о_ v
_се) г (о v
_твое) г (о_ v

.group д
д d
д (B d;
_) д (_ dE
д (Y d;
д (_ t
д (дY d;
@@ -134,26 +120,30 @@
д (ь_ t;

.group е
е e
е e
A) е je
A) е (_ jI3 // second position
// A) е jE2
A) е (_ jI3 //second position
// H) е (_ E#
// H) е E2
бакт) е (р E% // бактериальный, антибактериальный, ...
барт) е (р E%
реб) е (н j8
_) е (_ je
// е E3
// е (_ I2
_) е jI3 //second position
инт) е (р E% // интернет, интернационал, ... ??????????
компьют) е (р E%
т) е (ст E%
ъ) е je
// ъ) е jE2
ъ) е (_ jI3 //second position
ь) е je
// ь) е jE2
ь) е (_ jI3 //second position

.group ж
ж Z
ж (_ S
_) ж (_ Z@- // же/ж
ж (кY S
ж (пY S
ж (сY S
@@ -162,15 +152,13 @@
ж (ффY S
ж (хY S
ж (хкY S
ж (ч S;
жч S;

.group з
з z
з (Y z;
з (_ s
_) з (_ zE
з (дY z;
з (е z
з (ж Z
з (зY_ s;
з (зY z;
@@ -190,7 +178,7 @@
з (ффY s
з (хY s
з (хкY s
з (ч S;
зч S;
з (ш S
зщ S;
з (щ s
@@ -201,17 +189,14 @@
ж) и y
_) и I
и (_ I
_) и (_ i
ш) и y

.group й
й j
_) й (_ ,i'k@-*'AtkOjI

.group к
к k
к (Y k;
_) к (_ k@-
к (б g
к (бY g
к (г g
@@ -225,12 +210,10 @@

.group л
л l
_) л (_ El^
л (Y l;
л (Y l^

.group м
м m
_) м (_ Em
м (Y m;
м (бY m;
м (вY m;
@@ -241,18 +224,25 @@
.group н
н n
биз) не (с nE%
_) н (_ En_
н (Y n;
// н (B n^
// н (Y n# ?
н (_ n_
// н (дB n^
// н (дY n^
// н (зY n^
// н (нB n^
// н (нY n^
// н (сY n^
// н (тY n^

.group о
о o
_) о (_ o
// о (B oj
// о (FY oj

.group п
п p
п (Y p;
_) п (_ pE
п (б b
п (б' b;
п (г b
@@ -273,13 +263,11 @@
.group р
р r
р (B r;
_) р (_ Er
р (Y r;
р (ь rI^

.group с
с s
_) с (_ s@-
с (Y s;
с (б z
с (г z
@@ -295,15 +283,14 @@
с (сY s;
с (тY s;
с (ть s
с (ч S;
сч S;
с (ш S
с (щ s;s;

.group т
т t
Y) тс ts
Y) тс ts
т (Y t;
_) т (_ tE
т (б d
т (г d
т (дB d;
@@ -320,12 +307,10 @@

.group у
у u
B) у u#
_) у (_ u
B) у u#

.group ф
ф f
_) ф (_ Ef
ф (Y f;
ф (б v
ф (б' v;
@@ -346,7 +331,6 @@
.group х
х x
х (Y x //С
_) х (_ xA
х (бY x
х (б x
х (бвY x
@@ -364,7 +348,6 @@

.group ц
ц ts
_) ц (_ tsE
ц (б dz
ц (бY dz
ц (бвY dz
@@ -380,13 +363,7 @@

.group ч
ч tS;
деви) ч (н S //Варианты окончаний женских отчеств типа Никитична
коне) ч (но S
лу) ч (ше t
пустя) ч (н S
скворе)ч (н S
ску) ч (н S
_) ч (_ tS;e
лу) ч (ше t
ч (б dZ;
ч (бY dZ;
ч (бвY dZ;
@@ -399,17 +376,22 @@
ч (ж dZ;
ч (з dZ;
ч (зY dZ;
ч (на_ S
ч (не_ S
ч (ной_ S
ч (ну_ S
ч (ны_ S
_) ч (то S
яи) ч (ни S
//Варианты окончаний женских отчеств типа Никитична
деви) ч (н S
коне) ч (но S
пустя) ч (н S
скворе)ч (н S
ску) ч (н S
ч (на_ S
ч (не_ S
ч (ной_ S
ч (ну_ S
ч (ны_ S
_) ч (то S
яи) ч (ни S

.group ш
ш S
_) ш (_ SA
ш (бY Z
ш (б Z
ш (бвY Z
@@ -423,9 +405,9 @@
ш (зY Z
ш (з Z


.group щ
щ S;
_) щ (_ S;ja
щ (бY Z;
щ (б Z;
щ (бвY Z;
@@ -440,22 +422,18 @@
щ (з Z;

.group ъ
ъ (Y _|
_) ъ (_ tv;'8@-*dyjzn'Ak
ъ (Y j

.group ы
ы y
_) ы (_ y

.group ь
ь (Y // no pronunciation (i.e. silent)
_) ь (_ m;'jak;I#jzn'Ak
ь (Y j

.group э
э E2
_) э E#
э (_ E#
_) э (_ e

.group ю
ю u"
@@ -464,25 +442,23 @@
ъ) ю ju
ь) ю ju
_) ю ju
_) ю (_ ju

.group я
я V
// TODO: in unstressed position it sometimes sounds more like [i] than like [V]
A) я ja
A) я (_ ja //second position
// C) я ja# ? // TODO: in unstressed position it sometimes sounds more like [i] than like [V]
// C) я ja# ?
ъ) я ja
ъ) я (_ ja //second position
ь) я ja
ь) я (_ ja //second position
_) я (_ ja
_) я ja //second position
я (_ V

.group ё
ё '8
_) ё 'j8
_) ё (_ j8
ж) ё 'O
ш) ё 'O


+ 178
- 136
phsource/ph_russian View File

@@ -1,3 +1,5 @@


phoneme g
vcd vel stp prevoice
voicingswitch k
@@ -21,11 +23,15 @@ phoneme p
endphoneme



phoneme x
vls vel 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
// IF nextPh(isPause) THEN
// WAV(ufric/x, 120)
// ENDIF
WAV(ufric/x_hr, 30)
endphoneme

@@ -35,62 +41,66 @@ phoneme k
endphoneme


phoneme l
liquid rfx
ipa ɭ
lengthmod 7
length 80
IF nextPh(isPause) THEN
FMT(l/l_,120)
ELSE
FMT(l/l_,120)
ENDIF
endphoneme

phoneme l^ // From Latvian ļ
liquid
ipa ʎ
lengthmod 7
Vowelout len=60 lenadd rate
length 80

NextVowelStarts
VowelStart(l^/j2@)
VowelStart(l^/j2a)
VowelStart(l^/j2e)
VowelStart(l^/j2i)
VowelStart(l^/j2o)
VowelStart(l^/j2u)
EndSwitch

IF prevPh(isPause) THEN
FMT(l^/_l^)
ELSEIF nextPh(isPause) THEN
FMT(l^/l^_,120)
ENDIF
phoneme l

FMT(l^/l^)
liquid rfx
ipa ɭ
lengthmod 7
length 40
FMT(l^/l_rfx)
endphoneme

phoneme l^
liquid rfx pzd
ipa ɭ
// lengthmod 7
length 80
// FMT(l^/l^)
FMT(l^/l_rfx)
endphoneme

phoneme s
vls alv frc sib
// 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
// IF nextPh(isPause) THEN
// WAV(ufric/s_)
// ELIF nextPh(p) OR nextPh(t) OR nextPh(k) THEN
// WAV(ufric/s!)
// ENDIF
WAV(ufric/s)
endphoneme

phoneme s;
import_phoneme en/s
//CALL en/s
endphoneme



//phoneme n
// vcd pal nas
// FMT(n/nru)
//
// import_phoneme en/n
// length 200
//endphoneme

phoneme n_
// vcd pal nas
// FMT(n/nru)

import_phoneme en/n
// length 200
endphoneme




phoneme n#
vcd pal nas pzd
ipa ɲ
@@ -98,28 +108,28 @@ phoneme n#
lengthmod 4

IF KlattSynth THEN
VowelStart(klatt/n^@)
FMT(klatt/n^)
VowelStart(klatt/n^@)
FMT(klatt/n^)
ENDIF

NextVowelStarts
VowelStart(n^/n^@)
VowelStart(n^/n^a)
VowelStart(n^/n^e)
VowelStart(n^/n^i)
VowelStart(n^/n^o)
VowelStart(n^/n^u)
VowelStart(n^/n^@)
VowelStart(n^/n^a)
VowelStart(n^/n^e)
VowelStart(n^/n^i)
VowelStart(n^/n^o)
VowelStart(n^/n^u)
EndSwitch

IF prevPh(isPause) THEN
FMT(n^/_n^)
FMT(n^/_n^)
ELIF nextPh(isNotVowel) THEN
IF nextPhW(n^) THEN
length 75
ELIF prevPhW(n^) THEN
length 100
ENDIF
FMT(n^/n^_)
IF nextPhW(n^) THEN
length 75
ELIF prevPhW(n^) THEN
length 100
ENDIF
FMT(n^/n^_)
ENDIF
endphoneme

@@ -135,6 +145,7 @@ phoneme r
endphoneme



phoneme ts
import_phoneme consonants/ts
endphoneme
@@ -147,11 +158,11 @@ phoneme dZ;
Vowelin f1=2 f2=2700 400 600 f3=300 80 rate len=70

IF PreVoicing THEN
FMT(dzh/xdzh)
FMT(dzh/xdzh)
ENDIF

IF nextPh(isPause2) THEN
FMT(dzh/dzh_) addWav(x/dzh_)
FMT(dzh/dzh_) addWav(x/dzh_)
ENDIF
endphoneme

@@ -166,6 +177,7 @@ phoneme tS;
endphoneme



// Palatalized versions of consonants

phoneme t
@@ -184,44 +196,67 @@ phoneme d;
import_phoneme pl/d;
endphoneme

//phoneme m;
// import_phoneme ro/m;
//endphoneme

phoneme m;
vcd blb nas
Vowelout f1=2 f2=1000 -500 -350 f3=-200 80 brk
lengthmod 4
length 60

IF KlattSynth THEN
Vowelin f1=0 f2=1000 -50 -200 f3=-200 80
IF nextPh(isPause2) THEN
FMT(klatt/m_)
ENDIF
FMT(klatt/m)
Vowelin f1=0 f2=1000 -50 -200 f3=-200 80
IF nextPh(isPause2) THEN
FMT(klatt/m_)
ENDIF
FMT(klatt/m)
ENDIF
FMT(m/mj)

VowelStart(m/mi)

// NextVowelStarts
// VowelStart(m/m@)
// VowelStart(m/ma)
// VowelStart(m/me)
// VowelStart(m/mi)
// VowelStart(m/mo)
// VowelStart(m/mu)
// EndSwitch

// IF prevPh(isNotVowel) AND nextPhW(isLiquid) THEN
FMT(m/mj)
// ELIF prevPh(isPause) THEN
// FMT(m/_m)
// ELIF nextPh(isNotVowel) THEN
// FMT(m/m_)
// ENDIF
endphoneme


phoneme I^ // "silent i", palatilizes the preceding consonant

phoneme I^ // "silent i", palatilizes the preceding consonant
vwl starttype #i endtype #i
unstressed nsy
length 70
IF nextPh(isVowel) THEN
ChangePhoneme(;)
ChangePhoneme(;)
ENDIF
IF prevPh(m;) THEN
FMT(vwl_ro/mi)
FMT(vwl_ro/mi)
ENDIF
FMT(vwl_ru/ii-)
endphoneme



//*******************************************************************
// VOWELS
//*******************************************************************

phoneme i
IF prevPh(Z) THEN
ChangePhoneme(y)
ChangePhoneme(y)
ENDIF
vwl starttype #i endtype #i
length 50
@@ -233,10 +268,10 @@ phoneme I#
vwl starttype #i endtype #i
length 80
IF nextVowel(isMaxStress) THEN
ChangePhoneme(I)
ChangePhoneme(I)
ENDIF
IF thisPh(isMaxStress) THEN
ChangePhoneme(i)
ChangePhoneme(i)
ENDIF
FMT(vwl_ru/ii#)
endphoneme
@@ -254,11 +289,11 @@ phoneme I
length 80

IF thisPh(isMaxStress) THEN
IF prevPhW(j) THEN
ChangePhoneme(a)
ELSE
ChangePhoneme(i)
ENDIF
IF prevPhW(j) THEN
ChangePhoneme(a)
ELSE
ChangePhoneme(i)
ENDIF
ENDIF
FMT(vwl_ru/ii)
endphoneme
@@ -268,10 +303,10 @@ phoneme I2
vwl starttype #i endtype #i
length 80
IF thisPh(isMaxStress) THEN
ChangePhoneme(e)
ChangePhoneme(e)
ENDIF
IF prevPhW(isPalatal) THEN
ChangePhoneme(I)
ChangePhoneme(I)
ENDIF
FMT(vwl_ru/ii)
endphoneme
@@ -281,14 +316,14 @@ phoneme I3
vwl starttype #i endtype #i
length 80
IF thisPh(isMaxStress) THEN
IF prevPhW(j) THEN
ChangePhoneme(e)
ELSE
ChangePhoneme(ja)
ENDIF
IF prevPhW(j) THEN
ChangePhoneme(e)
ELSE
ChangePhoneme(ja)
ENDIF
ENDIF
IF prevPhW(isPalatal) THEN
ChangePhoneme(I)
ChangePhoneme(I)
ENDIF
FMT(vwl_ru/ii)
endphoneme
@@ -305,11 +340,11 @@ phoneme E#
vwl starttype #e endtype #e
length 100
IF thisPh(isMaxStress) THEN
IF prevPhW(j) THEN
ChangePhoneme(e)
ELSE
ChangePhoneme(E)
ENDIF
IF prevPhW(j) THEN
ChangePhoneme(e)
ELSE
ChangePhoneme(E)
ENDIF
ENDIF
FMT(vwl_ru/E#)
endphoneme
@@ -319,19 +354,19 @@ phoneme E2
vwl starttype #e endtype #e
length 80
IF nextVowel(isMaxStress) THEN
IF prevPh(j) THEN
ChangePhoneme(I3)
ELSE
ChangePhoneme(E#)
ENDIF
IF prevPh(j) THEN
ChangePhoneme(I3)
ELSE
ChangePhoneme(E#)
ENDIF
ENDIF

IF thisPh(isMaxStress) THEN
IF prevPhW(j) THEN
ChangePhoneme(e)
ELSE
ChangePhoneme(E)
ENDIF
IF prevPhW(j) THEN
ChangePhoneme(e)
ELSE
ChangePhoneme(E)
ENDIF
ENDIF

FMT(vwl_ru/E@)
@@ -342,13 +377,13 @@ phoneme E3
vwl starttype #e endtype #e
length 80
IF nextVowel(isMaxStress) THEN
ChangePhoneme(I)
ChangePhoneme(I)
ENDIF
IF thisPh(isMaxStress) THEN
ChangePhoneme(e)
ChangePhoneme(e)
ENDIF
IF prevPhW(isPalatal) THEN
ChangePhoneme(E2)
ChangePhoneme(E2)
ENDIF
FMT(vwl_ru/E@)
endphoneme
@@ -373,10 +408,10 @@ phoneme O
vwl starttype #o endtype #o
length 80
IF prevPhW(isPalatal) THEN
ChangePhoneme(8)
ChangePhoneme(8)
ENDIF
IF thisPh(isMaxStress) THEN
ChangePhoneme(o)
ChangePhoneme(o)
ENDIF
FMT(vwl_ru/oo)
endphoneme
@@ -411,16 +446,16 @@ phoneme e
vwl starttype #e endtype #e
length 100
IF prevPh(Z) THEN
ChangeIfNotStressed(y)
ChangePhoneme(E)
ChangeIfNotStressed(y)
ChangePhoneme(E)
ENDIF
IF prevPh(S) THEN
ChangeIfNotStressed(y)
ChangePhoneme(E)
ChangeIfNotStressed(y)
ChangePhoneme(E)
ENDIF
IF prevPh(ts) THEN
ChangeIfNotStressed(y)
ChangePhoneme(E)
ChangeIfNotStressed(y)
ChangePhoneme(E)
ENDIF
ChangeIfNotStressed(i)
FMT(vwl_ru/ee)
@@ -435,22 +470,22 @@ endphoneme
phoneme ja
vwl starttype #i endtype #a
IF thisPh(isMaxStress) THEN
length 200
FMT(vwl_ru/ja)
length 200
FMT(vwl_ru/ja)
ELSE
FMT(vdiph2/ii@)
FMT(vdiph2/ii@)
ENDIF
endphoneme

phoneme ja#
vwl starttype #i endtype #a
IF thisPh(isMaxStress) THEN
FMT(vowel/&)
// ChangePhoneme(A)
FMT(vowel/&)
// ChangePhoneme(A)
ELSE
IF prevPhW(isPalatal) THEN
ChangePhoneme(I)
ENDIF
IF prevPhW(isPalatal) THEN
ChangePhoneme(I)
ENDIF
ENDIF

// length 200
@@ -464,17 +499,21 @@ phoneme V#
vwl starttype #a endtype #@
unstressed
length 80
// IF nextVowel(isMaxStress) THEN
// not needed? because V# is only used at end-of-word
// ChangePhoneme(I3)
// ENDIF

IF thisPh(isMaxStress) THEN
IF prevPhW(j) THEN
ChangePhoneme(A)
ELSE
ChangePhoneme(ja)
ENDIF
IF prevPhW(j) THEN
ChangePhoneme(A)
ELSE
ChangePhoneme(ja)
ENDIF
ENDIF

IF prevPhW(isPalatal) THEN
ChangePhoneme(V)
ChangePhoneme(V)
ENDIF

FMT(vowel/V_2)
@@ -502,41 +541,43 @@ phoneme a

IF prevPhW(j) THEN
ELSE
IF thisPh(isMaxStress) THEN
IF prevPhW(isPalatal) THEN
ChangePhoneme(ja)
ELSE
ChangePhoneme(A)
ENDIF
ELSE
IF prevPhW(isPalatal) THEN
ChangePhoneme(I)
ENDIF
ENDIF
IF thisPh(isMaxStress) THEN
IF prevPhW(isPalatal) THEN
ChangePhoneme(ja)
ELSE
ChangePhoneme(A)
ENDIF
ELSE
IF prevPhW(isPalatal) THEN
ChangePhoneme(I)
ENDIF
ENDIF
ENDIF

IF thisPh(isWordEnd) THEN
FMT(vowel/a#_3)
FMT(vowel/a#_3)
ENDIF
FMT(vwl_ru/aa)
endphoneme


phoneme V
vwl starttype #o endtype #o
length 100
vwl starttype #a endtype #@
length 80
unstressed

IF nextVowel(isMaxStress) THEN
ChangePhoneme(a)
ChangePhoneme(a)
ENDIF

IF thisPh(isMaxStress) THEN
IF prevPhW(j) THEN
ChangePhoneme(a)
ELSE
ChangePhoneme(A)
ENDIF
IF prevPhW(j) THEN
ChangePhoneme(a)
// ELIF prevPhW(isPalatal) THEN
// ChangePhoneme(ja)
ELSE
ChangePhoneme(A)
ENDIF
ENDIF

FMT(vowel/V_2)
@@ -558,3 +599,4 @@ phoneme R4
FMT(r3/r_ru2) addWav(r3/r_ru, 50)
endphoneme



Write Preview
Loading…
Cancel
Save