struct Image FillImage = {
	0,10,
	640,512,
	2,
	NULL,
	0,
	1,
	NULL
};

struct Gadget FillGadg = {
	NULL,
	0,0,
	0,0,
	GADGIMAGE,
	NULL,
	BOOLGADGET,
	(APTR)&FillImage,
	NULL, NULL, NULL, NULL, NULL, NULL
};


 UBYTE Gadget17SIBuff[35] =
	"Welcome! PAYMENT selected";
 struct StringInfo Gadget17SInfo = {
	Gadget17SIBuff,	
	NULL,	
	0,	
	35,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors5[] = {
	0,0,
	257,0,
	257,9,
	0,9,
	0,0
};
 struct Border Border5 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors5,	
	NULL	
};

 struct Gadget Gadget17 = {
	&FillGadg,	
	132,118,	
	263,8,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY,	
	STRGADGET,	
	(APTR)&Border5,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget17SInfo,	
	NULL,	
	NULL	
};

 UBYTE Gadget16SIBuff[18] = "$ 5858.09    ";
 struct StringInfo Gadget16SInfo = {
	Gadget16SIBuff,	
	NULL,	
	0,	
	18,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors6[] = {
	0,0,
	113,0,
	113,9,
	0,9,
	0,1
};
 struct Border Border6 = {
	-1,-1,	
	2,1,COMPLEMENT,	
	5,	
	BorderVectors6,	
	NULL	
};

 struct Gadget Gadget16 = {
	&Gadget17,	
	274,102,	
	118,9,	
	NULL,	
	NULL,	
	STRGADGET,	
	(APTR)&Border6,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget16SInfo,	
	NULL,	
	NULL	
};

 UBYTE Gadget15SIBuff[18] = "$ 132.15     ";
 struct StringInfo Gadget15SInfo = {
	Gadget15SIBuff,	
	NULL,	
	0,	
	18,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors1[] = {
	0,0,
	113,0,
	113,9,
	0,9,
	0,1
};
 struct Border Border1 = {
	-1,-1,	
	2,1,COMPLEMENT,	
	5,	
	BorderVectors1,	
	NULL	
};

 struct Gadget Gadget15 = {
	&Gadget16,	
	133,102,	
	118,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY,	
	STRGADGET,	
	(APTR)&Border1,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget15SInfo,	
	NULL,	
	NULL	
};

 UBYTE Gadget14SIBuff[18] = "$ 0.00       ";
 struct StringInfo Gadget14SInfo = {
	Gadget14SIBuff,	
	NULL,	
	0,	
	18,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors7[] = {
	0,0,
	113,0,
	113,9,
	0,9,
	0,1
};
 struct Border Border7 = {
	-1,-1,	
	2,1,COMPLEMENT,	
	5,	
	BorderVectors7,	
	NULL	
};

 struct Gadget Gadget14 = {
	&Gadget15,	
	133,87,	
	118,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY,	
	STRGADGET,	
	(APTR)&Border7,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget14SInfo,	
	NULL,	
	NULL	
};

 UBYTE Gadget13SIBuff[18] =
	" 10 yrs 0 mo.";
 struct StringInfo Gadget13SInfo = {
	Gadget13SIBuff,	
	NULL,	
	0,	
	18,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors8[] = {
	0,0,
	113,0,
	113,9,
	0,9,
	0,1
};
 struct Border Border8 = {
	-1,-1,	
	2,1,COMPLEMENT,	
	5,	
	BorderVectors8,	
	NULL	
};

 struct Gadget Gadget13 = {
	&Gadget14,	
	132,72,	
	118,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY,	
	STRGADGET,	
	(APTR)&Border8,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget13SInfo,	
	NULL,	
	NULL	
};

 UBYTE Gadget12SIBuff[18] =
	" 10.00 %     ";
 struct StringInfo Gadget12SInfo = {
	Gadget12SIBuff,	
	NULL,	
	0,	
	18,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors9[] = {
	0,0,
	113,0,
	113,9,
	0,9,
	0,1
};
 struct Border Border9 = {
	-1,-1,	
	2,1,COMPLEMENT,	
	5,	
	BorderVectors9,	
	NULL	
};

 struct Gadget Gadget12 = {
	&Gadget13,	
	132,57,	
	118,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY,	
	STRGADGET,	
	(APTR)&Border9,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget12SInfo,	
	NULL,	
	NULL	
};

 UBYTE Gadget11SIBuff[18] =
	"$ 10,000.00  ";
 struct StringInfo Gadget11SInfo = {
	Gadget11SIBuff,	
	NULL,	
	0,	
	18,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors12[] = {
	0,0,
	113,0,
	113,9,
	0,9,
	0,1
};
 struct Border Border12 = {
	-1,-1,	
	2,1,COMPLEMENT,	
	5,	
	BorderVectors12,	
	NULL	
};

 struct Gadget Gadget11 = {
	&Gadget12,	
	133,42,	
	118,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY,	
	STRGADGET,	
	(APTR)&Border12,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget11SInfo,	
	NULL,	
	NULL	
};

 UBYTE Gadget10SIBuff[5] = 	"1  ";
 struct StringInfo Gadget10SInfo = {
	Gadget10SIBuff,	
	NULL,	
	0,	
	5,	
	0,	
	0,0,0,0,0,	
	0,	
	0,	
	NULL	
};

 SHORT BorderVectors3[] = {
	0,0,
	25,0,
	25,9,
	0,9,
	0,0
};
 struct Border Border3 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors3,	
	NULL	
};

 struct Gadget Gadget10 = {
	&Gadget11,	
	405,57,	
	28,8,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY+LONGINT,	
	STRGADGET,	
	(APTR)&Border3,	
	NULL,	
	NULL,	
	NULL,	
	(APTR)&Gadget10SInfo,	
	NULL,	
	NULL	
};

 SHORT BorderVectors2[] = {
	0,0,
	60,0,
	60,10,
	0,10,
	0,0
};
 struct Border Border2 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors2,	
	NULL	
};

 struct IntuiText IText1 = {
	2,1,JAM2,	
	9,1,	
	NULL,	
	(UBYTE *)"U.S.A.",	
	NULL	
};

 struct Gadget Gadget9 = {
	&Gadget10,	
	272,41,	
	59,9,	
	SELECTED,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border2,	
	NULL,	
	&IText1,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};
 
 SHORT BorderVectors10[] = {
	0,0,
	97,0,
	97,10,
	0,10,
	0,0
};
 struct Border Border10 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors10,	
	NULL	
};

 struct IntuiText IText3 = {
	2,1,JAM2,	
	15,1,	
	NULL,	
	(UBYTE *)"Calculate",	
	NULL	
};

 struct Gadget Gadget8 = {
	&Gadget9,	
	422,118,	
	96,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY,	
	BOOLGADGET,	
	(APTR)&Border10,	
	NULL,	
	&IText3,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};

SHORT BorderVectors4[] = {
	0,0,
	97,0,
	97,10,
	0,10,
	0,0
};
 struct Border Border4 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors4,	
	NULL	
};

 struct IntuiText IText2 = {
	2,1,JAM2,	
	24,1,	
	NULL,	
	(UBYTE *)"Print",	
	NULL	
};

 struct Gadget Gadget7 = {
	&Gadget8,	
	422,102,	
	96,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border4,	
	NULL,	
	&IText2,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};

 SHORT BorderVectors11[] = {
	0,0,
	60,0,
	60,10,
	0,10,
	0,0
};
 struct Border Border11 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors11,	
	NULL	
};

 struct IntuiText IText4 = {
	2,1,JAM2,	
	5,1,	
	NULL,	
	(UBYTE *)"CANADA",	
	NULL	
};

 struct Gadget Gadget6 = {
	&Gadget7,	
	370,41,	
	59,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border11,	
	NULL,	
	&IText4,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};
 SHORT BorderVectors13[] = {
	0,0,
	96,0,
	96,10,
	0,10,
	0,0
};
 struct Border Border13 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors13,	
	NULL	
};

 struct IntuiText IText5 = {
	2,1,JAM2,	
	16,1,	
	NULL,	
	(UBYTE *)"Payment",	
	NULL	
};

 struct Gadget Gadget5 = {
	&Gadget6,	
	22,101,	
	95,9,	
	SELECTED,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border13,	
	NULL,	
	&IText5,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};

 SHORT BorderVectors14[] = {
	0,0,
	96,0,
	96,10,
	0,10,
	0,0
};
 struct Border Border14 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors14,	
	NULL	
};

 struct IntuiText IText6 = {
	2,1,JAM2,	
	16,1,	
	NULL,	
	(UBYTE *)"Balance",	
	NULL	
};

 struct Gadget Gadget4 = {
	&Gadget5,	
	23,86,	
	95,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border14,	
	NULL,	
	&IText6,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};

 SHORT BorderVectors15[] = {
	0,0,
	98,0,
	98,10,
	0,10,
	0,0
};
 struct Border Border15 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors15,	
	NULL	
};

 struct IntuiText IText7 = {
	2,1,JAM2,	
	15,1,	
	NULL,	
	(UBYTE *)"Period",	
	NULL	
};

 struct Gadget Gadget3 = {
	&Gadget4,	
	22,71,	
	97,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border15,	
	NULL,	
	&IText7,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};

 SHORT BorderVectors16[] = {
	0,0,
	98,0,
	98,10,
	0,10,
	0,0
};
 struct Border Border16 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors16,	
	NULL	
};

 struct IntuiText IText8 = {
	2,1,JAM2,	
	13,1,	
	NULL,	
	(UBYTE *)"Rate",	
	NULL	
};

 struct Gadget Gadget2 = {
	&Gadget3,	
	22,56,	
	97,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border16,	
	NULL,	
	&IText8,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};

 SHORT BorderVectors17[] = {
	0,0,
	99,0,
	99,10,
	0,10,
	0,0
};
 struct Border Border17 = {
	-1,-1,	
	2,1,JAM1,	
	5,	
	BorderVectors17,	
	NULL	
};

 struct IntuiText IText9 = {
	2,1,JAM2,	
	16,1,	
	NULL,	
	(UBYTE *)"Principal",	
	NULL	
};

 struct Gadget Gadget1 = {
	&Gadget2,	
	21,41,	
	98,9,	
	NULL,	
	GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,	
	BOOLGADGET,	
	(APTR)&Border17,	
	NULL,	
	&IText9,	
	NULL,	
	NULL,	
	NULL,	
	NULL	
};

