Ultrix-3.1/src/libplot/tregis/linemod.c

Compare this file to the similar file:
Show the results in this format:

/*
 * SCCSID: @(#)linemod.c	3.0	4/22/86 
 */

/**********************************************************************
 *   Copyright (c) Digital Equipment Corporation 1984, 1985, 1986.    *
 *   All Rights Reserved. 					      *
 *   Reference "/usr/src/COPYRIGHT" for applicable restrictions.      *
 **********************************************************************/

/*

 Facility: For the Plot package for REGIS Terminals

 Abstract: Change the mode of the line to be ploted

 Author:  Jerry Brenner.

*/

#include <stdio.h>
extern ggi;
linemod(s)
char *s;
{
	char c;
	switch(s[0]){
	case 'l':	
		c = '2';		/* longdashed */
		break;
	case 'd':	
		if(s[3] != 'd')c='4';	/* dotted */
		else c='3';		/* dotdashed */
		break;
	case 's':
		if(s[5] != '\0')c='5';	/* shortdashed */
		else c='1';		/* solid */
	}
	fprintf(ggi, "W(P%c)\n", c);
}