Article-I.D.: amiga.516
Posted: Fri Jan 10 17:55:41 1986
Date-Received: Mon, 13-Jan-86 00:43:32 EST
References: <513@amiga.amiga.UUCP>
Reply-To: rj@wizard.UUCP (Robert J. Mical)
Distribution: net.micro.amiga
Organization: Commodore-Amiga Inc., 983 University Ave #D, Los Gatos CA 95030
Lines: 347
Keywords: Amiga, Mandelbrot


/*
                       MAND2.C - Menus
             Mandelbrot Self-Squared Dragon Generator
                    For the Commodore Amiga
                         Version 2.01

             Copyright (C) 1985, Robert S. French
            Vastly Enhanced by =RJ Mical=  1985/86
            Copyright (C) 1986,  =Robert J. Mical=
                 Placed in the Public Domain


This program may be distributed free of charge as long as the above
notice is retained.

*/


#include "mand.h"


struct IntuiText ProjectText[PROJECT_COUNT] =
   {
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Save Picture",
      NULL,       /* next */
      },
    };


struct IntuiText OptionsText[OPTIONS_COUNT] =
   {
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "1/16 size display",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Full-size display",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Redisplay",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Play With Colors",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Stop",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Close display",
      NULL,       /* next */
      },
    };

struct IntuiText ZoomText[ZOOM_COUNT] =
   {
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Set Zoom Frame Center",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Set Zoom Frame Size",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Set Zoom Frame Proportional",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Zoom to Current Frame",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Zoom In x 10",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Zoom Out x 2",
      NULL,       /* next */
      },
      {
      0, 1, JAM2, /* frontpen, backpen, drawmode */
      1, 1,       /* left, top */
      NULL,       /* font */
      "Zoom Out x 10",
      NULL,       /* next */
      },
    };


struct MenuItem ProjectItems[PROJECT_COUNT] =
   {
      {
      NULL,                            /* next menuitem */
      0, ITEM_HEIGHT * 0,              /* select box left, top */
      PROJECT_WIDTH, ITEM_HEIGHT,      /* select box width, height */
      ITEMTEXT | COMMSEQ | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ProjectText[0],           /* text */
      NULL,                            /* select */
      'S',                             /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
   };


struct MenuItem OptionsItems[OPTIONS_COUNT] =
   {
      {
      &OptionsItems[1],                /* next menuitem */
      OPTIONS_LEFT, ITEM_HEIGHT * 0,   /* select box left, top */
      OPTIONS_WIDTH, ITEM_HEIGHT,      /* select box width, height */
      ITEMTEXT | COMMSEQ | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&OptionsText[0],           /* text */
      NULL,                            /* select */
      'Q',                             /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &OptionsItems[2],                /* next menuitem */
      OPTIONS_LEFT, ITEM_HEIGHT * 1,   /* select box left, top */
      OPTIONS_WIDTH, ITEM_HEIGHT,      /* select box width, height */
      ITEMTEXT | COMMSEQ | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&OptionsText[1],           /* text */
      NULL,                            /* select */
      'F',                             /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &OptionsItems[3],                /* next menuitem */
      OPTIONS_LEFT, ITEM_HEIGHT * 2,   /* select box left, top */
      OPTIONS_WIDTH, ITEM_HEIGHT,      /* select box width, height */
      ITEMTEXT | COMMSEQ | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&OptionsText[2],           /* text */
      NULL,                            /* select */
      'R',                             /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &OptionsItems[4],                /* next menuitem */
      OPTIONS_LEFT, ITEM_HEIGHT * 3,   /* select box left, top */
      OPTIONS_WIDTH, ITEM_HEIGHT,      /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&OptionsText[3],           /* text */
      NULL,                            /* select */
      NULL,                             /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &OptionsItems[5],                /* next menuitem */
      OPTIONS_LEFT, ITEM_HEIGHT * 4,   /* select box left, top */
      OPTIONS_WIDTH, ITEM_HEIGHT,      /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&OptionsText[4],           /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      NULL,                            /* next menuitem */
      OPTIONS_LEFT, ITEM_HEIGHT * 5,   /* select box left, top */
      OPTIONS_WIDTH, ITEM_HEIGHT,      /* select box width, height */
      ITEMTEXT | COMMSEQ | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&OptionsText[5],           /* text */
      NULL,                            /* select */
      'C',                             /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
   };


struct MenuItem ZoomItems[ZOOM_COUNT] =
   {
      {
      &ZoomItems[1],                   /* next menuitem */
      ZOOM_LEFT, ITEM_HEIGHT * 0,      /* select box left, top */
      ZOOM_WIDTH, ITEM_HEIGHT,         /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ZoomText[0],              /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &ZoomItems[2],                   /* next menuitem */
      ZOOM_LEFT, ITEM_HEIGHT * 1,      /* select box left, top */
      ZOOM_WIDTH, ITEM_HEIGHT,         /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ZoomText[1],              /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &ZoomItems[3],                   /* next menuitem */
      ZOOM_LEFT, ITEM_HEIGHT * 2,      /* select box left, top */
      ZOOM_WIDTH, ITEM_HEIGHT,         /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ZoomText[2],              /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &ZoomItems[4],                   /* next menuitem */
      ZOOM_LEFT, ITEM_HEIGHT * 3,      /* select box left, top */
      ZOOM_WIDTH, ITEM_HEIGHT,         /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ZoomText[3],              /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &ZoomItems[5],                   /* next menuitem */
      ZOOM_LEFT, ITEM_HEIGHT * 4,      /* select box left, top */
      ZOOM_WIDTH, ITEM_HEIGHT,         /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ZoomText[4],              /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      &ZoomItems[6],                   /* next menuitem */
      ZOOM_LEFT, ITEM_HEIGHT * 5,      /* select box left, top */
      ZOOM_WIDTH, ITEM_HEIGHT,         /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ZoomText[5],              /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
      {
      NULL,                            /* next menuitem */
      ZOOM_LEFT, ITEM_HEIGHT * 6,      /* select box left, top */
      ZOOM_WIDTH, ITEM_HEIGHT,         /* select box width, height */
      ITEMTEXT | ITEMENABLED | HIGHCOMP, /* flags */
      0,                               /* mutual exclude */
      (APTR)&ZoomText[6],              /* text */
      NULL,                            /* select */
      NULL,                            /* command */
      NULL,                            /* next item */
      NULL,                            /* next select */
      },
   };


struct Menu MainMenu[MENU_COUNT] =
   {
      {
      &MainMenu[1],                    /* next menu */
      5, 0,                            /* select box left, top */
      70, 8,                           /* select box width, height */
      MENUENABLED,                     /* flags */
      "Project",                       /* text */
      &ProjectItems[0],                /* first item */
      0, 0, 0, 0,                      /* for the mystery variables */
      },
      {
      &MainMenu[2],                    /* next menu */
      70 + 5, 0,                       /* select box left, top */
      70, 8,                           /* select box width, height */
      MENUENABLED,                     /* flags */
      "Display",                       /* text */
      &OptionsItems[0],                /* first item */
      0, 0, 0, 0,                      /* for the mystery variables */
      },
      {
      NULL,                            /* next menu */
      70 + 70 + 5, 0,                  /* select box left, top */
      70, 8,                           /* select box width, height */
      MENUENABLED,                     /* flags */
      "Zoom",                          /* text */
      &ZoomItems[0],                   /* first item */
      0, 0, 0, 0,                      /* for the mystery variables */
      },
   };