148524Sbostic /*- 2*61408Sbostic * Copyright (c) 1983, 1993 3*61408Sbostic * The Regents of the University of California. All rights reserved. 448524Sbostic * 548524Sbostic * %sccs.include.proprietary.c% 648524Sbostic */ 748524Sbostic 813350Ssam #ifndef lint 9*61408Sbostic static char sccsid[] = "@(#)linemod.c 8.1 (Berkeley) 06/04/93"; 1048524Sbostic #endif /* not lint */ 1113350Ssam linemod(s)1213350Ssamlinemod(s) 1313350Ssam char *s; 1413350Ssam { 1513350Ssam char c; 1613350Ssam putch(033); 1713350Ssam switch(s[0]){ 1813350Ssam case 'l': 1913350Ssam c = 'd'; 2013350Ssam break; 2113350Ssam case 'd': 2213350Ssam if(s[3] != 'd')c='a'; 2313350Ssam else c='b'; 2413350Ssam break; 2513350Ssam case 's': 2613350Ssam if(s[5] != '\0')c='c'; 2713350Ssam else c='`'; 2813350Ssam } 2913350Ssam putch(c); 3013350Ssam } 31