// begin absolutely positioned scrollable area object scripts 
/*
Extension developed by David G. Miles (www.z3roadster.net/dreamweaver)
Original Scrollable Area code developed by Thomas Brattli 
To add more shock to your site, visit www.DHTML Shock.com
*/
function regenerate () {
	window.location.reload();
}

function regenerate2 () {
	if ( document.layers ) setTimeout("window.onresize=regenerate", 400);
}

window.onload = regenerate2;

function verifyCompatibleBrowser () {
	this.ver = navigator.appVersion;
	this.dom = document.getElementById ? 1 : 0;
	this.ie5 = ( this.ver.indexOf("MSIE 5") > -1 && this.dom ) ? 1 : 0;
	this.ie4 = ( document.all && !this.dom ) ? 1 : 0;
	this.ns5 = ( this.dom && parseInt(this.ver) >= 5 ) ? 1 : 0;
	
	this.ns4 = ( document.layers && !this.dom ) ? 1 : 0; 
	this.bw = ( this.ie5 || this.ie4 || this.ns4 || this.ns5 );
	return this;
}
bw = new verifyCompatibleBrowser();

var speed = 25;

var loop, timer;

function constructObject ( obj, nest ) {
	nest = ( !nest ) ? '' : 'document.' + nest + '.';
	this.el = bw.dom ? document.getElementById(obj) : bw.ie4?document.all[obj] : bw.ns4 ? eval(nest+'document.'+obj) : 0;
	this.css = bw.dom ? document.getElementById(obj).style : bw.ie4 ? document.all[obj].style : bw.ns4 ? eval(nest+'document.'+obj) : 0;
	this.scrollHeight = bw.ns4 ? this.css.document.height : this.el.offsetHeight;
	this.clipHeight = bw.ns4 ? this.css.clip.height : this.el.offsetHeight;
	this.up = moveAreaUp;
	this.down = moveAreaDown;
	this.moveArea = moveArea;
	this.x;
	this.y;
	this.obj = obj + "Object";
	eval(this.obj + "=this");
	return this;
}

function moveArea ( x, y ) {
	this.x = x;
	this.y = y;
	this.css.left = this.x;
	this.css.top = this.y;
}

function moveAreaDown ( move ) {
	if ( this.y > -this.scrollHeight + objContainer.clipHeight ) {
		this.moveArea(0, this.y - move);
		if ( loop ) setTimeout(this.obj + ".down(" + move + ")", speed);
	}
}

function moveAreaUp ( move ) {
	if ( this.y  < 0 ) {
		this.moveArea(0, this.y - move);
		if ( loop ) setTimeout(this.obj + ".up(" + move + ")", speed);
	}
}

function performScroll ( speed ) {
	if ( initialised ) {
		loop = true;
		if ( speed > 0 ) objScroller.down(speed);
		else objScroller.up(speed);
	}
}

function ceaseScroll () {
    loop = false;
	if ( timer ) clearTimeout(timer);
}

var initialised;

function initialiseScrollableArea () {
	objContainer = new constructObject('divContainer');
	objScroller = new constructObject('divContent', 'divContainer');
	objScroller.moveArea(0,0);
	objContainer.css.visibility = 'visible';
	initialised = true;
}


// end absolutely positioned scrollable area object scripts


var curr_x = 0;
var inc = 5;
var lp = true;
//var div_width = 570;

function moveLeft () {
	if ( curr_x >= 0 ) {
		curr_x = curr_x - inc;
		document.getElementById('barra').scrollLeft = curr_x;
	}else {
		lp = false;
	}
	if ( lp ) setTimeout("moveLeft()",speed);
}

function moveRight () {
	if ( curr_x <= div_width ) {
		curr_x = curr_x + inc;
		document.getElementById('barra').scrollLeft = curr_x;
	}else {
		lp = false;
	}
	if ( lp ) setTimeout("moveRight()",speed);
}