Amiga ISO Collection/AmigaUtilCD2.iso/MUI/MUIBuilder22.lha/MUIBuilder/MB/GCC/example/MUIB-DemoGui.cpp

C/C++ Source or Header | 1995-06-01 | 29.8 KB | 1,331 lines

#ifndef MAKE_ID
#define MAKE_ID(a,b,c,d) ((ULONG) (a)<<24 | (ULONG) (b)<<16 | (ULONG) (c)<<8 | (ULONG) (d))
#endif

#include <inline/alib.h>
#include <inline/muimaster.h>


#include "MUIB-DemoGui.h"
#include "MUIB-DemoGuiExtern.h"


struct ObjApp *CreateApp(void)
{
    struct ObjApp *MBObj;

    APTR    MN_label_0Project, GROUP_ROOT_0, GR_grp_0, MN_label_2Buttons, GROUP_ROOT_1;
    APTR    GR_grp_1, GR_grp_2, Space_1, Space_2, GROUP_ROOT_2, obj_aux0, obj_aux1;
    APTR    GR_grp_3, GR_grp_4, GR_grp_6, GR_grp_7, GR_grp_8, GROUP_ROOT_3, GR_grp_9;
    APTR    Space_6, GR_grp_11, LA_label_0, LA_label_1, LA_label_2, GR_grp_12;
    APTR    GR_grp_13, GROUP_ROOT_2C, obj_aux2, obj_aux3, GR_grp_3C, GR_grp_4C;
    APTR    GR_grp_6C, GR_grp_7C, GR_grp_8C, GROUP_ROOT_4, GR_grp_14, Space_14;
    APTR    Space_15;

    if (!(MBObj = (struct ObjApp *) AllocVec(sizeof(struct ObjApp), MEMF_PUBLIC|MEMF_CLEAR)))
        return(NULL);

    MBObj->STR_TX_label_0 = "** **";
    MBObj->STR_TX_label_2 = "Again\na tricky\nDemo\n\n Click everywhere !!!";
    MBObj->LV_label_0Content = "Well : that is a floattext object \n \n ... and just a very small example !!";
    MBObj->STR_TX_label_1 = "A popobject can contain more \n than a simple list \n(try to move the sliders !!)";

    MBObj->RA_label_0Content[0] = "PopAsl Demo";
    MBObj->RA_label_0Content[1] = "PopObject Demo";
    MBObj->RA_label_0Content[2] = NULL;
    MBObj->STR_GR_grp_10[0] = "PopAsl";
    MBObj->STR_GR_grp_10[1] = "PopObject";
    MBObj->STR_GR_grp_10[2] = NULL;
    MBObj->CY_label_0Content[0] = "Bad";
    MBObj->CY_label_0Content[1] = "Ok";
    MBObj->CY_label_0Content[2] = "Great";
    MBObj->CY_label_0Content[3] = "Fantastic";
    MBObj->CY_label_0Content[4] = NULL;
    MBObj->RA_label_1Content[0] = "Bad";
    MBObj->RA_label_1Content[1] = "Ok";
    MBObj->RA_label_1Content[2] = "Great";
    MBObj->RA_label_1Content[3] = "Fantastic";
    MBObj->RA_label_1Content[4] = NULL;

    MBObj->BT_One = TextObject,
        ButtonFrame,
        MUIA_Disabled, TRUE,
        MUIA_Background, MUII_ButtonBack,
        MUIA_ControlChar, 'b',
        MUIA_Text_Contents, "\033I[6:31]",
        MUIA_Text_PreParse, "\033c",
        MUIA_Text_HiChar, 'b',
        MUIA_HelpNode, "BT_One",
        MUIA_InputMode, MUIV_InputMode_RelVerify,
    End;

    MBObj->BT_Two = TextObject,
        ButtonFrame,
        MUIA_Disabled, TRUE,
        MUIA_Background, MUII_ButtonBack,
        MUIA_ControlChar, 'b',
        MUIA_Text_Contents, "\033I[6:39]",
        MUIA_Text_PreParse, "\033c",
        MUIA_Text_HiChar, 'b',
        MUIA_HelpNode, "BT_Two",
        MUIA_InputMode, MUIV_InputMode_RelVerify,
    End;

    MBObj->BT_begin = SimpleButton("_Begin");

