function changeImage(r,i)
{
r.src=i;
}

function goFlipURL()
{
  document.location = urlSet[currentFlip];
}

function flipFlipper(imageSet,speed)
{
  currentFlip ++;
  if (currentFlip == imageSet.length)
    currentFlip=0;
  changeImage(document.flip,imageSet[currentFlip]);
  setTimeout("flipFlipper(imageSet,speed)", speed)
}

function FlipperLong(width,height,s,images)
{
/* si: start index 
** i: current index
** ei: end index
** cc: current count
*/
 speed = s;
 si = 0; 
 ci=0;
 cc=0;
 imageSet = new Array();
 ei = images.length;
  for (i=1;i<ei;i++) {
    if (images.charAt(i) == ' ') {
      imageSet[cc] = images.substring(si,i);
      cc++;
      si=i+1;
      }
    }
  currentFlip = 0;
   
 document.write("<img name='flip'");
 if (width >0)
    document.write("width="+width);
 if (height >0)
    document.write(" height=" +height);
  document.writeln(" src=" +imageSet[0]+ ">");

  setTimeout("flipFlipper(imageSet,speed)", speed)
}

function Flipper(width,height,images)
{
  speed=5000;
  FlipperLong(width,height,speed,images);
}


function FlipperLinkLong(width,height,s,images,urls)
{
/* si: start index 
** i: current index
** ei: end index
** cc: current count
*/
 speed = s;
 imageSet = new Array();
 urlSet = new Array();

 si = 0; 
 ci=0;
 cc=0;
 ei = images.length;
  for (i=1;i<ei;i++) {
    if (images.charAt(i) == ' ') {
      imageSet[cc]= images.substring(si,i);
      cc++;
      si=i+1;
      }
    }

 si = 0; 
 ci=0;
 ccu=0;
 ei = urls.length;
  for (i=1;i<ei;i++) {
    if (urls.charAt(i) == ' ') {
      urlSet[ccu]= urls.substring(si,i);
      ccu++;
      si=i+1;
      }
    }

  currentFlip = 0;
   
 document.write("<a href=\"javascript:goFlipURL()\"><img name='flip'");
 document.write("<img name='flip'");
 if (width >0)
    document.write("width="+width);
 if (height >0)
    document.write(" height=" +height);
  document.writeln(" src=" +imageSet[0]+ "></a>");

  setTimeout("flipFlipper(imageSet,speed)", speed)
}

function FlipperLink(width,height,images,urls)
{
  speed=3000;
  FlipperLinkLong(width,height,speed,images,urls);
}

function showIndigo(){
	Flipper(300,280,"http://www.esotericinfo.com/images/rainbow1g.jpg http://www.esotericinfo.com/images/child0.jpg http://www.esotericinfo.com/images/child1.jpg http://www.esotericinfo.com/images/indigo.jpg http://www.esotericinfo.com/images/Misha1.jpg http://www.esotericinfo.com/images/child2.jpg http://www.esotericinfo.com/images/child3.jpg http://www.esotericinfo.com/images/child4.jpg http://www.esotericinfo.com/images/child5.jpg http://www.esotericinfo.com/images/child6a.jpg http://www.esotericinfo.com/images/liza.jpg http://www.esotericinfo.com/images/child6b.jpg http://www.esotericinfo.com/images/child9a.jpg http://www.esotericinfo.com/images/child6d.jpg http://www.esotericinfo.com/images/child9c.jpg http://www.esotericinfo.com/images/child9f.jpg http://www.esotericinfo.com/images/child6e.jpg http://www.esotericinfo.com/images/child6f.jpg http://www.esotericinfo.com/images/child6g.jpg http://www.esotericinfo.com/images/child9k.jpg http://www.esotericinfo.com/images/child6j.jpg http://www.esotericinfo.com/images/child6k.jpg http://www.esotericinfo.com/images/child6l.jpg http://www.esotericinfo.com/images/child6m.jpg http://www.esotericinfo.com/images/child6n.jpg http://www.esotericinfo.com/images/child6o.jpg http://www.esotericinfo.com/images/child6p.jpg http://www.esotericinfo.com/images/child9l.jpg http://www.esotericinfo.com/images/child9m.jpg ");	
}
