>What stops the following command working?
>
>speech$ = "Set the day of the week for the alarm to ring"
>err = FN SPEAKSTRING(speech$)
>
>I don't remember setting up anything special to make
>this work.
>
>
>Martin
>


I think the CD example shows what is missing.

include "Tlbx SpeechSynthesis.Incl"

COMPILE LONG if def _usingLiteRuntime = _false
window 1,"Speech Manager"
compile end if

local
DIM @ speechAttr&
LOCAL FN hasSpeechMgr' returns non-zero if Speech Mgr present
END FN = (FN GESTALT (_"ttsc", speechAttr&) = _noErr)


dim err
long if fn SpeechManagerVersion => 0
long if FN hasSpeechMgr
err = FN SpeakString ("I like cornflakes and fast women.")
while FN SpeechBusy
wend
err = FN SpeakString ("I like beer, beer, beeeerrrr.")
xelse
print "No Speech today"
end if
end if


COMPILE LONG if def _usingLiteRuntime = _false
print :print :print
print "Click the mouse to exit"
do
until fn button
compile end if



Best,

-STAZ  ~)~

800.348.2623 Orders  http://www.stazsoftware.com
228.255.7086 FAX     mailto:staz@...