// the image path to use, with an {ITEMID} placeholder embedded in it
var WOWstrCoverPath = "http://www.syndetics.com/hw7.pl?isbn={ITEMID}/mc.gif&client=crrl&type=hw7";

// the widget's width (in pixels)
var WOWiWidgetWidth=400;

// the widget's height
var WOWiWidgetHeight=210;

// the slide speed (larger is faster 1-10)
var WOWslidespeed=2;

// cycles to pause per title
var WOWiPause=100;

// max width of visible titles in characters - however, a more precise method is used to ensure title fits onscreen
var WOWiTitleMaxShowingLength = 70;

// configure S curve - this is really percentages
var WOWarraySpeedRamp = new Array(-0.50,-0.37,-0.26,-0.17,-0.10,-0.05,-0.02,-0.01,0,0.01,0.02,0.05,0.10,0.17,0.26,0.37);

// bar-separated list of ASIN-or-ISBN/WowbraryURL/Title (no final bar)
var WOWstrRawData = "9786313206957|http://www.wowbrary.org/l.aspx?l=1517&c=531836&i=9786313206957&t=If+On+A+Winter%27s+Night...&widget|If On A Winter\'s Night...|9780547225470|http://www.wowbrary.org/l.aspx?l=1517&c=531827&i=9780547225470&t=When+the+Game+Was+Ours&widget|When the Game Was Ours|9786312559719|http://www.wowbrary.org/l.aspx?l=1517&c=531848&i=9786312559719&t=And+Winter+Came&widget|And Winter Came|9781416583400|http://www.wowbrary.org/l.aspx?l=1517&c=531828&i=9781416583400&t=Inside+of+a+Dog%3a+What+Dogs+See%2c+Smell%2c+and+Know&widget|Inside of a Dog: What Dogs See, Smell, and Know|9786313107179|http://www.wowbrary.org/l.aspx?l=1517&c=531838&i=9786313107179&t=The+Most+Wonderful+Time+of+the+Year&widget|The Most Wonderful Time of the Year|9780792190851|http://www.wowbrary.org/l.aspx?l=1517&c=531839&i=9780792190851&t=Scrooge&widget|Scrooge|9780307465351|http://www.wowbrary.org/l.aspx?l=1517&c=531809&i=9780307465351&t=The+4-Hour+Workweek%2c+Expanded+and+Updated%3a+Escape+9-5%2c+Live+Anywhere%2c+and+Join+the+New+Rich&widget|The 4-Hour Workweek, Expanded and Updated: Escape 9-5, Live Anywhere, and Join the New Rich|9780375760396|http://www.wowbrary.org/l.aspx?l=1517&c=531710&i=9780375760396&t=The+Botany+of+Desire%3a+A+Plant%27s-Eye+View+of+the+World&widget|The Botany of Desire: A Plant\'s-Eye View of the World|9780374270605|http://www.wowbrary.org/l.aspx?l=1517&c=531791&i=9780374270605&t=The+Collected+Stories+of+Lydia+Davis&widget|The Collected Stories of Lydia Davis|9780446561938|http://www.wowbrary.org/l.aspx?l=1517&c=531769&i=9780446561938&t=On+the+Brink%3a+Inside+the+Race+to+Stop+the+Collapse+of+the+Global+Financial+System&widget|On the Brink: Inside the Race to Stop the Collapse of the Global Financial System|9780061859410|http://www.wowbrary.org/l.aspx?l=1517&c=531792&i=9780061859410&t=The+Interrogative+Mood%3a+A+Novel%3f&widget|The Interrogative Mood: A Novel?|9781439164969|http://www.wowbrary.org/l.aspx?l=1517&c=531814&i=9781439164969&t=YOU%3a+On+A+Diet+Revised+Edition%3a+The+Owner%27s+Manual+for+Waist+Management&widget|YOU: On A Diet Revised Edition: The Owner\'s Manual for Waist Management|9780441018161|http://www.wowbrary.org/l.aspx?l=1517&c=531718&i=9780441018161&t=The+Good%2c+the+Bad%2c+and+the+Uncanny+(Nightside)&widget|The Good, the Bad, and the Uncanny (Nightside)|9780375425325|http://www.wowbrary.org/l.aspx?l=1517&c=531794&i=9780375425325&t=Revolution+1989%3a+The+Fall+of+the+Soviet+Empire&widget|Revolution 1989: The Fall of the Soviet Empire|9780553805260|http://www.wowbrary.org/l.aspx?l=1517&c=531747&i=9780553805260&t=The+Endless+Forest%3a+A+Novel&widget|The Endless Forest: A Novel|9780061859441|http://www.wowbrary.org/l.aspx?l=1517&c=531776&i=9780061859441&t=China%27s+Megatrends%3a+The+8+Pillars+of+a+New+Society&widget|China\'s Megatrends: The 8 Pillars of a New Society|9781416572367|http://www.wowbrary.org/l.aspx?l=1517&c=531805&i=9781416572367&t=YOU%3a+Having+a+Baby%3a+The+Owner%27s+Manual+to+a+Happy+and+Healthy+Pregnancy&widget|YOU: Having a Baby: The Owner\'s Manual to a Happy and Healthy Pregnancy|9780525951575|http://www.wowbrary.org/l.aspx?l=1517&c=531739&i=9780525951575&t=Freedom+(TM)&widget|Freedom (TM)|9780307263193|http://www.wowbrary.org/l.aspx?l=1517&c=531729&i=9780307263193&t=The+Godfather+of+Kathmandu&widget|The Godfather of Kathmandu|9780345513762|http://www.wowbrary.org/l.aspx?l=1517&c=531734&i=9780345513762&t=Catalyst%3a+A+Tale+of+the+Barque+Cats&widget|Catalyst: A Tale of the Barque Cats";

