// custom scroll application developed for three.oh 3/2001.
// thanks to brandon (www.jesterworld.net) and grant (no site cuz he's too pimp for it) for the help w/ the visuals.
// > youngpup > www.youngpup.net

// optimized for the latest version of {3.0} by bob

// enhanced by Yuki KODAMA 2006-03-28
// - support mouse wheel scroll (IE, FF)
// - add up/down buttton
// - support other browser by native scroller
// - permit plural scroller in document
// - remove bottom space from document height (docH)
// - swap up/down button (up/over/down)

ThreeOhScroll.mo5 = navigator.userAgent.indexOf("Gecko") != -1
ThreeOhScroll.ie4 = navigator.appName == "Microsoft Internet Explorer" && document.all
ThreeOhScroll.ie5 = navigator.appName == "Microsoft Internet Explorer" && document.getElementById
ThreeOhScroll.pc = navigator.platform == "Win32"

// this number is for ie4 pc only - which cannot have the description box be of variable width (or atleast i can't figure out how to).
// you set the number of pixels that the desc tag will be permanently.
ThreeOhScroll.ie4pcDescWidth = 100

// i have no idea why this number is necessary, it just is. it is related to how far the scroller is from the top of the window
// in mozilla, but you will have to play with it to get it just right.
ThreeOhScroll.mozAdjust = ThreeOhScroll.mo5 ? 75 : 0

// this is how long it should take the scroller to animate when the user clicks a marker (in milliseconds)
ThreeOhScroll.aniLen = 250

// move distance with up/down button
ThreeOhScroll.bDist = 25

// move distance with mouse wheel
ThreeOhScroll.wDist = 50

function ThreeOhScroll(id)
{
	this.id = id
	this.getMembers(id)
	
	if (ThreeOhScroll.mo5 || (ThreeOhScroll.ie4 && ThreeOhScroll.pc) || ThreeOhScroll.ie5) {
		if (ThreeOhScroll.ie4 && !ThreeOhScroll.ie5 && ThreeOhScroll.pc) this.description.style.width = ThreeOhScroll.ie4pcDescWidth
		
		this.clipH		= parseInt(this.container.style.height)
		this.PTags		= ypGetDescendantsByTagName("P", this.content)
		var lastP		= this.PTags[this.PTags.length-1]
		var lastPTop	= lastP.offsetTop
		this.docH		= lastPTop + Math.max(lastP.offsetHeight, this.clipH)
		this.scrollH	= this.docH - this.clipH
		this.markersMax	= parseInt(this.markers.style.height) - 7
		this.thumbMax	= parseInt(this.thumbContainer.style.height) - this.thumbImg.height
		this.arrowMax	= parseInt(this.arrowContainer.style.height) - this.arrowImg.height
		if (0 < this.scrollH) {
			this.gRef = "ThreeOhScroll_"+id
			eval(this.gRef+"=this")
			this.thumb.obj	= this
			this.thumb.onmousedown = this.startDrag
			this.thumb.onmouseover = Function(this.gRef + ".toggleThumb(1)")
			this.thumb.onmouseout  = Function(this.gRef + ".toggleThumb(0)")
			this.thumb.onmouseup   = Function(this.gRef + ".toggleThumb(0)")
			this.thumb.ondragstart = function() { return false }
			this.filter.obj	= this
			if (this.filter.attachEvent) this.filter.onmousewheel = this.wheel
			else this.filter.addEventListener("DOMMouseScroll", this.wheel, false)
			var scope = this
			this.up.onmouseover = Function(this.gRef + ".toggleUpBt(1)")
			this.up.onmouseout = Function(this.gRef + ".toggleUpBt(0)")
			this.up.onmousedown = Function(this.gRef + ".button(1)")
			this.up.onmouseup = function() { scope.keep = null; scope.upImg.src = "img/scroll/up2.gif" }
			this.down.onmouseover = Function(this.gRef + ".toggleDownBt(1)")
			this.down.onmouseout = Function(this.gRef + ".toggleDownBt(0)")
			this.down.onmousedown = Function(this.gRef + ".button(-1)")
			this.down.onmouseup = function() { scope.keep = null; scope.downImg.src = "img/scroll/dn3.gif" }
			this.keep = null
			this.initMarkers()
			this.bar.style.visibility = "visible"
			this.markers.style.visibility = "hidden"
		}
	} else {
		this.container.style.overflow = "auto"
	}
}

