i try to record TTS Speaking to a file
when not using record method ,TTS Volume is high
when Add Record method Volume go too low (in both cases when tts play and when recorded file play)
when not using record method ,TTS Volume is high
when Add Record method Volume go too low (in both cases when tts play and when recorded file play)
B4X:
Sub BT1_Click
Rec1.Initialize(File.DirDocuments, "rec1.dat",22050, False,1, False)
Rec1.Record
TTS1.SetLanguage("en-US")
TTS1.SpeechRate=StateManager.GetSetting2("TTSRate",TTS1.SpeechRate)
TTS1.Pitch=StateManager.GetSetting2("TTSPitch",TTS1.Pitch)
TTS1.Speak(MyText,True)
End Sub
rivate Sub TTS1_Complete(Text As String)
Rec1.Stop
Log("play")
Mp1.Initialize(File.DirDocuments,"rec1.dat","Mp1")
Mp1.Volume=10
Mp1.Play
End Sub