// gap between each image (use HTML):
var WOWimagegap="    "

var WOWslidebgcolor="white";
var WOWiMoveDirection = 1;  // -1, 0, 1
var WOWarraySlideWidths = new Array();
var WOWstrSlideContents = "<nobr>";
var WOWarrayRawData = WOWstrRawData.split("|");
for (WOWi = 0; WOWi < WOWarrayRawData.length; WOWi += 3) 
	WOWstrSlideContents += "<img id='WOWimage" + WOWi + "' src='" + WOWstrCoverPath.replace("{ITEMID}", WOWarrayRawData[WOWi]) + "' style='border: none;'>";
WOWstrSlideContents += '</nobr>';
var WOWiedom=document.all||document.getElementById;
if (WOWiedom) document.write('<span id="WOWtemp" style="visibility:hidden;position:absolute;top:-100px;left:-9000px">'+WOWstrSlideContents+'</span>')
var WOWiSlides = 0;
var WOWarraySlideCenters = new Array();
var WOWarraySlideTitles = new Array();
var WOWactualwidth;
var WOWcross_slide, WOWcross_slide2, WOWns_slide, WOWns_slide2;

// this isn't called until all images have loaded
function WOWfillup(){

    // figure out which images loaded and use just those to create the title array, eliminate gaps in the width array,
    // recreate WOWstrSlideContents for display, sum the image widths, and count valid slides
	var iTotalWidths = 0;
    WOWstrSlideContents = "<nobr>";
	WOWiSlides = 0;
	var i;
    for (i = 0; i < WOWarrayRawData.length; i += 3) 
        if (document.getElementById("WOWimage" + i).width > 1) {
            WOWarraySlideTitles[WOWiSlides] = WOWarrayRawData[i+2], 
            WOWarraySlideWidths[WOWiSlides] = document.getElementById("WOWimage" + i).width;
	        iTotalWidths += WOWarraySlideWidths[WOWiSlides];
    	    WOWstrSlideContents += "<a href='"+WOWarrayRawData[i+1]+"'><img src='" + 
						WOWstrCoverPath.replace("{ITEMID}", WOWarrayRawData[i]) + 
						"' title='Click to see more about " + WOWarrayRawData[i+2] + "' width='" + WOWarraySlideWidths[WOWiSlides] +
						"' style='border: none;'></a><img src='http://wowbrary.org/1x1.gif' width='10' style='border: none;'>"; // +WOWimagegap;
            WOWiSlides++;						
			}
    WOWstrSlideContents += '</nobr>';
    
    // for unclear reasons, sometimes the slides haven't really loaded in yet, so if none have arrived, exit and try again later
    if (WOWiSlides == 0) {
        setTimeout("WOWfillup()",100);
        return;
        }

	if (WOWiedom){
		WOWcross_slide = document.getElementById? document.getElementById("WOWtest2") : document.all.WOWtest2;
		WOWcross_slide2 = document.getElementById? document.getElementById("WOWtest3") : document.all.WOWtest3;
		WOWcross_slide.innerHTML = WOWcross_slide2.innerHTML = WOWstrSlideContents;
		
		// bug: Firefox reports wrong .offsetWidth initially (it takes it a bit to calculate it) - so we use a different method
		// WOWactualwidth = document.all ? WOWcross_slide.offsetWidth : document.getElementById("WOWtest2").offsetWidth;
		WOWactualwidth = iTotalWidths + 10*WOWiSlides;
		WOWcross_slide2.style.left = WOWactualwidth + "px";
		}
	else if (document.layers){
		WOWns_slide=document.ns_slidemenu.document.ns_slidemenu2;
		WOWns_slide2=document.ns_slidemenu.document.ns_slidemenu3;
		WOWns_slide.document.write(WOWstrSlideContents);
		WOWns_slide.document.close();
		WOWactualwidth=WOWns_slide.document.width;
		WOWns_slide2.left=WOWactualwidth;
		WOWns_slide2.document.write(WOWstrSlideContents);
		WOWns_slide2.document.close();
		}
		
// alert("WOWactualwidth: " + WOWactualwidth + "; slides: " + WOWiSlides + "; sum of widths: " + iTotalWidths + "; widths: " + strWidths);
// alert("try2: WOWactualwidth: " +  WOWcross_slide.offsetWidth);
	
	// compute the distance between each image (this is slightly off)
	// var fDistanceBetweenImages = (WOWactualwidth - iTotalWidths)/WOWiSlides;
	
	// compute the mid position of each slide
	var fSpot = 0;
	var strWidths = "";    
	var i;
	for (i = 0; i < WOWiSlides; i++) {
		WOWarraySlideCenters[i] = Math.round(fSpot + WOWarraySlideWidths[i]/2);
		fSpot += WOWarraySlideWidths[i] + 10;
		strWidths += WOWarraySlideWidths[i] + ":" +  WOWarraySlideCenters[i] + " ";
		}
// alert(strWidths + ' | ' + WOWiSlides + ' ' + iTotalWidths + ' | ' + WOWarrayRawData.length + ' ' + WOWstrSlideContents);

	// use timer to start slides moving
	lefttime=setInterval("WOWmoveSlides()",30);
}

