#include <stdio.h>
#include <string.h>

/*
	(c)1987 A.Matsuda 
	pbuf range "1" .. "4999"
*/

char* roman( const char* pbuf )
{
	const char* tbl[ ][ 10 ] = {
		{ "", "i", "ii", "iii", "iv", "v", "vi", "vii", "viii", "ix", },
		{ "", "x", "xx", "xxx", "xl", "l", "lx", "lxx", "lxxx", "xc", },
		{ "", "c", "cc", "ccc", "cd", "d", "dc", "dcc", "dccc", "cm", },
		{ "", "m", "mm", "mmm", "mmmm", "", "", "", "", "", },
	};
	
	int len;
	static char szRoman[100] = "";
	char buf[10];
	int i;
	
	
	if( !pbuf ){
		return NULL;
	}
	i = atoi( pbuf );
	
	if( i >= 5000 || 0 >= i ){
		return NULL;
	}
	sprintf( buf, "%d", i );

	szRoman[ 0 ] = '\0';
	
	len = strlen( buf );
	
	i = 0;
	switch( len ){
		default:
			return NULL;
		case 4:	// down through
			strcat( szRoman, tbl[ len - i - 1 ][ (buf[ i ] - '0') ] );
			i++;
		case 3:	// down through
			strcat( szRoman, tbl[ len - i - 1 ][ (buf[ i ] - '0') ] );
			i++;
		case 2:	// down through
			strcat( szRoman, tbl[ len - i - 1 ][ (buf[ i ] - '0') ] );
			i++;
		case 1:
			strcat( szRoman, tbl[ len - i - 1 ][ (buf[ i ] - '0') ] );
	}
	
	return szRoman;

}