////////////////////////////////////////////////////////////////////////////////////
//
//     ValdoLineGraph.js slenkantiems paveikslams
//
////////////////////////////////////////////////////////////////////////////////////

  var VabDir, VabStp, VabBase;
  var timeInt, timeDel;
  var VabNr=0;
  var VabNrr, PictNrr;

  var imgWidth, imgHeight;
  var imgBlWidth, imgBlHeight;
  var LineTop, LineBottom;
  var LineLeft, LineRight;

  var toppos, leftpos;

  VabPic=new Array();

///////////////////////////////////////////////

function VabX(nr) 
{
  var x;
  var NeIDname="Ned"+(VabBase+nr+1);

  if ( document.all )
  {
    x=parseInt(divStyle[VabBase+nr+1].style.left); 
  }
  else
  {
    if ( document.getElementById ) 
    {
      x=parseInt(divStyle[VabBase+nr+1].style.left);
    }
    else
    {
      if ( document.layers ) 
      {
        x=document.layers[NeIDname].left;
      }
    }
  } 

  return x;
}

function maxX(nr) 
{ 
  var x, right;

  if ( VabDir==0 ) x=right=LineLeft+imgBlWidth*nr;
  if ( VabDir==1 ) x=right=LineLeft+imgBlWidth*(nr+1);

  if ( document.all )
  {
    x=right;
  }
  else
  {
    if ( document.getElementById ) 
    {
      x=right;
    }
    else
    {
      if ( document.layers ) 
      {
        x=right;
      }
    } 
  } 

  return x;
}

function VabY(nr) 
{
  var y;
  var NeIDname="Ned"+(VabBase+nr);

  if ( document.all )
  {
    y=parseInt(divStyle[VabBase+nr].style.top); 
  }
  else
  {
    if ( document.getElementById ) 
    {
      y=parseInt(divStyle[VabBase+nr].style.top); 
    }
    else
    {
      if ( document.layers ) 
      {
        y=document.layers[NeIDname].top;
      }
    } 
  } 

  return y;
}

function maxY(nr) 
{
  var y, top;

  if ( VabDir==2 ) y=top=LineTop+imgBlHeight*nr;
  if ( VabDir==3 ) y=top=LineTop+imgBlHeight*(nr+1);

  return y;
}

function VabStartPos(Left,Top,Dir,Stp,Base,imW,imH,imWSp,imHSp,nImg,nPos,tId,tDel) 
{
  var inim;
  var i, ii;
  var NeIDname; 

  VabDir=Dir; VabStp=Stp; VabBase=Base;

  LineLeft=Left; imgWidth=imW;
  imgBlWidth=imgWidth+imWSp*2;
  LineRight=LineLeft+imgBlWidth;

  LineTop=Top; imgHeight=imH;
  imgBlHeight=imgHeight+imHSp*2;
  LineBottom=LineTop+imgBlHeight;

  VabNrr=nImg; PictNrr=nPos;
  toppos=LineTop; leftpos=LineLeft;

  timeInt=tId; timeDel=tDel;
  inim=Math.round(Math.random()*(Nimg-1)); 

  for ( i=0; i<VabNrr; i++ ) 
  {
    VabPic[i]=new Image();
    im=i+inim;
    if ( im>nImg ) im=im-nImg;
    if ( im<1 ) im=1;

    if ( im<=9 )
      VabPic[i].src="Images/RunIm0"+im+".jpg"; 
    else
      VabPic[i].src="Images/RunIm"+im+".jpg"; 
  }

  VabNextPos(); 
}

function VabNextPos() 
{
  var i, ii;
  var NeIDname; 

  for ( i=0; i<PictNrr; i++ ) 
  {
    NeIDname="Ned"+(VabBase+i+1); 

    ii=i; if ( VabDir==0 || VabDir==2 ) ii=(i-1);
        
    if ( VabDir==0 || VabDir==1 ) 
    {
      if ( document.all )
      {
        toppos=divStyle[VabBase+i+1].style.top=LineTop;
        leftpos=divStyle[VabBase+i+1].style.left=LineLeft+imgBlWidth*ii;  
      }
      else
      { 
        if ( document.getElementById ) 
        {
          toppos=divStyle[VabBase+i+1].style.top=LineTop;
          leftpos=divStyle[VabBase+i+1].style.left=LineLeft+imgBlWidth*ii;  
        }
        else
        {    
          if ( document.layers ) 
          {
            toppos=document.layers[NeIDname].top=LineTop;
            leftpos=document.layers[NeIDname].left=LineLeft+imgBlWidth*ii;
          }
        } 
      }
    }

    if ( VabDir==2 || VabDir==3 ) 
    {
      if ( document.all )
      {
        toppos=divStyle[VabBase+i+1].style.top=LineTop+imgHeight*ii;
        leftpos=divStyle[VabBase+i+1].style.left=LineLeft;  
      }
      else
      { 
        if ( document.getElementById ) 
        {
          toppos=divStyle[VabBase+i+1].style.top=LineTop+imgHeight*ii;
          leftpos=divStyle[VabBase+i+1].style.left=LineLeft;  
        }
        else
        {    
          if ( document.layers ) 
          {
            toppos=document.layers[NeIDname].top=LineTop+imgHeight*ii;  
            leftpos=document.layers[NeIDname].left=LineLeft;
          }
        } 
      }
    }
  }

  VabShow();

  if ( VabDir==0 || VabDir==2 ) 
  {
    VabNr=VabNr-1;
    if ( VabNr<0 ) VabNr=VabNrr-1;
  }

  if ( VabDir==1 || VabDir==3 ) 
  {
    VabNr=VabNr+1;
    if ( VabNr>=VabNrr ) VabNr=0;
  }
}

