globals
int SwitchLanguage
Script switchlanguage ()
If SwitchLanguage == 0 then
GoToEnglish ()
Return
endIf
GoToGerman ()
EndScript
Function GoToEnglish ()
SetSynthLanguage ("american english")
let SwitchLanguage = 1
SayString ("English")
EndFunction
Function GoToGerman ()
SetSynthLanguage ("german")
let SwitchLanguage = 0
SayString ("Deutsch")
EndFunction