Return to text.c CVS log

Up to [Research Unix] / researchv10no / libplot / libpen

researchv10 Norman

#include "pen.h"
text(s)
char *s;
{
	if (*s=='\\') 
		switch(*(s+1)) {
		case 'C':
			fprintf(pltout,"LO5 ");
			s += 2;
			break;
		case 'R':
			fprintf(pltout,"LO8 ");
			s += 2;
			break;
		case '\\':
			fprintf(pltout,"LO2 ");
			s++;
			break;
		default:
			fprintf(pltout,"LO2 ");
			s += 2;
			break;
		}
	else fprintf(pltout,"LO2 ");
	fprintf(pltout,"LB%s\3\n",s);
	ckerr(0);
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.