function WOWAddOnload()
{
	if(window.addEventListener) window.addEventListener('load', WOWfillup, false);
	else if(window.attachEvent) window.attachEvent('onload', WOWfillup);
	else window.onload = WOWfillup;
}

// put self into calling chain
WOWAddOnload()

// converts a number up to 255 to a two-digit hex representation
function WOWtoHex(iValue) { 
	var strHex = "0123456789ABCDEF"; 
	return String(strHex.charAt(Math.floor(iValue / 16))) + String(strHex.charAt(iValue % 16)); 
}

// low level: simply sets slide 1 or 2 so that its iPosition'th part is at the left of the slider area
function WOWsetSlide(iSlide, iPosition) {

	// determine the slide
	var slide = WOWiedom ? (iSlide == 1 ? WOWcross_slide : WOWcross_slide2) : (iSlide == 1 ? WOWns_slide : WOWns_slide2);
	
	// put the new position in
	if (WOWiedom) slide.style.left = -iPosition + "px"; else slide.left = -iPosition;
}

// sets the two slides to the indicated position
function WOWsetPosition(iPosition) {

	// the first slide goes at the position
	WOWsetSlide(1, iPosition);
	
	// the second slide goes after it if necessary, or else before
	WOWsetSlide(2, iPosition + (WOWactualwidth - iPosition >= WOWiWidgetWidth ? WOWactualwidth : -WOWactualwidth));
}

