function fn_IEdetect()
{
  if (navigator.userAgent.toLowerCase().indexOf("msie") != -1)
  {
    return true;
  }
}

//Per far COMPARIRE un elemento
function fn_Opacity_IN(vObjId, vStartingOpacity, vDuration)
  {
  lElement = document.getElementById(vObjId);
  lElement.style.display = 'block';
  lElement.style.visibility = 'visible';

  if(fn_IEdetect())
  {
    lElement.style.filter='alpha(opacity=' + vStartingOpacity * 10 + ')';
  }
  else
  {
    lElement.style.opacity = vStartingOpacity / 10;
  }
  vStartingOpacity++;
  lTemp = vDuration / 10;

  if(vStartingOpacity <= 10)
  {
    setTimeout("fn_Opacity_IN('" + vObjId + "'," + vStartingOpacity + "," + vDuration + ")", lTemp);
  }
}

//Per far SCOMPARIRE un elemento
function fn_Opacity_OUT(vObjId, vStartingOpacity, vDuration)
{
  lElement = document.getElementById(vObjId);

  if(fn_IEdetect())
  {
    lElement.style.filter = 'alpha(opacity=' + vStartingOpacity * 10 + ')';
  }
  else
  {
    lElement.style.opacity = vStartingOpacity/10;
  }
  
  vStartingOpacity--;

  lTemp = vDuration / 10;
  if(vStartingOpacity >= 0)
  {
    setTimeout("fn_Opacity_OUT('" + vObjId + "'," + vStartingOpacity + "," + vDuration + ")", lTemp);
    if(vStartingOpacity == 0)
    {
      //lElement.style.display = 'none';
      lElement.style.visibility = 'hidden';
    }
  }
}

//******************************************************************************
function fn_FadeInObject(vObjID, vClass, vDuration)
{
  if (vDuration > 0) { fn_Opacity_IN(vObjID, 1, vDuration); }
  if (vClass != "") { document.getElementById(vObjID).className = vClass; }
}

//******************************************************************************
function fn_FadeOutObject(vObjID, vClass, vDuration)
{
  if (vClass != "") { document.getElementById(vObjID).className = vClass; }
  fn_Opacity_OUT(vObjID, 10, vDuration);
}


//******************************************************************************
function fn_SlideShow(vSpeed, vFadeDuration, vImgPattern, vImgCount, vImgStart)
{
   /* CREARE UN IMG CON NAME='imgSlideShow' */
   /* INSERIRE <body onload="fnSlideShow(5000,3,img#COUNT#.jpg,5,0)"> */

   lImgPattern = vImgPattern;

   if (vImgStart == "RAND") { lNextImage = Math.round(Math.random() * (vImgCount - 1)) + 1; } else { lNextImage = vImgStart; }

   if (document.all)
   {
      document.images.imgSlideShow.style.filter="blendTrans(duration=2)";
      document.images.imgSlideShow.style.filter="blendTrans(duration=vFadeDuration)";
      document.images.imgSlideShow.filters.blendTrans.Apply();
   }

   lImage = new Image();

   //if (isArray(lImgPattern)) { lImage.src = lImgPattern[lNextImage]); }
   //else { lImage.src = lImgPattern.replace("#COUNT#", lNextImage); }
   lImage.src = lImgPattern.replace("#COUNT#", lNextImage);

   document.images.imgSlideShow.src = lImage.src;

   if (document.all) { document.images.imgSlideShow.filters.blendTrans.Play(); }
   if (vImgStart == "RAND") { lNextImage = Math.round(Math.random() * (vImgCount - 1)) + 1; }
   else { lNextImage = vImgStart + 1; if (lNextImage > (vImgCount)) lNextImage = 1; }


   lTimeout = setTimeout("fn_SlideShow(" + vSpeed + "," + vFadeDuration + ",'" + vImgPattern + "'," + vImgCount + "," + lNextImage + ")", vSpeed);
}


//******************************************************************************
function fn_FindPosX(lObj)
{
  var lCurLeft = 0;
  if(lObj.offsetParent)
      while(1)
      {
        lCurLeft += obj.offsetLeft;
        if(!lObj.offsetParent)
          break;
        lObj = lObj.offsetParent;
      }
  else if(lObj.x)
      lCurLeft += lObj.x;
  return lCurLeft;
}

function fn_FindPosY(lObj)
{
  var lCurTop = 0;
  if(lObj.offsetParent)
      while(1)
      {
        lCurTop += lObj.offsetTop;
        if(!lObj.offsetParent)
          break;
        lObj = lObj.offsetParent;
      }
  else if(lObj.y)
      lCurTop += lObj.y;
  return lCurTop;
}




//******************************************************************************
var gScrollTimer=null;
function fn_ObjectScrollIt(vObjectID, vAmount)
{
  lObj = document.getElementById(vObjectID);
  lObj.scrollTop = lObj.scrollTop + vAmount;
}

function fn_ObjectScroll(vObjectID, vActivate, vAmount, vInterval)
{
  if(gScrollTimer) { clearInterval(gScrollTimer); gScrollTimer = null; }
  if (vAmount == "AUTO")
  {
    lObj = document.getElementById(vObjectID);
    lAmount = 0;
    lAmount = lAmount + event.clientY;
    lAmount = lAmount - (fn_FindPosY(lObj));
    lAmount = lAmount - (lObj.offsetHeight / 2);
    lAmount = lAmount / 10;
    lAmount = Math.round(lAmount);
  }
  else { lAmount = vAmount; }

  if(vActivate) { gScrollTimer = setInterval("fn_ObjectScrollIt('" + vObjectID + "'," + lAmount + ")", vInterval); }
}
