//correcciourgent
var courg=0;
//correcciourgent

var desfase=0;
var n_imatge=51+desfase ;
var f_actual="crc.gif";
var n_actual="crc";
var n_sus_es="0";
var n_sus_dr="0";
var n_sus_dw="0";
var n_dep_es="0";
var n_dep_dr="0";
var n_dep_up="0";
var n_vert_sustained="0";
var f_old="";
var n_old="";
var quadret=new Object(402);
for (na=0;na<=401;na++)
	{
	quadret[na]=new obQuadret();
	}
function obQuadret()
{
this.m_nom="gris";
this.m_sus_es="0";
this.m_sus_dr="0";
this.m_sus_dw="0";
this.m_dep_es="0";
this.m_dep_dr="0";
this.m_dep_up="0";
this.m_vert_sustained="0";
}
function fitxa(unafitxa,unnom)
{
f_actual=unafitxa;
n_actual=unnom;
document.images[0+desfase+courg].src=f_actual;
if (n_actual=="crc") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="tri") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="quad") {	n_sus_es="0"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="scrc1") {n_sus_es="0"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="scrc2") { n_sus_es="0";n_sus_dr="1";n_sus_dw="0"; n_dep_es="0"; n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="scrc3") {n_sus_es="0"; n_sus_dr="0";	n_sus_dw="0";_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="scrc4") {n_sus_es="1"; n_sus_dr="0"; n_sus_dw="0"; n_dep_es="0"; n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="qcrc1") {n_sus_es="0"; n_sus_dr="2";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="qcrc2") {n_sus_es="0"; n_sus_dr="3";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="qcrc3") {n_sus_es="3"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="qcrc4") {n_sus_es="2"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="rtri1") {n_sus_es="0"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="rtri2") {n_sus_es="0"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="rtri3") {n_sus_es="0"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="rtri4") {n_sus_es="0"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="arc1") {	n_sus_es="0"; n_sus_dr="4";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="arc2") {	n_sus_es="5"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="arc3") {	n_sus_es="0"; n_sus_dr="6";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;} 
if (n_actual=="arc4") {	n_sus_es="7"; n_sus_dr="0";	n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;} 
if (n_actual=="arclav") {n_sus_es="5"; n_sus_dr="4"; n_sus_dw="0"; n_dep_es="4";n_dep_dr="5";n_dep_up="0";n_vert_sustained="0";return;} 
if (n_actual=="arclavi") {n_sus_es="7"; n_sus_dr="6";n_sus_dw="0"; n_dep_es="6";n_dep_dr="7";n_dep_up="0";n_vert_sustained="0";return;} 
if (n_actual=="rect1") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="rect2") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="rect3") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="rect4") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="quadde") {n_sus_es="9"; n_sus_dr="8";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="quadde1") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="8";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="quadde2") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="9";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="quadg") {n_sus_es="11"; n_sus_dr="10";n_sus_dw="0"; n_dep_es="10";n_dep_dr="11";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="quadgr") {n_sus_es="0"; n_sus_dr="10";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="quadgl") {n_sus_es="11"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="ade4a") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="ade4b") {n_sus_es="0"; n_sus_dr="24";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="ade4c") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="24";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="ade4ai") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="ade4bi") {n_sus_es="25"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="ade4ci") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="25";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="joncap") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="jonfus") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="jonpeu") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="dorcap") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="corcap") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="bmbll") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="pil_cap") {n_sus_es="30"; n_sus_dr="31";n_sus_dw="34"; n_dep_es="31";n_dep_dr="30";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="pil_peu") {n_sus_es="32"; n_sus_dr="33";n_sus_dw="34"; n_dep_es="33";n_dep_dr="32";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="pil_fus") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="34"; n_dep_es="0";n_dep_dr="0";n_dep_up="34";n_vert_sustained="0";return;}
if (n_actual=="pil_bih") {n_sus_es="30"; n_sus_dr="31";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="34";n_vert_sustained="0";return;}
if (n_actual=="pil_bib") {n_sus_es="32"; n_sus_dr="33";n_sus_dw="34"; n_dep_es="33";n_dep_dr="32";n_dep_up="0";n_vert_sustained="0";return;}
if (n_actual=="pilscap") {n_sus_es="30"; n_sus_dr="31";n_sus_dw="34"; n_dep_es="31";n_dep_dr="30";n_dep_up="0";n_vert_sustained="1";return;}
if (n_actual=="pilspeu") {n_sus_es="32"; n_sus_dr="33";n_sus_dw="34"; n_dep_es="33";n_dep_dr="32";n_dep_up="0";n_vert_sustained="1";return;}
if (n_actual=="pilsfus") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="34"; n_dep_es="0";n_dep_dr="0";n_dep_up="34";n_vert_sustained="1";return;}
if (n_actual=="pilsbih") {n_sus_es="30"; n_sus_dr="31";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="34";n_vert_sustained="1";return;}
if (n_actual=="pilsbib") {n_sus_es="32"; n_sus_dr="33";n_sus_dw="34"; n_dep_es="33";n_dep_dr="32";n_dep_up="0";n_vert_sustained="1";return;}
if (n_actual=="xinxeta") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="1";return;}
if (n_actual=="xinxfix") {n_sus_es="0"; n_sus_dr="0";n_sus_dw="0"; n_dep_es="0";n_dep_dr="0";n_dep_up="0";n_vert_sustained="1";return;}




}
function MiraHoTot()
{
////////correccio dinamica///////////
var rastreig="a";
rastreig=document.images[3+courg].src;
if (rastreig.search("bmbll.gif")==-1)
	{
	courg++;
	if (courg>30)
		{
		courg=0;
		}
	}  
///////correccio dinamica////////////

for (y=2;y<=20;y++)
	{
	for (x=1;x<=20;x++)
		{
		var nompropi=quadret[(y-1)*20+x].m_nom;
	    if (quadret[(y-1)*20+x].m_nom  =="bmbll")
	    	{
		    if (quadret[(y-2)*20+x].m_nom  =="gris")
				{
				gravetat(x,y,0,-1);
				}			    	
			else
				{
			    if ((quadret[(y-2)*20+x-1].m_nom  =="gris")&&(x>1))
					{
					gravetat(x,y,-1,-1);
					}
				else
					{
				    if ((quadret[1+(y-2)*20+x].m_nom  =="gris")&&(x<20))
						{
						gravetat(x,y,1,-1);
						}
					}
				}
			}
    	else
    		{
			if ((nompropi=="pil_cap")||(nompropi=="pil_peu")||(nompropi=="pil_fus")||(nompropi=="pil_bih")||(nompropi=="pil_bib")||
			(nompropi=="pilscap")||(nompropi=="pilspeu")||(nompropi=="pilsfus")||(nompropi=="pilsbih")||(nompropi=="pilsbib")) 
    			{
				if((((((x>1)&&(quadret[(y-1)*20+x].m_dep_es == quadret[(y-1)*20+x-1].m_sus_dr)))&&(quadret[(y-1)*20+x].m_dep_es !="0"))&&
					((((x<20)&&(quadret[(y-1)*20+x].m_dep_dr == quadret[1+(y-1)*20+x].m_sus_es)))&&(quadret[(y-1)*20+x].m_dep_dr != "0")))||
					(((y>1)&&(quadret[(y-2)*20+x].m_vert_sustained==1))&&((quadret[(y-1)*20+x].m_dep_up==34)&&(quadret[(y-2)*20+x].m_sus_dw==34))))
					{
					quadret[(y-1)*20+x].m_vert_sustained="1";
					if (quadret[(y-1)*20+x].m_nom == "pil_cap"){f_old=f_actual;n_old=n_actual;fitxa("pilscap.gif","pilscap");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom  == "pil_peu"){f_old=f_actual;n_old=n_actual;fitxa("pilspeu.gif","pilspeu");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom  == "pil_fus"){f_old=f_actual;n_old=n_actual;fitxa("pilsfus.gif","pilsfus");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom  == "pil_bih"){f_old=f_actual;n_old=n_actual;fitxa("pilsbih.gif","pilsbih");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom  == "pil_bib"){f_old=f_actual;n_old=n_actual;fitxa("pilsbib.gif","pilsbib");situa(x,y);fitxa(f_old,n_old);}
    				}
				else
					{
					quadret[(y-1)*20+x].m_vert_sustained="0";
					if (quadret[(y-1)*20+x].m_nom == "pilscap"){f_old=f_actual;n_old=n_actual;fitxa("pil_cap.gif","pil_cap");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom == "pilspeu"){f_old=f_actual;n_old=n_actual;fitxa("pil_peu.gif","pil_peu");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom == "pilsfus"){f_old=f_actual;n_old=n_actual;fitxa("pil_fus.gif","pil_fus");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom == "pilsbih"){f_old=f_actual;n_old=n_actual;fitxa("pil_bih.gif","pil_bih");situa(x,y);fitxa(f_old,n_old);}
					if (quadret[(y-1)*20+x].m_nom == "pilsbib"){f_old=f_actual;n_old=n_actual;fitxa("pil_bib.gif","pil_bib");situa(x,y);fitxa(f_old,n_old);}
					}
    			}
    		}
		}
	}


for (y=19;y>=1;y--)
	{
	for (x=1;x<=20;x++)
		{
		var nompropi=quadret[(y-1)*20+x].m_nom;
		var nomdesota=quadret[(y)*20+x].m_nom;
		var sustained=quadret[(y-1)*20+x].m_vert_sustained;
		if (((nompropi !="gris")&& (nompropi !="bmbll"))&&(sustained == 0))
			{
			if(nomdesota =="gris")
				{
     			if((quadret[(y-1)*20+x].m_dep_es == "0") && (quadret[(y-1)*20+x].m_dep_dr == "0"))
    				{
					gravetat(x,y,0,1);
    				}
				else
					{	
					if(((((x>1)&&(quadret[(y-1)*20+x].m_dep_es != quadret[(y-1)*20+x-1].m_sus_dr)))&&(quadret[(y-1)*20+x].m_dep_es !="0"))||
						((((x<20)&&(quadret[(y-1)*20+x].m_dep_dr != quadret[1+(y-1)*20+x].m_sus_es)))&&(quadret[(y-1)*20+x].m_dep_dr != "0")))
						{
						gravetat(x,y,0,1);
						}
                    }
				}
			else
				{
				if((nompropi =="crc")&&(nomdesota=="crc")||(nompropi =="crc")&&(nomdesota=="xinxfix") )
					{
					if((quadret[1+(y)*20+x].m_nom =="gris")&&(x<20))
						{
						gravetat(x,y,1,1);
						}
					else
						{
						if((quadret[(y)*20+x-1].m_nom =="gris")&&(x>1))
							{
							gravetat(x,y,-1,1);
							}
						}
					}
				}
			}
		else
			{
			if (sustained==1)
				{
				if (nompropi == "xinxeta"){f_old=f_actual;n_old=n_actual;fitxa("xinxfix.gif","xinxfix");situa(x,y);fitxa(f_old,n_old);}
				}
			}
		}
	} 
}
function gravetat(x,y,s,z)
{
document.images[n_imatge+courg+(y-1+z)*20+x-1+s].src = document.images[n_imatge+courg+(y-1)*20+x-1].src;
quadret[(y-1+z)*20+x+s].m_nom=quadret[(y-1)*20+x].m_nom;
quadret[(y-1+z)*20+x+s].m_sus_es=quadret[(y-1)*20+x].m_sus_es;
quadret[(y-1+z)*20+x+s].m_sus_dr=quadret[(y-1)*20+x].m_sus_dr;
quadret[(y-1+z)*20+x+s].m_sus_dw=quadret[(y-1)*20+x].m_sus_dw;
quadret[(y-1+z)*20+x+s].m_dep_es=quadret[(y-1)*20+x].m_dep_es;
quadret[(y-1+z)*20+x+s].m_dep_dr=quadret[(y-1)*20+x].m_dep_dr;
quadret[(y-1+z)*20+x+s].m_dep_up=quadret[(y-1)*20+x].m_dep_up;
quadret[(y-1+z)*20+x+s].m_vert_sustained=quadret[(y-1)*20+x].m_vert_sustained;

document.images[n_imatge+courg+(y-1)*20+x-1].src = "gris.gif";												
quadret[(y-1)*20+x].m_nom="gris";
quadret[(y-1)*20+x].m_sus_es="0";
quadret[(y-1)*20+x].m_sus_dr="0";
quadret[(y-1)*20+x].m_sus_dw="0";
quadret[(y-1)*20+x].m_dep_es="0";
quadret[(y-1)*20+x].m_dep_dr="0";
quadret[(y-1)*20+x].m_dep_up="0";
quadret[(y-1)*20+x].m_vert_sustained="0";

}
function situa(x,y)
{
document.images[n_imatge+courg+(y-1)*20+x-1].src=f_actual;
quadret[(y-1)*20+x].m_nom=n_actual;
quadret[(y-1)*20+x].m_sus_es=n_sus_es;
quadret[(y-1)*20+x].m_sus_dr=n_sus_dr;
quadret[(y-1)*20+x].m_sus_dw=n_sus_dw;
quadret[(y-1)*20+x].m_dep_es=n_dep_es;
quadret[(y-1)*20+x].m_dep_dr=n_dep_dr;
quadret[(y-1)*20+x].m_dep_up=n_dep_up;
quadret[(y-1)*20+x].m_vert_sustained=n_vert_sustained;
}
