devs/foxbox
1
0
Fork 0
forked from len0rd/rockbox
Code Pull requests Activity

Ooops.

Browse source 
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@14589 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Jens Arnold 2007-09-02 23:29:20 +00:00
parent 429ab0d2b2
commit e79128de66
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
tools/sapi_voice.vbs
View file

@ -53,7 +53,7 @@ Set oArgs = WScript.Arguments.Named
bSAPI4 = oArgs.Exists("sapi4") bSAPI4 = oArgs.Exists("sapi4")
sLanguage = oArgs.Item("language") sLanguage = oArgs.Item("language")
sVoice = oArgs.Item("voice") sVoice = oArgs.Item("voice")
sRate = oArgs.Item("speed") sSpeed = oArgs.Item("speed")
If bSAPI4 Then If bSAPI4 Then
' Create SAPI4 ActiveVoice object ' Create SAPI4 ActiveVoice object
@ -95,7 +95,7 @@ If bSAPI4 Then
oTTS.Select nMode oTTS.Select nMode
' Speed selection ' Speed selection
If sRate <> "" Then oSpVoice.Speed = sSpeed If sSpeed <> "" Then oSpVoice.Speed = sSpeed
Else ' SAPI5 Else ' SAPI5
' Create SAPI5 object ' Create SAPI5 object
Set oSpVoice = CreateObject("SAPI.SpVoice") Set oSpVoice = CreateObject("SAPI.SpVoice")
@ -128,7 +128,7 @@ Else ' SAPI5
End If End If
' Speed selection ' Speed selection
If sRate <> "" Then oSpVoice.Rate = sSpeed If sSpeed <> "" Then oSpVoice.Rate = sSpeed
' Filestream object for output ' Filestream object for output
Set oSpFS = CreateObject("SAPI.SpFileStream") Set oSpFS = CreateObject("SAPI.SpFileStream")