//******************************************************************************
//*                                                                            *
//*                   SIFLAJ Roman Numeral Conversion Function                 *
//*                                                                            *
//******************************************************************************
//
//******************************************************************************
//*                             Global Variables                               *
//******************************************************************************
//
// Roman Numeral Conversion Arrays
// -------------------------------
var arryRomUnits = new Array("","I","II","III","IV","V","VI","VII","VIII","IX");
var arryRomTens = new Array("","X","XX","XXX","XL","L","LX","LXX","LXXX","XC");
var arryRomHundreds = new Array("","C","CC","CCC","CD","D","DC","DCC","DCCC","CM");
var arryRomThousands = new Array("","M","MM","MMM","MV","V","VM","VMM","VMMM","MX");

//******************************************************************************
//*                     Convert Persian to Roman Numeral                       *
//******************************************************************************
//
function convertRoman(strPersian)
{
//	debugger;
	var strRoman = "";
	var intBuffer = 10 - strPersian.length;

	while (intBuffer > 0)
	{
		strPersian = "0" + strPersian;
		intBuffer--;
	}

	strRoman = arryRomThousands[strPersian.substr(0,1)];
	strRoman += arryRomHundreds[strPersian.substr(1,1)];
	strRoman += arryRomTens[strPersian.substr(2,1)];
	strRoman += arryRomThousands[strPersian.substr(3,1)];
	strRoman += arryRomHundreds[strPersian.substr(4,1)];
	strRoman += arryRomTens[strPersian.substr(5,1)];
	strRoman += arryRomThousands[strPersian.substr(6,1)];
	strRoman += arryRomHundreds[strPersian.substr(7,1)];
	strRoman += arryRomTens[strPersian.substr(8,1)];
	strRoman += arryRomUnits[strPersian.substr(9,1)];

	return(strRoman);
}

