// Hacked and adapted.... 

document.write("<TITLE>"+Title+"</TITLE>");

  // check if slide is in child window
  var sWinName = window.name.toLowerCase();
  var fmt = (sWinName.indexOf("slideshow")>-1) ? "Child" : "";
  var nos = PhotoName.length;
  var ImgState = new Array(nos);
  var query = location.search;
  var S = (query.indexOf("s")>-1) ? parseInt(query.substring(query.indexOf("s")+2)) : 0;
  var vSpeed = (query.indexOf("v")>-1) ? query.substring(query.indexOf("v")+2) : "28";
  var bDhtml = ((document.all && navigator.appVersion.indexOf("WebTV")==-1) || (document.layers && (navigator.appVersion.indexOf("Nav") > 0 || parseFloat(navigator.appVersion)>=4.5))) ? true : false;
  var imgdir="";

  var Cells = new Array();	//cell dimensions for each photo format
  // check if child window is large or small
  if (sWinName.indexOf("hi")>-1) {
	if (types[2]) {
	  	imgdir = "_8x6";
		PhotoWidth = PhotoWidth2;
		PhotoHeight = PhotoHeight2;
	}
	Height1 = "460";
	Width1 = "500"
  } else {
	if (types[1] && fmt=="Child") {
  		imgdir = "_6x4";
		PhotoWidth = PhotoWidth1;
		PhotoHeight = PhotoHeight1;
	}
	Height1 = "460";
	Width1 = "500"
  }

	if (navigator.appName=="Netscape" && parseInt(navigator.appVersion)<=3) { 
		linklabel = "<font face=Arial size=2 color=cc0000><b> </b></font>";
		bullet = "<font face='Verdana,Arial' size=2 color=#CC0000>&#0149;</font>";
	} else {
		linklabel = "<img src=" +linkname+ ">";
		bullet = "<img src=/site_elements/bullet_red.gif hspace=2 border=0>";
	}

