#include <windows.h>

#define ID_FILE_EXIT 1000

const char *ClsName = "BasicApp";
const char *WndName = "HI";

LRESULT CALLBACK WndProcedure(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)

{       
        MSG Msg;    
        HWND hWnd;
        WNDCLASSEX WndClsEx;
        
        // Create the app window
        WndClsEx.cbSize = sizeof (WNDCLASSEX);
        WndClsEx.style = CS_HREDRAW | CS_VREDRAW;
        WndClsEx.lpfnWndProc = WndProcedure;
        WndClsEx.cbClsExtra = 0;
        WndClsEx.cbWndExtra = 5;
        WndClsEx.hIcon = LoadIcon(NULL, IDI_APPLICATION);
        WndClsEx.hIconSm = LoadIcon(NULL, IDI_APPLICATION);
        WndClsEx.hInstance = hInstance;
        WndClsEx.hCursor = LoadCursor(NULL, IDC_ARROW);
        WndClsEx.hbrBackground = (HBRUSH)(21); //(HBRUSH) GetStockObject (COLOR_WINDOW);
        WndClsEx.lpszMenuName = NULL;
        WndClsEx.lpszClassName = ClsName;
       
        // register 
       RegisterClassEx(&WndClsEx);
        
        // Create the window object
      hWnd = CreateWindow(ClsName,
			  WndName,
			  WS_OVERLAPPEDWINDOW,
			  CW_USEDEFAULT,
			  CW_USEDEFAULT,
			  CW_USEDEFAULT,
			  CW_USEDEFAULT,
			  NULL,
			  NULL,
			  hInstance,
			  NULL);
       
       if(!hWnd)
       return 0;
       
       ShowWindow(hWnd, SW_SHOWNORMAL);
       UpdateWindow(hWnd);
       
       while( GetMessage(&Msg, NULL, 0, 0))
       {
               TranslateMessage(&Msg);
               DispatchMessage(&Msg);   
       }
       
             
       return Msg.wParam;
       
    }
    
LRESULT CALLBACK WndProcedure(HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam)
    {
        switch(Msg)
        {
            case WM_CREATE:
                {
                 HMENU hMenu, hSubMenu;
                 
                 hMenu = CreateMenu();
                 
                 hSubMenu = CreatePopupMenu();
                 
                 AppendMenu(hSubMenu, 2, ID_FILE_EXIT, "E&xit");
                 AppendMenu(hMenu, 2, (UINT)hSubMenu,"&File");
                 
                 SetMenu(hWnd, hMenu);
               
                }
                break;    
            case WM_DESTROY:
                PostQuitMessage(WM_QUIT);
                break;
            default:
                return DefWindowProc(hWnd, Msg, wParam, lParam);
            }
            return 0;
        }