    MBObj->BT_Three = TextObject,
        ButtonFrame,
        MUIA_Disabled, TRUE,
        MUIA_Background, MUII_ButtonBack,
        MUIA_ControlChar, 'b',
        MUIA_Text_Contents, "\033I[6:38]",
        MUIA_Text_PreParse, "\033c",
        MUIA_Text_HiChar, 'b',
        MUIA_HelpNode, "BT_Three",
        MUIA_InputMode, MUIV_InputMode_RelVerify,
    End;

    GR_grp_0 = GroupObject,
        MUIA_HelpNode, "GR_grp_0",
        MUIA_Group_Horiz, TRUE,
        MUIA_Group_SameWidth, TRUE,
        Child, MBObj->BT_Two,
        Child, MBObj->BT_begin,
        Child, MBObj->BT_Three,
    End;

    MBObj->BT_Four = TextObject,
        ButtonFrame,
        MUIA_Disabled, TRUE,
        MUIA_Background, MUII_ButtonBack,
        MUIA_ControlChar, 'b',
        MUIA_Text_Contents, "\033I[6:30]",
        MUIA_Text_PreParse, "\033c",
        MUIA_Text_HiChar, 'b',
        MUIA_HelpNode, "BT_Four",
        MUIA_InputMode, MUIV_InputMode_RelVerify,
    End;

    GROUP_ROOT_0 = GroupObject,
        Child, MBObj->BT_One,
        Child, GR_grp_0,
        Child, MBObj->BT_Four,
    End;

    MBObj->WI_Turn = WindowObject,
        MUIA_Window_Title, "Turn Around !",
        MUIA_Window_ID, MAKE_ID('0', 'W', 'I', 'N'),
        WindowContents, GROUP_ROOT_0,
    End;

    MBObj->BT_label_4 = SimpleButton("Button _1");

    MBObj->BT_label_5 = SimpleButton("Button _2");

    MBObj->BT_label_6 = SimpleButton("Button _3");

    GR_grp_1 = GroupObject,
        MUIA_HelpNode, "GR_grp_1",
        MUIA_Weight, 33,
        Child, MBObj->BT_label_4,
        Child, MBObj->BT_label_5,
        Child, MBObj->BT_label_6,
    End;

    Space_1 = VSpace(0);

    MBObj->TX_label_0 = TextObject,
        MUIA_Background, MUII_TextBack,
        MUIA_Frame, MUIV_Frame_Text,
        MUIA_Text_Contents, MBObj->STR_TX_label_0,
        MUIA_Text_PreParse, "\033c",
        MUIA_Text_SetMin, TRUE,
    End;

    Space_2 = VSpace(0);

    GR_grp_2 = GroupObject,
        MUIA_HelpNode, "GR_grp_2",
        MUIA_Frame, MUIV_Frame_Group,
        Child, Space_1,
        Child, MBObj->TX_label_0,
        Child, Space_2,
    End;

    GROUP_ROOT_1 = GroupObject,
        MUIA_Group_Horiz, TRUE,
        Child, GR_grp_1,
        Child, GR_grp_2,
    End;

    MBObj->MN_label_21st_button = MenuitemObject,
        MUIA_Menuitem_Title, "1st menu",
        MUIA_Menuitem_Shortcut, "1",
    End;

    MBObj->MN_label_22nd_button = MenuitemObject,
        MUIA_Menuitem_Title, "2nd menu",
        MUIA_Menuitem_Shortcut, "2",
    End;

    MBObj->MN_label_23rd_button = MenuitemObject,
        MUIA_Menuitem_Title, "3rd menu",
        MUIA_Menuitem_Shortcut, "3",
    End;

    MN_label_2Buttons = MenuitemObject,
        MUIA_Menuitem_Title, "Buttons",
        MUIA_Family_Child, MBObj->MN_label_21st_button,
        MUIA_Family_Child, MBObj->MN_label_22nd_button,
        MUIA_Family_Child, MBObj->MN_label_23rd_button,
    End;

    MBObj->MN_label_2 = MenustripObject,
        MUIA_Family_Child, MN_label_2Buttons,
    End;

