// Scroll functions
// gives controls to a set of 2 layers for scrolling
// Tested on: IE 4.0, 5.0, 5.5, 6.0 NN 4.04,4.7, 6

// Copyright (C) 2001 MK - ultrashrek@poczta.onet.pl

var ScJump=20  //skok przy przesuwaniu tresci
var ScTime=50  //czas przesuwania o ScJump

var ScMax 
var ScOkno
var ScTresc
var ScStrzalki
var timerID = null
var timerRunning = false
var Direct
var ScTimeTemp
var NName
var NVer
var ObjScTresc
var ObjScStrzalki

function ScInit()
{
	//przygotowanie parametrow startowych
	if(NVer>=5)
	{
		ObjScStrzalki=document.getElementById(ScStrzalki);
		ObjScTresc = document.getElementById(ScTresc);
		var Tobj = document.getElementById(ScOkno);	
		ScMax=parseInt(ObjScTresc.offsetHeight)-parseInt(Tobj.style.height);
	}
	else
	{
		if(NName=="ie")
		{
			ObjScStrzalki=document.all[ScStrzalki];
			ObjScTresc = document.all[ScTresc];
			var Tobj = document.all[ScOkno];
			ScMax=ObjScTresc.offsetHeight-Tobj.style.pixelHeight;
		}
		else if(NName=="nn")
		{
			ObjScStrzalki=document.layers[ScStrzalki];
			ObjScTresc = document.layers[ScOkno].document.layers[ScTresc];
			var Tobj = document.layers[ScOkno];	
			ScMax=document.layers[ScOkno].document.layers[ScTresc].clip.height - Tobj.clip.height;
		}	
	}
	
	if(ScMax<0)
	{
		ScMax=0;
		ScHide();
	}
}

function ScHide() {
	//ukrycie
	if(NVer>=5 || NName=="ie")
	{
		ObjScStrzalki.style.visibility="hidden";
	}
	else 
		if(NName=="nn")
		{
			ObjScStrzalki.visibility="hidden";
		}
}

function StartShow()
{
	if(NVer>=5)
	{
		ObjScTresc.style.top=0;
	}
	else
	{
		if(NName=="ie")
		{
			ObjScTresc.style.pixelTop =0
		}
		else if(NName=="nn")
		{
			ObjScTresc.Top=0;
		}
	}
	StartGlide(1);
}

function StopShow()
{
	StopGlide();
}

function StopGlide()
{   
	//zatrzymanie przesuwania
	if(timerRunning)      
		clearTimeout(timerID)   
	timerRunning = false
}

function StartGlide(dir)
{
	//start przesuwania
	StopGlide()   
	Direct=dir
	MakeRun()
}

function MakeRun()
{
	//serce przesuwania
	if(Direct==1)
		ScGora()
	else
		ScDol()
	timerID = setTimeout("MakeRun()",ScTime)   
	timerRunning = true
}

function ScGora()
{
	//obliczenie przesuniecie w gore
	if(NVer>=5)
	{
		var t = parseInt(ObjScTresc.style.top);
		var l = parseInt(ObjScTresc.style.left);
	}
	else
	{
		if(NName=="ie")
		{
			var t = parseInt(ObjScTresc.offsetTop);
			var l = parseInt(ObjScTresc.offsetLeft);
		}
		else
		{
			var t = parseInt(ObjScTresc.top);
			var l = parseInt(ObjScTresc.left);
		}
	}
	t-=ScJump;
	if(Math.abs(t)>=ScMax)
	{
		t=ScMax-(2*ScMax);
		StopGlide()
	}
	MoveLayerTo(l,t);
}

function ScDol()
{
	//obliczenie przesuniecia w dol
	if(NVer>=5)
	{
		var t = parseInt(ObjScTresc.style.top);
		var l = parseInt(ObjScTresc.style.left);
	}
	else
	{
		if(NName=="ie")
		{
			var t = parseInt(ObjScTresc.offsetTop);
			var l = parseInt(ObjScTresc.offsetLeft);
		}
		else
		{
			var t = parseInt(ObjScTresc.top);
			var l = parseInt(ObjScTresc.left);
		}
	}
	t+=ScJump;
	if(t>0)
	{
		t=0;
		StopGlide()
	}
	MoveLayerTo (l,t);
}

function MoveLayerTo (posX,posY)
{ 
   // przesuniecie tresci 
   	if(NVer>=5)
	{
		ObjScTresc.style.left = posX + "px";
  		ObjScTresc.style.top = posY + "px";
	}
	else
	{
		if(NName=="ie")
		{
			ObjScTresc.style.pixelLeft = posX;
			ObjScTresc.style.pixelTop = posY;
  		}
		else
		{
			ObjScTresc.left = posX;
  			ObjScTresc.top = posY;
  		}
	}
  
}

function BrowserCheck() {
	
	if(document.getElementById)
		NVer=5
	else
	{
		NVer=parseInt(navigator.appVersion)	
	}
	//NVer=4
	if(document.all)
		NName="ie"
	else 
		if(document.layers)
			NName="nn"
		else
			NName="un"
		
	
}