! ********************************************************************************************************************************
!  Created:  7-MAR-2012 18:15:06 by OpenVMS SDL IA64-2     
!  Source:  07-MAR-2012 18:15:06 DUMPD5$:[RAMYA.FOR_ECO]DTK$ROUTINES.SDI;1 
! ********************************************************************************************************************************
 
!*** MODULE dtk$routines ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! ***************************************************************************
 ! 									    *
 !   COPYRIGHT (c) 1988 BY               				    *
 !   DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS.		    *
 !   ALL RIGHTS RESERVED.						    *
 !  									    *
 !   THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED   *
 !   ONLY IN  ACCORDANCE WITH  THE  TERMS  OF  SUCH  LICENSE  AND WITH THE   *
 !   INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR  ANY  OTHER   *
 !   COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY   *
 !   OTHER PERSON.  NO TITLE TO AND OWNERSHIP OF  THE  SOFTWARE IS  HEREBY   * 
 !   TRANSFERRED.			       				    *
 !  									    *
 !   THE INFORMATION IN THIS SOFTWARE IS  SUBJECT TO CHANGE WITHOUT NOTICE   *
 !   AND  SHOULD  NOT  BE  CONSTRUED AS  A COMMITMENT BY DIGITAL EQUIPMENT   *
 !   CORPORATION.							    *
 !  									    *
 !   DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE  OR  RELIABILITY OF ITS   *
 !   SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.		    *
 !  									    *
 ! 									    *
 ! ***************************************************************************
 !     DTK$ANSWER_PHONE
 !     
 !     Wait for Phone to Ring and Answer
 !     
 !     The Wait for Phone to Ring and Answer routine 
 !     waits for the phone connected to the DECtalk device to ring
 !     and then answers it. 
 !     
	INTEGER*4 dtk$answer_phone
	EXTERNAL dtk$answer_phone
 !     DTK$CHECK_HDWR_STATUS
 !     
 !     Check Hardware Status
 !     
 !     The Check Hardware Status routine checks the DECtalk hardware for hardware
 !     malfunctions. 
 !     
	INTEGER*4 dtk$check_hdwr_status
	EXTERNAL dtk$check_hdwr_status
 !     DTK$DIAL_PHONE
 !     
 !     Dial the Telephone
 !     
 !     The Dial the Telephone routine dials the specified number on the telephone.
 !     
	INTEGER*4 dtk$dial_phone
	EXTERNAL dtk$dial_phone
 !     DTK$HANGUP_PHONE
 !     
 !     Hang Up the Phone
 !     
 !     The Hang Up the Phone routine speaks an optional message and 
 !     then hangs up the phone.
 !     
	INTEGER*4 dtk$hangup_phone
	EXTERNAL dtk$hangup_phone
 !     DTK$INITIALIZE
 !     
 !     Initialize DECtalk
 !     
 !     The Initialize DECtalk routine initializes a DECtalk device and returns the device's assigned
 !     voice identifier. 
 !     
	INTEGER*4 dtk$initialize
	EXTERNAL dtk$initialize
 !     DTK$LOAD_DICTIONARY
 !     
 !     Load a Word into the DECtalk Dictionary
 !     
 !     The Load a Word into the DECtalk Dictionary routine 
 !     loads a phonemic definition of a word into the DECtalk 
 !     dictionary.
 !     
	INTEGER*4 dtk$load_dictionary
	EXTERNAL dtk$load_dictionary
 !     DTK$READ_KEYSTROKE
 !     
 !     Read a Key Entered on the Keypad
 !     
 !     The Read a Key Entered on the Keypad routine 
 !     reads a key entered on the phone keypad.
 !     
	INTEGER*4 dtk$read_keystroke
	EXTERNAL dtk$read_keystroke
 !     DTK$READ_STRING
 !     
 !     Read a Series of Keys Entered on the Keypad
 !     
 !     The Read a Series of Keys Entered on the Keypad routine reads a 
 !     series of keys entered on the phone keypad.
 !     
	INTEGER*4 dtk$read_string
	EXTERNAL dtk$read_string
 !     DTK$RETURN_LAST_INDEX
 !     
 !     Return Last Index Spoken
 !     
 !     The Return Last Index Spoken routine returns the last index spoken.
 !     
	INTEGER*4 dtk$return_last_index
	EXTERNAL dtk$return_last_index
 !     DTK$SPELL_TEXT
 !     
 !     Spell Text
 !     
 !     The Spell Text routine causes DECtalk to pronounce each letter of
 !     the specified text. 
 !     
	INTEGER*4 dtk$spell_text
	EXTERNAL dtk$spell_text
 !     DTK$SPEAK_FILE
 !     
 !     Speak the Text in a Specified File
 !     
 !     The Speak the Text in a Specified File routine 
 !     speaks the text contained in the specified file.
 !     
	INTEGER*4 dtk$speak_file
	EXTERNAL dtk$speak_file
 !     DTK$SPEAK_PHONEMIC_TEXT
 !     
 !     Speak the Specified Phonemic Text
 !     
 !     The Speak the Specified Phonemic Text routine 
 !     sends the specified phonemic text to the DECtalk device 
 !     to be spoken.
 !     
	INTEGER*4 dtk$speak_phonemic_text
	EXTERNAL dtk$speak_phonemic_text
 !     DTK$SPEAK_TEXT
 !     
 !     Speak the Specified Text
 !     
 !     The Speak the Specified Text routine 
 !     sends the specified text to the DECtalk device 
 !     to be spoken.
 !     
	INTEGER*4 dtk$speak_text
	EXTERNAL dtk$speak_text
 !     DTK$SET_INDEX
 !     
 !     Insert an Index at the Current Position
 !     
 !     The Insert an Index at the Current Position routine 
 !     inserts an index into the current output stream.
 !     
	INTEGER*4 dtk$set_index
	EXTERNAL dtk$set_index
 !     DTK$SET_KEYPAD_MODE
 !     
 !     Turn the Phone Keypad On and Off
 !     
 !     The Turn the Phone Keypad On and Off routine turns recognition 
 !     of the telephone keypad on or off.
 !     
	INTEGER*4 dtk$set_keypad_mode
	EXTERNAL dtk$set_keypad_mode
 !     DTK$SET_LOGGING_MODE
 !     
 !     Set the Logging Mode for the Video Terminal Connected to the DECtalk Device
 !     
 !     The Set the Logging Mode for the Video Terminal 
 !     Connected to the DECtalk Device routine
 !     controls the information that is displayed on the video
 !     terminal while the DECtalk device is functioning. 
 !     
	INTEGER*4 dtk$set_logging_mode
	EXTERNAL dtk$set_logging_mode
 !     DTK$SET_MODE
 !     
 !     Set the Mode for the DECtalk Terminal
 !     
 !     The Set the Mode for the DECtalk Terminal routine 
 !     sets or resets the mode settings of the DECtalk terminal.
 !     
	INTEGER*4 dtk$set_mode
	EXTERNAL dtk$set_mode
 !     DTK$SET_SPEECH_MODE
 !     
 !     Turn Speech Mode On and Off
 !     
 !     The Turn Speech Mode On and Off routine 
 !     either starts or stops the DECtalk device's speech.
 !     
	INTEGER*4 dtk$set_speech_mode
	EXTERNAL dtk$set_speech_mode
 !     DTK$SET_TERMINAL_MODE
 !     
 !     Set the Mode for the Video Terminal Connected to the DECtalk Device
 !     
 !     The Set the Mode for the Video Terminal 
 !     Connected to the DECtalk Device routine
 !     controls the attributes of the video terminal connected
 !     to the DECtalk device. 
 !     
	INTEGER*4 dtk$set_terminal_mode
	EXTERNAL dtk$set_terminal_mode
 !     DTK$SET_VOICE
 !     
 !     Set Voice Characteristics
 !     
 !     The Set Voice Characteristics routine
 !     changes the DECtalk voice characteristics to match those
 !     specified. 
 !     
	INTEGER*4 dtk$set_voice
	EXTERNAL dtk$set_voice
 !     DTK$TERMINATE
 !     
 !     Terminate DECtalk
 !     
 !     The Terminate DECtalk routine terminates the use of an initialized DECtalk
 !     device.
 !     
	INTEGER*4 dtk$terminate
	EXTERNAL dtk$terminate
!DEC$ END OPTIONS