谁有将数字转化为大写形式人民币的javascript（yangtian）

我有：
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head><body bgcolor="#FFFFFF" text="#000000">
<input type="text" name="num" onblur="javascript:this.value=Math.round(parseFloat(this.value)*100)/100" onKeyUp="this.value=this.value.replace(/[^0-9.]/,'');">
<input type="text" name="text">
<input type="button" name="Button" value="转换" onclick="Transform()">
<script language="JavaScript">
function Transform()
{
var whole = document.all.num.value;//分离整数与小数
var num;
var dig;
if(whole.indexOf(".") == -1)
{
num = whole;
dig = "";
}
else
{
num = whole.substr(0,whole.indexOf("."));
dig = whole.substr( whole.indexOf(".")+1, whole.length);
}//转换整数部分
var i=1;
var len = num.length;var dw2 = new Array("","万","亿");//大单位
var dw1 = new Array("拾","佰","千");//小单位
var dw = new Array("零","壹","贰","叁","肆","伍","陆","柒","捌","玖");//整数部分用
var dws = new Array("零","壹","贰","叁","肆","伍","陆","柒","捌","玖");//小数部分用
var k1=0;//计小单位
var k2=0;//计大单位
var str="";for(i=1;i<=len;i++)
{
var n = num.charAt(len-i);
if(n=="0")
{
if(k1!=0)
str = str.substr( 1, str.length-1);
}str = dw[Number(n)].concat(str);//加数字if(len-i-1>=0)//在数字范围内
{
if(k1!=3)//加小单位
{
str = dw1[k1].concat(str);
k1++;
}
else//不加小单位，加大单位
{
k1=0;
var temp = str.charAt(0);
if(temp=="万" || temp=="亿")//若大单位前没有数字则舍去大单位
str = str.substr( 1, str.length-1);
str = dw2[k2].concat(str);
}
}
if(k1==3)//小单位到千则大单位进一
{
k2++;
}}//转换小数部分
var strdig="";
for(i=0;i<2;i++)
{
var n = dig.charAt(i);
strdig += dws[Number(n)];//加数字
if(i==0) strdig=strdig+"角";
if(i==1) strdig=strdig+"分";
}
str+="元"+strdig;
document.all.text.value = str;
}</script>
</body>
</html>