Sisyphus repository
Last update: 1 october 2023 | SRPMs: 18631 | Visits: 37513832
en ru br
ALT Linux repos
S:2.5-alt0.4
5.0: 1.96-alt6
4.1: 1.96-alt5.M41.1
4.0: 1.96-alt2.6
3.0:
+backports:1.96-alt0.M30.1

Other repositories
Upstream:1.96-beta

Group :: Sound
RPM: festival

 Main   Changelog   Spec   Patches   Sources   Download   Gear   Bugs and FR  Repocop 

Patch: festival-2.0.95-asterisk.patch
Download


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)
 
design & coding: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
current maintainer: Michael Shigorin