/*
** About Window
*/

#include "include/config.h"

#include "include/mui.h"
#include <MUI/NListview_mcc.h>
#include <MUI/NFloattext_mcc.h>

#include "include/gui.h"
#include "include/about.h"
#include "include/url.h"
#include "pix/biglogo.h"
#include "amster_Cat.h"
#include "include/protos.h"

ULONG about_new(struct IClass *cl, Object *obj, struct opSet *msg);


MUIF about_dispatch(REG(a0) struct IClass *cl,REG(a2) Object *obj,REG(a1) Msg msg)
{
	if(msg->MethodID==OM_NEW) return(about_new(cl,obj,(APTR)msg));
	return(DoSuperMethodA(cl,obj,msg));
}


ULONG about_new(struct IClass *cl, Object *obj, struct opSet *msg)
{
	static char *pages[] = {
		(char *)_MSG_ABOUT_VERSION_TAB,
		(char *)_MSG_ABOUT_TEAM_TAB,
		(char *)_MSG_ABOUT_LICENSE_TAB,
		NULL
	};
	u_long *okbut;

	if(pages[0] == (char *)_MSG_ABOUT_VERSION_TAB)
		localize_array(pages);

	if (obj = (Object *)DoSuperNew(cl,obj,
		MUIA_Window_Title, MSG_ABOUT_TITLE,
		MUIA_Window_ID, MAKE_ID('W','H','A','T'),
		WindowContents, VGroup,
			Child, RegisterGroup(pages),
				Child, VGroup,
					Child, VSpace(0),
					Child, HGroup,
						Child, HSpace(0),
						Child, BodychunkObject,
							TextFrame,
							MUIA_InnerBottom, 0,
							MUIA_InnerLeft, 0,
							MUIA_InnerRight, 0,
							MUIA_InnerTop, 0,
							MUIA_FixWidth, BIGLOGO_WIDTH,
							MUIA_FixHeight, BIGLOGO_HEIGHT,
							MUIA_Bitmap_Width, BIGLOGO_WIDTH,
							MUIA_Bitmap_Height, BIGLOGO_HEIGHT,
							MUIA_Bodychunk_Depth, BIGLOGO_DEPTH,
							MUIA_Bodychunk_Body, (ULONG *)biglogo_body,
							MUIA_Bodychunk_Compression, BIGLOGO_COMPRESSION,
							MUIA_Bodychunk_Masking, BIGLOGO_MASKING,
							MUIA_Bitmap_SourceColors, (ULONG *)biglogo_colors,
						End,
						Child, HSpace(0),
					End,
					Child, TextObject,
						MUIA_Font, MUIV_Font_Big,
						MUIA_Text_Contents, "\33cv"AMSTER_VERSION" ("AMSTER_DATE")",
					End,
					Child, VSpace(0),
					Child, NewObject(gui->url_mcc->mcc_Class,NULL,
						URL_NAME, MSG_ABOUT_HOMEPAGE,
						URL_HREF, "http://home.worldonline.dk/~jlaur/amiga/amster/",
					End,
					Child, NewObject(gui->url_mcc->mcc_Class,NULL,
						URL_NAME, MSG_ABOUT_MAILLIST,
						URL_HREF, "http://www.egroups.com/group/amster",
					End,
					Child, NewObject(gui->url_mcc->mcc_Class,NULL,
						URL_NAME, MSG_ABOUT_FAQPAGE,
						URL_HREF, "http://napster.cjb.net",
					End,
					Child, VSpace(0),
				End,
				Child, VGroup,
					Child, NListviewObject,
						MUIA_NListview_NList, NFloattextObject,
							ReadListFrame,
							MUIA_NFloattext_Text, MSG_ABOUT_TEAM,
						End,
					End,
				End,
				Child, VGroup,
					Child, NListviewObject,
						MUIA_NListview_NList, NFloattextObject,
							ReadListFrame,
							MUIA_NFloattext_Text, MSG_ABOUT_LICENSE,
						End,
					End,
				End,
			End,
			Child, HGroup,
				Child, HSpace(0),
				Child, HSpace(0),
				Child, okbut = SimpleButton(MSG_OK_GAD),
			End,
		End,
		TAG_MORE, msg->ops_AttrList))
	{

		DoMethod(okbut,MUIM_Notify,MUIA_Pressed,FALSE,obj,3,MUIM_Set,MUIA_Window_Open,FALSE);
		DoMethod(obj,MUIM_Notify,MUIA_Window_CloseRequest,TRUE,obj,3,MUIM_Set,MUIA_Window_Open,FALSE);

		return((ULONG)obj);
	}

	return(0);
}