/*
 * 5799-WZQ (C) COPYRIGHT = NONE
 * LICENSED MATERIALS - PROPERTY OF IBM
 */
/* $Header:frame.c 12.0$ */
/* $ACIS:frame.c 12.0$ */
/* $Source: /ibm/acis/usr/src/usr.lib/libplot/vt0/RCS/frame.c,v $ */

#ifndef lint
static char *rcsid = "$Header:frame.c 12.0$";
#endif

#ifndef lint
static char sccsid[] = "@(#)frame.c	4.1 (Berkeley) 6/27/83";
#endif

frame(n)
{
	extern vti;
	n=n&0377 | 02000;
	write(vti,&n,2);
}
