/************************************************************
*   共通一般ライブラリー                OKOME System 2      *
************************************************************/

#include	<string.h>
#include	<EGB.H>
#include	<normlib.h>

extern char work[];

void symbol(int x, int y, char *p, int k, int c)
{
	char pa[256];
	EGB_paintMode(work, 0x22);
	EGB_color( work, 0, c);
	EGB_textZoom( work, 0, k/2, k);
	EGB_textZoom( work, 1, k, k);
	WORD(pa    ) = x;
	WORD(pa + 2) = y;
	WORD(pa + 4) = strlen(p);
	strcpy( &(pa[6]), p );
	EGB_sjisString( work, pa );
}