// returns the x position associated with the given step, using ramping
function WOWStepToX(WOWiStep)
{
	// determine which slides we are between
	var bBeforeSlide = (WOWiStep % WOWarraySpeedRamp.length) < (WOWarraySpeedRamp.length / 2);
	var iSlide1 = Math.floor(WOWiStep / WOWarraySpeedRamp.length);
	var iSlide2 = (bBeforeSlide ? iSlide1 - 1 + WOWiSlides : iSlide1 + 1) % WOWiSlides;
	
	// compute the distance between the slides, taking into account that iSlide1 may be before or after iSlide2 AND they may be on opposing ends of the slider
	var iDistance = Math.min(Math.abs(WOWarraySlideCenters[iSlide1] - WOWarraySlideCenters[iSlide2]),
							 Math.min((WOWarraySlideCenters[iSlide1] - WOWarraySlideCenters[iSlide2] + WOWactualwidth) % WOWactualwidth,
							 		  (WOWarraySlideCenters[iSlide2] - WOWarraySlideCenters[iSlide1] + WOWactualwidth) % WOWactualwidth));



	// return the x position
	return Math.round(WOWarraySlideCenters[iSlide1] + iDistance*WOWarraySpeedRamp[WOWiStep % WOWarraySpeedRamp.length]);
}

// returns the slide nearest to the given step - this can be off if a wide slide is near a thin one
function WOWStepToSlide(WOWiStep)
{
	// step 0 .. WOWarraySpeedRamp.length - 1 is slide 0, etc.
	return Math.floor(WOWiStep / WOWarraySpeedRamp.length);
}

// returns the distance as a percentage to the nearest slide (0 means on top of it and 1 means between slides) - this can be off if a wide slide is near a thin one
function WOWDistanceToSlide(WOWiStep)
{
	return Math.abs(WOWarraySpeedRamp[WOWiStep % WOWarraySpeedRamp.length]*2.0);
}

var WOWiSlideShowing = -1; // this causes the first slide to roll in immediately
var WOWbSuspended = false;
var WOWiPausing = 0;
var WOWiPauseSuppression = 0;  // number of next steps to not pause during
var WOWiStep = 0;

function WOWmoveSlides() {

	// do nothing if suspended
	if (WOWbSuspended) return;
	
	// reduce pause suppression if it's on
	if (WOWiPauseSuppression > 0) WOWiPauseSuppression--;
	
	// countdown timer for when paused on an image
	if (WOWiPausing > 0) {
		WOWiPausing--;
		return;
		}

	// do nothing if not supposed to move
	if (!WOWiMoveDirection) return;
	
	// advance the step
	var iTotalSteps = WOWiSlides*WOWarraySpeedRamp.length;
	WOWiStep = (WOWiStep + WOWiMoveDirection + iTotalSteps) % iTotalSteps;
	
	// if this puts us at a slide, pause unless pause suppression is in place
	if (WOWDistanceToSlide(WOWiStep) == 0 && WOWiPauseSuppression == 0) WOWiPausing = WOWiPause;
	
	// set the new position
	WOWsetPosition((WOWStepToX(WOWiStep) - WOWiWidgetWidth/2) % WOWactualwidth);
	
	// see if the slide has changed
	if (WOWStepToSlide(WOWiStep) != WOWiSlideShowing) {
	
		// set the new slide
		WOWiSlideShowing = WOWStepToSlide(WOWiStep);


		// shorten titles initially 
		var strTitle = WOWarraySlideTitles[WOWiSlideShowing];
		while (strTitle.length > WOWiTitleMaxShowingLength) strTitle = strTitle.replace(/ [^ ]*( ...)?$/," ...");
		
		// put the possibly shortened title in place
		document.getElementById("WOWTitle").innerHTML = strTitle;
		
		// if the title is too long, truncate it (20 is used for the height because the type is set at 16 pt below
		while (document.getElementById("WOWTitle").offsetWidth > WOWiWidgetWidth || document.getElementById("WOWTitle").offsetHeight > 20)
			document.getElementById("WOWTitle").innerHTML = document.getElementById("WOWTitle").innerHTML.replace(/ [^ ]*( ...)?$/," ...");

		}
	
	// adjust the title color
	var iIntensity = Math.round(WOWDistanceToSlide(WOWiStep)*255);
	document.getElementById("WOWTitle").style.color = "#" + WOWtoHex(iIntensity) + WOWtoHex(iIntensity)+ WOWtoHex(iIntensity);


}

