var q = 12;
function calcular()
{
	var C = quitarFormatoNumero(document.credito.C.value);
	var n = quitarFormatoNumero(document.credito.n.value);
	var I = quitarFormatoNumero(document.credito.I.value);
	var cu = quitarFormatoNumero(document.credito.cu.value);

	if (C == '' && n != '' && I != '' && cu != '')
		calcularCapital(cu, I, n, q);
	else if (n == '' && C != '' && I != '' && cu != '')
		calcularPlazo(C, cu, I, q);
	else if (I == '' && n != '' && C != '' && cu != '')
		calcularInteres(C, cu, n, q);
	else if (cu == '' && n != '' && I != '' && C != '')
		calcularCuota(C, I, n ,q);
	else
		alert('Debe rellenar todos los valores menos el que desea calcular.');
}
function calcularPlazo(C, cu, I, q)
{
	var p = plazo(C, cu, I, q);
	if (isNaN(p))
		alert('Los datos proporcionados no son coherentes.\nEl cálculo no se puede hacer.\n');
	else if (p <= 0)
		document.credito.n.value = '< 0';
	else if (p > 100)
		document.credito.n.value = '> 100';
	else
		document.credito.n.value = p;
}
function calcularCapital(cu, I, n, q)
{
	var c = capital(cu, I, n, q);
	if (isNaN(c))
		alert('Los datos proporcionados no son coherentes.\n\nEl cálculo no se puede hacer.\n');
	else
		document.credito.C.value = ponerPuntos(Math.round(c));
}
function calcularCuota(C, I, n ,q)
{
	var c = cuota(C, I, n ,q);
	if (isNaN(c))
		alert('Los datos proporcionados no son coherentes.\n\nEl cálculo no se puede hacer.\n');
	else
	{
		c = '' + redondear(c, 2);
		document.credito.cu.value = ponerPuntos(c.replace(/[.]/g, ','));
	}
}
function calcularInteres(C, cu, n, q)
{
	var i = tae(C, cu, n, q);
	if (isNaN(i))
		alert('Los datos proporcionados no son coherentes.\n');
	else if (i >= 0)
	{
		i = '' + redondear(i, 3);
		document.credito.I.value = i.replace(/[.]/g, ',');
	}
	else
		alert('El interés calculado es menor que cero. \n\nLa cuota y/o el plazo son demasido bajos.\n');
}