text.c

来自「speech signal process tools」· C语言 代码 · 共 134 行

/*
 * This material contains unpublished, proprietary software of 
 * Entropic Research Laboratory, Inc. Any reproduction, distribution, 
 * or publication of this work must be authorized in writing by Entropic 
 * Research Laboratory, Inc., and must bear the notice: 
 *
 *    "Copyright (c) 1986-1990  Entropic Speech, Inc. 
 *    "Copyright (c) 1990-1991  Entropic Research Laboratory, Inc. 
 *                   All rights reserved"
 *
 * The copyright notice above does not evidence any actual or intended 
 * publication of this source code.     
 *
 * Written by:  
 * Checked by:
 * Revised by:
 *
 * Brief description:
 *
 */

static char *sccs_id = "@(#)text.c	1.2	10/4/91	ESI/ERL";

/*----------------------------------------------------------------------+
|									|
|   text -- plot a string of Ascii characters using an arbitrary	|
|	    line-drawing function.  Character shapes are encoded in	|
|	    an external string array ascii[] defined in chrs.c		|
|									|
|   Rodney Johnson, Entropic Speech, Inc.				|
|									|
+----------------------------------------------------------------------*/

#define L_ROUND(n) ((n)>=0 ? (long)((n)+0.5) : -(long)(-(n)+0.5))
#define NEWSTROKE(p) ((p)&0200)
#define LASTPOINT(p) ((p)&010)
#define U_COORD(p) (((p)&0160) >> 4)
#define V_COORD(p) ((p)&07)
#define ST_MAX 50

double  sin();
double  cos();

extern char *ascii[];

text(u0, v0, sp, rot, str, line_plotter)
    long    u0;			/* Coordinate of left end of baseline. */
    long    v0;			/* Coordinate of left end of baseline. */
    long    sp;			/* Character spacing */
    int	    rot;		/* Orientation of baseline (degrees */
				/* counterclockwise from horizontal). */
    char    *str;		/* String to plot. */
    int	    (*line_plotter)();	/* Pointer to line_plotting function. */
{
    double  theta,
	    cosrot,
	    sinrot;

    long    u[ST_MAX], v[ST_MAX],
	    u1 = u0, 
	    v1 = v0, 
	    usp,
	    vsp, 
	    du,
	    dv, 
	    lower,
	    u_coord,
	    v_coord;

    int     ch;

    char    *strokes,
	    point;

    int     i;


    theta = rot * 3.14159265358979323846/180;

    cosrot = cos(theta);
    sinrot = sin(theta);

    usp = L_ROUND(sp*cosrot);
    vsp = L_ROUND(sp*sinrot);

    du = L_ROUND(sp*cosrot/6);
    dv = L_ROUND(sp*sinrot/6);

    while ((ch = *str++) != '\0')
    {
	if (ch < ' ' || ch >= '\177')
	    switch(ch)
	    {
	    case '\b':
		u1 -= usp;
		v1 -= vsp;
		break;
	    default:
		break;
	    }
	else
	{
	    strokes = ascii[ch - ' '];
	    lower = *strokes++ == 'd' ? 2 : 0;
	    u[0] = u1 + du;
	    v[0] = v1 + dv;
	    i = 1;

	    do
	    {
		point = *strokes++;
		if (NEWSTROKE(point))
		{
		    if (i > 1)
			(*line_plotter)((long) i, u, v);
		    i = 0;
		}
		u_coord = U_COORD(point);
		v_coord = V_COORD(point) - lower;
		u[i] = u1 + du*u_coord - dv*v_coord;
		v[i] = v1 + dv*u_coord + du*v_coord;
		i++;
	    } while (!LASTPOINT(point));

	    if (i > 1)
		(*line_plotter)((long) i, u, v);

	    u1 += usp;
	    v1 += vsp;
	}
    }

}   /* end text() */