#include "defs.h"


/* draw rectangle with text inside */

INT	xdelta[] = {
	4, 4};	/* text fdeltas in box */

INT	ydelta[] = {
	4, 18};

sbox(xp, yp, xd, yd, txt, pos)
	INT	xp, yp, xd, yd, pos;
	STRING	txt;
{
	REG INT sxp, syp;
	INT	sxd, syd;
	REG INT del;
	DL1	p;

	del = xymul * xp; 
	sxp = xoff + del;
	del = xymul * yp; 
	syp = yoff + del;
	sxd = xymul * xd;
	syd = xymul * yd;
	mode(GRAPH);
	p->x = sxp; 
	p->y = syp; 
	vector(p);
	p->y = syp + syd; 
	vector(p);
	p->x = sxp + sxd; 
	vector(p);
	p->y = syp; 
	vector(p);
	p->x = sxp; 
	vector(p);
	if (pos < 0)
	{
		p->x = sxp + sxd; 
		p->y = syp + syd;
		vector(p);
		mode(GRAPH);
		p->x = sxp; 
		vector(p);
		p->x = sxp + sxd; 
		p->y = syp;
		vector(p);
	}
	else if (txt)
	{
		p->x = sxp + xdelta[pos];
		p->y = syp + ydelta[pos];
		textat(p,txt);
	}
}