    MBObj->WI_Buttons = WindowObject,
        MUIA_Window_Title, "Buttons & Menus Notify",
        MUIA_Window_Menustrip, MBObj->MN_label_2,
        MUIA_Window_ID, MAKE_ID('1', 'W', 'I', 'N'),
        WindowContents, GROUP_ROOT_1,
    End;

    MBObj->SL_label_0 = SliderObject,
        MUIA_HelpNode, "SL_label_0",
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
    End;

    obj_aux1 = Label2("Level");

    obj_aux0 = GroupObject,
        MUIA_Group_Columns, 2,
        Child, obj_aux1,
        Child, MBObj->SL_label_0,
    End;

    MBObj->GA_label_0 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_0",
        MUIA_FixWidth, 15,
        MUIA_Gauge_Max, 100,
    End;

    MBObj->GA_label_1 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_1",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    MBObj->SL_label_1 = SliderObject,
        MUIA_HelpNode, "SL_label_1",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
        MUIA_Slider_Reverse, TRUE,
    End;

    MBObj->GA_label_4 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_4",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    MBObj->SL_label_3 = SliderObject,
        MUIA_HelpNode, "SL_label_3",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
    End;

    MBObj->GA_label_6 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_6",
        MUIA_Gauge_Max, 100,
    End;

    MBObj->SL_label_4 = SliderObject,
        MUIA_HelpNode, "SL_label_4",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
        MUIA_Slider_Reverse, TRUE,
    End;

    GR_grp_8 = GroupObject,
        MUIA_HelpNode, "GR_grp_8",
        MUIA_Group_Horiz, TRUE,
        Child, MBObj->SL_label_3,
        Child, MBObj->GA_label_6,
        Child, MBObj->SL_label_4,
    End;

    MBObj->GA_label_5 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_5",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    GR_grp_7 = GroupObject,
        MUIA_HelpNode, "GR_grp_7",
        Child, MBObj->GA_label_4,
        Child, GR_grp_8,
        Child, MBObj->GA_label_5,
    End;

    MBObj->SL_label_2 = SliderObject,
        MUIA_HelpNode, "SL_label_2",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
    End;

    GR_grp_6 = GroupObject,
        MUIA_HelpNode, "GR_grp_6",
        MUIA_Group_Horiz, TRUE,
        Child, MBObj->SL_label_1,
        Child, GR_grp_7,
        Child, MBObj->SL_label_2,
    End;

    MBObj->GA_label_2 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_2",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    GR_grp_4 = GroupObject,
        MUIA_HelpNode, "GR_grp_4",
        Child, MBObj->GA_label_1,
        Child, GR_grp_6,
        Child, MBObj->GA_label_2,
    End;

    MBObj->GA_label_3 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_3",
        MUIA_FixWidth, 15,
        MUIA_Gauge_Max, 100,
    End;

    GR_grp_3 = GroupObject,
        MUIA_HelpNode, "GR_grp_3",
        MUIA_Group_Horiz, TRUE,
        Child, MBObj->GA_label_0,
        Child, GR_grp_4,
        Child, MBObj->GA_label_3,
    End;

    GROUP_ROOT_2 = GroupObject,
        Child, obj_aux0,
        Child, GR_grp_3,
    End;

    MBObj->WI_Gauges = WindowObject,
        MUIA_Window_Title, "Gauges",
        MUIA_Window_ID, MAKE_ID('2', 'W', 'I', 'N'),
        WindowContents, GROUP_ROOT_2,
    End;

    MBObj->RA_label_0 = RadioObject,
        MUIA_Frame, MUIV_Frame_Group,
        MUIA_HelpNode, "RA_label_0",
        MUIA_Radio_Entries, MBObj->RA_label_0Content,
    End;

    Space_6 = HVSpace;

    MBObj->TX_label_2 = TextObject,
        MUIA_Background, MUII_TextBack,
        MUIA_Frame, MUIV_Frame_Text,
        MUIA_Text_Contents, MBObj->STR_TX_label_2,
        MUIA_Text_PreParse, "\033c",
        MUIA_Text_SetMin, TRUE,
    End;

    GR_grp_9 = GroupObject,
        MUIA_HelpNode, "GR_grp_9",
        Child, MBObj->RA_label_0,
        Child, Space_6,
        Child, MBObj->TX_label_2,
    End;

    LA_label_0 = Label("File");

    MBObj->STR_PA_label_0 = String("", 80);

