/* AUTHOR: Unregistered user */
/* CREATION DATE: 09/01/01 */

function PMT(rate,nper,pv)
{
result=pv*rate/(1-Math.pow(1+rate,-1*nper))
return result
}
//FV(4.95/400,4,-3150)
function FV(rate,nper,pv)
{
alert(1+rate,nper)
return pv*(Math.pow(1+rate,nper)-1)/rate 
}

function FV(rate,nper,pv,x)
{
return x*Math.pow((1+rate),nper)-pv*(Math.pow(1+rate,nper)-1)/rate 
}
function FV2(rate,nper,pv,x)
{
return x*Math.pow((1+rate),nper)+pv*(Math.pow(1+rate,nper)-1)/rate 
}

function PV(rate,nper,pv,x)
{
return FV(rate,nper,pv,x)/(Math.pow(1+rate,nper))
}

function PV2(rate,nper,pv,x)
{
return FV2(rate,nper,pv,x)//(Math.pow(1+rate,nper))
}

function PV3(rate,nper,pv,x)
{
result=0
for (ix=1; ix<nper+1;ix++)
{
result+=pv*Math.pow(1+rate,-1*ix)
}
result2=x/Math.pow(1+rate,nper)
total=parseFloat(result2)+parseFloat(result)
return -1*total
}

function addEnd(value,str)
{
value=parseFloat(value)
value=value+str
return value
}

function v2Commas(value)
{
if (value=="")
{
  value="£0"
  return
}
value=validateValue(value)
value=addCommas(value)
return value
}

function dec2(value)
{
value=addCommas(Math.round(value*100)/100)
v2=value.split(".")
if (v2.length>1)
{
   if (v2[1].length<2)
	value=value+"0"
}
return value
}

function VV(v)
{
return validateValue(v)
}

function validateValue(v)
{
var val=v.split(",")
v=""
for (i=0;i<val.length;++i)
{
v+=val[i]
}
if (v.charAt(0)=="£")
	v=v.substring(1)

return v
}

function addCommas(value)
{
value=VV(value+"")
var bNeg=false
if (value<0)
{
   bNeg=true
   value=value*-1
}
value=""+value
v=value.split(".")

if (parseInt(v[0])>999999)
{

   v[0]=v[0].substring(0,v[0].length-6)+","+v[0].substring(v[0].length-6,v[0].length-3)+","+v[0].substring(v[0].length-3)
}
else
{
 	if (parseInt(v[0])>999)
	   v[0]=v[0].substring(0,v[0].length-3)+","+v[0].substring(v[0].length-3)
}
if (bNeg==false)
   value="£"+v[0]
else
   value="£-"+v[0] // if negative value
if (v.length>1) // are there any decimals
   value=value+"."+v[1]
return value
}