/* C code generated by:							*/
/* Visual Arts Version 2.1						*/
/* Copyright (c)1994-95 Danny Y. Wong  All rights reserved		*/
/* Calgary, Alberta (CANADA)                        			*/

extern struct Window  *SpeakWnd;
extern struct Gadget *SpeakGadgets[SpeakNumGads];

short volume=35;
int  rate=200;
			 /* gadget functions */

int speakObj(struct VAobject VAObject)
{
  Speak(GetString(SpeakGadgets[ID_text]), volume, rate, 0);
  return(1L);
}
/*	Button  Speak		 */ 

int quitObj(struct VAobject VAObject)
{
  return(-1L);
}
/*	Button  Quit		 */ 

int textObj(struct VAobject VAObject)
{
  return(1L);
}
/*	String  Text		 */ 

int volObj(struct VAobject VAObject)
{
  volume = VAObject.va_IntuiMsg->Code;
  return(1L);
}
/*	Slider  Volume   		 */ 

int rateObj(struct VAobject VAObject)
{
  rate = VAObject.va_IntuiMsg->Code;
  return(1L);
}
/*	Slider  Rate    		 */