Репозиторий Sisyphus
Последнее обновление: 1 октября 2023 | Пакетов: 18631 | Посещений: 37479069
en ru br
Репозитории ALT
S:2.5-alt0.4
5.1: 1.96-alt7
4.1: 1.96-alt5.M41.1
4.0: 1.96-alt2.6
3.0:
+backports:1.96-alt0.M30.1
www.altlinux.org/Changes

Другие репозитории
Upstream:1.96-beta

Группа :: Звук
Пакет: festival

 Главная   Изменения   Спек   Патчи   Sources   Загрузить   Gear   Bugs and FR  Repocop 

Патч: festival-2.0.95-asterisk.patch
Скачать


diff --git a/festival/lib/festival.scm b/festival/lib/festival.scm
index 6ec4ff1..b709e9f 100644
--- a/festival/lib/festival.scm
+++ b/festival/lib/festival.scm
@@ -630,4 +630,14 @@ Compile all the scheme files in the library directory."
 (defvar mlsa_alpha_param 0.42)
 (defvar mlsa_beta_param 0.0)
 
+;;; Command for Asterisk begin
+(define (tts_textasterisk string mode)
+    "(tts_textasterisk STRING MODE)
+      Apply tts to STRING.  This function is specifically designed for
+        use in server mode so a single function call may synthesize the string.
+	  This function name may be added to the server safe functions."
+	        (utt.send.wave.client (utt.wave.resample (utt.wave.rescale (utt.synth
+		                    (eval (list 'Utterance 'Text string))) 5) 8000)))
+				    ;;; Command for Asterisk end
+
 (provide 'festival)
 
дизайн и разработка: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
текущий майнтейнер: Michael Shigorin