Changing the pitch of Hal's voice

[knight2000]

Hi guys! I have some cepstal voices installed on my computer, I'm using one for Hal but I want to be able to change the pitch of the voice. The voice's advanced setting in Hal do not bring up any options, I'm assuming there are not any for that voice. Is there another way to change Hal's voice pitch programmatically? Maybe a plugin or something?

Thanks

[cyberjedi]

There are other voices out there
what i consider better .



better wishes
cyber jedi

[knight2000]

Do they allow for changing the pitch and speed through Hal? I really want to use neospeech's Hugh voice  but its the same deal, no advance setting in Hal. I'm trying to achieve a voice like KITT from knight rider, so I need a British accent.

[cyberjedi]

Re: Sapi05
I dont have that 1, its all im missing

as to pitch , ah well, there are things that can be done with special chars

! works really well for the 1's i have
kate,paul.julie,bridgett

u can reach me here. http://vaughnlive.tv/mrelectric
cyberjedi

[knight2000]

I came across this plugin but its been a while since it was written, doesn't work for me, might not be compatible with Hal 6. I'm wondering if we could change the pitch within Hal's vbscript. Does anyone know if this plugin will work with Hal 6?

Rem Type=Plugin
Rem Name=SAPI Control
Rem Author=Snowman, Davy
Rem Host=Assistant

'This sub setups the plug-ins option panel in Hal's options dialog
Sub OptionsPanel()
    lblPlugin(0).Caption = "Say: 'Pit' and the SAPI4 Pitch will change, Say: 'spd' and the SAPI4 voice Speed will change"
    lblPlugin(0).Move 120, 10, 3300, 1000
    lblPlugin(0).WordWrap = True
    lblPlugin(0).Visible = True
End Sub
'***************************************************************************
'***************************************************************************
Rem PLUGIN: POST-PROCESS


HalBrain.ReadOnlyMode = True

If InStr(1, InputString, "pit") > 0  Then UltraHal = "\\pit=10\\ The Pitch has now been changed"

If InStr(1, InputString, "spd") > 0  Then UltraHal = "\\spd=10\\ The speed has now been changed"