// Floaties (based upon Bak2Top v1.2a by MaxxBlade http://www.maxxblade.co.uk)
// Copyright 2005 Michael Sangwine, all rights reserved
// This script may not be used in any way without prior permission of the author.
// Contact: m_sangwine@paradise.net.nz

var fHtml = '<a href="" onclick="javascript:scrollTo(getScrollLeft(),0);return false;"><img src="floatie.jpg" /></a>';

var fElId = 'floatie';
var fHPos = 'right';
var fVPos = 'bottom';
var fHInd = 20;
var fVInd = 15;
var fVScr = 0;
var fFreq = 1000;

var fElem = null;
var fShow = null;
var fXPos = null;
var fYPos = null;
var fXDim = 0;
var fYDim = 0;

initDHTMLAPI();
document.write(((isNN4) ? '<layer name="' + fElId + '">' : '<div id="' + fElId
	+ '" style="position:absolute;white-space:nowrap">') + fHtml + ((isNN4) ? '</layer>' : '</div>'));
fElem = getRawObject(fElId);
if (fElem) {
	fXDim = getObjectWidth(fElem);
	fYDim = getObjectHeight(fElem);
	switch (fHPos) {
		case 'left': fXPos = function() { return getScrollLeft() + fHInd }; break;
		case 'right': fXPos = function() { return getInsideWindowWidth() + getScrollLeft() - fXDim - fHInd };
	}
	switch (fVPos) {
		case 'top': fYPos = function() { return getScrollTop() + fVInd }; break;
		case 'bottom': fYPos = function() { return getInsideWindowHeight() + getScrollTop() - fYDim - fVInd };
	}
	floaties();
}

function floaties() {
	if (fElem) {
		if (getScrollTop() > fVScr) {
			shiftTo(fElem, fXPos(), fYPos());
			show(fElem);
		} else
			hide(fElem);
		setTimeout('floaties()', fFreq);
	}
}