#include "exec/types.h"
#include "exec/io.h"
#include "exec/memory.h"
#include "libraries/dos.h"
#include "intuition/intuition.h"

SHORT lBorderVectors2[] = {
   0,0,
   29,0,
   29,14,
   0,14,
   0,0
};
struct Border lBorder2 = {
   -1,-1,   /* XY origin relative to container TopLeft */
   3,0,JAM1,   /* front pen, back pen and drawmode */
   5,   /* number of XY vectors */
   lBorderVectors2,   /* pointer to XY vectors */
   NULL   /* next border in list */
};


struct Gadget lGadget4 = {
   NULL,   /* next gadget */
   145,157,   /* origin XY of hit box relative to window TopLeft */
   29,14,   /* hit box width and height */
   NULL,   /* gadget flags */
   RELVERIFY,   /* activation flags */
   BOOLGADGET,   /* gadget type flags */
   (APTR)&lBorder2,   /* gadget border or image to be rendered */
   NULL,   /* alternate imagery for selection */
   NULL,   /* first IntuiText structure */
   NULL,   /* gadget mutual-exclude long word */
   NULL,   /* SpecialInfo structure */
   NULL,   /* user-definable data */
   NULL   /* pointer to user-definable data */
};


SHORT lBorderVectors1[] = {
   0,0,
   48,0,
   48,32,
   0,32,
   0,0
};
struct Border lBorder1 = {
   -1,-1,   /* XY origin relative to container TopLeft */
   3,0,JAM1,   /* front pen, back pen and drawmode */
   5,   /* number of XY vectors */
   lBorderVectors1,   /* pointer to XY vectors */
   NULL   /* next border in list */
};


struct Gadget lGadget3 = {
   &lGadget4,   /* next gadget */
   199,100,   /* origin XY of hit box relative to window TopLeft */
   48,32,   /* hit box width and height */
   NULL,   /* gadget flags */
   RELVERIFY,   /* activation flags */
   BOOLGADGET,   /* gadget type flags */
   (APTR)&lBorder1,   /* gadget border or image to be rendered */
   NULL,   /* alternate imagery for selection */
   NULL,   /* first IntuiText structure */
   NULL,   /* gadget mutual-exclude long word */
   NULL,   /* SpecialInfo structure */
   NULL,   /* user-definable data */
   NULL   /* pointer to user-definable data */
};
struct Gadget lGadget2 = {
   &lGadget3,   /* next gadget */
   135,100,   /* origin XY of hit box relative to window TopLeft */
   48,32,   /* hit box width and height */
   NULL,   /* gadget flags */
   RELVERIFY,   /* activation flags */
   BOOLGADGET,   /* gadget type flags */
   (APTR)&lBorder1,   /* gadget border or image to be rendered */
   NULL,   /* alternate imagery for selection */
   NULL,   /* first IntuiText structure */
   NULL,   /* gadget mutual-exclude long word */
   NULL,   /* SpecialInfo structure */
   NULL,   /* user-definable data */
   NULL   /* pointer to user-definable data */
};

struct Gadget lGadget1 = {
   &lGadget2,   /* next gadget */
   71,100,   /* origin XY of hit box relative to window TopLeft */
   48,32,   /* hit box width and height */
   NULL,   /* gadget flags */
   RELVERIFY,   /* activation flags */
   BOOLGADGET,   /* gadget type flags */
   (APTR)&lBorder1,   /* gadget border or image to be rendered */
   NULL,   /* alternate imagery for selection */
   NULL,   /* first IntuiText structure */
   NULL,   /* gadget mutual-exclude long word */
   NULL,   /* SpecialInfo structure */
   NULL,   /* user-definable data */
   NULL   /* pointer to user-definable data */
};



void HandleEvent();


void HandleEvent(object)   /* handles screen gadgets */
APTR object;
{
  if (object == (APTR)&lGadget3) { program2();return;}
  if (object == (APTR)&lGadget2) { fade();return;}
  if (object == (APTR)&lGadget1) { program1();return;}
  if (object == (APTR)&lGadget4) { quit();return;}
}