/* Plotting functions for v8 and v9 systems */
/* This file is an alternative to plot.h */
/* open the plotting output */
#define openpl() print("o\n")
/* close the plotting output */
#define closepl() print("cl\n")
/* make sure the page or screen is clear */
#define erase() print("e\n")
/* plot a point at _x,_y, which becomes current */
#define point(_x,_y) print("poi %d %d\n", _x,_y)
/* coordinates to be assigned to lower left and upper right
corners of (square) plotting area */
#define range(_x,_y,_X,_Y) print("ra %d %d %d %d\n", _x,_y,_X,_Y)
/* place text, first letter at current point, which does not change */
#define text(_s) {if(*(_s) == ' ')print("t \"%s\"\n",_s); else print("t %s\n", _s); }
/* draw line from current point to _x,_y, which becomes current */
#define vec(_x,_y) print("v %d %d\n", _x,_y)
/* _x,_y becomes current point */
#define move(_x, _y) print("m %d %d\n", _x, _y)