//menus.rc:

#include "menus.h"

ExampleMenu MENU
  { 
    POPUP "&Animals"
      { MENUITEM "&Land", IDM_LAND
        MENUITEM "&Sea", IDM_SEA
      }
    POPUP "&Plants"
      { 
        MENUITEM "T&rees", IDM_TREES
        MENUITEM "Fl&owers", IDM_FLOWERS   
      }
  }

//menus.h

#define IDM_LAND    1001
#define IDM_SEA     1002
#define IDM_TREES   1003
#define IDM_FLOWERS 1004

//menus.cpp: Demonstration of a menu.
//           Link with win.obj and the resource-script-file menus.rc.

#include "win.h"
#include "menus.h"


int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, 
                   PSTR szCmdLine, int iCmdShow)
  { 
    win w(hInstance, iCmdShow, "menus", "menus: Example of a menu");
    w.wndclass.lpszMenuName = "ExampleMenu";
    return w.result();
  }


LRESULT CALLBACK WndProc(HWND hWnd, UINT iMsg, 
                         WPARAM wParam, LPARAM lParam)
  { 
    switch (iMsg)
      { 
        case WM_COMMAND:
             switch (LOWORD(wParam))
               {
                 case IDM_LAND:
                      MessageBox (hWnd, "Horse, Dog, Cat",
                                  "Land", MB_OK);
                      break;
                 case IDM_SEA:
                      MessageBox (hWnd, "Fish, Shark,
                                  Alligator", "Sea", MB_OK);
                      break;
                 case IDM_TREES:
                      MessageBox (hWnd, "Some trees",
                                  "Trees", MB_OK);
                      break;
                 case IDM_FLOWERS:
                      MessageBox (hWnd, "Some flowers",
                      "Flowers", MB_OK);
                      break;
               }
             return 0;
       case WM_DESTROY:
            PostQuitMessage(0); return 0;
    }
   return DefWindowProc(hWnd, iMsg, wParam, lParam);
 }

w.wndclass.lpszMenuName = "ExampleMenu";

bcc32 -W menus win.obj
brc32 menus

cl /c menus.cpp
rc -r menus.rc
link menus.obj win.obj menus.res user32.lib gdi32.lib