if (document.images) {
	navimg  = new Array();
	for (i=0;i<3;i++) {
		navimg[i] = new Image();
	}
	navimg[0].src="http://www.adventistreview.org/2000-bulletin1/photoessay/source/first.gif";
	navimg[1].src="http://www.adventistreview.org/2000-bulletin1/photoessay/source/middle.gif";
	navimg[2].src="http://www.adventistreview.org/2000-bulletin1/photoessay/source/last.gif";
}

  function sNav(s) {
	var str = "";
	for (i=0;i<nos;i++) {
		str += "<a class=SlideLink href=\"javascript:GoSlide(" +i+ ")\">";
		var lnkColor = (i==s) ? "cc0000" : "000099";
		str += "<font color=" +lnkColor+ ">" +(i+1) + "</font></a>"; 
		if (i < nos-1) { str += " | " }
	}
	return str; 
  }

  function sNavArrow(i) {
	if (document.images) { 
		if (i==0) { var sTmp = "<img src=" +navimg[0].src; }
		else if (i==nos-1) { var sTmp = "<img src=" +navimg[2].src; }
		else { var sTmp = "<img src=" +navimg[1].src; }
	}
	else {
		var sTmp = "<img src=http://www.adventistreview.org/2000-bulletin1/photoessay/source/"
		if (i==0) { sTmp += "first.gif" }
		else if (i==nos-1) { sTmp += "last.gif" }
		else { sTmp += "middle.gif" }
	}
	sTmp += " align=absmiddle border=0 width=50 height=22 usemap=#sscontrols>" 
	return sTmp;
  }
  
  function ImageHole(iType,i) {
	// photos have type w/ length of 1, code has length=2. A dummy gif is added to the code to keep the photo array (and status-checking) intact.
  	var sTmp = "";
	var bLast = (i == nos-1);
	if (iType==1) {
		var imgSrc = (i>0 && bDhtml) ? "http://www.adventistreview.org/2000-bulletin1/photoessay/source/clear.gif" : PhotoName[i];
		if (!bLast) { sTmp += "<a href=\"javascript:GoSlide(" +(i+1)+ ");\">"; }
		sTmp += "<img name=photo src=\"" +imgSrc+ "\" alt=\"" +Alt[i]+ "\" border=0 width=" +PhotoWidth[i]+ " height=" +PhotoHeight[i]+ ">";
		if (!bLast) { sTmp += "</a>"; }
	} else {
		sTmp += "<img name=photo src=\"http://www.adventistreview.org/2000-bulletin1/photoessay/source/source/clear.gif\" height=1 width=1>" + PhotoName[i];
	}
	return sTmp;
  }

  function MediaLinks(i) {
	var sTmp = "<FORM name=frmMedia><font face=arial size=1>";
	var mplayer = false;
	for (j=0;j<MediaCaptions.length;j++) {
		if (MediaCaptions[j][0]==i) {
			if (!mplayer) { mplayer = true; }
			if (MediaCaptions[j][4]==0) {
				// audio caption
				sTmp += "<a href='/news/asx/audio/28/" +MediaCaptions[j][3]+ ".asx'><img src='/site_elements/lnk_audio.gif' border=0 width=38 height=10 valign=middle></a>&nbsp;<a class=TxtLink href='/news/asx/audio/28/" +MediaCaptions[j][3]+ ".asx'>" + MediaCaptions[j][2] + "</a><br>"; 
			}
			else if (MediaCaptions[j][4]==1) { 
				var vFile = MediaCaptions[j][3];
				sTmp += "<a href=javascript:ShowVideo(\"" +vFile+ "\",'');><img src='/site_elements/lnk_video.gif' border=0 width=37 height=10 valign=middle></a><font face='Arial' size=1 color=#CC0000><input type=radio name=speed" +j+" onClick='ShowVideo(\"" +vFile+ "\",\"28\");'>28.8 <input type=radio name=speed" +j+" onClick='ShowVideo(\"" +vFile+ "\",\"56\");'>56 <input type=radio name=speed" +j+" onClick='ShowVideo(\"" +vFile+ "\",\"100\");'>T1<br>";
				sTmp += "&nbsp;<a class=TxtLink href=javascript:ShowVideo(\"" +vFile+ "\",'');>" + MediaCaptions[j][2] + "</a></font><br>"; 
			}
		}
	}
	if (mplayer) {
		sTmp += "<font face='Verdana,Arial' size=2 color=#CC0000>&#0149;</font> <a class=TxtLink2  href='http://www.microsoft.com/windows/mediaplayer/download/default.asp' target=cover>Free Windows Media Player</a>";
	}
	sTmp += "</font></FORM>";
	return sTmp;
  }

  function ShowVideo(f,s) {
	if (s) { vSpeed=s; }
  	if (fmt=="Child") {
	  	eval("opener.m_OpenMP(vSpeed,'V','" + f + "')");
	} else {
	  	eval("m_OpenMP(vSpeed,'V','" + f + "')");
	}
	SetVideoSelect();
  }

  function GoSlide(nxt) {
  	if (nxt<0 || nxt >= nos) { }
	else {
		if (document.all && bDhtml) { 
			document.all.SlideCell[S].style.display="none";
			document.all.SlideCell[nxt].style.display="";
			document.all.photo[nxt].src = PhotoName[nxt]; 
			S=nxt;
			self.scrollTo(0,0); 
		}
		else if (document.layers && bDhtml) {
			eval('document.layers["SlideCell"].document.div' +S+ '.visibility="hidden"');
			eval('document.layers["SlideCell"].document.div' +nxt+ '.visibility="show"');

document.layers["SlideCell"].layers[nxt].document.images["photo"].src=PhotoName[nxt];
			S = nxt;
			self.scrollTo(0,0);
		}
		else {
			S = nxt;
			location.href="/modules/slideshow/" +ProjectName+ "/slideshow.asp?fmt=" +fmt+"&s="+S+"&v="+vSpeed;
		}
		SetVideoSelect();
	}
  }

  function SetVideoSelect() {
	// set video speed selection
	if (document.layers && parseFloat(navigator.appVersion)>=4.5) {
		var list = document.layers["SlideCell"].layers[S].document.forms['frmMedia'];
	} else if (document.all) {
		var list = document.forms['frmMedia'][S]
	} else { var list = document.forms[0]; }
	if (list) {
		if (vSpeed=="28") { j=0; }
		else if (vSpeed=="56") { j=1; }
		else { j=2; }
		for (i=0;i<list.elements.length;i++) {
			if (i % 3 == j) { list.elements[i].checked=true; }
		}  
	}
  }


  function WriteSlide(i) {
	if (!i) { i = S }
	var sTmp = ""; 
	var SScontrol = sNavArrow(i);
	var pStyle = parseInt(PhotoStyle[i]);
	var header = (pStyle==1) ? "" : Headline[i];
	sTmp += "<table cellspacing=0 cellpadding=0 border=0 width=472><tr><td height=30 width=90><font face=arial size=1 color=000099>" +SScontrol + (i+1) + " / " + nos + "</font></td><td width=5>&nbsp;</td><td width=380 align=left><font face='Times new roman, times' size=5 color=cc0000>" + header + "</font></td></tr></table><table cellspacing=0 cellpadding=0 border=0 width=472>";
	if (pStyle==1) {
		// vertical photo
		sTmp += "<tr><td colspan=3><table cellspacing=0 cellpadding=0 border=0><tr valign=top><td>" + ImageHole(PhotoStyle[i].length,i) + "</td><td width=10>&nbsp;</td><td><font face='Times new roman, times' size=5 color=cc0000>" + Headline[i] + "</font><br><font face=arial size=2>" +PhotoCaption[i]+ "</font>" +MediaLinks(i)+ "</td></tr></table></td></tr>";
	}
	else if (pStyle==0 || pStyle>=2) {
		// horizontal/wide photo
		sTmp += "<tr><td colspan=3 height=5><SPACER TYPE=BLOCK WIDTH=1></td></tr>";
		sTmp += "<tr valign=top><td colspan=3>" + ImageHole(PhotoStyle[i].length,i) + "</td></tr>";
		sTmp += "<tr><td colspan=3 height=10><SPACER TYPE=BLOCK WIDTH=1></td></tr>";
		var brk = PhotoCaption[i].indexOf("---");
		if (pStyle==3 && brk>-1) {
			var Width2 = (Width1-20)/2;
			var cap1=PhotoCaption[i].substring(0,brk); var cap2=PhotoCaption[i].substring(brk+3);
			sTmp += "<tr><td valign=top width=" +Width2+ "><font face=arial size=2>" +cap1+ "</font></td><td width=20><spacer type=block width=1></td><td valign=top width=" +Width2+ ">" +cap2+"<br>"+MediaLinks(i)+ "</td></tr>";
		} else {
			sTmp += "<tr><td colspan=3 width=" +(PhotoWidth[i]-5)+ "><font face=arial size=2>" + PhotoCaption[i] + "</font>" +MediaLinks(i)+ "</td></tr>";
		}
	}

	sTmp += "<tr><td colspan=3 height=10><SPACER TYPE=BLOCK WIDTH=1></td></tr>";
	sTmp += "<tr valign=top><td colspan=3><font face=arial size=1>" +SScontrol+sNav(i)+ "</font></td></tr><tr><td height=10 colspan=3>&nbsp;</td></tr>";
	
	sTmp += "<tr><td colspan=3>";
	for (var j=0;j<Blink.length;j+=2) {
		if (Blink[j] && j==0) { sTmp += linklabel; }
		if (Blink[j]) {	sTmp += "<br>" +bullet+ " <font face=Arial size=2><a href='" +Blink[j+1]+ "' class=TxtLink2>" +Blink[j]+ "</a></font>"; }
	}

	if (adlink) {
		sTmp += adlink;
	}
	sTmp += "</td></tr><tr><td colspan=3 height=30>&nbsp;</td></tr></table>";
	return sTmp;
  }

  function WriteSlideChild(i) {
	if (!i) { i = S }
	var str = ""; 
	var SScontrol = sNavArrow(i);
	var pStyle = PhotoStyle[i];
	str += "<img src=\"/site_elements/slideshow/bantop" +imgdir+ "_"+bantop+".gif\">";
	str += "<table cellspacing=0 cellpadding=0 border=0 width=100%><tr><td width=20 height=1><SPACER TYPE=BLOCK WIDTH=1></td><td width=" +(Width1-37)+ "><SPACER TYPE=BLOCK WIDTH=1></td><td width=37><SPACER TYPE=BLOCK WIDTH=1></td><td width=20><SPACER TYPE=BLOCK WIDTH=1></td></tr><tr valign=bottom><td width=20 rowspan=3>&nbsp;</td><td colspan=2 height=27><font face=arial size=1>" +SScontrol+sNav(i)+ "</font></td><td width=20 rowspan=2>&nbsp;</td></tr>";
	str += "<tr valign=top><td height=" +Height1+ " colspan=2><table cellspacing=0 cellpadding=0 border=0 width=" +Width1+ ">";
	if (parseInt(pStyle)==0) {
		// normal horizontal photo
		str += "<tr><td colspan=2 height=30><font face='Times new roman, times' size=5 color=cc0000>" + Headline[i] + "</font></td></tr>";
		str += "<tr><td height=5 colspan=2><SPACER type=block width=1></td></tr>";
		str += "<tr valign=top><td>";
		// image or code hole
		str += ImageHole(pStyle.length,i);
		str += "</td><td valign=top><font face=arial size=2>" + PhotoCaption[i] + "</font>" +MediaLinks(i)+ "</td></tr>";
	}
	else if (parseInt(pStyle)==1) {
		// vertical photo
		str += "<tr><td height=5 colspan=2><SPACER type=block width=1></td></tr>";
		str += "<tr valign=top><td width=" +PhotoWidth[i]+ " height=100%>";
		str += ImageHole(pStyle.length,i);
		str += "</td><td><font face=times size=5 color=cc0000>" + Headline[i] + "</font><br><font face=arial size=2>" +PhotoCaption[i]+ "</font>" +MediaLinks(i)+ "</td></tr>";
	}
	else if (parseInt(pStyle)>=2) {
		// wide horizontal photo. split caption in 2 parts 		
		str += "<tr><td><font face='Times new roman, times' size=5 color=cc0000>" + Headline[i] + "</font></td></tr>";
		str += "<tr><td height=5><spacer type=block width=1></td></tr>";
		str += "<tr valign=top><td  >" + ImageHole(pStyle.length,i) +"</td></tr>";
		var brk = PhotoCaption[i].indexOf("---");
		if (pStyle==3 && brk>-1) {
			var Width2 = (Width1-20)/2;
			var cap1=PhotoCaption[i].substring(0,brk); var cap2=PhotoCaption[i].substring(brk+3);
			str += "<tr><td><table cellspacing=0 cellpadding=0 border=0 width=100%><tr><td valign=top width=" +Width2+ "><font face=arial size=2>" +cap1+ "</font></td><td width=20><spacer type=block width=1></td><td valign=top  width=" +Width2+ ">" +cap2+"<br>"+MediaLinks(i)+ "</td></tr></table></td></tr>";
		} else {
			str += "<tr><td valign=top><font face=arial size=2>" +PhotoCaption[i]+ "</font>"+MediaLinks(i)+ "</td></tr>";
		}
	}

	str += "</table></td></tr>";
	str += "<tr valign=bottom><td height=28><FONT face=Arial size=1>";
	for (i=0;i<Blink.length;i+=2) {
		if (Blink[i] && childlinks[i/2]) {	str += "<a class=TxtLink2  href='" +Blink[i+1]+ "' target=cover>" +bullet+ Blink[i]+ "</a>&nbsp;&nbsp;"; }
	}
	str += "</font></td><td colspan=2 align=right><a href='javascript:self.close();'><img src='/site_elements/close.gif' height=25 width=57 border=0></a></td></tr></table>";
	return str;
  }

  function WriteInitialSlide() {
	if (document.layers && bDhtml) {
		document.write("<ILAYER name=SlideCell>");
		for (var s=0;s<nos;s++) {
			document.write("<DIV name=div" +s+ " CLASS=slidepage>" + eval("WriteSlide" +fmt+ "(" +s+ ")") + "</DIV>")
		}
		document.write("</ILAYER>");
		GoSlide(S);
	} else if (document.all && bDhtml) { 
		for (s=0;s<nos;s++) {
			document.write("<DIV ID=SlideCell style='display:none'>" + eval("WriteSlide" +fmt+ "(" +s+ ")") + "</DIV>")
		}
		GoSlide(S);
	} else {
		document.write(eval("WriteSlide" +fmt+ "(" +S+ ")"));
	}
	SetVideoSelect();
  }