adam/misc
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

ok it's not a powershell script, but it's a windows-only script for sure

Browse Source
This commit is contained in:
adam 2023-12-21 20:14:42 -05:00
parent a368629f26
commit 1655386c0c
1 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
powershell/speak2.vbs Normal file
View File

@ -0,0 +1,15 @@
Const SAFT48kHz16BitStereo = 39
Const SSFMCreateForWrite = 3
Dim oFileStream, oVoice
Set oFileStream = CreateObject("SAPI.SpFileStream")
oFileStream.Format.Type = SAFT48kHz16BitStereo
oFileStream.Open "./speak2.wav", SSFMCreateForWrite
Set oVoice = CreateObject("SAPI.SpVoice")
Set oVoice.AudioOutputStream = oFileStream
oVoice.Speak "Ask your doctor if zygardalveceptduradomide is right for you."
oFileStream.Close