on mouseUp
   put fld "maintext" into theText
   set the itemDelimiter to "."
   repeat with k = 1 to the number of items in theText
     put item k of theText into theSentence
     revspeak theSentence
wait until revIsSpeaking() is false --you need this
   end repeat
   set the itemDelimiter to ","
end mouseUp




Kurt







_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription 
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to