var pasta=new Array(2);
pasta[0]=new Array(6010.00,
12020.24,
15025.30,
18030.36,
21035.42,
24040.48,
27045.54,
30050.61,
33055.67,
36060.73,
39065.79,
42070.85,
45075.91,
48080.97,
51086.03,
54091.09,
57096.15,
60101.21,
63106.27,
66111.33,
69116.39,
72121.45,
75126.51,
78131.57,
81136.63,
84141.69,
87146.76,
90151.82,
93156.88,
96161.94,
99167.00,
102172.06,
105177.12,
108182.18,
111187.24,
114192.30,
117197.36,
120202.42,
150253.03,
180303.63,
210354.24,
240404.84,
270455.45,
300506.05,
360607.26,
420708.47,
450759.08,
480809.68,
540910.89,
601012.10);
pasta[1]=new Array(1,
6010.00,	
12020.24,               
18030.36,               
24040.48,               
30050.61,               
36060.73,               
42070.85,               
48080.97,               
54091.09,               
60101.21,               
66111.33,               
72121.45,               
78131.57,               
84141.69,               
90151.82,               
96161.94,               
102172.06,              
108182.18,              
114192.30,              
120202.42,              
150253.03,              
180303.63,              
210354.24,              
240404.84,              
270455.45,              
300506.05,              
360607.26,              
420708.47,              
450759.08,              
480809.68,              
540910.89,              
601012.10);             
var notaria=new Array(2);
notaria[0]=new Array(481.51,
501.79,
508.56,
515.32,
522.08,
528.84,
535.60,
540.11,
544.62,
549.12,
553.63,
558.14,
562.65,
567.15,
571.66,
576.17,
580.68,
585.18,
589.69,
594.20,
598.71,
603.22,
605.47,
607.72,
609.98,
612.23,
614.48,
616.74,
618.99,
621.25,
623.50,
625.75,
628.01,
630.26,
632.51,
634.77,
637.02,
659.56,
682.10,
704.64,
727.17,
749.71,
772.25,
794.79,
817.33,
839.87,
862.41,
884.95,
907.49,
907.49);
notaria[1]=new Array(244.39,
275.77,
307.14,
338.51,
369.89,
380.34,
390.80,
401.26,
411.72,
422.17,
429.15,
436.12,
443.09,
450.06,
457.03,
464.00,
470.98,
477.95,
484.92,
491.89,
526.75,
544.18,
561.61,
579.04,
596.47,
613.90,
631.33,
648.76,
666.19,
683.62,
701.05,
718.48,
718.48);
var registro=new Array(2);   
registro[0]=new Array(90.15,
90.15,
102.17,
102.17,
102.17,
108.18,
110.81,
114.19,
120.20,
126.21,
132.22,
138.23,
150.25,
150.25,
156.26,
156.26,
162.27,
168.28,
174.29,
180.30,
180.30,
186.31,
186.31,
192.32,
192.32,
198.33,
198.33,
204.34,
204.34,
210.35,
210.35,
216.36,
216.36,
222.37,
222.37,
228.38,
228.38,
276.47,
276.47,
300.51,
318.54,
360.61,
366.62,
390.66,
408.69,
414.70,
420.71,
444.75,
480.81,
480.81);
registro[1]=new Array(63.11,
75.31,
87.51,
99.71,
111.91,
120.20,
132.22,
150.25,
162.27,
174.29,
186.31,
198.33,
204.34,
210.35,
216.36,
222.37,
228.38,
228.38,
234.39,
240.40,
246.41,
270.46,
300.51,
318.50,
336.57,
354.60,
372.63,
402.68,
414.70,
426.72,
450.76,
480.81,
480.81);
var gestoria=new Array(2);       
gestoria[0]=new Array(250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300);
gestoria[1]=new Array(250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
250,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300,
300);

