function	MasterInit  ()
	{
		//PlotCurrSubCategory (Attuale,0);
		
		;
	}
	
	function	PlotCurrSubCategory		(NewCat,Reentrant)
	{
		(MM_findObj ("SubCata"+CurrSubCat).style).fontWeight="normal";	
		CurrSubCat = NewCat;
		(MM_findObj ("SubCata"+CurrSubCat).style).fontWeight="bold";
		
		TNam = eval("TumbName"+CurrSubCat);
		TDesc = eval ("TumbDesc"+CurrSubCat);
		
		if (Reentrant == 0)
		{
			SubCatScrollOffset = 0;
			BigScrollOffset = 0;
		}
		
		if (TNam.length > 0)
		{
			for (i = 0;i < 6;i++)
			{
				ThumbObjRef = MM_findObj ("Tumb"+i);
				
				if (i < TNam.length)
				{					
					ThumbObjRef.src = ThumbPath + "../CommonDinamicData/Fotogallery/Thumb/"+TNam[i+SubCatScrollOffset];
					ThumbObjRef.alt = TDesc[i+SubCatScrollOffset];
					ThumbObjRef.title = TDesc[i+SubCatScrollOffset];
					ThumbObjRef.style.display = "";
				}
				else
				{
					ThumbObjRef.style.display="none";
				}
			}
		}
		
		SliderPrec = MM_findObj ("GoPrec1");
		SliderNext = MM_findObj ("GoNext1");
		
		SliderPrec.style.display = (SubCatScrollOffset > 0) ? "" : "none";
		SliderNext.style.display = (TNam.length > 6+SubCatScrollOffset) ? "" : "none";
		
		if (Reentrant == 0)
		{
			PlotBigImage (0,0);
		}
	}
		
	function	ScrollSubTumb		(Direction)
	{
		SubCatScrollOffset += Direction;
		PlotCurrSubCategory (CurrSubCat,1);
	}
		
	function	PlotBigImage		(SubCatID,FromBigScroll)
	{
		if (FromBigScroll == 1)
		{
			SrcImageName = eval ("TumbName"+SubCatID)[BigScrollOffset];
			SrcImageDesk = eval ("TumbDesc"+SubCatID)[BigScrollOffset];
		}
		else
		{
			SrcObj = MM_findObj ("Tumb"+SubCatID);
			SrcImageName = SrcObj.src.substr (SrcObj.src.lastIndexOf("/")+1);
			SrcImageDesk = SrcObj.alt;
		}
		
		DestImg = MM_findObj ("BigTumb");
		DestDescr = MM_findObj ("BigTumbDesc");
		
		DestImg.src = ThumbPath + "../CommonDinamicData/Fotogallery/Big/"+SrcImageName;
		if (SrcImageDesk == "")
		{
			DestDescr.innerHTML = "&nbsp;";
		}
		else
		{
			DestDescr.innerHTML = SrcImageDesk;
		}
		
		if (FromBigScroll == 0)
		{		
				BigScrollOffset = Math.abs(SubCatID)+ Math.abs(SubCatScrollOffset);
		}
		
		SliderPrec = MM_findObj ("GoPrec");
		SliderNext = MM_findObj ("GoNext");
		
		SliderPrec.style.display = (BigScrollOffset > 0) ? "" : "none";	
		SliderNext.style.display = ((TNam.length - 1) > BigScrollOffset) ? "" : "none";
	}
	
	function	ScrollBig		(Direction)
	{
		BigScrollOffset += Direction;
		PlotBigImage (CurrSubCat,1);
	}