/***************** MessageManager for ScreenMod ************************/
/*                Written by Syd L. Bolton ©1991                       */
/*                                                                     */
/* PARAMETER      	FUNCTION			INCLUDE FILE   */
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
/* 	1		About Information		about.h        */
/*      2		Help Information (Keys)		help.h	       */
/***********************************************************************/

#include "about.h"
#include "help.h"

Message(mnum)
int mnum;
{
struct IntuiMessage *message;
ULONG class;
struct Window *AWindow;
int about_exit=0;

AboutWindow.Screen=Screen;    /* make sure we're on right screen! */

AWindow=OpenWindow(&AboutWindow);
if (AWindow==NULL) return(0);

switch (mnum) {
	case 1: PrintIText(AWindow->RPort,&AboutTextList,0,0);
		break;

	case 2: PrintIText(AWindow->RPort,&HelpTextList,0,0);
		break;

	default: break;
	}
	
do {
	WaitPort(AWindow->UserPort);
		while ( ( message=(struct IntuiMessage *)
			GetMsg(AWindow->UserPort) ) != NULL)
		{
		class=message->Class;
		ReplyMsg(message);

		if (class==GADGETUP) about_exit=1;
		}
	} while (about_exit==0);

CloseWindow(AWindow);
}