xref: /csrg-svn/lib/libplot/grn/linemod.c (revision 29813)
1*29813Ssklower /*
2*29813Ssklower  * Copyright (c) 1980, 1986 Regents of the University of California.
3*29813Ssklower  * All rights reserved.  The Berkeley software License Agreement
4*29813Ssklower  * specifies the terms and conditions for redistribution.
5*29813Ssklower  */
6*29813Ssklower 
7*29813Ssklower #ifndef lint
8*29813Ssklower static char sccsid[] = "@(#)linemod.c	6.1 (Berkeley) 08/29/86";
9*29813Ssklower #endif not lint
10*29813Ssklower 
11*29813Ssklower 
12*29813Ssklower #include "grnplot.h"
13*29813Ssklower 
14*29813Ssklower /*---------------------------------------------------------
15*29813Ssklower  *	Linemod sets the current line drawing style.
16*29813Ssklower  *
17*29813Ssklower  *	Results:	None.
18*29813Ssklower  *
19*29813Ssklower  *	Side Effects:
20*29813Ssklower  *	The line style is set based on string s which
21*29813Ssklower  *	must be one of "dotted", "solid", "longdashed", "shortdashed",
22*29813Ssklower  *	or "dotdashed".  If s isn't recognized, then "solid" is used.
23*29813Ssklower  *---------------------------------------------------------
24*29813Ssklower  */
25*29813Ssklower linemod(s)
26*29813Ssklower char *s;
27*29813Ssklower {
28*29813Ssklower     endvector();
29*29813Ssklower     if (strcmp(s, "dotted") == 0)
30*29813Ssklower 	linestyle = 1;
31*29813Ssklower     else if (strcmp(s, "longdashed") == 0)
32*29813Ssklower 	linestyle = 4;
33*29813Ssklower     else if (strcmp(s, "shortdashed") == 0)
34*29813Ssklower 	linestyle = 4;
35*29813Ssklower     else if (strcmp(s, "dotdashed") == 0)
36*29813Ssklower 	linestyle = 2;
37*29813Ssklower     else linestyle = DEFAULTLINE;
38*29813Ssklower }
39