function VabCheck(nr) 
{
  if ( VabDir==0 && VabX(nr)>maxX(nr) ) 
  {
    VabNextPos();
  }

  if ( VabDir==1 && VabX(nr)<LineLeft-imgBlWidth ) 
  {
    VabNextPos();
  }

  if ( VabDir==2 && VabY(nr)>maxY(nr) )
  {
    VabNextPos();
  }

  if ( VabDir==3 && VabY(nr)<LineTop-imgHeight ) 
  {
    VabNextPos();
  }
}

function VabStep() 
{
  var i, NeIDname, leftpos, toppos;

  for ( i=0; i<PictNrr; i++ ) 
  {
    NeIDname="Ned"+(VabBase+i+1);

    if ( VabDir==0 ) 
    {
      if ( document.all )
      {
        leftpos=parseInt(divStyle[VabBase+i+1].style.left);
        leftpos+=VabStp;
        divStyle[VabBase+i+1].style.left=leftpos; 
      }
      else
      {
        if ( document.getElementById ) 
        {
          leftpos=parseInt(divStyle[VabBase+i+1].style.left);
          leftpos+=VabStp;
          divStyle[VabBase+i+1].style.left=leftpos; 
        }
        else
        {
          if ( document.layers ) 
          {
            leftpos=document.layers[NeIDname].left;
            leftpos+=VabStp;
            document.layers[NeIDname].left+=leftpos;
          }
        } 
      } 
    } 

    if ( VabDir==1 ) 
    {
      if ( document.all )
      {
        leftpos=parseInt(divStyle[VabBase+i+1].style.left);
        leftpos-=VabStp;
        divStyle[VabBase+i+1].style.left=leftpos; 
      }
      else
      {
        if ( document.getElementById ) 
        {
          leftpos=parseInt(divStyle[VabBase+i+1].style.left);
          leftpos-=VabStp;
          divStyle[VabBase+i+1].style.left=leftpos; 
        }
        else
        {
          if ( document.layers ) 
          {
            leftpos=document.layers[NeIDname].left;
            leftpos-=VabStp;
            document.layers[NeIDname].left+=leftpos;
          }
        } 
      } 
    } 

    if ( VabDir==2 ) 
    {
      if ( document.all )
      {
        toppos=parseInt(divStyle[VabBase+i+1].style.top);
        toppos+=VabStp;
        divStyle[VabBase+i+1].style.top=toppos; 
      }
      else
      {
        if ( document.getElementById ) 
        {
          toppos=parseInt(divStyle[VabBase+i+1].style.top);
          toppos+=VabStp;
          divStyle[VabBase+i+1].style.top=toppos; 
        }
        else 
        {
          if ( document.layers ) 
          {
            toppos=document.layers[NeIDname].top;
            toppos+=VabStp;
            document.layers[NeIDname].top+=toppos;
          }
        }
      } 
    }

    if ( VabDir==3 ) 
    {
      if ( document.all )
      {
        toppos=parseInt(divStyle[VabBase+i+1].style.top);
        toppos-=VabStp;
        divStyle[VabBase+i+1].style.top=toppos; 
      }
      else
      {
        if ( document.getElementById ) 
        {
          toppos=parseInt(divStyle[VabBase+i+1].style.top);
          toppos-=VabStp;
          divStyle[VabBase+i+1].style.top=toppos; 
        }
        else 
        {
          if ( document.layers ) 
          {
            toppos=document.layers[NeIDname].top;
            toppos-=VabStp;
            document.layers[NeIDname].top+=toppos;
          }
        }
      } 
    }
  }

  VabCheck(0);
}

//////////////////// Būtina taisyti !!! /////////////////////////////

function VabShow() 
{
  var vb1=VabNr; var vb2=VabNr+1; var vb3=VabNr+2; 
  var vb4=VabNr+3; var vb5=VabNr+4; var vb6=VabNr+5; 

  clearInterval(timeInt);
  
  if ( vb2>=VabNrr ) vb2=vb2-VabNrr; 
  if ( vb3>=VabNrr ) vb3=vb3-VabNrr; 
  if ( vb4>=VabNrr ) vb4=vb4-VabNrr; 
  if ( vb5>=VabNrr ) vb5=vb5-VabNrr;
  if ( vb6>=VabNrr ) vb6=vb6-VabNrr;

  document["imgVab51"].src=VabPic[vb1].src;
  document["imgVab52"].src=VabPic[vb2].src;
  document["imgVab53"].src=VabPic[vb3].src;
  document["imgVab54"].src=VabPic[vb4].src;
  document["imgVab55"].src=VabPic[vb5].src;
  document["imgVab56"].src=VabPic[vb6].src;

  timeInt=setInterval("VabStep()",timeDel); 
}




