Project (47) Text-To-Speech demo
Scripter test version 2.1.2 ကို သံုးပါ။
EditText ထဲမွာ ရိုက္ထည့္ထားတဲ့ အဂၤလိပ္ စာေတြကို Text-To-Speech အသံုးျပဳၿပီး အသံထြက္ ဖတ္ခိုင္းတာ ျဖစ္ပါတယ္။
အသံထြက္ ဖတ္ေပးႏိုင္တဲ့ အဂၤလိပ္ ျမန္မာ အဘိဓာန္ လိုဟာမ်ိဳး ဖန္တီးႏိုင္ပါတယ္။
================
Main
====
AddEditText("edt1",4.5%x,14.7%y,90.8%x,44.9%y,"")
SetText("edt1","This is a test for Text To Speech")
AddLabel("lb1",4.8%x,3.2%y,90.6%x,9.6%y,"")
SetText("lb1","Enter text below:")
AddButton("btn1",19.5%x,66%y,64.3%x,11.8%y,"")
SetText("btn1","Speak")
SetEnabled("btn1",false)
SetActivityTitle("Text to Speech demo")
Dim_TTS
===============
EventsSubs
==========
Sub Button_Click(who)
TTS_Speak(GetText("edt1"),true)
End Sub
============
"xevents" module
==============
Sub TTS_Ready(success)
If (success) Then
SetEnabled("btn1",true)
End If
End Sub
=================
Scripter test version 2.1.2 ကို သံုးပါ။
EditText ထဲမွာ ရိုက္ထည့္ထားတဲ့ အဂၤလိပ္ စာေတြကို Text-To-Speech အသံုးျပဳၿပီး အသံထြက္ ဖတ္ခိုင္းတာ ျဖစ္ပါတယ္။
အသံထြက္ ဖတ္ေပးႏိုင္တဲ့ အဂၤလိပ္ ျမန္မာ အဘိဓာန္ လိုဟာမ်ိဳး ဖန္တီးႏိုင္ပါတယ္။
================
Main
====
AddEditText("edt1",4.5%x,14.7%y,90.8%x,44.9%y,"")
SetText("edt1","This is a test for Text To Speech")
AddLabel("lb1",4.8%x,3.2%y,90.6%x,9.6%y,"")
SetText("lb1","Enter text below:")
AddButton("btn1",19.5%x,66%y,64.3%x,11.8%y,"")
SetText("btn1","Speak")
SetEnabled("btn1",false)
SetActivityTitle("Text to Speech demo")
Dim_TTS
===============
EventsSubs
==========
Sub Button_Click(who)
TTS_Speak(GetText("edt1"),true)
End Sub
============
"xevents" module
==============
Sub TTS_Ready(success)
If (success) Then
SetEnabled("btn1",true)
End If
End Sub
=================
0 comments:
Post a Comment