/*--------------------------------------------------
                        NOTICE
  This source code may be used and modified freely.
  If you improve it, please share your enhancement
  with the original author.  He may be reached at 
  christopher.zenner@ptk.org.  Thanks.
  
  Script Name: The Elegant Slide
  
  07/09/2005
  The following functions control the slideshow on
  the CSMT home page. - CBZ
  
  07/17/2005
  Support for image captions added. - CBZ
  
  10/26/2005
  Complete rewrite of slide functionality.  Support 
  for fade in added, based on code base at
  http://clagnut.com/sandbox/imagefades/.
  --------------------------------------------------*/

document.write("<style type='text/css'>\n\timg#pic { visibility: hidden; }\n</style>");

if (document.images)
{
	img00 = new Image;
	img01 = new Image;
	img02 = new Image;
	img03 = new Image;
	img04 = new Image;
	img05 = new Image;
	img06 = new Image;
	img07 = new Image;
	img08 = new Image;
	img09 = new Image;
	
	img00.src = "images/slides/imgCSMTSlideSETB.jpg";
	img01.src = "images/slides/imgCSMTSlideMacari.jpg";
	img02.src = "images/slides/imgCSMTSlidePazosAndPena.jpg";
	img03.src = "images/slides/imgCSMTSlideSETBCompLab.jpg";
	img04.src = "images/slides/imgCSMTSlidePrice.jpg";
	img05.src = "images/slides/imgCSMTSlideMacariWithCong.jpg";
	img06.src = "images/slides/imgCSMTSlideSETBLecHall.jpg";
	img07.src = "images/slides/imgCSMTSlideSeidel.jpg";
	img08.src = "images/slides/imgCSMTSlideSPITX.jpg";
	img09.src = "images/slides/imgCSMTSlideMacariAndPaull.jpg";
}
else
{
	img00.src = "";
	img01.src = "";
	img02.src = "";
	img03.src = "";
	img04.src = "";
	img05.src = "";
	img06.src = "";
	img07.src = "";
	img08.src = "";
	img09.src = "";
}

function launchSlideshow()
{
	slides = new Array('images/slides/imgCSMTSlideSETB.jpg',
					   //'images/slides/imgCSMTSlideMacari.jpg',
					   'images/slides/imgCSMTSlidePazosAndPena.jpg',
					   'images/slides/imgCSMTSlideSETBCompLab.jpg',
					   'images/slides/imgCSMTSlidePrice.jpg',
					   //'images/slides/imgCSMTSlideMacariWithCong.jpg', 
					   'images/slides/imgCSMTSlideSETBLecHall.jpg', 
					   'images/slides/imgCSMTSlideSeidel.jpg',
					   'images/slides/imgCSMTSlideSPITX.jpg');
					   //'images/slides/imgCSMTSlideMacariAndPaull.jpg');
	captions = new Array('Science, Engineering, and Technology Bldg (SETB)',
					     //'<a href="http://www.phys.utb.edu/~christopher/web/csmtweb/documents/UTB_Selects_Macari_to_Lead_CSMT.pdf" target="_blank">&quot;UTB Selects Macari to Lead CSMT&quot;</a>', // Dr. Emir José Macari, Dean
					     '<a href="http://blue.utb.edu/newsandinfo/news/archive/2004_12_20FirstmastersPhysics.htm" target="_blank">&quot;First Master\'s Degrees in Physics Awarded&quot;</a>', // Enrique Pazos, M.S. and Santiago Peña, M.S.
						 'SETB CS/CIS Lab',
                         '<a href="http://www.phys.utb.edu/~rprice/rprice.html" target="_blank">Dr. Richard Price, Professor of Physics</a>',
					     //'<a href="http://www.phys.utb.edu/~christopher/web/csmtweb/documents/Biotech_Money_Wanted_for_Education_Programs.pdf" target="_blank">&quot;Biotech Money Wanted for Education Programs&quot;</a>', // Sen. John Carona, Dr. Emir Macari, and Sen. Eddie Lucio
                         'SETB Lecture Hall',
					     '<a href="http://blue.utb.edu/newsandinfo/news/archive/2005_02_07AstrophysistBlackHoles.htm" target="_blank">&quot;Renowned Astrophysicist Speaks on Black Holes&quot;</a>', // Dr. Ed Seidel, Renowned Astrophysicist
						 'South Padre Island, Texas:&nbsp;&nbsp;Home to UTB/TSC&#8217;s SPI Center');
						 //'Drs. Macari and Paull at the Tamul Water Falls');

	slide = 0;
	noSlides = slides.length;
	IE = (document.all) ? 1 : 0;
	NS6 = (!document.all && document.getElementById) ? 1 : 0;
	
	loadImage();
	
	setInterval("advanceSlide()", 5000);
}

function loadImage()
{
	imageID = 'pic';
	image = document.getElementById(imageID);

	setOpacity(image, 0);
	
	image.style.visibility = 'visible';
	
	fadeIn(imageID, 0);	
}

function setOpacity(img, opacity) 
{
	opacity = ((opacity == 100) ? 99.999 : opacity);
  
	// IE/Win
	img.style.filter = "alpha(opacity:"+opacity+")";
	  
	// Safari < 1.2, Konqueror
	img.style.KHTMLOpacity = opacity / 100;
	  
	// Older Mozilla and Firefox
	img.style.MozOpacity = opacity / 100;
	  
	// Safari 1.2, newer Firefox and Mozilla, CSS3
	img.style.opacity = opacity / 100;
}

function fadeIn(objID, opacity) 
{
	if (document.getElementById) 
	{
		obj = document.getElementById(objID);
    
		if (opacity <= 100)
		{
			setOpacity(obj, opacity);
			opacity += 5;
			window.setTimeout("fadeIn('"+objID+"',"+opacity+")", 50);
		}
  	}
}

function advanceSlide()
{
	if (document.images)
	{
		slide++;
		
		if (slide == noSlides)
			slide = 0;
			
		document.slideshow.src = slides[slide];
		label = captions[slide];
		
		if (IE)
			document.all["caption"].innerHTML = label;
		else if (NS6)
			document.getElementById("caption").innerHTML = label;
		
		loadImage();
	}
}