unit Intuition;

INTERFACE
uses Exec, Graphics, Input, Keymap, Timer, Utility;


type
	ClassID = pbyte;
	Msg = ^tMsg;
	Object = long;
	pIClass = ^tIClass;
	tIClass = record
		cl_Dispatcher: tHook;
		cl_Reserved: long;
		cl_Super: pIClass;
		cl_ID: pbyte;
		cl_InstOffset: word;
		cl_InstSize: word;
		cl_UserData: long;
		cl_SubclassCount: long;
		cl_ObjectCount: long;
		cl_Flags: long;
		end;

	Class = tIClass;
	pBorder = ^tBorder;
	tBorder = record
		LeftEdge: integer;
		TopEdge: integer;
		FrontPen: byte;
		BackPen: byte;
		DrawMode: byte;
		Count: shortint;
		XY: pinteger;
		NextBorder: pBorder;
		end;

	pMenu = ^tMenu;
	pMenuItem = ^tMenuItem;
	tMenu = record
		NextMenu: pMenu;
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		Flags: word;
		MenuName: pshortint;
		FirstItem: pMenuItem;
		JazzX: integer;
		JazzY: integer;
		BeatX: integer;
		BeatY: integer;
		end;

	pScreen = ^tScreen;
	pWindow = ^tWindow;
	pGadget = ^tGadget;
	tScreen = record
		NextScreen: pScreen;
		FirstWindow: pWindow;
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		MouseY: integer;
		MouseX: integer;
		Flags: word;
		Title: pbyte;
		DefaultTitle: pbyte;
		BarHeight: shortint;
		BarVBorder: shortint;
		BarHBorder: shortint;
		MenuVBorder: shortint;
		MenuHBorder: shortint;
		WBorTop: shortint;
		WBorLeft: shortint;
		WBorRight: shortint;
		WBorBottom: shortint;
		Font: pTextAttr;
		ViewPort: tViewPort;
		RastPort: tRastPort;
		BitMap: tBitMap;
		LayerInfo: tLayer_Info;
		FirstGadget: pGadget;
		DetailPen: byte;
		BlockPen: byte;
		SaveColor0: word;
		BarLayer: pLayer;
		ExtData: pbyte;
		UserData: pbyte;
		end;

	pIBox = ^tIBox;
	pDrawInfo = ^tDrawInfo;
	pimpFrameBox = ^timpFrameBox;
	timpFrameBox = record
		MethodID: long;
		imp_ContentsBox: pIBox;
		imp_FrameBox: pIBox;
		imp_DrInfo: pDrawInfo;
		imp_FrameFlags: long;
		end;

	pGadgetInfo = ^tGadgetInfo;
	pgpGoInactive = ^tgpGoInactive;
	tgpGoInactive = record
		MethodID: long;
		gpgi_GInfo: pGadgetInfo;
		gpgi_Abort: long;
		end;

	pPropInfo = ^tPropInfo;
	tPropInfo = record
		Flags: word;
		HorizPot: word;
		VertPot: word;
		HorizBody: word;
		VertBody: word;
		CWidth: word;
		CHeight: word;
		HPotRes: word;
		VPotRes: word;
		LeftBorder: word;
		TopBorder: word;
		end;

	popGet = ^topGet;
	topGet = record
		MethodID: long;
		opg_AttrID: long;
		opg_Storage: plong;
		end;

	pRemember = ^tRemember;
	tRemember = record
		NextRemember: pRemember;
		RememberSize: long;
		Memory: pbyte;
		end;

	pimpErase = ^timpErase;
	timpErase = record
		MethodID: long;
		imp_RPort: pRastPort;
		imp_Offset: record
		X: integer;
		Y: integer;
		end;
		imp_Dimensions: record
		Width: integer;
		Height: integer;
		end;
		end;

	popMember = ^topMember;
	topMember = record
		MethodID: long;
		opam_Object: plong;
		end;

	pgpHitTest = ^tgpHitTest;
	tgpHitTest = record
		MethodID: long;
		gpht_GInfo: pGadgetInfo;
		gpht_Mouse: record
		X: integer;
		Y: integer;
		end;
		end;

	pgpRender = ^tgpRender;
	tgpRender = record
		MethodID: long;
		gpr_GInfo: pGadgetInfo;
		gpr_RPort: pRastPort;
		gpr_Redraw: longint;
		end;

	pStringExtend = ^tStringExtend;
	pStringInfo = ^tStringInfo;
	tStringInfo = record
		Buffer: pbyte;
		UndoBuffer: pbyte;
		BufferPos: integer;
		MaxChars: integer;
		DispPos: integer;
		UndoPos: integer;
		NumChars: integer;
		DispCount: integer;
		CLeft: integer;
		CTop: integer;
		Extension: pStringExtend;
		LongInt_: longint;
		AltKeyMap: pKeyMap;
		end;

	pimpDraw = ^timpDraw;
	timpDraw = record
		MethodID: long;
		imp_RPort: pRastPort;
		imp_Offset: record
		X: integer;
		Y: integer;
		end;
		imp_State: long;
		imp_DrInfo: pDrawInfo;
		imp_Dimensions: record
		Width: integer;
		Height: integer;
		end;
		end;

	popSet = ^topSet;
	topSet = record
		MethodID: long;
		ops_AttrList: pTagItem;
		ops_GInfo: pGadgetInfo;
		end;

	pIntuiMessage = ^tIntuiMessage;
	tIntuiMessage = record
		ExecMessage: tMessage;
		Class: long;
		Code: word;
		Qualifier: word;
		IAddress: pointer;
		MouseX: integer;
		MouseY: integer;
		Seconds: long;
		Micros: long;
		IDCMPWindow: pWindow;
		SpecialLink: pIntuiMessage;
		end;

	pImage = ^tImage;
	pNewWindow = ^tNewWindow;
	tNewWindow = record
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		DetailPen: shortint;
		BlockPen: shortint;
		IDCMPFlags: long;
		Flags: long;
		FirstGadget: pGadget;
		CheckMark: pImage;
		Title: pbyte;
		Screen: pScreen;
		BitMap: pBitMap;
		MinWidth: integer;
		MinHeight: integer;
		MaxWidth: word;
		MaxHeight: word;
		Type_: word;
		end;

	pExtNewWindow = ^tExtNewWindow;
	tExtNewWindow = record
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		DetailPen: shortint;
		BlockPen: shortint;
		IDCMPFlags: long;
		Flags: long;
		FirstGadget: pGadget;
		CheckMark: pImage;
		Title: pbyte;
		Screen: pScreen;
		BitMap: pBitMap;
		MinWidth: integer;
		MinHeight: integer;
		MaxWidth: word;
		MaxHeight: word;
		Type_: word;
		Extension: pTagItem;
		end;

	pimpHitTest = ^timpHitTest;
	timpHitTest = record
		MethodID: long;
		imp_Point: record
		X: integer;
		Y: integer;
		end;
		imp_Dimensions: record
		Width: integer;
		Height: integer;
		end;
		end;

	popUpdate = ^topUpdate;
	topUpdate = record
		MethodID: long;
		opu_AttrList: pTagItem;
		opu_GInfo: pGadgetInfo;
		opu_Flags: long;
		end;

	pRequester = ^tRequester;
	tWindow = record
		NextWindow: pWindow;
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		MouseY: integer;
		MouseX: integer;
		MinWidth: integer;
		MinHeight: integer;
		MaxWidth: word;
		MaxHeight: word;
		Flags: long;
		MenuStrip: pMenu;
		Title: pbyte;
		FirstRequest: pRequester;
		DMRequest: pRequester;
		ReqCount: integer;
		WScreen: pScreen;
		RPort: pRastPort;
		BorderLeft: shortint;
		BorderTop: shortint;
		BorderRight: shortint;
		BorderBottom: shortint;
		BorderRPort: pRastPort;
		FirstGadget: pGadget;
		Parent: pWindow;
		Descendant: pWindow;
		Pointer: pword;
		PtrHeight: shortint;
		PtrWidth: shortint;
		XOffset: shortint;
		YOffset: shortint;
		IDCMPFlags: long;
		UserPort: pMsgPort;
		WindowPort: pMsgPort;
		MessageKey: pIntuiMessage;
		DetailPen: byte;
		BlockPen: byte;
		CheckMark: pImage;
		ScreenTitle: pbyte;
		GZZMouseX: integer;
		GZZMouseY: integer;
		GZZWidth: integer;
		GZZHeight: integer;
		ExtData: pbyte;
		UserData: pshortint;
		WLayer: pLayer;
		IFont: pTextFont;
		MoreFlags: long;
		end;

	pPreferences = ^tPreferences;
	tPreferences = record
		FontHeight: shortint;
		PrinterPort: byte;
		BaudRate: word;
		KeyRptSpeed: ttimeval;
		KeyRptDelay: ttimeval;
		DoubleClick: ttimeval;
		PointerMatrix: array [0..35] of word;
		XOffset: shortint;
		YOffset: shortint;
		color17: word;
		color18: word;
		color19: word;
		PointerTicks: word;
		color0: word;
		color1: word;
		color2: word;
		color3: word;
		ViewXOffset: shortint;
		ViewYOffset: shortint;
		ViewInitX: integer;
		ViewInitY: integer;
		EnableCLI: word;
		PrinterType: word;
		PrinterFilename: array [0..29] of byte;
		PrintPitch: word;
		PrintQuality: word;
		PrintSpacing: word;
		PrintLeftMargin: word;
		PrintRightMargin: word;
		PrintImage: word;
		PrintAspect: word;
		PrintShade: word;
		PrintThreshold: integer;
		PaperSize: word;
		PaperLength: word;
		PaperType: word;
		SerRWBits: byte;
		SerStopBuf: byte;
		SerParShk: byte;
		LaceWB: byte;
		WorkName: array [0..29] of byte;
		RowSizeChange: shortint;
		ColumnSizeChange: shortint;
		PrintFlags: word;
		PrintMaxWidth: word;
		PrintMaxHeight: word;
		PrintDensity: byte;
		PrintXOffset: byte;
		wb_Width: word;
		wb_Height: word;
		wb_Depth: byte;
		ext_size: byte;
		end;

	pIntuitionBase = ^tIntuitionBase;
	tIntuitionBase = record
		LibNode: tLibrary;
		ViewLord: tView;
		ActiveWindow: pWindow;
		ActiveScreen: pScreen;
		FirstScreen: pScreen;
		Flags: long;
		MouseY: integer;
		MouseX: integer;
		Seconds: long;
		Micros: long;
		end;

	pIntuiText = ^tIntuiText;
	tIntuiText = record
		FrontPen: byte;
		BackPen: byte;
		DrawMode: byte;
		LeftEdge: integer;
		TopEdge: integer;
		ITextFont: pTextAttr;
		IText: pbyte;
		NextText: pIntuiText;
		end;

	tStringExtend = record
		Font: pTextFont;
		Pens: array [0..1] of byte;
		ActivePens: array [0..1] of byte;
		InitialModes: long;
		EditHook: pHook;
		WorkBuffer: pbyte;
		Reserved: array [0..3] of long;
		end;

	pgpInput = ^tgpInput;
	tgpInput = record
		MethodID: long;
		gpi_GInfo: pGadgetInfo;
		gpi_IEvent: pInputEvent;
		gpi_Termination: plongint;
		gpi_Mouse: record
		X: integer;
		Y: integer;
		end;
		end;

	pEasyStruct = ^tEasyStruct;
	tEasyStruct = record
		es_StructSize: long;
		es_Flags: long;
		es_Title: pbyte;
		es_TextFormat: pbyte;
		es_GadgetFormat: pbyte;
		end;

	tIBox = record
		Left: integer;
		Top: integer;
		Width: integer;
		Height: integer;
		end;

	pPGX = ^tPGX;
	tPGX = record
		pgx_Container: tIBox;
		pgx_NewKnob: tIBox;
		end;

	tRequester = record
		OlderRequest: pRequester;
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		RelLeft: integer;
		RelTop: integer;
		ReqGadget: pGadget;
		ReqBorder: pBorder;
		ReqText: pIntuiText;
		Flags: word;
		BackFill: byte;
		ReqLayer: pLayer;
		ReqPad1: array [0..31] of byte;
		ImageBMap: pBitMap;
		RWindow: pWindow;
		ReqImage: pImage;
		ReqPad2: array [0..31] of byte;
		end;

	pSGWork = ^tSGWork;
	tSGWork = record
		Gadget: pGadget;
		StringInfo: pStringInfo;
		WorkBuffer: pbyte;
		PrevBuffer: pbyte;
		Modes: long;
		IEvent: pInputEvent;
		Code: word;
		BufferPos: integer;
		NumChars: integer;
		Actions: long;
		LongInt_: longint;
		GadgetInfo: pGadgetInfo;
		EditOp: word;
		end;

	popAddTail = ^topAddTail;
	topAddTail = record
		MethodID: long;
		opat_List: pList;
		end;

	tGadgetInfo = record
		gi_Screen: pScreen;
		gi_Window: pWindow;
		gi_Requester: pRequester;
		gi_RastPort: pRastPort;
		gi_Layer: pLayer;
		gi_Domain: tIBox;
		gi_Pens: record
		DetailPen: byte;
		BlockPen: byte;
		end;
		gi_DrInfo: pDrawInfo;
		gi_Reserved: array [0..5] of long;
		end;

	tImage = record
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		Depth: integer;
		ImageData: pword;
		PlanePick: byte;
		PlaneOnOff: byte;
		NextImage: pImage;
		end;

	pPubScreenNode = ^tPubScreenNode;
	tPubScreenNode = record
		psn_Node: tNode;
		psn_Screen: pScreen;
		psn_Flags: word;
		psn_Size: integer;
		psn_VisitorCount: integer;
		psn_SigTask: pTask;
		psn_SigBit: byte;
		end;

	tGadget = record
		NextGadget: pGadget;
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		Flags: word;
		Activation: word;
		GadgetType: word;
		GadgetRender: pointer;
		SelectRender: pointer;
		GadgetText: pIntuiText;
		MutualExclude: longint;
		SpecialInfo: pointer;
		GadgetID: word;
		UserData: pointer;
		end;

	pBoolInfo = ^tBoolInfo;
	tBoolInfo = record
		Flags: word;
		Mask: pword;
		Reserved: long;
		end;

	tDrawInfo = record
		dri_Version: word;
		dri_NumPens: word;
		dri_Pens: pword;
		dri_Font: pTextFont;
		dri_Depth: word;
		dri_Resolution: record
		X: word;
		Y: word;
		end;
		dri_Flags: long;
		dri_Reserved: array [0..6] of long;
		end;

	p_Object = ^t_Object;
	t_Object = record
		o_Node: tMinNode;
		o_Class: pIClass;
		end;

	tMsg = record
		MethodID: long;
		end;

	tMenuItem = record
		NextItem: pMenuItem;
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		Flags: word;
		MutualExclude: longint;
		ItemFill: pointer;
		SelectFill: pointer;
		Command: shortint;
		SubItem: pMenuItem;
		NextSelect: word;
		end;

	pNewScreen = ^tNewScreen;
	tNewScreen = record
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		Depth: integer;
		DetailPen: byte;
		BlockPen: byte;
		ViewModes: word;
		Type_: word;
		Font: pTextAttr;
		DefaultTitle: pbyte;
		Gadgets: pGadget;
		CustomBitMap: pBitMap;
		end;

	pColorSpec = ^tColorSpec;
	tColorSpec = record
		ColorIndex: integer;
		Red: word;
		Green: word;
		Blue: word;
		end;

	pExtNewScreen = ^tExtNewScreen;
	tExtNewScreen = record
		LeftEdge: integer;
		TopEdge: integer;
		Width: integer;
		Height: integer;
		Depth: integer;
		DetailPen: byte;
		BlockPen: byte;
		ViewModes: word;
		Type_: word;
		Font: pTextAttr;
		DefaultTitle: pbyte;
		Gadgets: pGadget;
		CustomBitMap: pBitMap;
		Extension: pTagItem;
		end;