#define GadgetList1 Gadget1

struct IntuiText IText17 = {
	2,1,JAM2,	
	133,130,	
	NULL,	
	(UBYTE *)"Hit right Amiga-X to clear a box",	
	NULL	
};

struct IntuiText IText16 = {
	2,1,JAM2,	
	437,57,	
	NULL,	
	(UBYTE *)"month(s)",	
	&IText17	
};

struct IntuiText IText15 = {
	2,1,JAM2,	
	276,57,	
	NULL,	
	(UBYTE *)"Compounded over ",	
	&IText16	
};

struct IntuiText IText12 = {
	2,1,JAM2,	
	66,118,	
	NULL,	
	(UBYTE *)"STATUS:",	
	&IText15	
};

struct IntuiText IText11 = {
	2,1,JAM2,	
	23,21,	
	NULL,	
	(UBYTE *)"Mortgage Calculator v2.5  »**«  Michel Laliberté, August 1990",	
	&IText12	
};

 struct IntuiText IText10 = {
	2,1,JAM2,	
	292,88,	
	NULL,	
	(UBYTE *)"Interest",	
	&IText11	
};

#define IntuiTextList1 IText10

 struct NewWindow NewWindowStructure1 = {
	26,36,	
	543,143,	
	0,1,	
	GADGETUP+GADGETDOWN+CLOSEWINDOW+RAWKEY,	
	WINDOWDRAG+WINDOWDEPTH+WINDOWCLOSE+ACTIVATE,	
	&Gadget1,	
	NULL,	
	(UBYTE *)"MortCalc",	
	NULL,	
	NULL,	
	5,5,	
	640,200,	
	WBENCHSCREEN	
};