function tabla_provincias() {
var ret="<option value=15>A Coru&ntilde;a</option>"
ret+="<option value=01>Alava</option>";
ret+="<option value=02>Albacete</option>";
ret+="<option value=03>Alicante</option>";
ret+="<option value=04>Almer&iacute;a</option>"
ret+="<option value=33>Asturias</option>"
ret+="<option value=05>&Aacute;vila</option>"
ret+="<option value=06>Badajoz</option>"
ret+="<option value=07>Baleares</option>"
ret+="<option value=08>Barcelona</option>"
ret+="<option value=09>Burgos</option>"
ret+="<option value=10>C&aacute;ceres</option>"
ret+="<option value=11>C&aacute;diz</option>"
ret+="<option value=39>Cantabria</option>"
ret+="<option value=12>Castell&oacute;n</option>"
ret+="<option value=51>Ceuta</option>"
ret+="<option value=13>Ciudad Real</option>"
ret+="<option value=14>C&oacute;rdoba</option>"
ret+="<option value=16>Cuenca</option>"
ret+="<option value=17>Girona</option>"
ret+="<option value=18>Granada</option>"
ret+="<option value=19>Guadalajara</option>"
ret+="<option value=20>Guipuzcoa</option>"
ret+="<option value=21>Huelva</option>"
ret+="<option value=22>Huesca</option>"
ret+="<option value=23>Ja&eacute;n</option>"
ret+="<option value=26>La Rioja</option>"
ret+="<option value=35>Las Palmas</option>"
ret+="<option value=24>Le&oacute;n</option>"
ret+="<option value=25>Lleida</option>"
ret+="<option value=27>Lugo</option>"
ret+="<option value=28>Madrid</option>"
ret+="<option value=29>M&aacute;laga</option>"
ret+="<option value=52>Melilla</option>"
ret+="<option value=30>Murcia</option>"
ret+="<option value=31>Navarra</option>"
ret+="<option value=32>Ourense</option>"
ret+="<option value=34>Palencia</option>"
ret+="<option value=36>Pontevedra</option>"
ret+="<option value=37>Salamanca</option>"
ret+="<option value=38>Sta Cruz de Tenerife</option>"
ret+="<option value=40>Segovia</option>"
ret+="<option value=41>Sevilla</option>"
ret+="<option value=42>Soria</option>"
ret+="<option value=43>Tarragona</option>"
ret+="<option value=44>Teruel</option>"
ret+="<option value=45>Toledo</option>"
ret+="<option value=46>Valencia</option>"
ret+="<option value=47>Valladolid</option>"
ret+="<option value=48>Vizcaya</option>"
ret+="<option value=49>Zamora</option>"
ret+="<option value=50>Zaragoza</option></font>"
return (ret);
}

var impuestos=new Array(2);
impuestos[1]=new Array();
impuestos[1]["01"]=.06;
impuestos[1]["02"]=.06;
impuestos[1]["03"]=.07;
impuestos[1]["04"]=.07;
impuestos[1]["33"]=.07;
impuestos[1]["05"]=.06;
impuestos[1]["06"]=.07;
impuestos[1]["07"]=.01;
impuestos[1]["08"]=.07;
impuestos[1]["09"]=.06;
impuestos[1]["10"]=.07;
impuestos[1]["11"]=.07;
impuestos[1]["12"]=.06;
impuestos[1]["51"]=.06;
impuestos[1]["13"]=.06;
impuestos[1]["14"]=.07;
impuestos[1]["15"]=.07;
impuestos[1]["16"]=.06;
impuestos[1]["17"]=.07;
impuestos[1]["18"]=.07;
impuestos[1]["19"]=.06;
impuestos[1]["20"]=.06;
impuestos[1]["21"]=.07;
impuestos[1]["22"]=.07;
impuestos[1]["23"]=.07;
impuestos[1]["24"]=.06;
impuestos[1]["25"]=.07;
impuestos[1]["26"]=.07;
impuestos[1]["27"]=.07;
impuestos[1]["28"]=.07;
impuestos[1]["29"]=.07;
impuestos[1]["52"]=.06;
impuestos[1]["30"]=.07;
impuestos[1]["31"]=.06;
impuestos[1]["32"]=.07;
impuestos[1]["34"]=.06;
impuestos[1]["35"]=.06;
impuestos[1]["36"]=.07;
impuestos[1]["37"]=.06;
impuestos[1]["38"]=.06;
impuestos[1]["39"]=.07;
impuestos[1]["40"]=.06;
impuestos[1]["41"]=.07;
impuestos[1]["42"]=.06;
impuestos[1]["43"]=.07;
impuestos[1]["44"]=.06;
impuestos[1]["45"]=.06;
impuestos[1]["46"]=.07;
impuestos[1]["47"]=.06;
impuestos[1]["48"]=.06;
impuestos[1]["49"]=.06;
impuestos[1]["50"]=.07;
   