    MBObj->PA_label_0 = PopButton(MUII_PopUp);

    MBObj->PA_label_0 = PopaslObject,
        MUIA_HelpNode, "PA_label_0",
        MUIA_ControlChar, 'f',
        MUIA_Popasl_Type, 0,
        MUIA_Popstring_String, MBObj->STR_PA_label_0,
        MUIA_Popstring_Button, MBObj->PA_label_0,
    End;

    LA_label_1 = Label("Font");

    MBObj->STR_PA_label_1 = String("", 80);

    MBObj->PA_label_1 = PopButton(MUII_PopUp);

    MBObj->PA_label_1 = PopaslObject,
        MUIA_HelpNode, "PA_label_1",
        MUIA_ControlChar, 'o',
        MUIA_Popasl_Type, 1,
        MUIA_Popstring_String, MBObj->STR_PA_label_1,
        MUIA_Popstring_Button, MBObj->PA_label_1,
    End;

    LA_label_2 = Label("ScreenMode");

    MBObj->STR_PA_label_2 = String("", 80);

    MBObj->PA_label_2 = PopButton(MUII_PopUp);

    MBObj->PA_label_2 = PopaslObject,
        MUIA_HelpNode, "PA_label_2",
        MUIA_ControlChar, 's',
        MUIA_Popasl_Type, 2,
        MUIA_Popstring_String, MBObj->STR_PA_label_2,
        MUIA_Popstring_Button, MBObj->PA_label_2,
    End;

    GR_grp_11 = GroupObject,
        MUIA_HelpNode, "GR_grp_11",
        MUIA_Group_Columns, 2,
        Child, LA_label_0,
        Child, MBObj->PA_label_0,
        Child, LA_label_1,
        Child, MBObj->PA_label_1,
        Child, LA_label_2,
        Child, MBObj->PA_label_2,
    End;

    MBObj->LV_label_0 = FloattextObject,
        MUIA_Floattext_Text, MBObj->LV_label_0Content,
        MUIA_Frame, MUIV_Frame_ReadList,
    End;

    MBObj->LV_label_0 = ListviewObject,
        MUIA_HelpNode, "LV_label_0",
        MUIA_Listview_Input, FALSE,
        MUIA_Listview_List, MBObj->LV_label_0,
    End;

    MBObj->STR_PO_label_0 = String("", 80);

    MBObj->PO_label_0 = PopobjectObject,
        MUIA_HelpNode, "PO_label_0",
        MUIA_Popstring_String, MBObj->STR_PO_label_0,
        MUIA_Popstring_Button, PopButton(MUII_PopUp),
        MUIA_Popobject_Object, MBObj->LV_label_0,
    End;

    MBObj->LV_label_1 = VolumelistObject,
        MUIA_Frame, MUIV_Frame_InputList,
    End;

    MBObj->LV_label_1 = ListviewObject,
        MUIA_HelpNode, "LV_label_1",
        MUIA_Listview_MultiSelect, MUIV_Listview_MultiSelect_Default,
        MUIA_Listview_List, MBObj->LV_label_1,
    End;

    MBObj->STR_PO_label_1 = String("", 80);

    MBObj->PO_label_1 = PopobjectObject,
        MUIA_HelpNode, "PO_label_1",
        MUIA_Popstring_String, MBObj->STR_PO_label_1,
        MUIA_Popstring_Button, PopButton(MUII_PopUp),
        MUIA_Popobject_Object, MBObj->LV_label_1,
    End;

    MBObj->LV_label_2 = DirlistObject,
        MUIA_Background, MUII_ListBack,
        MUIA_Frame, MUIV_Frame_InputList,
        MUIA_Dirlist_Directory, "env:",
    End;

    MBObj->LV_label_2 = ListviewObject,
        MUIA_HelpNode, "LV_label_2",
        MUIA_Listview_List, MBObj->LV_label_2,
    End;

    MBObj->STR_PO_label_2 = String("", 80);

    MBObj->PO_label_2 = PopobjectObject,
        MUIA_HelpNode, "PO_label_2",
        MUIA_Popstring_String, MBObj->STR_PO_label_2,
        MUIA_Popstring_Button, PopButton(MUII_PopUp),
        MUIA_Popobject_Object, MBObj->LV_label_2,
    End;

