tell application "System Events" set texttosay to "Sample Text" display dialog "Text to type:" default answer "white: &quo