impuestos[0]=new Array();               
impuestos[0]["01"]=.005;
impuestos[0]["02"]=.01;
impuestos[0]["03"]=.01;             
impuestos[0]["04"]=.01;             
impuestos[0]["33"]=.01;             
impuestos[0]["05"]=.005;             
impuestos[0]["06"]=.01;             
impuestos[0]["07"]=.01;             
impuestos[0]["08"]=.01;             
impuestos[0]["09"]=.005;             
impuestos[0]["10"]=.01;             
impuestos[0]["11"]=.01;             
impuestos[0]["12"]=.005;             
impuestos[0]["51"]=.005;             
impuestos[0]["13"]=.01;             
impuestos[0]["14"]=.01;             
impuestos[0]["15"]=.01;             
impuestos[0]["16"]=.01;             
impuestos[0]["17"]=.01;             
impuestos[0]["18"]=.01;             
impuestos[0]["19"]=.01;             
impuestos[0]["20"]=.005;             
impuestos[0]["21"]=.01;             
impuestos[0]["22"]=.01;             
impuestos[0]["23"]=.01;             
impuestos[0]["24"]=.005;             
impuestos[0]["25"]=.01;             
impuestos[0]["26"]=.015;             
impuestos[0]["27"]=.01;             
impuestos[0]["28"]=.01;             
impuestos[0]["29"]=.01;             
impuestos[0]["52"]=.005;             
impuestos[0]["30"]=.015;             
impuestos[0]["31"]=.005;             
impuestos[0]["32"]=.01;             
impuestos[0]["34"]=.005;             
impuestos[0]["35"]=.005;             
impuestos[0]["36"]=.01;             
impuestos[0]["37"]=.005;             
impuestos[0]["38"]=.005;             
impuestos[0]["39"]=.01;             
impuestos[0]["40"]=.005;             
impuestos[0]["41"]=.01;             
impuestos[0]["42"]=.005;            
impuestos[0]["43"]=.01;             
impuestos[0]["44"]=.005;             
impuestos[0]["45"]=.01;             
impuestos[0]["46"]=.01;             
impuestos[0]["47"]=.005;             
impuestos[0]["48"]=.005;             
impuestos[0]["49"]=.005;             
impuestos[0]["50"]=.01;             

var tasacion=250;

function calcula(formul)
{

var tipovivienda=0;

if(!formul.tipviv[0].checked)
{tipovivienda=1;}
	parent.tipovivienda=tipovivienda;
	parent.tasac=tasacion;
	if (document.forms[0].impmax.value.length == 0)
	alert('Debe introducir el Importe del prestamo');
	else if (validar_coma(document.forms[0].impmax.value)== false)
	alert('Introduzca el Importe del prestamo correctamente ( sin puntos )');
	else if (document.forms[0].impesc.value.length == 0)
	alert('Debe introducir el Importe a escriturar');
	else if (validar_coma(document.forms[0].impesc.value)== false)
	alert('Introduzca el Importe a escriturar correctamente ( sin puntos )');
	
else{
// alert(tipovivienda);
//var tipocalculo=formul.opcion.options[formul.opcion.selectedIndex].value;
	for(var i=pasta[0].length;i>=0;i--)
	{
//		if(pasta[0][i]<=parseInt(formul.impesc.value,10) || i==0)

		if(pasta[0][i]<=parseInt(formul.impmax.value,10) || i==0)
		{
			parent.notariahip=notaria[0][i]
			parent.registrohip=registro[0][i]
			parent.gestoriahip=gestoria[0][i]
			parent.impuestotp=formul.impesc.value*(impuestos[1][formul.provicias.options[formul.provicias.selectedIndex].value])
			parent.impuestoajd=1.5*formul.impmax.value*(impuestos[0][formul.provicias.options[formul.provicias.selectedIndex].value])

			parent.tothip=notaria[0][i]+registro[0][i]+gestoria[0][i]+tasacion+parent.impuestoajd
			break;
		}
	}
	for(var i=pasta[1].length;i>=0;i--)
	{
		if(pasta[1][i]<=parseInt(formul.impesc.value,10) || i==0)
		{
			parent.notariacv=notaria[1][i];
			parent.registrocv=registro[1][i];
			parent.gestoriacv=gestoria[1][i];
// Impuesto de Transmisiones Patrimoniales

// Importe gastos de compraventa: Impuesto de Actos Jurídicos Documentados
			parent.impuestoajd2=formul.impesc.value*(impuestos[0][formul.provicias.options[formul.provicias.selectedIndex].value])
			
			if(!formul.tipviv[0].checked)
			{
				var palasuma=parent.impuestotp;
			}
			else
			{
				var palasuma=parent.impuestoajd2;
			}
			parent.totcv=notaria[1][i]+registro[1][i]+gestoria[1][i]+palasuma;
			break;
		}
	}
}
parent.tottot=DarFormatoNum_Var(parent.tothip+parent.totcv,"p2d");
parent.bottomFrame.document.location.reload();
}