1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586 |
- function all_done(s, how)
- freeswitch.console_log("info", "done: " .. how .. "\n");
- end
- function my_cb(s, type, obj, arg)
- if (arg) then
- freeswitch.console_log("info", "\ntype: " .. type .. "\n" .. "arg: " .. arg .. "\n");
- else
- freeswitch.console_log("info", "\ntype: " .. type .. "\n");
- end
- if (type == "dtmf") then
- freeswitch.console_log("info", "\ndigit: [" .. obj['digit'] .. "]\nduration: [" .. obj['duration'] .. "]\n");
- if (obj['digit'] == "1") then
- --session:speak("seek backwards");
- return "seek:-9000";
- end
- if (obj['digit'] == "2") then
- --session:speak("start over");
- return "seek:0";
- end
- if (obj['digit'] == "3") then
- --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
- if (obj['digit'] == "#") then
- return "break";
- end
- else
- 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!");
|