function WOWsetSpeed(iSpeedNew)
{	
	WOWiMoveDirection = iSpeedNew;
	WOWiPausing = 0;
	if (iSpeedNew) WOWiPauseSuppression = Math.round(WOWarraySpeedRamp.length/3);
}

// write out material for the area
if (WOWiedom||document.layers){
with (document){
	write('<table cellspacing="0" cellpadding="0" style="background-color: '+WOWslidebgcolor+'; border: 1px solid black; width: '+WOWiWidgetWidth+'px;"><tr><td style="text-align: center; color: orange; background-color: black; font: bold italic 24px Verdana; ">Weekly Highlights</td></tr><tr><td style="font-size: 5px;">&nbsp;</td></tr><tr><td align="left">')
	if (WOWiedom){
		write('<div style="position:relative;width:'+WOWiWidgetWidth+'px;height:'+WOWiWidgetHeight+'px;overflow:hidden" onMouseover="WOWbSuspended = true" onMouseout="WOWbSuspended = false">')
		write('<div style="position:absolute;width:'+WOWiWidgetWidth+'px;height:'+WOWiWidgetHeight+'px;background-color:'+WOWslidebgcolor+'">'); //  
		write('<div id="WOWtest2" style="position:absolute;left:0px;top:0px"></div>')
		write('<div id="WOWtest3" style="position:absolute;left:-1000px;top:0px"></div>')
		write('</div></div>')
		}
	else if (document.layers){
		write('<ilayer width='+WOWiWidgetWidth+'px height='+WOWiWidgetHeight+'px name="ns_slidemenu" bgColor='+WOWslidebgcolor+'>')
		write('<layer name="ns_slidemenu2" left=0 top=0></layer>'); // onMouseover="copyspeed=0" onMouseout="copyspeed=WOWslidespeed"
		write('<layer name="ns_slidemenu3" left=0 top=0></layer>'); //  onMouseover="copyspeed=0" onMouseout="copyspeed=WOWslidespeed"
		write('</ilayer>')
		}

	write('</td></tr><td align="center"><b><span style="color: black; font-family: Verdana, Helvetica, Arial; font-size: 13px;" id="WOWTitle">&nbsp;</span></b></td></tr>');

	write('<tr style="background-color: '+WOWslidebgcolor+';"><td align="center"><a href="http://www.wowbrary.org/nu.aspx?p=1517--GEN&more"><img style="border: none;" src="http://www.wowbrary.org/images/slidermoreup.gif" title="Click to see more new books, movies, and CDs"/></a> &nbsp; &nbsp; &nbsp; <img style="border: none;" onclick="WOWsetSpeed(1);" src="http://www.wowbrary.org/images/sliderleftup.gif" style="margin-right: 1px;" title="Go right to left" /><img onclick="WOWsetSpeed(0);" src="http://www.wowbrary.org/images/sliderstopup.gif" title="Stop" style="border: none;" /><img onclick="WOWsetSpeed(-1)" src="http://www.wowbrary.org/images/sliderrightup.gif" title="Go left to right" style="border: none;" /></td></tr>')

	write('</table>')
	}
}