/* ******************************************************************** */
/* C code generated by:							*/
/* Visual Arts Version 2.1						*/
/* Copyright 1994-95 Danny Y. Wong  All rights reserved			*/
/* Calgary, Alberta (CANADA)                        			*/
/* Partial of the code is copyright by Jaba Development			*/
/* ******************************************************************** */

#include <VisualArts.h>
#include <clib/VisualArts_protos.h>

#define ID_speak                          			0
#define ID_quit                           			1
#define ID_text                           			2
#define ID_vol                            			3
#define ID_rate                           			4

#define SpeakNumGads						5

#include "Speech_func.c" 

int speakObj(struct VAobject VAObject);
int quitObj(struct VAobject VAObject);
int textObj(struct VAobject VAObject);
int volObj(struct VAobject VAObject);
int rateObj(struct VAobject VAObject);

int GetPubScreen(void);
void ClosePubScreen(void);
int OpenSpeakWindow(char windtitle[]);
void CloseSpeakWindow(void);
int SpeakHandler(void);
int SpeakMainHandler(void);
void DrawSpeakObjs(void);
int main(int argc, char *argv[]);

UBYTE				*PubScrName = "Workbench";
struct DrawInfo			*ScrDrawInfo = NULL;
APTR				 VisualInfo = NULL;
struct Screen			*Scr = NULL;
struct Window			*SpeakWnd = NULL;
struct Gadget			*SpeakGList = NULL;
struct Gadget			*SpeakGadgets[SpeakNumGads];
struct IntuiMessage		 SpeakMsg;
UWORD				 SpeakLeft = 99;
UWORD				 SpeakTop = 51;
UWORD				 SpeakWidth = 328;
UWORD				 SpeakHeight = 77;

/* stringinfo for WB 1.x style string/integer gadgets */

struct StringExtend			SpeakStrExt;	/* Extend String Gadget */
struct TextAttr topaz8 = { (STRPTR)"topaz.font", 8, 0x00, 0x01 };
struct TextAttr topaz800 = { (STRPTR)"topaz.font", 8, 0x00, 0x00 };

WORD SpeakGadTypes[] = {
	BUTTON_KIND,
	BUTTON_KIND,
	STRING_KIND,
	SLIDER_KIND,
	SLIDER_KIND,
};

struct NewGadget SpeakNGads[] = {
	13, 47, 75, 12, (UBYTE *)"Speak",&topaz800, ID_speak, PLACETEXT_IN, NULL, (APTR)speakObj,
	235, 47, 75, 12, (UBYTE *)"Quit",&topaz800, ID_quit, PLACETEXT_IN, NULL, (APTR)quitObj,
	51, 2, 259, 12, (UBYTE *)"Text", &topaz800, ID_text, PLACETEXT_LEFT, NULL, (APTR)textObj,
	140, 17, 170, 12, (UBYTE *)"Volume   ", &topaz800, ID_vol, PLACETEXT_LEFT, NULL, (APTR)volObj,
	140, 30, 170, 12, (UBYTE *)"Rate    ", &topaz800, ID_rate, PLACETEXT_LEFT, NULL, (APTR)rateObj,
};

ULONG SpeakNTags[] = {
	TAG_DONE,
	TAG_DONE,
	(GTST_String), (ULONG)"Hello, this is Amiga speaking", GTST_MaxChars, 255, (STRINGA_Justification), GACT_STRINGLEFT, TAG_DONE,
	(GTSL_Min), 0, (GTSL_Max), 64, (GTSL_Level), 35, (GTSL_LevelFormat), (ULONG)"%2ld", (GTSL_MaxLevelLen), 0, (GTSL_LevelPlace), PLACETEXT_LEFT, (GA_Immediate), TRUE, (GA_RelVerify), TRUE, (PGA_Freedom), LORIENT_HORIZ, TAG_DONE,
	(GTSL_Min), 40, (GTSL_Max), 400, (GTSL_Level), 200, (GTSL_LevelFormat), (ULONG)"%3ld", (GTSL_MaxLevelLen), 0, (GTSL_LevelPlace), PLACETEXT_LEFT, (GA_Immediate), TRUE, (GA_RelVerify), TRUE, (PGA_Freedom), LORIENT_HORIZ, TAG_DONE,
};


int GetPubScreen(void)
{
  if (!(Scr = LockPubScreen(PubScrName)))
	return(1L);

  if (!(VisualInfo = GetVisualInfo(Scr, TAG_DONE)))
	return(2L);

  if (!(ScrDrawInfo = GetScreenDrawInfo(Scr)))
	return(3L);
  return(0L);
}

void ClosePubScreen(void)
{
  if (VisualInfo)
    FreeVisualInfo(VisualInfo);
  if (Scr)
    UnlockPubScreen(NULL,  Scr);
  if (ScrDrawInfo)
    FreeScreenDrawInfo(Scr,  ScrDrawInfo);
}

