head	1.1;
access;
symbols;
locks; strict;
comment	@ * @;


1.1
date	95.07.25.11.30.27;	author enderle;	state Exp;
branches;
next	;


desc
@MUI interface generated by MUIBuilder
@


1.1
log
@Initial revision
@
text
@#ifndef MAKE_ID
#define MAKE_ID(a,b,c,d) ((ULONG) (a)<<24 | (ULONG) (b)<<16 | (ULONG) (c)<<8 | (ULONG) (d))
#endif

#ifdef _DCC
#define __inline
#endif

#include "interface.h"
#include "VMMStatStrings_cat.h"

extern char* GetString(int);

char *GetMBString(int ref)
{
	char *aux;

	aux = GetString(ref);
	if (aux[1] == '\0') return(&aux[2]);
	else                return(aux);
}

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

	APTR	GR_MAIN_GROUP, GR_MAIN_STATISTIC, GR_MAIN_LABELS, GR_MAIN_INFO, GR_MAIN_CONTROL;

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

	Object->STR_TX_MAIN_FREEVIRT = GetMBString(MSG_TX_MAIN_FREEVIRT);
	Object->STR_TX_MAIN_FREEFAST = GetMBString(MSG_TX_MAIN_FREEFAST);
	Object->STR_TX_MAIN_SPACE_0 = NULL;
	Object->STR_TX_MAIN_FAULTS = GetMBString(MSG_TX_MAIN_FAULTS);
	Object->STR_TX_MAIN_PAGESWRITTEN = GetMBString(MSG_TX_MAIN_PAGESWRITTEN);
	Object->STR_TX_MAIN_PAGESREAD = GetMBString(MSG_TX_MAIN_PAGESREAD);
	Object->STR_TX_MAIN_NUMFRAMES = GetMBString(MSG_TX_MAIN_NUMFRAMES);
	Object->STR_TX_MAIN_PAGESUSED = GetMBString(MSG_TX_MAIN_PAGESUSED);
	Object->STR_TX_MAIN_SPACE_1 = NULL;
	Object->STR_TX_MAIN_TRAPSTRUCTSFREE = GetMBString(MSG_TX_MAIN_TRAPSTRUCTSFREE);
	Object->STR_TX_MAIN_PAGESIZE = GetMBString(MSG_TX_MAIN_PAGESIZE);
	Object->STR_TX_MAIN_INFO_FREEVIRT = NULL;
	Object->STR_TX_MAIN_INFO_FREEFAST = NULL;
	Object->STR_TX_MAIN_SPACE_2 = NULL;
	Object->STR_TX_MAIN_INFO_FAULTS = NULL;
	Object->STR_TX_MAIN_INFO_PAGESWRITTEN = NULL;
	Object->STR_TX_MAIN_INFO_PAGESREAD = NULL;
	Object->STR_TX_MAIN_INFO_NUMFRAMES = NULL;
	Object->STR_TX_MAIN_INFO_PAGESUSED = NULL;
	Object->STR_TX_MAIN_SPACE_3 = NULL;
	Object->STR_TX_MAIN_INFO_TRAPSTRUCTSFREE = NULL;
	Object->STR_TX_MAIN_INFO_PAGESIZE = NULL;

	Object->TX_MAIN_FREEVIRT = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_FREEVIRT,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_FREEFAST = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_FREEFAST,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_SPACE_0 = TextObject,
		MUIA_Weight, 5,
		MUIA_Background, MUII_WindowBack,
		MUIA_Text_Contents, Object->STR_TX_MAIN_SPACE_0,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_FAULTS = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_FAULTS,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_PAGESWRITTEN = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_PAGESWRITTEN,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_PAGESREAD = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_PAGESREAD,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_NUMFRAMES = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_NUMFRAMES,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_PAGESUSED = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_PAGESUSED,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_SPACE_1 = TextObject,
		MUIA_Weight, 5,
		MUIA_Background, MUII_WindowBack,
		MUIA_Text_Contents, Object->STR_TX_MAIN_SPACE_1,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_TRAPSTRUCTSFREE = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Weight, 5,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_TRAPSTRUCTSFREE,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_PAGESIZE = TextObject,
		MUIA_FramePhantomHoriz, TRUE,
		MUIA_Weight, 5,
		MUIA_Background, MUII_WindowBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_PAGESIZE,
		MUIA_Text_SetMin, TRUE,
	End;

	GR_MAIN_LABELS = GroupObject,
		MUIA_HelpNode, "GR_MAIN_LABELS",
		MUIA_Weight, 5,
		MUIA_Group_SameSize, TRUE,
		Child, Object->TX_MAIN_FREEVIRT,
		Child, Object->TX_MAIN_FREEFAST,
		Child, Object->TX_MAIN_SPACE_0,
		Child, Object->TX_MAIN_FAULTS,
		Child, Object->TX_MAIN_PAGESWRITTEN,
		Child, Object->TX_MAIN_PAGESREAD,
		Child, Object->TX_MAIN_NUMFRAMES,
		Child, Object->TX_MAIN_PAGESUSED,
		Child, Object->TX_MAIN_SPACE_1,
		Child, Object->TX_MAIN_TRAPSTRUCTSFREE,
		Child, Object->TX_MAIN_PAGESIZE,
	End;

	Object->TX_MAIN_INFO_FREEVIRT = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_FREEVIRT,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_FREEFAST = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_FREEFAST,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_SPACE_2 = TextObject,
		MUIA_Weight, 5,
		MUIA_Background, MUII_WindowBack,
		MUIA_Text_Contents, Object->STR_TX_MAIN_SPACE_2,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_FAULTS = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_FAULTS,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_PAGESWRITTEN = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_PAGESWRITTEN,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_PAGESREAD = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_PAGESREAD,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_NUMFRAMES = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_NUMFRAMES,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_PAGESUSED = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_PAGESUSED,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_SPACE_3 = TextObject,
		MUIA_Background, MUII_WindowBack,
		MUIA_Text_Contents, Object->STR_TX_MAIN_SPACE_3,
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_TRAPSTRUCTSFREE = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_TRAPSTRUCTSFREE,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	Object->TX_MAIN_INFO_PAGESIZE = TextObject,
		MUIA_Background, MUII_TextBack,
		MUIA_Frame, MUIV_Frame_Text,
		MUIA_Text_Contents, Object->STR_TX_MAIN_INFO_PAGESIZE,
		MUIA_Text_PreParse, "\033r",
		MUIA_Text_SetMin, TRUE,
	End;

	GR_MAIN_INFO = GroupObject,
		MUIA_HelpNode, "GR_MAIN_INFO",
		MUIA_Group_SameSize, TRUE,
		Child, Object->TX_MAIN_INFO_FREEVIRT,
		Child, Object->TX_MAIN_INFO_FREEFAST,
		Child, Object->TX_MAIN_SPACE_2,
		Child, Object->TX_MAIN_INFO_FAULTS,
		Child, Object->TX_MAIN_INFO_PAGESWRITTEN,
		Child, Object->TX_MAIN_INFO_PAGESREAD,
		Child, Object->TX_MAIN_INFO_NUMFRAMES,
		Child, Object->TX_MAIN_INFO_PAGESUSED,
		Child, Object->TX_MAIN_SPACE_3,
		Child, Object->TX_MAIN_INFO_TRAPSTRUCTSFREE,
		Child, Object->TX_MAIN_INFO_PAGESIZE,
	End;

	GR_MAIN_STATISTIC = GroupObject,
		MUIA_HelpNode, "GR_MAIN_STATISTIC",
		MUIA_Frame, MUIV_Frame_Group,
		MUIA_FrameTitle, GetMBString(MSG_GR_MAIN_STATISTICTitle),
		MUIA_Group_Columns, 2,
		Child, GR_MAIN_LABELS,
		Child, GR_MAIN_INFO,
	End;

	Object->BT_MAIN_ABOUT = SimpleButton(GetMBString(MSG_BT_MAIN_ABOUT));

	Object->BT_MAIN_QUIT = SimpleButton(GetMBString(MSG_BT_MAIN_QUIT));

	GR_MAIN_CONTROL = GroupObject,
		MUIA_HelpNode, "GR_MAIN_CONTROL",
		MUIA_Group_Horiz, TRUE,
		Child, Object->BT_MAIN_ABOUT,
		Child, Object->BT_MAIN_QUIT,
	End;

	GR_MAIN_GROUP = GroupObject,
		Child, GR_MAIN_STATISTIC,
		Child, GR_MAIN_CONTROL,
	End;

	Object->WI_MAIN = WindowObject,
		MUIA_Window_Title, GetMBString(MSG_WI_MAIN),
		MUIA_Window_ID, MAKE_ID('0', 'W', 'I', 'N'),
		WindowContents, GR_MAIN_GROUP,
	End;

	Object->App = ApplicationObject,
		MUIA_Application_Author, "Frank Enderle",
		MUIA_Application_Base, "VMMStat",
		MUIA_Application_Title, "VMMStat",
		MUIA_Application_Version, "$VER: VMMStat 38.10 (23.07.95)",
		MUIA_Application_Copyright, GetMBString(MSG_AppCopyright),
		MUIA_Application_Description, GetMBString(MSG_AppDescription),
		SubWindow, Object->WI_MAIN,
	End;


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

	DoMethod(Object->WI_MAIN,
		MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
		Object->App,
		2,
		MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit
		);

	DoMethod(Object->BT_MAIN_ABOUT,
		MUIM_Notify, MUIA_Pressed, FALSE,
		Object->App,
		2,
		MUIM_Application_ReturnID, ID_BT_MAIN_ABOUT
		);

	DoMethod(Object->BT_MAIN_QUIT,
		MUIM_Notify, MUIA_Pressed, FALSE,
		Object->App,
		2,
		MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit
		);

	DoMethod(Object->WI_MAIN,
		MUIM_Window_SetCycleChain, Object->BT_MAIN_ABOUT,
		Object->BT_MAIN_QUIT,
		0
		);


	return(Object);
}

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