Multiple revSpeech?

[shadowslash]

I'm trying to create a certain type of talking for revSpeech but I can't seem to achieve what I'm after.
I want to use revSpeak 3 times but with different pitches and the same phrases or sentences to speak. The end result should be a monster-like sound wherein it has 3 voice pitches. First is higher than normal, second is the normal pitch, third is lower than normal.

I've exhausted every idea I can think off but to no avail.

[bn]

Hi Shadowslash,

after some experimenting this works for me on a Mac.

Code: Select all

on mouseUp
   put "this is a monster speech test" into tSpeak
   put "127,60,30" into tThePitches
   repeat with i = 1 to 3
      put item i of tThePitches into tPitch
      revSetSpeechPitch tPitch
      revspeak tSpeak
      repeat while revIsSpeaking()
         wait 50 milliseconds with messages
      end repeat
   end repeat
end mouseUp

You probably want to play with the voices (revSpeechVoices, revSetSpeechVoice), to get the effect you want.
regards
Bernd

[shadowslash]

Unfortunately in a Windows XP environment, it only repeats the phrase for 3 times... I'm yet to try it on a Windows 7 machine but I have a hunch it will end with the same results...

[bn]

ShadowSlash,

try to add at each call to revSpeech a e.g. "wait 200 milliseconds with messages". I had during testing the impression that it helped in some versions.
Not shure whether it helps. But try to give it time.
regards
Bernd

[shadowslash]

I ttried

Code: Select all

on mouseUp
   local tSpeak,tThePitches,tPitch
   put "this is a monster speech test" into tSpeak
   put "127,60,30" into tThePitches
   repeat with i = 1 to 3
      put item i of tThePitches into tPitch
      wait 200 millisecs with messages
      revSetSpeechPitch tPitch
      revSpeak tSpeak
      repeat while revIsSpeaking()
         wait 50 milliseconds with messages
      end repeat
   end repeat
end mouseUp

But still to no avail... Could it be that it is OS-dependent?

[bn]

maybe you could try this before someone on a windows system could try revspeak

Code: Select all

on mouseUp
   local tSpeak,tThePitches,tPitch
   put "this is a monster speech test" into tSpeak
   put "127,60,30" into tThePitches
   repeat with i = 1 to 3
      put item i of tThePitches into tPitch
      wait 200 millisecs with messages
      revSetSpeechPitch tPitch
      wait 500 milliseconds with messages
      revSpeak tSpeak
      wait 500 milliseconds with messages
      repeat while revIsSpeaking()
         wait 50 milliseconds with messages
      end repeat
   end repeat
end mouseUp

regards
Bernd

[shadowslash]

Hmmmm... Tried and with the same results...