/*
**	text.c
**
*/

#include <X11/Intrinsic.h>
#include <X11/StringDefs.h>
#include <X11/Form.h>
#include <X11/AsciiText.h>

void make_text (parent_widget, 
		text_widget, text_name, 
		file_name, window_height, window_width,
		left_neighbour, left_distance, top_neighbour, top_distance)

Widget		parent_widget, *text_widget, left_neighbour, top_neighbour;
String		text_name, file_name;
Dimension	window_height, window_width;
int		left_distance, top_distance;

{
	int	i;
	Arg	text_args [30];

	i = 0;
	XtSetArg (text_args [i], XtNtype, (XtArgVal) XawAsciiFile);
	i++;
	XtSetArg (text_args [i], XtNstring, (XtArgVal) file_name);
	i++;
	XtSetArg (text_args [i], XtNscrollVertical, 
	   (XtArgVal) XawtextScrollWhenNeeded);
	i++;
	XtSetArg (text_args [i], XtNscrollHorizontal,
	   (XtArgVal) XawtextScrollWhenNeeded);
	i++;
	XtSetArg (text_args [i], XtNheight, (XtArgVal) window_height);
	i++;
	XtSetArg (text_args [i], XtNwidth, (XtArgVal) window_width);
	i++;
	XtSetArg (text_args [i], XtNfromHoriz, (XtArgVal) left_neighbour);
	i++;
	XtSetArg (text_args [i], XtNhorizDistance, (XtArgVal) left_distance);
	i++;
	XtSetArg (text_args [i], XtNfromVert, (XtArgVal) top_neighbour);
	i++;
	XtSetArg (text_args [i], XtNvertDistance, (XtArgVal) top_distance);
	i++;

	*text_widget = XtCreateManagedWidget (text_name, asciiTextWidgetClass,
				parent_widget, text_args, i);
}