/* external file "function_vertical_scroll.js" begins */
/*********************************************
*       http://geocities.com/vbarsan/
*©2002-2004 Vasile Barsan-All rights reserved.
*********************************************/
var ikj=0;
var jkk=1;
var resumemspeed=mspeed;
var remspeed=mspeed;
var sizeup=0;

if(epause<20)
	epause=20;
 
if(rcopt==1)
{
	if(cbtxt.length==0||slmg.length==0||cbtxt.length!=slmg.length)
		rcopt=0;
}

if(rcopt==1)
{
	var varoptm="";
	for(jkj=0;	jkj<cbtxt.length-1;	jkj++)
		varoptm=varoptm+'<option>' +cbtxt[jkj]+ '</option>';
	varoptm=varoptm+'<option selected>' +cbtxt[cbtxt.length-1]+ '</option>';
}

function speedup()
{
	if(mspeed==resumemspeed)
	{
		mspeed=mspeed*2;
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*2&&remspeed*2<parseInt(mheight/2))
	{
		mspeed=mspeed*2;
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*4&&remspeed*2<parseint(mheight/2))
	{
		mspeed=mspeed*2;
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*2&&remspeed*2>=parseInt(mheight/2))
	{
		mspeed=parseInt(mheight/2);
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*4&&remspeed*2>=parseInt(mheight/2))
	{
		mspeed=parseInt(mheight/2);
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*8)
	{
		mspeed=parseInt(mheight/2);
		remspeed=mspeed;
	}
	else if(mspeed==parseInt(mheight/2))
	{
		mspeed=mheight;
		remspeed=mspeed;
	}
}

function slowdn()
{
	if(mspeed==mheight)
	{
		mspeed=parseInt(mheight/2);
		remspeed=mspeed;
	}
	else if(mspeed==parseInt(mheight/2)&&resumemspeed*8<parseInt(mheight/2))
	{
		mspeed=resumemspeed*8;
		remspeed=mspeed;
	}
	else if(mspeed==parseInt(mheight/2)&&resumemspeed*4<parseInt(mheight/2))
	{
		mspeed=resumemspeed*4;
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*8)
	{
		mspeed=resumemspeed*4;
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*4)
	{
		mspeed=resumemspeed*2;
		remspeed=mspeed;
	}
	else if(mspeed==resumemspeed*2)
	{
		mspeed=resumemspeed;
		remspeed=mspeed;
	}
}

function iescroll()
{
	if(jkk==0 && iedv.style.pixelTop<=mspeed || jkk==1 && iedv0.style.pixelTop<=mspeed)
	{
		if(ikj==slmg.length-1 && rcopt==1)
		{
			if(jkk==0) 
			{
				iedv0.style.visibility="hidden";
				iedv.style.pixelTop=0;
			}
			else
			{
				iedv.style.visibility="hidden";
				iedv0.style.pixelTop=0;
			}
			callbackm.style.visibility="visible";
			return;
		}
		else if(ikj==slmg.length-1 && rcopt==0)
			ikj=0;
		else if(ikj<slmg.length-1)
			ikj++;
		if(jkk==0)
			jkk=1;
		else
			jkk=0;
		if(jkk==0)
		{
			iedv0.style.pixeltop=0;
			sizeup=iedv0.offsetHeight-mheight;
			if(sizeup>5&&mheight>20)
				sizeup+=10;
			iedv.style.pixelTop=mheight;
			iedv.innerHTML=slmg[ikj];
		}
		else
		{
			iedv.style.pixelTop=0;
			sizeup=iedv.offsetHeight-mheight;
			if(sizeup>5&&mheight>20)
				sizeup+=10;
			iedv0.style.pixelTop=mheight;
			iedv0.innerHTML=slmg[ikj];
		}
		setTimeout("iescroll()",mpause);
		return;
	}
	else if(sizeup>0)
	{
		if(jkk==0)
		{
			iedv0.style.pixelTop-=mspeed;
			sizeup-=mspeed;
			setTimeout("iescroll()",epause);	
		}
		else
		{
			iedv.style.pixelTop-=mspeed;
			sizeup-=mspeed;
			setTimeout("iescroll()",epause);
		}
	}
	else
	{
		iedv0.style.pixelTop-=mspeed;
		iedv.style.pixelTop-=mspeed;
		setTimeout("iescroll()",20);
	}
}

