Added: freeswitch/trunk/contrib/DelphiWorld/dialplan/default/welcome.xml (0 => 14072)
--- freeswitch/trunk/contrib/DelphiWorld/dialplan/default/welcome.xml (rev 0)
+++ freeswitch/trunk/contrib/DelphiWorld/dialplan/default/welcome.xml 2009-06-30 23:26:11 UTC (rev 14072)
@@ -0,0 +1,8 @@
+<include>
+ <extension name="flite">
+ <condition field="destination_number" expression="^2910$">
+<!-- <action application="bridge" data="skypiax/skypiax1/echo123"/>-->
+<action application="lua" data="welcome.lua"/>
+ </condition>
+ </extension>
+</include>
\ No newline at end of file
Added: freeswitch/trunk/contrib/DelphiWorld/welcome.lua (0 => 14072)
--- freeswitch/trunk/contrib/DelphiWorld/welcome.lua (rev 0)
+++ freeswitch/trunk/contrib/DelphiWorld/welcome.lua 2009-06-30 23:26:11 UTC (rev 14072)
@@ -0,0 +1,33 @@
+session:setAutoHangup(false)
+session:answer();
+session:set_tts_parms("flite", "kal");
+session:speak("Welcome. Welcome to the VoIp World!. this is a Blind Users Community. powered by Freeswitch, the free / ultimate PBX. thank to anthm!");
+session:sleep(100);
+session:speak("please select an Action.");
+session:sleep(100);
+session:speak("to call the conference, press 1");
+session:sleep(100);
+session:speak("to call Freeswitch IVR, press 2");
+session:sleep(100);
+session:speak("to call Voice Mail, press 3");
+session:sleep(100);
+session:speak("for Music on hold, press 4");
+session:sleep(100);
+session:speak("to call me, press 0");
+session:sleep(2000);
+digits = session:getDigits(1, "", 3000);
+if (digits == "1") then
+ session:execute("transfer","3001");
+end
+if (digits == "2") then
+ session:execute("transfer","5000");
+end
+if (digits == "3") then
+ session:execute("transfer","4000");
+end
+if (digits == "4") then
+ session:execute("transfer","9999");
+end
+if (digits == "0") then
+ session:execute("transfer","voipaware@sip.voipuser.org");
+end
\ No newline at end of file