home *** CD-ROM | disk | FTP | other *** search
- /* ******************************************************************** */
- /* 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);
- }
-