blob: cce92f91f023de4a2e84732892915c08eeb0c878 [file] [log] [blame]
// Extra consonants. Use (for example):
// import_phoneme consonants/ts
phoneme ts
vls alv afr sib
voicingswitch dz
lengthmod 2
Vowelin f1=0 f2=1700 -300 300 f3=-100 80
Vowelout f1=0 f2=1700 -300 250 f3=-100 80 rms=20
IF nextPh(isPause2) THEN
WAV(ustop/ts_)
ENDIF
WAV(ustop/ts)
endphoneme
phoneme dz
vcd alv afr sib
voicingswitch ts
lengthmod 5
Vowelin f1=1 f2=1700 -300 300 f3=-100 80 len=50
Vowelout f1=2 f2=1700 -300 300 f3=-100 80
IF PreVoicing THEN
FMT(d/xd)
ENDIF
IF nextPh(isPause2) THEN
FMT(voc/z_) addWav(ustop/ts_, 60)
ENDIF
FMT(d/xdz) addWav(ustop/ts, 140)
endphoneme
phoneme p- // unaspirated
vls blb stp
lengthmod 2
voicingswitch b
Vowelin f1=0 f2=1000 -50 -100 f3=-200 80
Vowelout f1=0 f2=1000 -500 -350 f3=-300 80 rms=30
IF nextPh(l) THEN
WAV(ustop/pl)
ELIF nextPh(isRhotic) THEN
WAV(ustop/pr)
ELIF nextPh(isPause2) THEN
WAV(ustop/p_unasp_, 80)
ENDIF
WAV(ustop/p_unasp)
endphoneme
phoneme ph // aspirated
vls blb stp
lengthmod 2
voicingswitch b
Vowelin f1=0 f2=1000 -50 -100 f3=-200 80
Vowelout f1=0 f2=1000 -500 -350 f3=-300 80 rms=30
IF nextPh(isPause2) THEN
WAV(ustop/p_)
ENDIF
IF nextPh(l) THEN
WAV(ustop/pl)
ENDIF
WAV(ustop/p_asp)
endphoneme
phoneme t-
vls alv stp
lengthmod 2
voicingswitch d
Vowelin f1=0 f2=1700 -300 300 f3=-100 80
Vowelout f1=0 f2=1700 -300 250 f3=-100 80 rms=20
IF nextPh(isPause2) THEN
WAV(ustop/t_)
ENDIF
WAV(ustop/t_short)
endphoneme
phoneme c2
vls pal afr sib
lengthmod 2
Vowelin f1=0 f2=2700 400 600 f3=300 80 rate len=70
Vowelout f1=0 f2=2700 400 600 f3=300 80 colr=1
IF nextPh(isPause2) THEN
WAV(ustop/ts_pzd_)
ENDIF
WAV(ustop/ts_pzd2, 90)
endphoneme
phoneme k- // unaspirated
vls vel stp
lengthmod 2
voicingswitch g
Vowelin f1=0 f2=2300 200 300 f3=-150 80
Vowelout f1=0 f2=2300 300 400 f3=-150 80 rms=20
IF nextPh(isPause2) THEN
WAV(ustop/k_unasp, 50)
ENDIF
WAV(ustop/k_unasp, 60) // weaker
endphoneme
phoneme kh
vls vel stp
lengthmod 2
voicingswitch g
Vowelin f1=0 f2=2300 200 300 f3=-150 80
Vowelout f1=0 f2=2300 300 400 f3=-150 80 rms=20
IF nextPh(isPause2) THEN
WAV(ustop/k_asp, 50)
ENDIF
IF nextPh(l) THEN
WAV(ustop/kl)
ENDIF
WAV(ustop/k_asp, 90)
endphoneme
phoneme k#
vls vel stp
lengthmod 2
voicingswitch g
Vowelin f1=1 f2=1400 -100 100 f3=-150 80
Vowelout f1=0 f2=2300 300 400 f3=-150 80 rms=20
IF nextPh(isPause2) THEN
WAV(ustop/k_asp, 40)
ENDIF
IF nextPhW(#e) OR nextPhW(#i) THEN
WAV(ustop/k_asp_e, 40)
ELIF nextPhW(#o) OR nextPhW(#u) THEN
WAV(ustop/k_asp_a, 25)
ELSE
WAV(ustop/k_asp_a, 30)
ENDIF
endphoneme
phoneme s2 // second part of a long [s:]
vls alv frc sib
Vowelin f1=0 f2=1700 -300 300 f3=-100 80
lengthmod 3
IF nextPh(isPause2) THEN
WAV(ufric/s_)
ENDIF
WAV(ufric/s_continue)
endphoneme