function fw(name)
// (c) 2004 Marc Vinyes Raso, Released under GPL2 License : http://www.gnu.org/copyleft/gpl.html
{
  do
  {
  document.images[name].index++;
  if (document.images[name].index==document.images[name].imgs.length)
    document.images[name].index=0;
  } while (document.images[name].imgs[document.images[name].index]=="");
  //alert(document.images[name].imgs[document.images[name].index]);
  document.images[name].src=document.images[name].imgs[document.images[name].index];
}

function rw(name)
// (c) 2004 Marc Vinyes Raso, Released under GPL2 License : http://www.gnu.org/copyleft/gpl.html
{
	do
	{
  document.images[name].index--;
  if (document.images[name].index==-1)
    document.images[name].index=document.images[name].imgs.length-1;
  } while (document.images[name].imgs[document.images[name].index]=="");
  document.images[name].src=document.images[name].imgs[document.images[name].index];
}

function dreta()
// arguments: language
// (c) 2004 Marc Vinyes Raso, Released under GPL2 License : http://www.gnu.org/copyleft/gpl.html
{
  var path=document.images[ 'fixed' ].path;  
	window.location=document.images[ 'fixed' ].imgs[document.images[ 'fixed' ].index].replace(".jpg","").substr(path.length)+'b'+"_"+dreta.arguments[0]+".html";
}

function esquerra()
// arguments: language
// (c) 2004 Marc Vinyes Raso, Released under GPL2 License : http://www.gnu.org/copyleft/gpl.html
{
  var path=document.images[ 'fixed' ].path;
  window.location=document.images[ 'fixed' ].imgs[document.images[ 'fixed' ].index].replace(".jpg","").substr(path.length)+'a'+"_"+esquerra.arguments[0]+".html";
}

function sequence()
// arguments: name of the img tag, path_of_images, all images
// (c) 2004 Marc Vinyes Raso, Released under GPL2 License : http://www.gnu.org/copyleft/gpl.html
{
  var i;
  if ( document.images[ sequence.arguments[0] ] ) 
  {
	document.images[ sequence.arguments[0] ].imgs = new Array(sequence.arguments.length-2);
    for(i=0;i<document.images[ sequence.arguments[0] ].imgs.length;i++)
    {
    	if (sequence.arguments[i+2]=="")
      	document.images[ sequence.arguments[0] ].imgs[i] = "";
      else
      	document.images[ sequence.arguments[0] ].imgs[i] = sequence.arguments[1]+sequence.arguments[i+2];
    }
    document.images[sequence.arguments[0]].index=0;
  }
  else
  {
      alert("ERROR loading image with name \""+sequence.arguments[0]+"\". It doesn't exist");
  }
}

function sequence2()
// case of single browse, browse starting with different images
// arguments: displayed image first, path_of_images, all images
// name of the img tag fixed to 'fixed'
// (c) 2004 Marc Vinyes Raso, Released under GPL2 License : http://www.gnu.org/copyleft/gpl.html
{
  var i;
  var name='fixed';
  var path=sequence2.arguments[1];
  if ( document.images['fixed'] ) 
  {
  	current=sequence2.arguments[0];
	document.images[ 'fixed' ].imgs = new Array(sequence2.arguments.length-2);
        document.images[ 'fixed' ].path=path;
    for(i=0;i<document.images[ 'fixed' ].imgs.length;i++)
    {
    	if (sequence2.arguments[i+2]=="")
    		document.images[ 'fixed' ].imgs[i] = "";
    	else
      	document.images[ 'fixed' ].imgs[i] = path+sequence2.arguments[i+2];
      if (sequence2.arguments[i+2]==current) 
      { 
      document.images[ 'fixed' ].index=i; 
      }
    }
  }
  else
  {
      alert("ERROR loading displayed images : Image with name \""+name+"\" doesn't exist");
  }
}