#include once "eSpeakSynth.bi"
var nVoices=eSpeak.VoiceCount
? "list of all " & nVoices & " language styles."
for i as integer = 0 to nVoices step 2
  ? eSpeak.GetVoiceName(i),eSpeak.GetVoiceName(i+1)
next
sleep