    MBObj->TX_label_1 = TextObject,
        MUIA_Background, MUII_TextBack,
        MUIA_Frame, MUIV_Frame_Text,
        MUIA_Text_Contents, MBObj->STR_TX_label_1,
        MUIA_Text_PreParse, "\033c",
        MUIA_Text_SetMin, TRUE,
    End;

    MBObj->SL_label_0C = SliderObject,
        MUIA_HelpNode, "SL_label_0C",
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
    End;

    obj_aux3 = Label2("Level");

    obj_aux2 = GroupObject,
        MUIA_Group_Columns, 2,
        Child, obj_aux3,
        Child, MBObj->SL_label_0C,
    End;

    MBObj->GA_label_0C = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_0C",
        MUIA_FixWidth, 15,
        MUIA_Gauge_Max, 100,
    End;

    MBObj->GA_label_1C = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_1C",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    MBObj->SL_label_1C = SliderObject,
        MUIA_HelpNode, "SL_label_1C",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
        MUIA_Slider_Reverse, TRUE,
    End;

    MBObj->GA_label_4C = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_4C",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    MBObj->SL_label_3C = SliderObject,
        MUIA_HelpNode, "SL_label_3C",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
    End;

    MBObj->GA_label_6C = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_6C",
        MUIA_Gauge_Max, 100,
    End;

    MBObj->SL_label_4C = SliderObject,
        MUIA_HelpNode, "SL_label_4C",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
        MUIA_Slider_Reverse, TRUE,
    End;

    GR_grp_8C = GroupObject,
        MUIA_HelpNode, "GR_grp_8C",
        MUIA_Group_Horiz, TRUE,
        Child, MBObj->SL_label_3C,
        Child, MBObj->GA_label_6C,
        Child, MBObj->SL_label_4C,
    End;

    MBObj->GA_label_5C = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_5C",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    GR_grp_7C = GroupObject,
        MUIA_HelpNode, "GR_grp_7C",
        Child, MBObj->GA_label_4C,
        Child, GR_grp_8C,
        Child, MBObj->GA_label_5C,
    End;

    MBObj->SL_label_2C = SliderObject,
        MUIA_HelpNode, "SL_label_2C",
        MUIA_Weight, 5,
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 100,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Quiet, TRUE,
        MUIA_Slider_Level, 0,
    End;

    GR_grp_6C = GroupObject,
        MUIA_HelpNode, "GR_grp_6C",
        MUIA_Group_Horiz, TRUE,
        Child, MBObj->SL_label_1C,
        Child, GR_grp_7C,
        Child, MBObj->SL_label_2C,
    End;

    MBObj->GA_label_2C = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_2C",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 100,
    End;

    GR_grp_4C = GroupObject,
        MUIA_HelpNode, "GR_grp_4C",
        Child, MBObj->GA_label_1C,
        Child, GR_grp_6C,
        Child, MBObj->GA_label_2C,
    End;

    MBObj->GA_label_3C = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_3C",
        MUIA_FixWidth, 15,
        MUIA_Gauge_Max, 100,
    End;

    GR_grp_3C = GroupObject,
        MUIA_HelpNode, "GR_grp_3C",
        MUIA_Group_Horiz, TRUE,
        Child, MBObj->GA_label_0C,
        Child, GR_grp_4C,
        Child, MBObj->GA_label_3C,
    End;

    GROUP_ROOT_2C = GroupObject,
        Child, obj_aux2,
        Child, GR_grp_3C,
    End;

    GR_grp_13 = GroupObject,
        MUIA_HelpNode, "GR_grp_13",
        Child, MBObj->TX_label_1,
        Child, GROUP_ROOT_2C,
    End;

    MBObj->STR_PO_label_3 = String("", 80);

    MBObj->PO_label_3 = PopobjectObject,
        MUIA_HelpNode, "PO_label_3",
        MUIA_Popstring_String, MBObj->STR_PO_label_3,
        MUIA_Popstring_Button, PopButton(MUII_PopUp),
        MUIA_Popobject_Object, GR_grp_13,
    End;

    GR_grp_12 = GroupObject,
        MUIA_HelpNode, "GR_grp_12",
        Child, MBObj->PO_label_0,
        Child, MBObj->PO_label_1,
        Child, MBObj->PO_label_2,
        Child, MBObj->PO_label_3,
    End;

