From ccdc6ec20229a3d798f225aa3bd7bca4e3e73489 Mon Sep 17 00:00:00 2001
From: Brian West <brian@freeswitch.org>
Date: Wed, 18 Feb 2009 21:06:36 +0000
Subject: [PATCH] elaborate on this example more and show off flite usage but
 its commented out by default

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@12145 d0543943-73ff-0310-b7d9-9358b9ac24b2
---
 scripts/lua/callback.lua | 26 +++++++++++++++++++-------
 1 file changed, 19 insertions(+), 7 deletions(-)

diff --git a/scripts/lua/callback.lua b/scripts/lua/callback.lua
index 84fd56aa87..bc200de87a 100644
--- a/scripts/lua/callback.lua
+++ b/scripts/lua/callback.lua
@@ -1,55 +1,65 @@
 function all_done(s, how)
-   io.write("done: " .. how .. "\n");
+   freeswitch.console_log("info", "done: " .. how .. "\n");
 end
 
 function my_cb(s, type, obj, arg)
    if (arg) then
-      io.write("type: " .. type .. "\n" .. "arg: " .. arg .. "\n");
+      freeswitch.console_log("info", "\ntype: " .. type .. "\n" .. "arg: " .. arg .. "\n");
    else
-      io.write("type: " .. type .. "\n");
+      freeswitch.console_log("info", "\ntype: " .. type .. "\n");
    end
 
    if (type == "dtmf") then
-      io.write("digit: [" .. obj['digit'] .. "]\nduration: [" .. obj['duration'] .. "]\n"); 
+      freeswitch.console_log("info", "\ndigit: [" .. obj['digit'] .. "]\nduration: [" .. obj['duration'] .. "]\n"); 
 
 
       if (obj['digit'] == "1") then
-         return "seek:-3000";
+	 --session:speak("seek backwards");
+         return "seek:-9000";
       end
 
       if (obj['digit'] == "3") then
-         return "seek:+3000";
+	 --session:speak("seek forward");
+         return "seek:+9000";
       end
 
       if (obj['digit'] == "4") then
+	 --session:speak("speed faster");
          return "speed:+1";
       end
 
       if (obj['digit'] == "5") then
+	 --session:speak("speed normal");
          return "speed:0";
       end
 
       if (obj['digit'] == "6") then
+	 --session:speak("speed slower");
          return "speed:-1";
       end
 
       if (obj['digit'] == "7") then
+	 --session:speak("volume up");
          return "volume:+1";
       end
 
       if (obj['digit'] == "8") then
+	 --session:speak("volume normal");
          return "volume:0";
       end
 
       if (obj['digit'] == "9") then
+	 --session:speak("volume down");
          return "volume:-1";
       end
 
       if (obj['digit'] == "*") then
+	 --session:speak("stop");
          return "stop";
       end
 
       if (obj['digit'] == "0") then
+	 --session:speak("pause");
          return "pause";
       end
 
@@ -58,12 +68,14 @@ function my_cb(s, type, obj, arg)
       end
 
    else
-      io.write(obj:serialize("xml"));
+      freeswitch.console_log("info", obj:serialize("xml"));
 
    end
 end
 
 blah = "args";
+---session:set_tts_parms("flite", "kal");
 session:setHangupHook("all_done");
 session:setInputCallback("my_cb", "blah");
 session:streamFile("/ram/swimp.raw");
+--session:speak("Thank you, good bye!");