/******************************************************************************
** HiScan                                                                    **
**---------------------------------------------------------------------------**
** aktiviert höhere Samplingraten mit einem Productivityscreen               **
**---------------------------------------------------------------------------**
** Version : V 1.0                                                           **
** Date    : 09.04.1995                                                      **
** Author  : Stefan Kost                                                     **
******************************************************************************/

#include <exec/types.h>
#include <exec/exec.h>
#include <dos/dos.h>
#include <intuition/intuition.h>
#include <intuition/intuitionbase.h>
#include <intuition/screens.h>
#include <math.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>

/* Prototypes für Libraryfunctions */

#include <proto/exec.h>
#include <proto/graphics.h>
#include <proto/intuition.h>
#include <proto/utility.h>

/* Version | Revisionscontrol */

#define	VERSION		1
#define	REVISION	00
#define	DATE		"__Date__"
#define	VERS		"HiScan 1.00"
#define	VSTRING		"HiScan 1.00 ("__DATE__")\n\r"
#define	VERSTAG		"\0$VER: HiScan 1.00 ("__DATE__")"
UBYTE VersTag[]=VERSTAG;

struct IntuitionBase	*IntuitionBase=0l;
struct Screen			*scr=0l;

struct TagItem scrtags[]={
	SA_Left,		0,
	SA_Top,			0,
	SA_Width,		640,
	SA_Height,		480,
	SA_Depth,		1,
	SA_Title,		(ULONG *)"HiScan",
	SA_Type,		CUSTOMSCREEN,
	SA_DisplayID,	VGA_MONITOR_ID|VGAPRODUCT_KEY,
	TAG_DONE
};

void OpenAll(void);
void CloseAll(void);

void OpenAll(void)
{
	if(!(IntuitionBase=OpenLibrary("intuition.library",37))) CloseAll();

	if(!(scr=OpenScreenTagList(0l,scrtags))) CloseAll();
}

void CloseAll(void)
{
	if(scr)				CloseScreen(scr);
	if(IntuitionBase)	CloseLibrary(IntuitionBase);
	exit(1);
}

void main(int argc,char *argv[])
{
	OpenAll();
	Wait(SIGBREAKF_CTRL_C);
	CloseAll();
}