function ns4scroll()
{
	if(jkk==0 && ns4lr.top<=mspeed||jkk==1 && ns4lr0.top<=mspeed)
	{
		if(ikj==slmg.length-1 && rcopt==1)
		{
			if(jkk==0)
			{
				ns4lr0.visibility="hide";
				ns4lr.top=0;	
			}
			else
			{
				ns4lr.visibility="hide";
				ns4lr0.top=0;
			}
			document.callbm.document.cbackm.visibility="show";
			return;
		}
		else if(ikj==slmg.length-1 && rcopt==0)
			ikj=0;
		else if(ikj<slmg.length-1)
			ikj++;
		if(jkk==0)
			jkk=1;
		else
			jkk=0;
		if(jkk==0)
		{
			ns4lr0.top=0;
			sizeup=ns4lr0.document.height-mheight;
			if(sizeup>5&&mheight>20)
				sizeup+=10;
			ns4lr.top=mheight;
			ns4lr.document.write(slmg[ikj]);
			ns4lr.document.close();
		}
		else
		{
			ns4lr.top=0;
			sizeup=ns4lr.document.height-mheight;
			if(sizeup>5&&mheight>20)
				sizeup+=10;
			ns4lr0.top=mheight;
			ns4lr0.document.write(slmg[ikj]);
			ns4lr0.document.close();
		}
		setTimeout("ns4scroll()",mpause);
		return;
	}
	else if(sizeup>0)
	{
		if(jkk==0)
		{
			ns4lr0.top-=mspeed;
			sizeup-=mspeed;
			setTimeout("ns4scroll()",epause);
		}
		else
		{
			ns4lr.top-=mspeed;
			sizeup-=mspeed;
			setTimeout("ns4scroll()",epause);
		}
	}
	else
	{
		ns4lr0.top-=mspeed;
		ns4lr.top-=mspeed;
		setTimeout("ns4scroll()",20);
	}
}

function domscroll()
{
	if(jkk==0 && parseInt(domdv.style.top)<=mspeed||jkk==1 && parseInt(domdv0.style.top)<=mspeed)
	{
		if(ikj==slmg.length-1 && rcopt==1)
		{
			if(jkk==0)
			{
				domdv0.style.visibility="hidden";
				domdv.style.top=0;
			}
			else
			{
				domdv.style.visibility="hidden";
				domdv0.style.top=0;
			}
			document.getElementById('callbackm').style.visibility="visible";
			document.getElementById('callbackm').innerHTML='<form name="boxxm" method="post">'+'<select name="listm" onfocus onchange="upcallm(this.form);">'+varoptm+'</select></form>';
			return;
		}
		else if (ikj==slmg.length-1 && rcopt==0)
			ikj=0;
		else if (ikj<slmg.length-1)
			ikj++;
		if(jkk==0)
			jkk=1;
		else
			jkk=0;
		if(jkk==0)
		{
			domdv0.style.top=0;
			sizeup=domdv0.offsetHeight-mheight;
			if(sizeup>5&&mheight>20)
				sizeup+=10;
			domdv.style.top=mheight;
			domdv.innerHTML=slmg[ikj];
		}
		else
		{
			domdv.style.top=0;
			sizeup=domdv.offsetHeight-mheight;
			if(sizeup>5&&mheight>20)
				sizeup+=10;
			domdv0.style.top=mheight;
			domdv0.innerHTML=slmg[ikj];
		}
		setTimeout("domscroll()",mpause);
		return;	
	}
	else if(sizeup>0)
	{
		if(jkk==0)
		{
			domdv0.style.top=parseInt(domdv0.style.top)-mspeed;
			sizeup-=mspeed;
			setTimeout("domscroll()",epause);
		}
		else
		{
			domdv.style.top=parseInt(domdv.style.top)-mspeed;
			sizeup-=mspeed;
			setTimeout("domscroll()",epause);
		}	
	}
	else
	{
		domdv0.style.top=parseInt(domdv0.style.top)-mspeed;
		domdv.style.top=parseInt(domdv.style.top)-mspeed;
		setTimeout("domscroll()",20);
	}	
}