    MBObj->GR_grp_10 = RegisterObject,
        MUIA_Register_Titles, MBObj->STR_GR_grp_10,
        MUIA_HelpNode, "GR_grp_10",
        Child, GR_grp_11,
        Child, GR_grp_12,
    End;

    GROUP_ROOT_3 = GroupObject,
        MUIA_Group_Horiz, TRUE,
        Child, GR_grp_9,
        Child, MBObj->GR_grp_10,
    End;

    MBObj->WI_PopUp = WindowObject,
        MUIA_Window_Title, "PopUp !",
        MUIA_Window_ID, MAKE_ID('3', 'W', 'I', 'N'),
        WindowContents, GROUP_ROOT_3,
    End;

    MBObj->CY_label_0 = CycleObject,
        MUIA_HelpNode, "CY_label_0",
        MUIA_Cycle_Entries, MBObj->CY_label_0Content,
    End;

    MBObj->GA_label_7 = GaugeObject,
        GaugeFrame,
        MUIA_HelpNode, "GA_label_7",
        MUIA_FixHeight, 10,
        MUIA_Gauge_Horiz, TRUE,
        MUIA_Gauge_Max, 3,
    End;

    MBObj->SL_label_5 = SliderObject,
        MUIA_HelpNode, "SL_label_5",
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 3,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Level, 0,
    End;

    Space_14 = HVSpace;

    MBObj->RA_label_1 = RadioObject,
        MUIA_Frame, MUIV_Frame_Group,
        MUIA_HelpNode, "RA_label_1",
        MUIA_Radio_Entries, MBObj->RA_label_1Content,
    End;

    Space_15 = HVSpace;

    MBObj->SL_label_5C = SliderObject,
        MUIA_HelpNode, "SL_label_5C",
        MUIA_Slider_Min, 0,
        MUIA_Slider_Max, 3,
        MUIA_Group_Horiz, FALSE,
        MUIA_Slider_Level, 0,
        MUIA_Slider_Reverse, TRUE,
    End;

    GR_grp_14 = GroupObject,
        MUIA_HelpNode, "GR_grp_14",
        MUIA_Group_Horiz, TRUE,
        Child, MBObj->SL_label_5,
        Child, Space_14,
        Child, MBObj->RA_label_1,
        Child, Space_15,
        Child, MBObj->SL_label_5C,
    End;

    GROUP_ROOT_4 = GroupObject,
        Child, MBObj->CY_label_0,
        Child, MBObj->GA_label_7,
        Child, GR_grp_14,
    End;

    MBObj->WI_Connections = WindowObject,
        MUIA_Window_Title, "Connections",
        MUIA_Window_ID, MAKE_ID('4', 'W', 'I', 'N'),
        WindowContents, GROUP_ROOT_4,
    End;

    MBObj->MN_label_0Quit = MenuitemObject,
        MUIA_Menuitem_Title, "Quit",
        MUIA_Menuitem_Shortcut, "Q",
    End;

    MN_label_0Project = MenuitemObject,
        MUIA_Menuitem_Title, "Project",
        MUIA_Family_Child, MBObj->MN_label_0Quit,
    End;

    MBObj->MN_label_0 = MenustripObject,
        MUIA_Family_Child, MN_label_0Project,
    End;

    MBObj->App = ApplicationObject,
        MUIA_Application_Author, "Eric Totel",
        MUIA_Application_Menustrip, MBObj->MN_label_0,
        MUIA_Application_Base, "MUIB-Demo",
        MUIA_Application_Title, "MUIBuilder Demo",
        MUIA_Application_Version, "$VER: MUIBuilder-Demo 1.00 (26.09.94)",
        MUIA_Application_Copyright, "Eric Totel",
        MUIA_Application_Description, "Just a tricky demo !",
        SubWindow, MBObj->WI_Turn,
        SubWindow, MBObj->WI_Buttons,
        SubWindow, MBObj->WI_Gauges,
        SubWindow, MBObj->WI_PopUp,
        SubWindow, MBObj->WI_Connections,
    End;


    if (!MBObj->App)
    {
        FreeVec(MBObj);
        return(NULL);
    }