const
	SYSREQUEST = $4000;
	IDCMP_VANILLAKEY = $200000;
	SHOWTITLE = $10;
	GTYP_GTYPEMASK = 7;
	BEEPING = $20;
	TOPAZ_SIXTY = 9;
	FANFOLD = 0;
	ALTRIGHT = $20;
	IM_DRAWFRAME = $206;
	CHECKIT = 1;
	IDCMP_WBENCHMESSAGE = $20000;
	WFLG_WINDOWACTIVE = $2000;
	SSTOP_BITS = $F0;
	FRAMEICLASS = 'frameiclass';
	SYSISIZE_LOWRES = 1;
	GFLG_GADGIMAGE = 4;
	STRINGA_ReplaceMode = $8003200D;
	SDEPTHIMAGE = 5;
	DOWNBACKGADGET = 1;
	HIGHLIGHTTEXTPEN = 8;
	SBUF_4096 = 3;
	PGA_NewLook = $8003100A;
	PREDRAWN = 2;
	AUTOKNOB = 1;
	FREEVERT = 4;
	OKOK = 1;
	WBENCHCLOSE = 2;
	SPARITY_SPACE = 4;
	AUTOBACKPEN = 1;
	STRINGA_NoFilterMode = $8003200F;
	IA_Data = $80020007;
	KNOBVMIN = 4;
	WA_IDCMP = $8000006A;
	OM_REMOVE = $106;
	GMR_MEACTIVE = 0;
	GMR_REUSE = 4;
	SYSISIZE_HIRES = 2;
	SELECTUP = $E8;
	GA_Image = $8003000A;
	PGA_Freedom = $80031001;
	IM_ERASE = $204;
	DRAGGADGET = 4;
	SA_BitMap = $8000002E;
	OKIMATE_20 = 9;
	GREY_SCALE2 = $1000;
	STRINGA_MaxChars = $80032001;
	STRINGA_EditHook = $8003200B;
	GTYP_CUSTOMGADGET = 5;
	POPPUBSCREEN = 2;
	N_TRACTOR = $20;
	SHSHAKE_NONE = 2;
	ICCLASS = 'icclass';
	STRINGA_LongVal = $80032011;
	SA_Obsolete1 = $80000035;
	SBUFSIZE_BITS = $F;
	OM_REMMEMBER = $10A;
	STRINGA_EditModes = $8003200C;
	EVENTMAX = $A;
	CUSTOMBITMAP = $40;
	SHSHAKE_BITS = $F;
	GACT_LONGINT = $800;
	IDCMP_INACTIVEWINDOW = $80000;
	OSERR_NOCHIPS = 2;
	SHADE_GREYSCALE = 1;
	CORRECT_BLUE = 4;
	AUTOITEXTFONT = 0;
	BUTTONGCLASS = 'buttongclass';
	GA_RelHeight = $80030008;
	PGA_Top = $80031009;
	STDSCREENHEIGHT = $FFFFFFFF;
	KEYCODE_LESS = $38;
	GA_Disabled = $8003000E;
	GADGETCOUNT = 8;
	REQOFFWINDOW = $1000;
	CUSTOMSCREEN = $F;
	SA_PubName = $8000002F;
	US_LEGAL = $10;
	GA_UserData = $80030011;
	POINTREL = 1;
	GACT_ENDGADGET = 4;
	SA_BlockPen = $80000027;
	DIAB_630 = 4;
	MENUDOWN = $69;
	GA_DrawInfo = $80030021;
	PGA_VertBody = $80031006;
	UPIMAGE = $B;
	MXIMAGE = $F;
	HIGHBOX = $80;
	USEREQIMAGE = $20;
	GACT_LEFTBORDER = $20;
	ICA_Dummy = $80040000;
	IA_Mode = $80020012;
	FILLPEN = 5;
	LOWCOMMWIDTH = $10;
	OM_NOTIFY = $107;
	ICA_MAP = $80040002;
	IDCMP_RAWKEY = $400;
	SA_DetailPen = $80000026;
	W_TRACTOR = $30;
	EURO_A0 = $50;
	MENUNULL = $FFFF;
	MENUTOGGLED = $4000;
	IDCMP_REQSET = $80;
	WA_BlockPen = $80000069;
	WA_NoCareRefresh = $80000087;
	SCREENHIRES = $200;
	OSERR_PUBNOTUNIQUE = 5;
	EURO_A1 = $60;
	ALTLEFT = $10;
	GA_SpecialInfo = $80030012;
	PGA_Total = $80031007;
	PGA_Visible = $80031008;
	EO_ENTER = 5;
	WFLG_REFRESHBITS = $C0;
	WA_PubScreenName = $80000078;
	PARALLEL_PRINTER = 0;
	BAUD_110 = 0;
	US_LETTER = 0;
	EURO_A2 = $70;
	GA_Left = $80030001;
	GA_LeftBorder = $80030019;
	STRINGA_ExitHelp = $80032013;
	SA_PubSig = $80000030;
	SA_Behind = $80000037;
	SCREEN_DRAG = $4000;
	BAUD_300 = 1;
	EURO_A3 = $80;
	PGA_HorizBody = $80031004;
	STRINGA_Buffer = $80032002;
	ICSPECIAL_CODE = $80040003;
	DEPTHIMAGE = 0;
	RESCOUNT = 2;
	EO_DELBACKWARD = 2;
	ITEMTEXT = 2;
	GFLG_LABELITEXT = 0;
	KNOBHIT = $100;
	IDCMP_DELTAMOVE = $100000;
	WA_DetailPen = $80000068;
	WA_SizeBRight = $8000008E;
	DRIF_NEWLOOK = 1;
	EURO_A4 = $90;
	KEYCODE_GREATER = $39;
	IMAGECLASS = 'imageclass';
	GA_RelRight = $80030002;
	LORIENT_HORIZ = 1;
	IA_Left = $80020001;
	IA_APattern = $80020010;
	CLOSEIMAGE = 3;
	EO_MOVECURSOR = 4;
	GFLG_GADGHCOMP = 0;
	GACT_STRINGRIGHT = $400;
	IDCMP_INTUITICKS = $400000;
	WA_DepthGadget = $80000083;
	EURO_A5 = $A0;
	INTEGER_SCALING = $100;
	STRINGA_UndoBuffer = $80032003;
	GFLG_GADGHNONE = 3;
	MENUCANCEL = 2;
	WA_CloseGadget = $80000084;
	MOUSE_ACCEL = $8000;
	EURO_A6 = $B0;
	AUTOFRONTPEN = 0;
	GA_RelWidth = $80030006;
	GA_Height = $80030007;
	STRINGA_BufferPos = $80032005;
	STRINGA_DispPos = $80032006;
	EO_RESET = 6;
	SGA_END = 2;
	MIDRAWN = $100;
	GFLG_LABELMASK = $3000;
	OKABORT = 4;
	WFLG_SUPER_BITMAP = $80;
	BAUD_19200 = 6;
	EURO_A7 = $C0;
	AUTOTOPEDGE = 3;
	PGA_VertPot = $80031005;
	STRINGA_ActivePens = $8003200A;
	IDCMP_MENUVERIFY = $2000;
	WFLG_RMBTRAP = $10000;
	LACEWB = 1;
	EURO_A8 = $D0;
	AMIGARIGHT = $80;
	IA_Height = $80020004;
	IA_LineWidth = $80020008;
	SGM_REPLACE = 1;
	GACT_IMMEDIATE = 2;
	GACT_BOOLEXTEND = $2000;
	MAXBODY = $FFFF;
	SHADE_COLOR = 2;
	CORRECT_RGB_MASK = 7;
	CHECKWIDTH = $13;
	GA_SysGadget = $8003001D;
	PGA_Dummy = $80031000;
	STRINGA_Pens = $80032009;
	EO_REPLACECHAR = 7;
	COMMSEQ = 4;
	NOISYREQ = 4;
	STRINGA_Font = $80032008;
	ICM_Dummy = $401;
	IA_EdgesOnly = $80020017;
	SGM_NOFILTER = 4;
	SGM_EXITHELP = $80;
	WA_MinHeight = $80000073;
	GA_Border = $8003000B;
	GA_SysGType = $8003001E;
	GM_GOACTIVE = 2;
	IM_HITFRAME = $208;
	GACT_FOLLOWMOUSE = 8;
	IDCMP_LONELYMESSAGE = $80000000;
	OSERR_UNKNOWNMODE = 6;
	ASPECT_HORIZ = 0;
	PIXEL_DIMENSIONS = $40;
	GA_Selected = $80030013;
	STRINGA_TextVal = $80032012;
	RIGHTIMAGE = $C;
	ISDRAWN = $1000;
	GTYP_GADGET0002 = 2;
	WFLG_SIZEGADGET = 1;
	WA_MaxHeight = $80000075;
	CBM_MPS1000 = 3;
	GA_Immediate = $80030015;
	PGA_HorizPot = $80031003;
	LORIENT_NONE = 0;
	IDCMP_SIZEVERIFY = 1;
	MENUWAITING = 3;
	WA_WBenchWindow = $8000008B;
	SCREENQUIET = $100;
	SA_Left = $80000021;
	SA_PubTask = $80000031;
	WA_Flags = $8000006B;
	SA_ErrorCode = $8000002A;
	GA_Top = $80030003;
	GA_SelectRender = $8003000C;
	GA_TopBorder = $8003001A;
	IA_Pens = $8002000E;
	IM_FRAMEBOX = $207;
	WA_SuperBitMap = $80000071;
	WA_SizeGadget = $80000081;
	OSCAN_VIDEO = 4;
	GROUPGCLASS = 'groupgclass';
	GA_RightBorder = $80030018;
	LAYOUTA_Spacing = $80038002;
	IA_Font = $80020013;
	WFLG_HASZOOM = $20000000;
	WA_MenuHelp = $80000092;
	IMAGE_NEGATIVE = 1;
	GA_ToggleSelect = $8003001C;
	IA_Top = $80020002;
	GTYP_BOOLGADGET = 1;
	WA_Left = $80000064;
	SA_Height = $80000024;
	PSNF_PRIVATE = 1;
	CORRECT_RED = 1;
	FLOYD_DITHERING = $400;
	MIDDLEDOWN = $6A;
	MODELCLASS = 'modelclass';
	OPUF_INTERIM = 1;
	GA_Width = $80030005;
	STRINGA_WorkBuffer = $80032004;
	IDS_BUSY = 3;
	SIZEGADGET = 2;
	HIGHIMAGE = 0;
	WFLG_SIZEBBOTTOM = $20;
	SA_Depth = $80000025;
	EPSON_JX_80 = 8;
	CURSORUP = $4C;
	IA_Recessed = $80020015;
	WBENCHOPEN = 1;
	IA_Width = $80020003;
	MENUHOT = 1;
	WA_PubScreen = $80000079;
	FILLTEXTPEN = 6;
	IA_DoubleEmboss = $80020016;
	GFLG_GADGHIGHBITS = 3;
	WFLG_NW_EXTENDED = $40000;
	WA_Height = $80000067;
	WA_SizeBBottom = $8000008F;
	SBUF_16000 = 5;
	GA_RelBottom = $80030004;
	GA_Highlight = $8003000D;
	GA_RelVerify = $80030016;
	GA_Next = $80030020;
	SGM_FIXEDFIELD = 2;
	GFLG_RELHEIGHT = $40;
	GACT_STRINGLEFT = 0;
	IDCMP_REQCLEAR = $1000;
	IDCMP_CHANGEWINDOW = $2000000;
	WA_Gadgets = $8000006C;
	WA_Checkmark = $8000006D;
	WA_MinWidth = $80000072;
	NS_EXTENDED = $1000;
	HP_LASERJET = $B;
	SPARITY_MARK = 3;
	GFLG_DISABLED = $100;
	GACT_ACTIVEGADGET = $4000;
	TOPAZ_EIGHTY = 8;
	IM_DRAW = $202;
	IDCMP_GADGETUP = $40;
	WA_MaxWidth = $80000074;
	WA_InnerHeight = $80000077;
	WA_Backdrop = $80000085;
	SA_Pens = $8000003A;
	OM_ADDTAIL = $105;
	PGA_Borderless = $80031002;
	SA_Font = $8000002B;
	DIAB_ADV_D25 = 5;
	SPARITY_EVEN = 1;
	AMIGALEFT = $40;
	STRINGA_Dummy = $80032000;
	LAYOUTA_LayoutObj = $80038001;
	IDCMP_REFRESHWINDOW = 4;
	WFLG_BORDERLESS = $800;
	SA_Top = $80000022;
	HALFTONE_DITHERING = $200;
	DIMENSIONS_MASK = $F0;
	ICTARGET_IDCMP = $FFFFFFFF;
	SINGLE = $80;
	SBUF_512 = 0;
	SPARITY_NONE = 0;
	GA_Text = $80030009;
	SGA_USE = 1;
	HIGHFLAGS = $C0;
	TEXTPEN = 2;
	DEADEND_ALERT = $80000000;
	DMODECOUNT = 2;
	NOREQBACKFILL = $40;
	SA_Width = $80000023;
	SPARITY_BITS = $F0;
	AUTONEXTTEXT = 0;
	GA_Dummy = $80030000;
	LORIENT_VERT = 2;
	ICA_TARGET = $80040001;
	LEFTIMAGE = $A;
	EO_UNDO = $B;
	WA_Top = $80000065;
	QUME_LP_20 = $A;
	ABSOLUTE_DIMENSIONS = $20;
	FRAMEF_SPECIFY = 1;
	EO_SPECIAL = $D;
	SGH_KEY = 1;
	GTYP_SUPFRONT = $50;
	IDCMP_REQVERIFY = $800;
	WFLG_VISITOR = $8000000;
	SA_Title = $80000028;
	OSCAN_STANDARD = 2;
	ANTI_ALIAS = $800;
	IA_Dummy = $80020000;
	WFLG_SIZEBRIGHT = $10;
	OSERR_NOCHIPMEM = 4;
	CUSTOM_NAME = 0;
	SHSHAKE_XON = 0;
	LAYOUTA_Dummy = $80038000;
	IM_MOVE = $205;
	MENUTOGGLE = 8;
	GACT_ALTKEYMAP = $1000;
	IDCMP_DISKINSERTED = $8000;
	WA_Width = $80000066;
	WA_WindowName = $8000007B;
	SA_FullPalette = $8000003B;
	POINTERSIZE = $24;
	CURSORRIGHT = $4E;
	GA_BottomBorder = $8003001B;
	SG_DEFAULTMAXCHARS = $80;
	IDCMP_MOUSEMOVE = $10;
	WFLG_NOCAREREFRESH = $20000;
	WFLG_ZOOMED = $10000000;
	SELECTDOWN = $68;
	GFLG_GADGHBOX = 1;
	GTYP_WUPFRONT = $40;
	IDCMP_MENUPICK = $100;
	WA_Title = $8000006E;
	WA_Activate = $80000089;
	BACKGROUNDPEN = 7;
	ICM_SETLOOP = $402;
	EO_NOOP = 1;
	WA_InnerWidth = $80000076;
	SA_Type = $8000002D;
	SHSHAKE_RTS = 1;
	DITHERING_MASK = $600;
	IA_BGPen = $80020006;
	PROPNEWLOOK = $10;
	IDCMP_MENUHELP = $1000000;
	WFLG_REPORTMOUSE = $200;
	WA_ScreenTitle = $8000006F;
	DETAILPEN = 0;
	SA_Quiet = $80000038;
	ASPECT_VERT = 1;
	HP_LASERJET_PLUS = $C;
	BOUNDED_DIMENSIONS = $10;
	NOITEM = $3F;
	GFLG_TABCYCLE = $200;
	GTYP_PROPGADGET = 3;
	STDSCREENWIDTH = $FFFFFFFF;
	SGM_LONGINT = $40;
	GTYP_GADGETTYPE = $FC00;
	LW_RESERVED = 1;
	SPARITY_ODD = 2;
	IDS_INACTIVENORMAL = 5;
	GFLG_SELECTED = $80;
	WA_GimmeZeroZero = $80000091;
	NSTAG_EXT_VPMODE = $80000001;
	PROPGCLASS = 'propgclass';
	GREDRAW_TOGGLE = 0;
	IA_FGPen = $80020005;
	SUPFRONTGADGET = 5;
	DRI_VERSION = 1;
	SA_Dummy = $80000020;
	SA_SysFont = $8000002C;
	LETTER = $100;
	GA_GZZGadget = $8003000F;
	GM_Dummy = $FFFFFFFF;
	GREDRAW_UPDATE = 2;
	IA_Outline = $80020014;
	GACT_TOPBORDER = $40;
	SA_Colors = $80000029;
	SREAD_BITS = $F0;
	AMIGAKEYS = $C0;
	GM_HANDLEINPUT = 3;
	DOWNIMAGE = $D;
	WA_Zoom = $8000007D;
	OSERR_NOMEM = 3;
	NOMENU = $1F;
	FILLRECTCLASS = 'fillrectclass';
	GA_IntuiText = $80030022;
	GREDRAW_REDRAW = 1;
	GMR_NOREUSE = 2;
	IDCMP_ACTIVEWINDOW = $40000;
	WA_AutoAdjust = $80000090;
	SCREENTYPE = $F;
	SA_ShowTitle = $80000036;
	SA_AutoScroll = $80000039;
	SIX_LPI = 0;
	SGM_CONTROL = $20;
	IDCMP_IDCMPUPDATE = $800000;
	WA_Dummy = $80000063;
	WA_RptQueue = $80000080;
	BAUD_MIDI = 7;
	SIZEIMAGE = 2;
	LOWRESPICK = 1;
	SGM_NOWORKB = $10;
	WFLG_SIMPLE_REFRESH = $40;
	WA_Colors = $8000007C;
	SGA_PREVACTIVE = $40;
	NUMDRIPENS = 9;
	SCREENBEHIND = $80;
	SA_Overscan = $80000034;
	DRAFT = 0;
	GA_FollowMouse = $80030017;
	IMAGE_POSITIVE = 0;
	ALPHA_P_101 = 1;
	LOWCHECKWIDTH = $D;
	ICM_CHECKLOOP = $404;
	IM_ERASEFRAME = $209;
	EO_BIGCHANGE = $A;
	SGA_NEXTACTIVE = $20;
	GACT_RELVERIFY = 1;
	GACT_TOGGLESELECT = $100;
	PROPBORDERLESS = 8;
	IDCMP_NEWPREFS = $4000;
	ELITE = $400;
	OM_Dummy = $100;
	CLF_INLIST = 1;
	IDS_INACTIVEDISABLED = 7;
	HIRESPICK = 0;
	GFLG_RELBOTTOM = 8;
	GTYP_SCRGADGET = $4000;
	GTYP_REQGADGET = $1000;
	MAXPOT = $FFFF;
	WA_SimpleRefresh = $8000008C;
	AUTOSCROLL = $4000;
	BAUD_1200 = 2;
	GA_ID = $80030010;
	IDS_NORMAL = 0;
	REQACTIVE = $2000;
	ORDERED_DITHERING = 0;
	MENUUP = $E9;
	CURSORLEFT = $4F;
	SYSIA_DrawInfo = $80020018;
	GTYP_SDRAGGING = $30;
	OKCANCEL = 2;
	WA_RMBTrap = $8000008A;
	WA_SmartRefresh = $8000008D;
	CUSTOM = $40;
	SWRITE_BITS = $F;
	KEYCODE_B = $35;
	OM_GET = $104;
	WFLG_BACKDROP = $100;
	BAUD_2400 = 3;
	WA_MouseQueue = $8000007E;
	DIAB_C_150 = 6;
	GMR_GADGETHIT = 4;
	SGH_CLICK = 2;
	SHANGHAI = 1;
	ZOOMIMAGE = 1;
	GFLG_GADGHIMAGE = 2;
	GTYP_WDRAGGING = $20;
	SHADOWPEN = 4;
	SYSISIZE_MEDRES = 0;
	WA_CustomScreen = $80000070;
	GMR_PREVACTIVE = $20;
	ICM_CLEARLOOP = $403;
	IDS_INDETERMINATE = 4;
	DEFERREFRESH = $8000;
	GTYP_SDOWNBACK = $70;
	IDCMP_DISKREMOVED = $10000;
	UPFRONTGADGET = 0;
	FILENAME_SIZE = $1E;
	BAUD_4800 = 4;
	COMMWIDTH = $1B;
	GMR_NEXTACTIVE = $10;
	SYSIA_Which = $8002000D;
	GTYP_SIZING = $10;
	WBENCHSCREEN = 1;
	OM_DISPOSE = $102;
	GM_GOINACTIVE = 4;
	IDS_DISABLED = 2;
	GFLG_LABELIMAGE = $2000;
	FREEHORIZ = 2;
	WA_Borderless = $80000088;
	SYSIA_Depth = $8002000C;
	EO_DELFORWARD = 3;
	GTYP_WDOWNBACK = $60;
	SERIAL_PRINTER = 1;
	BAUD_9600 = 5;
	AUTOLEFTEDGE = 6;
	OM_NEW = $101;
	STRINGA_FixedFieldMode = $8003200E;
	MULTIPLY_DIMENSIONS = $80;
	KEYCODE_M = $37;
	GA_Previous = $8003001F;
	CHECKED = $100;
	GFLG_RELRIGHT = $10;
	WFLG_ACTIVATE = $1000;
	WFLG_MENUSTATE = $8000;
	PICA = 0;
	CURSORDOWN = $4D;
	KEYCODE_N = $36;
	OM_SET = $103;
	GA_LabelImage = $80030023;
	SIMPLEREQ = $10;
	WA_PubScreenFallBack = $8000007A;
	RECOVERY_ALERT = 0;
	OM_ADDMEMBER = $109;
	STRINGA_Justification = $80032010;
	GFLG_RELWIDTH = $20;
	GACT_BOTTOMBORDER = $80;
	WFLG_WINDOWREFRESH = $1000000;
	BLOCKPEN = 1;
	OSCAN_TEXT = 1;
	CORRECT_GREEN = 2;
	LAYOUTA_Orientation = $80038003;
	GM_HITTEST = 0;
	GM_RENDER = 1;
	IDS_INACTIVESELECTED = 6;
	HIGHCOMP = $40;
	HIGHITEM = $2000;
	GTYP_CLOSE = $80;
	GTYP_STRGADGET = 4;
	EPSON = 7;
	ALERT_TYPE = $80000000;
	KEYCODE_Q = $10;
	SDOWNBACKGADGET = 6;
	ITEMENABLED = $10;
	HIGHNONE = $C0;
	DEFAULTMOUSEQUEUE = 5;
	PUBLICSCREEN = 2;
	MAXPUBSCREENNAME = $8B;
	EIGHT_LPI = $200;
	BROTHER_15XL = 2;
	GMR_VERIFY = 8;
	IM_HITTEST = $203;
	GTYP_GZZGADGET = $2000;
	OSERR_NOMONITOR = 1;
	FINE = $800;
	NOSUB = $1F;
	STRGCLASS = 'strgclass';
	GA_EndGadget = $80030014;
	IDCMP_GADGETDOWN = $20;
	WFLG_DEPTHGADGET = 4;
	STRINGA_AltKeyMap = $80032007;
	EO_INSERTCHAR = 8;
	GACT_STRINGCENTER = $200;
	WFLG_DRAGBAR = 2;
	WFLG_CLOSEGADGET = 8;
	SDRAGGADGET = 7;
	SGA_REDISPLAY = $10;
	GACT_BORDERSNIFF = $8000;
	WA_ReportMouse = $80000086;
	OSCAN_MAX = 3;
	CENTER_IMAGE = 8;
	MIDDLEUP = $EA;
	KEYCODE_V = $34;
	SYSIA_Size = $8002000B;
	EO_BADFORMAT = 9;
	GTYP_SYSGADGET = $8000;
	ROOTCLASS = 'rootclass';
	CUSTOMIMAGEDEPTH = $FFFFFFFF;
	MENUENABLED = 1;
	KNOBHMIN = 6;
	WFLG_GIMMEZEROZERO = $400;
	WFLG_INREQUEST = $4000;
	RI_VERSION = 1;
	SBUF_1024 = 1;
	KEYCODE_X = $32;
	FRBUTTONCLASS = 'frbuttonclass';
	IA_APatSize = $80020011;
	SGA_BEEP = 4;
	IDCMP_CLOSEWINDOW = $200;
	WFLG_OTHER_REFRESH = $C0;
	SBUF_8000 = 4;
	GFLG_LABELSTRING = $1000;
	BOOLMASK = 1;
	WFLG_WINDOWTICKED = $4000000;
	KEYCODE_Z = $31;
	GADGETCLASS = 'gadgetclass';
	CLOSEGADGET = 3;
	IGNORE_DIMENSIONS = 0;
	SYSICLASS = 'sysiclass';
	OM_UPDATE = $108;
	IDS_SELECTED = 1;
	LOWRESGADGET = 1;
	SGA_REUSE = 8;
	GACT_STRINGEXTEND = $2000;
	SHINEPEN = 3;
	SA_DClip = $80000033;
	GA_TabCycle = $80030024;
	IA_Resolution = $8002000F;
	EO_CLEAR = $C;
	SGM_NOCHANGE = 8;
	GFLG_STRINGEXTEND = $400;
	WFLG_WBENCHWINDOW = $2000000;
	WA_BackFill = $8000007F;
	WA_DragBar = $80000082;
	GACT_RIGHTBORDER = $10;
	IDCMP_MOUSEBUTTONS = 8;
	WFLG_SMART_REFRESH = 0;
	CHECKIMAGE = $E;
	IDCMP_NEWSIZE = 2;
	SA_DisplayID = $80000032;
	SHADE_BW = 0;
	SBUF_2048 = 2;
	AUTODRAWMODE = 1;
	HIRESGADGET = 0;




IMPLEMENTATION
end.