Set the callback 'start of speech'.
fun [ObjSpeech fun [ObjSpeech u0] u1 u0] ObjSpeech
Return : ObjSpeech the same Speech object if success, NIL otherwise