    DoMethod((Object *) MBObj->MN_label_0Quit,
        MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
        MBObj->App,
        2,
        MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit
        );

    DoMethod((Object *) MBObj->WI_Turn,
        MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
        MBObj->WI_Turn,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->WI_Turn,
        MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
        MBObj->App,
        2,
        MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit
        );

    DoMethod((Object *) MBObj->BT_One,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_One,
        3,
        MUIM_Set, MUIA_Disabled, TRUE
        );

    DoMethod((Object *) MBObj->BT_One,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_Two,
        3,
        MUIM_Set, MUIA_Disabled, FALSE
        );

    DoMethod((Object *) MBObj->BT_One,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_Buttons,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->BT_One,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_Gauges,
        3,
        MUIM_Set, MUIA_Window_Open, TRUE
        );

    DoMethod((Object *) MBObj->BT_Two,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_Two,
        3,
        MUIM_Set, MUIA_Disabled, TRUE
        );

    DoMethod((Object *) MBObj->BT_Two,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_Four,
        3,
        MUIM_Set, MUIA_Disabled, FALSE
        );

    DoMethod((Object *) MBObj->BT_Two,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_PopUp,
        3,
        MUIM_Set, MUIA_Window_Open, TRUE
        );

    DoMethod((Object *) MBObj->BT_Two,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_Gauges,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->BT_begin,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_One,
        3,
        MUIM_Set, MUIA_Disabled, FALSE
        );

    DoMethod((Object *) MBObj->BT_begin,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_Buttons,
        3,
        MUIM_Set, MUIA_Window_Open, TRUE
        );

    DoMethod((Object *) MBObj->BT_begin,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_begin,
        3,
        MUIM_Set, MUIA_Disabled, TRUE
        );

    DoMethod((Object *) MBObj->BT_Three,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_Three,
        3,
        MUIM_Set, MUIA_Disabled, TRUE
        );

    DoMethod((Object *) MBObj->BT_Three,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_One,
        3,
        MUIM_Set, MUIA_Disabled, FALSE
        );

    DoMethod((Object *) MBObj->BT_Three,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_Buttons,
        3,
        MUIM_Set, MUIA_Window_Open, TRUE
        );

    DoMethod((Object *) MBObj->BT_Three,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_Connections,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->BT_Four,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_Four,
        3,
        MUIM_Set, MUIA_Disabled, TRUE
        );

    DoMethod((Object *) MBObj->BT_Four,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->BT_Three,
        3,
        MUIM_Set, MUIA_Disabled, FALSE
        );

    DoMethod((Object *) MBObj->BT_Four,
        MUIM_Notify, MUIA_Pressed, TRUE,
        MBObj->WI_PopUp,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->BT_Four,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->WI_Connections,
        3,
        MUIM_Set, MUIA_Window_Open, TRUE
        );

    DoMethod((Object *) MBObj->WI_Turn,
        MUIM_Window_SetCycleChain, MBObj->BT_One,
        MBObj->BT_Two,
        MBObj->BT_begin,
        MBObj->BT_Three,
        MBObj->BT_Four,
        0
        );

    DoMethod((Object *) MBObj->MN_label_21st_button,
        MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
        MBObj->TX_label_0,
        3,
        MUIM_Set, MUIA_Text_Contents, "1st menu selected"
        );

    DoMethod((Object *) MBObj->MN_label_22nd_button,
        MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
        MBObj->TX_label_0,
        3,
        MUIM_Set, MUIA_Text_Contents, "2nd menu selected"
        );

    DoMethod((Object *) MBObj->MN_label_23rd_button,
        MUIM_Notify, MUIA_Menuitem_Trigger, MUIV_EveryTime,
        MBObj->TX_label_0,
        3,
        MUIM_Set, MUIA_Text_Contents, "3rd menu selected"
        );

    DoMethod((Object *) MBObj->WI_Buttons,
        MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
        MBObj->WI_Buttons,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->BT_label_4,
        MUIM_Notify, MUIA_Pressed, FALSE,
        MBObj->TX_label_0,
        3,
        MUIM_Set, MUIA_Text_Contents, "You clicked 1st button"
        );

    DoMethod((Object *) MBObj->BT_label_5,
        MUIM_Notify, MUIA_Pressed, TRUE,
        MBObj->TX_label_0,
        3,
        MUIM_Set, MUIA_Text_Contents, "You clicked 2nd button"
        );

