/* Menu Example 2 */
 
#include <proto/intuition.h>
#include <proto/gadtools.h>
#include <proto/exec.h>
#include <proto/dos.h>
#include <intuition/intuition.h>
#include <stdio.h>
#include <string.h>
 
/* Menu definition */
 
struct IntuiText text1 = 
{ 0, 1, JAM2, 4, 2, NULL, "Open", NULL };
struct IntuiText text2 =
{ 0, 1, JAM2, 4, 2, NULL, "Save", NULL };
struct IntuiText text3 = 
{ 0, 1, JAM2, 4, 2, NULL, "Print", NULL };
struct IntuiText text4 = 
{ 0, 1, JAM2, 4, 2, NULL, "Quit", NULL };
 
struct MenuItem item4 =
{ NULL, 0, 36, 48, 12, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, &text4, &text4, NULL, NULL, 0 };
struct MenuItem item3 = 
{ &item4, 0, 24, 48, 12, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, &text3, &text3, NULL, NULL, 0 };
struct MenuItem item2 =
{ &item3, 0, 12, 48, 12, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, &text2, &text2, NULL, NULL, 0 };
struct MenuItem item1 =
{ &item2, 0, 0, 48, 12, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, &text1, &text1, NULL, NULL, 0 };
 
struct Menu menu1 = 
{ NULL, 0, 0, 48, 12, MENUENABLED, "File", &item1, 0, 0, 0, 0 };
 
/* For printing in Window */
UBYTE result[255];
 
struct IntuiText WinText = 
{1, 0, JAM1, 0, 0, NULL, &result[0], NULL};
 
struct NewWindow NewWindow =
{
   20, 20,                                   /* LeftEdge and TopEdge      */
   300, 200,                                 /* Width and Height          */
   0, 1,                                     /* DetailPen and BlockPen    */
   IDCMP_CLOSEWINDOW | IDCMP_MENUPICK,       /* IDCMP Flags               */
   WFLG_SIZEGADGET | WFLG_DRAGBAR | WFLG_DEPTHGADGET | WFLG_CLOSEGADGET | WFLG_ACTIVATE,                                                      /* Flags                     */
   NULL, NULL,                               /* Gadget and Image pointers */
   "My Window",                              /* Window Title              */
   NULL,                                     /* Screen pointer            */
   NULL,                                     /* BitMap pointer            */
   0, 0,                                     /* MinWidth and MinHeight    */
   0, 0,                                     /* MaxWidth and MaxHeight    */
   WBENCHSCREEN                              /* Type of window            */
};
 
/* Main program */
int main()
{
   struct Window *myWindow;
   int closewin = FALSE;
   struct IntuiMessage *msg;
   UWORD menuNumber, menuNum, itemNum, subNum;
   ULONG msgClass, line=12;
 
   if (myWindow = OpenWindow(&NewWindow))
   {
 
   /* Attach menu to window */
   SetMenuStrip (myWindow, &menu1);
 
   while (closewin == FALSE) {
      WaitPort(myWindow->UserPort);
      if (msg = (struct IntuiMessage *)GetMsg(myWindow->UserPort))
      {
      msgClass = msg->Class;
      menuNumber = msg->Code; /* Get menu number */
      ReplyMsg((struct Message *)msg);
 
      switch (msgClass) { 
         case IDCMP_CLOSEWINDOW: /* Close window? */
               closewin = TRUE;
               break;
          case IDCMP_MENUPICK: /* Menu selected? */
               menuNum = MENUNUM(menuNumber); /* Split code into menus, items, subitems */
               itemNum = ITEMNUM(menuNumber);
               subNum = SUBNUM(menuNumber);
               /* Print selection in window */
               sprintf(result, "Menu %d Item %d", menuNum, itemNum);
               PrintIText(myWindow->RPort, &WinText, 5, line);
               line += 10; /* Next line */
               if (menuNum == 0 && itemNum == 3) /* Test for quit */
                   closewin = TRUE;
               break;
        }
        }
   }
   Delay(50);
   ClearMenuStrip(myWindow); /* remove menu */
   CloseWindow(myWindow);
   }
   return(0);
}