148517Sbostic /*- 2*61393Sbostic * Copyright (c) 1980, 1993 3*61393Sbostic * The Regents of the University of California. All rights reserved. 448517Sbostic * 548517Sbostic * %sccs.include.proprietary.c% 619975Sdist */ 719975Sdist 815454Sralph #ifndef lint 9*61393Sbostic static char sccsid[] = "@(#)linemod.c 8.1 (Berkeley) 06/04/93"; 1048517Sbostic #endif /* not lint */ 1115454Sralph 1215454Sralph #include "hp2648.h" 1315454Sralph linemod(line)1415454Sralphlinemod( line ) 1515454Sralph char *line; 1615454Sralph { 1715454Sralph putchar('Z'); 1815454Sralph handshake(); 1915454Sralph putchar(ESC); 2015454Sralph putchar(GRAPHIC); 2115454Sralph putchar(MODE); 2215454Sralph if ( *(line) == 's' ) { 2315454Sralph if ( *(++line) == 'o' ) { 2415454Sralph /* 2515454Sralph * solid mode 1 2615454Sralph */ 2715454Sralph putchar( '1' ); 2815454Sralph putchar( 'b' ); 2915454Sralph goto done; 3015454Sralph } 3115454Sralph else if ( *(line) == 'h' ) { 3215454Sralph /* 3315454Sralph * shortdashed mode 4 3415454Sralph */ 3515454Sralph putchar( '6' ); 3615454Sralph putchar( 'b' ); 3715454Sralph goto done; 3815454Sralph } 3915454Sralph } 4015454Sralph else if ( *(line) == 'd' ) { 4115454Sralph if ( *(++line) == 'o' && *(++line) == 't' ) { 4215454Sralph if ( *(++line) == 't' ) { 4315454Sralph /* 4415454Sralph * dotted mode 2 4515454Sralph */ 4615454Sralph putchar( '7' ); 4715454Sralph putchar( 'b' ); 4815454Sralph goto done; 4915454Sralph } 5015454Sralph else if ( *(line) == 'd' ) { 5115454Sralph /* 5215454Sralph * dotdashed mode 3 5315454Sralph */ 5415454Sralph putchar( '8' ); 5515454Sralph putchar( 'b' ); 5615454Sralph goto done; 5715454Sralph } 5815454Sralph } 5915454Sralph } 6015454Sralph else if ( *(line) == 'l' ) { 6115454Sralph /* 6215454Sralph * longdashed mode 5 6315454Sralph */ 6415454Sralph putchar( '5' ); 6515454Sralph putchar( 'b' ); 6615454Sralph goto done; 6715454Sralph } 6815454Sralph putchar( '1' ); /* default to solid */ 6915454Sralph putchar( 'b' ); /* default to solid */ 7015454Sralph done: 7115454Sralph putchar( 'Z' ); 7215454Sralph handshake(); 7315454Sralph putchar(ESC); 7415454Sralph putchar(GRAPHIC); 7515454Sralph putchar(PLOT); 7615454Sralph putchar(BINARY); 7715454Sralph buffcount = 4; 7815454Sralph return; 7915454Sralph } 80