    DoMethod((Object *) MBObj->BT_label_6,
        MUIM_Notify, MUIA_Pressed, TRUE,
        MBObj->TX_label_0,
        3,
        MUIM_Set, MUIA_Text_Contents, "You clicked 3rd button"
        );

    DoMethod((Object *) MBObj->WI_Buttons,
        MUIM_Window_SetCycleChain, MBObj->BT_label_4,
        MBObj->BT_label_5,
        MBObj->BT_label_6,
        0
        );

    DoMethod((Object *) MBObj->WI_Gauges,
        MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
        MBObj->WI_Gauges,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_0,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_1,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_2,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_3,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_1,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_2,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_4,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_5,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_6,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_3,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_4,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_1,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_4,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_3,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_6,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_3,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_4,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_4,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_6,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_4,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_3,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_2,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_5,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->WI_Gauges,
        MUIM_Window_SetCycleChain, MBObj->SL_label_0,
        MBObj->SL_label_1,
        MBObj->SL_label_3,
        MBObj->SL_label_4,
        MBObj->SL_label_2,
        0
        );

    DoMethod((Object *) MBObj->WI_PopUp,
        MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
        MBObj->WI_PopUp,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->RA_label_0,
        MUIM_Notify, MUIA_Radio_Active, MUIV_EveryTime,
        MBObj->GR_grp_10,
        3,
        MUIM_Set, MUIA_Group_ActivePage, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->GR_grp_10,
        MUIM_Notify, MUIA_Group_ActivePage, MUIV_EveryTime,
        MBObj->RA_label_0,
        3,
        MUIM_Set, MUIA_Radio_Active, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_0C,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_1C,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_1C,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_4C,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_3C,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_6C,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_4C,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_5C,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->SL_label_2C,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_2C,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_0C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->GA_label_3C,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->WI_PopUp,
        MUIM_Window_SetCycleChain, MBObj->RA_label_0,
        MBObj->GR_grp_10,
        MBObj->PA_label_0,
        MBObj->PA_label_1,
        MBObj->PA_label_2,
        MBObj->PO_label_0,
        MBObj->PO_label_1,
        MBObj->PO_label_2,
        MBObj->PO_label_3,
        0
        );

    DoMethod((Object *) MBObj->WI_Connections,
        MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
        MBObj->WI_Connections,
        3,
        MUIM_Set, MUIA_Window_Open, FALSE
        );

    DoMethod((Object *) MBObj->CY_label_0,
        MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime,
        MBObj->GA_label_7,
        3,
        MUIM_Set, MUIA_Gauge_Current, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->CY_label_0,
        MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime,
        MBObj->RA_label_1,
        3,
        MUIM_Set, MUIA_Radio_Active, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_5,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->RA_label_1,
        3,
        MUIM_Set, MUIA_Radio_Active, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->RA_label_1,
        MUIM_Notify, MUIA_Radio_Active, MUIV_EveryTime,
        MBObj->CY_label_0,
        3,
        MUIM_Set, MUIA_Cycle_Active, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->RA_label_1,
        MUIM_Notify, MUIA_Radio_Active, MUIV_EveryTime,
        MBObj->SL_label_5,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->RA_label_1,
        MUIM_Notify, MUIA_Radio_Active, MUIV_EveryTime,
        MBObj->SL_label_5C,
        3,
        MUIM_Set, MUIA_Slider_Level, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->SL_label_5C,
        MUIM_Notify, MUIA_Slider_Level, MUIV_EveryTime,
        MBObj->RA_label_1,
        3,
        MUIM_Set, MUIA_Radio_Active, MUIV_TriggerValue
        );

    DoMethod((Object *) MBObj->WI_Connections,
        MUIM_Window_SetCycleChain, MBObj->CY_label_0,
        MBObj->SL_label_5,
        MBObj->RA_label_1,
        MBObj->SL_label_5C,
        0
        );

    set(MBObj->WI_Turn,
        MUIA_Window_Open, TRUE
        );


    return(MBObj);
}

void DisposeApp(struct ObjApp * MBObj)
{
    MUI_DisposeObject( (Object *) MBObj->App);
    FreeVec(MBObj);
}