  '
  '
  '
  '         ###############
  '       ###################
  '      ###               ###
  '     ###    ###          ###
  '    ###    ## ##         ###
  '    ###   ##   ##        ###
  '    ###  ##     ##       ###
  '    ###  ##      ##      ###
  '    ###  ##      ##      ###
  '    ###   ####  ##      ###
  '     ###    ####       ###
  '      ###             ###
  '       ###           ###
  '         #############
  '           #########


  '% filename "t.exe"
  'uses rtl64
  uses COM/Voice

  function main() as sys

  CoInitialize null
  Connect voice
  ErrorHandler
  wstring s="Hello Everyone!"
  'voice.Speak s
  voice.Speak "Hello Everyone!"
  voice.WaitUntilDone forever
  Disconnect voice
  CoUninitialize
  '
  end function

  main

