/*
 *	File:					Alert.c
 *	Description:	Displays given parameter in an standard system-alert.
 *	Version:			1.1
 *	Author:				Ketil Hunn
 *	Mail:					hunn@dhmolde.no
 *
 *	Copyright © 1993 Ketil Hunn.
 *
 *	In order to list the source-files included in this package properly,
 *	the TAB size should be set at 2.
 *
 *	To compile and link:
 *	sc link optimize nostandardio smallcode smalldata Alert.c
 */

#include <stdlib.h>
#include <string.h>
#include <intuition/intuition.h>
#include <clib/intuition_protos.h>
#include <clib/exec_protos.h>

#define PROGRAM "Alert"
#define VERSION "V1.2"
char const *version = "\0$VER: " PROGRAM " " VERSION " (20.10.94)";

struct IntuitionBase	*IntuitionBase;

#include "myinclude:myAlert.h"

main(int argc, char *argv[]) {
	if(IntuitionBase=(struct IntuitionBase *)OpenLibrary("intuition.library", 33L))
	{
		if(argc<2 || !(strcmp(argv[1],"?")))
			myAlert(RECOVERY_ALERT,
							PROGRAM " " VERSION "  © 1993-1994 Ketil Hunn\n"
							"Usage: Alert TEXTLINE/M\n\n"
							"Each given parameter will appear as one line of text "
							"in the alert.");
		else
		{
			int i=0;
			char	*text;

			if(text=AllocVec(2400, MEMF_CLEAR))
			{
				strcpy(text,argv[1]);
				for(i=2; i<argc; ++i)
				{
					strcat(text,"\n");
					strcat(text,argv[i]);
				}
				myAlert(RECOVERY_ALERT,text);

				FreeVec(text);
			}
			else 
				MyAlert(RECOVERY_ALERT,"Out of memory!");
		}
		CloseLibrary((struct Library *)IntuitionBase);
	}
	exit(0);
}