int OpenSpeakWindow(char windtitle[80])
{
  struct NewGadget	NewGad;
  struct Gadget   	*Gad;
  register UWORD i, j;
  UWORD offsetx = Scr->WBorLeft;
  UWORD offsety = Scr->WBorTop + Scr->Font->ta_YSize + 1;


  SpeakStrExt.Font = NULL;
  SpeakStrExt.Pens[0] = 2;
  SpeakStrExt.Pens[1] = 0;
  SpeakStrExt.ActivePens[0] = 1;
  SpeakStrExt.ActivePens[1] = 3;
  SpeakStrExt.InitialModes  = 0;
  SpeakStrExt.EditHook = NULL;
  SpeakStrExt.WorkBuffer = NULL;

  if (!(Gad = CreateContext(&SpeakGList)))
  	return(1L);

  for (i=0, j=0; i < SpeakNumGads; i++)
  {
    CopyMem((char *)&SpeakNGads[i], (char *)&NewGad, (long)sizeof(struct NewGadget));

    NewGad.ng_VisualInfo = VisualInfo;
    NewGad.ng_LeftEdge += offsetx;
    NewGad.ng_TopEdge  += offsety;

    SpeakGadgets[i] = Gad = CreateGadgetA((ULONG)SpeakGadTypes[i], Gad, &NewGad,
	(struct TagItem *)&SpeakNTags[j]);
    if (SpeakGadTypes[i] == STRING_KIND || SpeakGadTypes[i] == INTEGER_KIND)
    {
	SpeakGadgets[i]->Flags |= GFLG_STRINGEXTEND;
	((struct StringInfo *)SpeakGadgets[i]->SpecialInfo)->Extension = &SpeakStrExt;
    }
    while (SpeakNTags[j])
        j +=2;
    j++;
    if (!Gad)
       return(2L);
  }
  if (!(SpeakWnd = OpenWindowTags(NULL,
  	WA_Left,	SpeakLeft,
  	WA_Top, 	SpeakTop,
  	WA_Width,	SpeakWidth,
  	WA_Height,	SpeakHeight + kWindowOffSetY,
  	WA_NewLookMenus, TRUE,
  	WA_IDCMP,	IDCMP_CLOSEWINDOW | IDCMP_MOUSEMOVE | IDCMP_GADGETUP | IDCMP_GADGETDOWN ,
  	WA_Flags,	WFLG_CLOSEGADGET  |  WFLG_SMART_REFRESH | 
			 WFLG_ACTIVATE |  WFLG_DRAGBAR ,
  	WA_Gadgets,	SpeakGList,
  	WA_Title,	windtitle,
  	WA_ScreenTitle,	"Visual Arts V2.2 Copyright 1994-95 Danny Y. Wong  All Rights Reserved.",
  	WA_PubScreen,	Scr,
  	WA_MinWidth,	160,
  	WA_MinHeight,	50,
  	WA_MaxWidth,	640,
  	WA_MaxHeight,	200,
  	TAG_DONE)))
  	    return(3L);

  GT_RefreshWindow(SpeakWnd, NULL);
  RefreshGadgets(SpeakGadgets[0], SpeakWnd, NULL);
  return(0L);
}

void CloseSpeakWindow(void)
{
  if (SpeakWnd)
	CloseWindow(SpeakWnd);
  if (SpeakGList)
	FreeGadgets(SpeakGList);
}

int SpeakHandler(void)
{
  struct IntuiMessage	*msg;
  struct VAobject	VAObject;
  int running	= 1;
  int (*func)(struct VAobject VAObject);
  ULONG class;
  UWORD code;

  while (msg=GT_GetIMsg(SpeakWnd->UserPort))
  {
    CopyMem((char *)msg, (char *)&SpeakMsg, (long)sizeof(struct IntuiMessage));
    class = msg->Class;
    code  = msg->Code;

    VAObject.va_Window = (struct Window *)SpeakWnd;
    VAObject.va_Gadget = (struct Gadget *)msg->IAddress;
    VAObject.va_IntuiMsg = (struct IntuiMessage *)msg;
    VAObject.va_Flags = 0;
    VAObject.va_UserData = 0;

    GT_ReplyIMsg(msg);
    switch(class)
    {

	  case IDCMP_CLOSEWINDOW:
	     return(0);
	     break;

	  case IDCMP_GADGETUP:
	    func = (void *)((struct Gadget *)SpeakMsg.IAddress)->UserData;
	    if (func != NULL)
	      running =  func(VAObject);
	    break;

    }
  }
  return(running);
}

int SpeakMainHandler(void)
{
  int running = 1;
  ULONG windsig, signals;

  windsig = 1L << SpeakWnd->UserPort->mp_SigBit;

  while (running == 1)
  {
    signals = Wait( windsig );
    if (signals & windsig)
    {
	  running = SpeakHandler();
    }
  }
  return(running);
}

int main(int argc, char *argv[])
{
  int rc;

  if (!(GetPubScreen()))
  {
	if (!(OpenSpeakWindow("Speech Demo")))
	{
          InitSpeech();
	  rc = SpeakMainHandler();
	  CloseSpeakWindow();
          DeInitSpeech();
	}
	ClosePubScreen();
  }
  return(0L);
}