function upcallm(form)
{
	ikj=form.listm.selectedIndex;
	if(document.getElementById)
	{
		domdv0.style.visibility="hidden";
		domdv.style.visibility="visible";
		domdv.style.top=0;
		domdv.innerHTML=slmg[ikj];
	}
	else if(document.all)
	{
		iedv0.style.visibility="hidden";
		iedv.style.visibility="visible";
		iedv.style.pixelTop=0;
		iedv.innerHTML=slmg[ikj];
	}
	else if(document.layers)
	{
		ns4lr0.visibility="hide";
		ns4lr.visibility="show";
		ns4lr.top=0;
		ns4lr.document.write(slmg[ikj]);
		ns4lr.document.close();
	}
	return;
}

function startscroll()
{
	if(document.getElementById)
	{
		domdv0=document.getElementById('scrolldiv');
		domdv=document.getElementById('scrolldivs');
		if(udopt==0)
		{
			domdv0.style.top = mheight;
			domdv0.innerHTML = slmg[0];
			domdv.style.top = mheight;
		}
		else if(udopt==1)
		{
			domdv0.style.top=0;
			domdv.style.top=0;
		}
		domscroll();		
	}
	else if(document.all)
	{
		iedv0=scrolldiv;
		iedv=scrolldivs;
		if(udopt==0)
		{
			iedv0.style.pixelTop=mheight;
			iedv.style.pixelTop=mheight;
			iedv0.innerHTML=slmg[0];
		}
		else if(udopt==1)
		{
			iedv0.style.pixelTop=0;
			iedv.style.pixelTop=0;
		}
		iescroll();
	}
	else if(document.layers)
	{
		ns4lr0=document.ns4s.document.ns4s0;
		ns4lr=document.ns4s.document.ns4s1;
		if(udopt==0)
			ns4lr0.top=mheight;
		else if(udopt==1)
			ns4lr0.top=0;
		ns4lr0.document.write(slmg[0]);
		ns4lr0.document.close();
		if(udopt==0)
			ns4lr.top=mheight;
		else if(udopt==1)
			ns4lr.top=0;
		ns4scroll();
	}
}
document.write('<table border='+mborder+' cellspacing="0" cellpadding="0" background='+mbground+'><tr><td nowrap width='+mwidth+'>');
if(document.layers)
{
	document.write('<ilayer id="ns4s" width='+mwidth+' height='+mheight+' bgcolor='+mcolor+'><layer id="ns4s0" width='+mwidth+' onmouseover="mspeed=0" onmouseout="mspeed=remspeed"></layer><layer id="ns4s1" width='+mwidth+' onmouseover="mspeed=0" onmouseout="mspeed=remspeed"></layer></ilayer>');
}
if (document.all||document.getElementById)
{
	document.write('<span style="height:'+mheight+';"><div style="position:relative; overflow:hidden; clip:rect(0 '+mwidth+' '+mheight+' 0);"><div style="position:relative;	overflow:hidden; width:'+mwidth+'; height:'+mheight+'; clip:rect(0 '+mwidth+' '+mheight+' 0); 	background-color:'+mcolor+';" onmouseover="mspeed=0;" onmouseout="mspeed=remspeed"><div id="scrolldiv" style="position:absolute; overflow:hidden; width:'+mwidth+';">');
	if(udopt==1)
		document.write(slmg[0]);
	document.write('</div><div id="scrolldivs" style="position:relative; overflow:hidden; width:'+mwidth+';"></div></div></div></span>');	
}
document.write('</td>');
if(lsopt==1)
	document.write('<td bgcolor='+celcolor+'><div '+vesclass+'><b><u><a href="#" onclick="speedup();">UP</a></u><br>||<br><u><a href="#" onclick="slowdn();">DN</a></u></b></div></td>');
document.write('</tr></table>');
if (rcopt==1)
{
	document.write('<table border="0" cellspacing="0" cellpadding="0"><tr><td>');
	if(!document.layers)
		document.write('<span id="callbackm" style="visibility:hidden;">');
	document.write('<ilayer id="callbm"><layer id="cbackm" visibility=hide><form name="boxm" method="post"><select name="listm" onfocus onchange="upcallm(this.form);">'+varoptm+'</select></form></layer></ilayer>');
	if(!document.layers)
		document.write('</span>');
	document.write('</td></tr></table>');
}