Hello Jim,
Not sure why FlexTalk won't start talking! I'll see if I can dig deeper and
locate something.
Thanks,
Dennis Brown, [EMAIL PROTECTED]
----- Original Message -----
From: Jim Pipczak <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Tuesday, August 10, 1999 5:05 PM
Subject: Re: Changing Synthesisers
> Hi dennis,
>
> As usual, Dennis, a sensational script.
>
> I have added a couple of synths that I have on my pc with only one
problem, the
> flextalk synth will not switch over. I can do it manually from the JFW
change
> synthersizer menu so I know it works. All the other synths work fine. Any
> thoughts? I have listed your script with my changes below.
>
> ; Changes synthesizers on the fly.
> ; 08/10/99 Dennis Brown [EMAIL PROTECTED]
> Script ChangeSynthesizer ()
> var string SynthesizerList, ;create a variable for menu contents.
> int index ; menu indexer variable.
> ; Create the menu by assigning the synthesizers to the menu variable
> let SynthesizerList="|Doubletalk PC Internal" +
> "|Eloquence Software" +
> "|DecTalk Access 32 Software" +
> "|FlexTalk Software" +
> "|Keynote Multi Media Software" +
> "|MS Speech Sofware" +
> "|No Speech"
>
> let index=DlgSelectItemInList(SynthesizerList,"Synthesizer Menu", TRUE)
>
> IF index == 1 Then ; if the DoubleTalk selected,
> Say("Switching to the DoubleTalk...",ot_string) ; announce the switch,
> SetSynth("dubltalk") ; and make the switch.
>
> ElIf index == 2 Then ; if Eloquence selected,
> Say("Switching to Eloquence...",ot_string) ; announce the switch,
> SetSynth("eloq") ; and make the switch.
>
> ElIf index == 3 Then ; if Access32 selected,
> Say("Switching to Dec Access32...",ot_string) ; announce the switch,
> SetSynth("dtsoft") ; and make the switch.
>
> ElIf index ==4 Then ; if Flextalk selected,
> Say("Switching to Flextalk...",ot_string) ; announce the switch,
> SetSynth("mssapi") ; and make the switch.
>
> ElIf index ==5 Then ; if Keynote Multi Media selected,
> Say("Switching to Keynote Multi Media...",ot_string) ; announce the
switch,
> SetSynth("kngmm") ; and make the switch.
>
> ElIf index ==6 Then ; if MS Speech selected,
> Say("Switching to MS Speech...",ot_string) ; announce the switch,
> SetSynth("MSSpeech") ; and make the switch.
>
> ElIf index ==7 Then ; if selected,
> ; Say("Switching to No Speech...",ot_string) ; announce the switch,
> SetSynth("nospeech") ; and make the switch.
>
> EndIf
> EndScript
>
> Many thanks,
>
> Jim Pipczak - VisTech
> An RVIB Equipment Service
> We can help you look into the future
> 201 High Street, Prahran Vic. 3181 Australia
> Phone: 03 9520 5555 Fax: 03 9525 2065
> Free Call: 1800 458 555
> EMail: [EMAIL PROTECTED]
>
>
> At 18:14 10/08/99 -0700, you wrote:
> >Hello Robert,
> >
> >Here is one means of doing that. You can add your own additions to the
> >list, or replace what is already there, but make sure you have the
> >"SynthAlias" correctly spelled before selecting that particular
synthesizer
> >from the list.
> >You can get the "SynthName" of the installed synthesizer from the
> >C:\JFW33\JFW.INI file.
> >If this is helpful, I can write one that has all the synthesizers JFW
> >supports--provided I can track down all the available SynthName=
parameters.
> >I only use two synthesizers at present, but I found the name of the
Access32
> >synthesizer when writing another ScriptTip, so I threw it in here as
well.
> >Take note that this only changes it during the current JAWS session, so
when
> >you reload JAWS, or restart your system, it'll go back to the default
> >synthesizer. I'll see if I can track down the info on setting the
selection
> >as the default synthesizer.
> >
> >If it would be useful, I could put this into one of the ScriptTip
messages,
> >which gives step-by-step instructions on creating this script, but in the
> >meantime...
> >
> >1) Hit Control+Shift+0 to launch the Script Manager.
> >2) Hit Control+End to reach the bottom of the file.
> >3) Type in, or cut and paste, the following script--changing the
> >synthesizer info to reflect your own installed synthesizers:
> >
> >; Changes synthesizers on the fly.
> >; 08/10/99 Dennis Brown [EMAIL PROTECTED]
> >script ChangeSynthesizer()
> >var string SynthesizerList, ;create a variable for menu contents.
> >int index ; menu indexer variable.
> >; Create the menu by assigning the synthesizers to the menu variable
> >let SynthesizerList="|Doubletalk PC Internal" +
> >"|Eloquence Software" +
> >"|DecTalk Access 32 Software"
> >let index=DlgSelectItemInList(SynthesizerList,"Synthesizer Menu", TRUE)
> >IF index == 1 Then ; if the DoubleTalk selected,
> >Say("Switching to the DoubleTalk...",ot_string) ; announce the switch,
> >SetSynth("dubltalk") ; and make the switch.
> >ElIf index == 2 Then ; if Eloquence selected,
> >Say("Switching to Eloquence...",ot_string) ; announce the switch,
> >SetSynth("eloq") ; and make the switch.
> >ElIf index == 3 Then ; if Access32 selected,
> >Say("Switching to Dec Access32...",ot_string) ; announce the switch,
> >SetSynth("dtsoft") ; and make the switch.
> >EndIf
> >EndScript
> >
> >
> >4) While on a line in this script, hit Control+D to edit it's
Properties.
> >5) Enter the script's name, (if not already there), and tab through the
> >dialog, making sure "Can be assigned to keystroke..." option is checked.
> >6) Assign the menu a hotkey, (such as Control+Alt+S), and select Ok.
> >6) Back in the Script editor, hit Control+S to compile this new
addition.
> >
> >Hit Alt+F4 to exit the Script Manager and cycle JAWS in and out of
memory.
> >
> >Give it a try and give us some feedback, suggestions, gripes, remarks,
> >comments, etc.
> >
> >
> >Hope this helps!
> >Thanks,
> >Dennis Brown, [EMAIL PROTECTED]
> >
> >
> >
> >----- Original Message -----
> >From: Robert McNab <[EMAIL PROTECTED]>
> >To: <[EMAIL PROTECTED]>
> >Sent: Tuesday, August 10, 1999 8:39 PM
> >Subject: Changing Synthesisers
> >
> >
> >> Hi there, I was wondering if anyone out there has any idea of how to
write
> >a
> >> Jaws script that will pop up a list box and allow you to change to
another
> >> synthesiser, rather than going through the Jaws language menu.
> >>
> >> Yours hopefully
> >>
> >> Bobby
> >>
> >>
> >> -
> >> Visit the jfw ml web page: http://jfw.cjb.net
> >
> >-
> >Visit the jfw ml web page: http://jfw.cjb.net
>
> -
> Visit the jfw ml web page: http://jfw.cjb.net
-
Visit the jfw ml web page: http://jfw.cjb.net