#include "demo.h"

int main(int argc,char *argv[])
{
	APTR app,window;
	ULONG signals;
	BOOL running = TRUE;

	init();

	app = ApplicationObject,
		MUIA_Application_Title      , "BalanceDemo",
		MUIA_Application_Version    , "$VER: BalanceDemo 11.34 (26.05.95)",
		MUIA_Application_Copyright  , "©1995, Stefan Stuntz",
		MUIA_Application_Author     , "Stefan Stuntz",
		MUIA_Application_Description, "Show balancing groups",
		MUIA_Application_Base       , "BALANCEDEMO",

		SubWindow, window = WindowObject,
			MUIA_Window_Title, "Balancing Groups",
			MUIA_Window_ID   , MAKE_ID('B','A','L','A'),

			WindowContents, HGroup,

				Child, VGroup, GroupFrame, MUIA_Weight, 15,
					Child, RectangleObject, TextFrame, MUIA_Weight,  50, End,
					Child, RectangleObject, TextFrame, MUIA_Weight, 100, End,
					Child, BalanceObject, End,
					Child, RectangleObject, TextFrame, MUIA_Weight, 200, End,
					End,

				Child, BalanceObject, End,

				Child, VGroup,
					Child, HGroup, GroupFrame,
						Child, RectangleObject, TextFrame, End,
						Child, BalanceObject, End,
						Child, RectangleObject, TextFrame, End,
						End,
					Child, HGroup, GroupFrame,
						Child, RectangleObject, TextFrame, End,
						Child, BalanceObject, End,
						Child, RectangleObject, TextFrame, End,
						Child, BalanceObject, End,
						Child, RectangleObject, TextFrame, End,
						Child, BalanceObject, End,
						Child, RectangleObject, TextFrame, End,
						Child, BalanceObject, End,
						Child, RectangleObject, TextFrame, End,
						End,
					Child, HGroup, GroupFrame,
						Child, HGroup,
							Child, RectangleObject, TextFrame, End,
							Child, BalanceObject, End,
							Child, RectangleObject, TextFrame, End,
							End,
						Child, BalanceObject, End,
						Child, HGroup,
							Child, RectangleObject, TextFrame, End,
							Child, BalanceObject, End,
							Child, RectangleObject, TextFrame, End,
							End,
						End,
					Child, HGroup, GroupFrame,
						Child, RectangleObject, TextFrame, MUIA_Weight,  50, End,
						Child, RectangleObject, TextFrame, MUIA_Weight, 100, End,
						Child, BalanceObject, End,
						Child, RectangleObject, TextFrame, MUIA_Weight, 200, End,
						End,
					Child, HGroup, GroupFrame,
						Child, SimpleButton("Also"),
						Child, BalanceObject, End,
						Child, SimpleButton("Try"),
						Child, BalanceObject, End,
						Child, SimpleButton("Sizing"),
						Child, BalanceObject, End,
						Child, SimpleButton("With"),
						Child, BalanceObject, End,
						Child, SimpleButton("Shift"),
						End,
					End,
				End,
			End,

		End;

	if (!app)
		fail(app,"Failed to create Application.");

	DoMethod(window,MUIM_Notify,MUIA_Window_CloseRequest,TRUE,
		app,2,MUIM_Application_ReturnID,MUIV_Application_ReturnID_Quit);


/*
** Input loop...
*/

	set(window,MUIA_Window_Open,TRUE);

	while (running)
	{
		switch (DoMethod(app,MUIM_Application_Input,&signals))
		{
			case MUIV_Application_ReturnID_Quit:
				running = FALSE;
				break;
		}

		if (running && signals) Wait(signals);
	}

	set(window,MUIA_Window_Open,FALSE);

/*
** Shut down...
*/

	fail(app,NULL);
}