ThreeOhScroll.prototype.initMarkers = function() {
	var shtml = "", sTitle, iTop
	for (var i = 0; i < this.PTags.length; i++) {
		sTitle	= this.PTags[i].getAttribute("description")
		pTop	= this.PTags[i].offsetTop - ThreeOhScroll.mozAdjust
		iTop	= Math.round(pTop * this.markersMax / this.scrollH)
		if (sTitle && sTitle != "" && sTitle != null) {
			shtml  += "<div id='" + this.id + "_marker_" + i + "' "
			shtml  += "style='position:absolute; left:2px; top:" + (iTop + 2) + "px; "
			shtml  += "width:5px; height:3px; clip:rect(0 5 3 0); background-color:#CCCCCC; z-index:3;'></div>"
			shtml  += "<div style='position:absolute; left:0px; top:" + iTop + "px; "
			shtml  += "cursor:pointer; cursor:hand; width:9px; height:7px; clip:rect(0 9 7 0); z-index:4;' " 
			shtml  += "onmousedown='" + this.gRef + ".scrollTo(" + pTop + ")' "
			shtml  += "onmouseover='" + this.gRef + ".toggleMarker(this, " + i + ", 1)' "
			shtml  += "onmouseout='" + this.gRef + ".toggleMarker(this, " + i + ", 0)' "
			shtml  += "description='" + sTitle.replace(/'/g, "|pos|") + "'>"
			shtml  += "<img src='img/scroll/x.gif' width='9' height='7'></div>"
		}
	}
	this.markers.innerHTML += shtml
}

ThreeOhScroll.prototype.getMembers = function(id) {
	this.filter=ypGetElementById(id);
	this.container=ypGetElementById(id + 'Container');
	this.content=ypGetElementById(id + 'Content');
	this.markers=ypGetElementById(id + 'Markers');
	this.thumb=ypGetElementById(id + 'Thumb');
	this.arrow=ypGetElementById(id + 'Arrow');
	this.up=ypGetElementById(id + 'Up');
	this.upImg=ypGetElementById(id + 'UpImg');
	this.down=ypGetElementById(id + 'Down');
	this.downImg=ypGetElementById(id + 'DownImg');
	this.bar=ypGetElementById(id + 'ScrollBar');
	this.thumbImg=ypGetElementById(id + 'ThumbImg');
	this.arrowImg=ypGetElementById(id + 'ArrowImg');
	this.thumbContainer=ypGetElementById(id + 'ThumbContainer');
	this.arrowContainer=ypGetElementById(id + 'ArrowContainer');
	this.description=ypGetElementById(id + 'Description');
	this.descArrow=ypGetElementById(id + 'DescArrow');
}

ThreeOhScroll.prototype.startDrag = function(e) {
	if (!e) e = window.event
	var ey = e.pageY ? e.pageY : e.clientY
	this.dragLastY = ey
	this.dragStartOffset = ey - parseInt(this.style.top)
	ThreeOhScroll.current = this.obj
	document.onmousemove = this.obj.doDrag
	document.onmouseup = this.obj.stopDrag
	if (this.obj.aniTimer) window.clearInterval(this.obj.aniTimer)
	return false;
}

ThreeOhScroll.prototype.doDrag = function(e) {
	if (!e) e = window.event
	var obj = ThreeOhScroll.current
	var ey = (e.pageY ? e.pageY : e.clientY)
	var dy = ey - obj.thumb.dragLastY
	var ny = parseInt(obj.thumb.style.top) + dy
	if (ny >= obj.thumbMax) obj.thumb.dragLastY = obj.thumbMax + obj.thumb.dragStartOffset
	else if (ny < 0) obj.thumb.dragLastY = obj.thumb.dragStartOffset
	else obj.thumb.dragLastY = ey
	ny = Math.min(Math.max(ny, 0), obj.thumbMax)
	obj.jumpTo(ny * obj.scrollH / obj.thumbMax)
	return false;
}

ThreeOhScroll.prototype.stopDrag = function() {
	this.onmousemove = null
	this.onmouseup   = null
	ThreeOhScroll.current.toggleThumb(0)
}

ThreeOhScroll.prototype.wheel = function(e) {
	var o = this.obj
	var scroll = ThreeOhScroll.wDist * (e ? e.detail / -3 : event.wheelDelta / 120)
	var spos = - parseInt(o.content.style.top) - scroll
	if (spos <= 0) o.scrollTo(0)
	else if (o.scrollH <= spos) o.scrollTo(o.scrollH)
	else o.scrollTo(spos)
}

ThreeOhScroll.prototype.button = function(dir) {
	if(dir == null) return
	var spos = - parseInt(this.content.style.top) - ThreeOhScroll.bDist * dir
	if (spos <= 0) this.scrollTo(0)
	else if (this.scrollH <= spos) this.scrollTo(this.scrollH)
	else this.scrollTo(spos)
	dir === 1 ? this.upImg.src = "img/scroll/up3.gif" : this.downImg.src = "img/scroll/dn3.gif"
	this.keep = dir
}

ThreeOhScroll.prototype.toggleUpBt = function(bOn) {
	if (bOn) this.upImg.src = "img/scroll/up2.gif"
	else { this.upImg.src = "img/scroll/up1.gif"; this.keep = null }
}

ThreeOhScroll.prototype.toggleDownBt = function(bOn) {
	if (bOn) this.downImg.src = "img/scroll/dn2.gif"
	else { this.downImg.src = "img/scroll/dn1.gif"; this.keep = null }
}

ThreeOhScroll.prototype.scrollTo = function(ny) {
	this.endArrow = Math.round(ny * this.markersMax / this.scrollH)
	this.startTime = (new Date()).getTime()
	this.startPos = parseInt(this.content.style.top) * -1
	this.endPos = ny
	this.dist = this.endPos - this.startPos
	this.accel = this.dist / ThreeOhScroll.aniLen / ThreeOhScroll.aniLen
	if (this.aniTimer) this.aniTimer = window.clearInterval(this.aniTimer)
	this.aniTimer = window.setInterval(this.gRef + ".scroll()", 10)
}

ThreeOhScroll.prototype.scroll = function() {
	var now = (new Date()).getTime()
	var elapsed = now - this.startTime
	if (elapsed > ThreeOhScroll.aniLen) this.endScroll()
	else {
		var t = ThreeOhScroll.aniLen - elapsed
		var ny = this.endPos - t * t * this.accel
		this.jumpTo(ny)
	}
}

ThreeOhScroll.prototype.endScroll = function() {
	this.jumpTo(this.endPos)
	this.arrow.style.top = this.endArrow
	this.aniTimer = window.clearInterval(this.aniTimer)
	this.button(this.keep)
}

ThreeOhScroll.prototype.jumpTo = function(ny) {
	this.thumb.style.top	= Math.round(ny * this.thumbMax / this.scrollH)
	this.arrow.style.top	= Math.round(ny * this.arrowMax / this.scrollH)
	this.content.style.top	= -ny
}

ThreeOhScroll.prototype.toggleMarker = function(oTrigger, markerNum, bOn) {
	if (bOn) {
		ypGetElementById(this.id + "_marker_" + markerNum).style.backgroundColor = "#444444"
		if (this.curMarker) this.toggleMarker(this.curMarker, 0)
		this.curMarker = markerNum
		this.descArrow.style.top = parseInt(oTrigger.style.top) + 2 + "px"
		this.description.style.left = "-400px"
		this.description.style.top = "-400px"
		this.description.innerHTML = oTrigger.getAttribute("description")
		var w = document.all && !ThreeOhScroll.ie5 ? ThreeOhScroll.ie4pcDescWidth : this.description.offsetWidth
		this.description.style.left = 804 - w + "px"
		this.description.style.top = parseInt(oTrigger.style.top) - 1 + "px"
		this.description.style.visibility = "visible"
		this.descArrow.style.visibility = "visible"
		this.container.style.left = "0px"
	} else {
		ypGetElementById(this.id + "_marker_" + markerNum).style.backgroundColor = "#cccccc"
		this.curMarker = 0
		this.description.style.visibility = "hidden"
		this.descArrow.style.visibility = "hidden"
	}
}

ThreeOhScroll.prototype.toggleThumb = function(bOn) {
	//this.arrow.style.backgroundColor = this.thumb.style.backgroundColor = bOn ? "#7CDAFE" : "#5EBBE7"
}

function ypGetChildNodes(objParent) {
	return (objParent.childNodes ? objParent.childNodes : objParent.children)
}

function ypGetElementById(id) {
	return (document.getElementById ? document.getElementById(id) : document.all ? document.all[id] : false)
}

function ypGetDescendantsByTagName(sTag, objParent) {
	return (objParent.getElementsByTagName ? objParent.getElementsByTagName(sTag) : objParent.all && objParent.all.tags ? objParent.all.tags(sTag) : false)
}