
/*********************************************************************************************************************************************
*	(c) Ger Versluis 2000 version 5.41 24 December 2001						*
*	HV Menu found on Dynamic Drive ONLY may be used on both commercial and non commerical sites	*
*	For info write to menus@burmees.nl							        *
*       This script featured on Dynamic Drive DHTML code library: http://www.dynamicdrive.com
**********************************************************************************************************************************************/

	var SAgntUsr=navigator.userAgent.toLowerCase();
	var SDomYes=document.getElementById?1:0;
	var SNavYes=SAgntUsr.indexOf('mozilla')!=-1&&SAgntUsr.indexOf('compatible')==-1?1:0;
	var SExpYes=SAgntUsr.indexOf('msie')!=-1?1:0;
	var SOpr=SAgntUsr.indexOf('opera')!=-1?1:0;
	var SDomNav=SDomYes&&SNavYes?1:0;
 	var SDomExp=SDomYes&&SExpYes?1:0;
	var SNav4=SNavYes&&!SDomYes&&document.layers?1:0;
	var SExp4=SExpYes&&!SDomYes&&document.all?1:0;
	var SPosStrt=(SNavYes||SExpYes)&&!SOpr?1:0;

	var SFrstLoc,SScLoc,SDcLoc;
	var SScWinWdth,SScWinHght,SFrstWinWdth,SFrstWinHght;
	var SScLdAgainWin;
	var SFirstColPos,SSecColPos,SDocColPos;
	var SRcrsLvl=0;
	var SFrstCreat=1,SLoadd=0,SCreatd=0,SIniFlg,SAcrssFrms=1;
	var SFrstCntnr=null,SCurrntOvr=null,SCloseTmr=null;
	var SCntrTxt,STxtClose,SImgStr;
	var SZtop=100;
	var SShwFlg=0;
	var SM_StrtTp=SStartTop,SM_StrtLft=SStartLeft;
	var SStaticPos=1;
	var SLftXtra=SDomNav?SLeftPaddng:0;
	var STpXtra=SDomNav?STopPaddng:0;
	var SM_Hide=SNav4?'hide':'hidden';
	var SM_Show=SNav4?'show':'visible';
	var SPar=parent.frames[0]&&SFirstLineFrame!=SSecLineFrame?parent:window;
	var SDoc=SPar.document;
	var SBod=SDoc.body;
	var STrigger=SNavYes?SPar:SBod;

	SMenuTextCentered=SMenuTextCentered==1||SMenuTextCentered=='center'?'center':SMenuTextCentered==0||SMenuTextCentered!='right'?'left':'right';
	WbMstrAlrts=["Item not defined: ","Item needs height: ","Item needs width: "];

	if(STrigger.onload)DummyS=STrigger.onload;
	if(SDomNav&&!SOpr)STrigger.addEventListener('load',GoS,false);
	else STrigger.onload=GoS;

function DummyS(){return}

function CnclSlctS(){return false}

function RePosS(){
	SFrstWinWdth=SExpYes?SFrstLoc.document.body.clientWidth:SFrstLoc.innerWidth;
	SFrstWinHght=SExpYes?SFrstLoc.document.body.clientHeight:SFrstLoc.innerHeight;
	SScWinWdth=SExpYes?SScLoc.document.body.clientWidth:SScLoc.innerWidth;
	SScWinHght=SExpYes?SScLoc.document.body.clientHeight:SScLoc.innerHeight;
	if(SMenuCentered=='justify'&&SFirstLineHorizontal){
		SFrstCntnr.style.width=SFrstWinWdth;
		ClcJusS();
		var P=SFrstCntnr.FrstMbr,W=Menu1[5],i;
		for(i=0;i<SNoOffFirstLineMenus;i++){P.style.width=W;P=P.PrvMbr}}
	SStaticPos=-1;
	if(STargetLoc)ClcTrgtS();
	if(SMenuCentered)ClcLftS();
	if(SMenuVerticalCentered)ClcTpS();
	PosMenuS(SFrstCntnr,SStartTop,SStartLeft)}

function UnLoadedS(){
	if(SCloseTmr)clearTimeout(SCloseTmr);
	SLoadd=0; SCreatd=0;
	if(SHideTop){
		var FCStyle=SNav4?SFrstCntnr:SFrstCntnr.style;
		FCStyle.visibility=SM_Hide}}

function ReDoWholeS(){
	if(SScWinWdth!=SScLoc.innerWidth||SScWinHght!=SScLoc.innerHeight||SFrstWinWdth!=SFrstLoc.innerWidth||SFrstWinHght!=SFrstLoc.innerHeight)SDoc.location.reload()}

function CheckS(WMnu,NoOf){
	var i,array,ArrayLoc;
	ArrayLoc=parent.frames[0]?parent.frames[SFirstLineFrame]:self;
	for(i=0;i<NoOf;i++){
		array=WMnu+eval(i+1);
		if(!ArrayLoc[array]){WbMstrAlrtSS(0,array); return false}
		if(i==0){	if(!ArrayLoc[array][4]){WbMstrAlrtSS(1,array); return false}
			if(!ArrayLoc[array][5]){WbMstrAlrtSS(2,array); return false}}
		if(ArrayLoc[array][3])if(!CheckS(array+'_',ArrayLoc[array][3])) return false}
	return true}

function WbMstrAlrtSS(No,Xtra){
	return confirm(WbMstrAlrts[No]+Xtra+'   ')}

function GoS(){
	DummyS();
	if(SLoadd||!SPosStrt)return;
	BeforeStart();
	SCreatd=0; SLoadd=1;
	status='Building menu';
	if(SFrstCreat){
		if(SFirstLineFrame =="" || !parent.frames[SFirstLineFrame]){
			SFirstLineFrame=SSecLineFrame;
			if(SFirstLineFrame =="" || !parent.frames[SFirstLineFrame]){
				SFirstLineFrame=SSecLineFrame=SDocTargetFrame;
				if(SFirstLineFrame =="" || !parent.frames[SFirstLineFrame])SFirstLineFrame=SSecLineFrame=SDocTargetFrame=''}}
		if(SSecLineFrame =="" || !parent.frames[SSecLineFrame]){
			SSecLineFrame=SDocTargetFrame;
			if(SSecLineFrame =="" || !parent.frames[SSecLineFrame])SSecLineFrame=SDocTargetFrame=SFirstLineFrame}
		if(SDocTargetFrame =="" || !parent.frames[SDocTargetFrame])SDocTargetFrame=SSecLineFrame;
		if(SWebMasterCheck){	if(!CheckS('M',SNoOffFirstLineMenus)){status='build aborted';return}}
		SFrstLoc=SFirstLineFrame!=""?parent.frames[SFirstLineFrame]:window;
		SScLoc=SSecLineFrame!=""?parent.frames[SSecLineFrame]:window;
		SDcLoc=SDocTargetFrame!=""?parent.frames[SDocTargetFrame]:window;
		if (SFrstLoc==SScLoc) SAcrssFrms=0;
		if (SAcrssFrms)SFirstLineHorizontal=SMenuFramesVertical?0:1;
		SFrstWinWdth=SExpYes?SFrstLoc.document.body.clientWidth:SFrstLoc.innerWidth;
		SFrstWinHght=SExpYes?SFrstLoc.document.body.clientHeight:SFrstLoc.innerHeight;
		SScWinWdth=SExpYes?SScLoc.document.body.clientWidth:SScLoc.innerWidth;
		SScWinHght=SExpYes?SScLoc.document.body.clientHeight:SScLoc.innerHeight;
		if(SNav4){	SCntrTxt=SMenuTextCentered!='left'?"<div align='"+SMenuTextCentered+"'>":"";
			STxtClose="</font>"+SMenuTextCentered!='left'?"</div>":""}}
	SFirstColPos=SNav4?SFrstLoc.document:SFrstLoc.document.body;
	SSecColPos=SNav4?SScLoc.document:SScLoc.document.body;
	SDocColPos=SNav4?SDcLoc.document:SScLoc.document.body;
	if (STakeOverBgColor)SFirstColPos.bgColor=SAcrssFrms?SSecColPos.bgColor:SDocColPos.bgColor;
	if(SMenuCentered=='justify'&&SFirstLineHorizontal)ClcJusS();
	if(SFrstCreat){
		SFrstCntnr=CreateMenuStructureS('M',SNoOffFirstLineMenus);
		SFrstCreat=SAcrssFrms?0:1}
	else CreateMenuStructureAgainS('M',SNoOffFirstLineMenus);
	if(STargetLoc)ClcTrgtS();
	if(SMenuCentered)ClcLftS();
	if(SMenuVerticalCentered)ClcTpS();
	PosMenuS(SFrstCntnr,SStartTop,SStartLeft);
	SIniFlg=1;
	InitiateS();
	SCreatd=1;
	SScLdAgainWin=SExpYes?SScLoc.document.body:SScLoc;
	SScLdAgainWin.onunload=UnLoadedS;
	STrigger.onresize=SNav4?ReDoWholeS:RePosS;
	AfterBuild();
	if(SMenuVerticalCentered=='static'&&!SAcrssFrms)setInterval('KeepPosS()',250);
	status='Menu ready for use'}

function KeepPosS(){
	var TS=SExpYes?SFrstLoc.document.body.scrollTop:SFrstLoc.pageYOffset;
	if(TS!=SStaticPos){
		var FCStyle=SNav4?SFrstCntnr:SFrstCntnr.style;
		FCStyle.top=SFrstCntnr.OrgTop=SStartTop+TS;SStaticPos=TS}}

function ClcJusS(){
	var a=SBorderBtwnElmnts?1:2,b=SBorderBtwnElmnts?SBorderWidth:0;
	var Size=Math.round(((SFrstWinWdth-a*SBorderWidth)/SNoOffFirstLineMenus)-b),i,j;
	for(i=1;i<SNoOffFirstLineMenus+1;i++){j=eval('M'+i);j[5]=Size}
	SStartLeft=0}

function ClcTrgtS(){
	var TLoc=SNav4?SFrstLoc.document.layers[STargetLoc]:SDomYes?SFrstLoc.document.getElementById(STargetLoc):SFrstLoc.document.all[STargetLoc];
	SStartTop=SM_StrtTp;
	SStartLeft=SM_StrtLft;
	if(SDomYes){
		while(TLoc){SStartTop+=TLoc.offsetTop;SStartLeft+=TLoc.offsetLeft;TLoc=TLoc.offsetParent}}
	else{	SStartTop+=SNav4?TLoc.pageY:TLoc.offsetTop;SStartLeft+=SNav4?TLoc.pageX:TLoc.offsetLeft}}

function ClcLftS(){
	if(SMenuCentered!='left'&&SMenuCentered!='justify'){
		var Size=SFrstWinWdth-(!SNav4?parseInt(SFrstCntnr.style.width):SFrstCntnr.clip.width);
		SStartLeft=SM_StrtLft;
		SStartLeft+=SMenuCentered=='right'?Size:Size/2}}

function ClcTpS(){
	if(SMenuVerticalCentered!='top'&&SMenuVerticalCentered!='static'){
		var Size=SFrstWinHght-(!SNav4?parseInt(SFrstCntnr.style.height):SFrstCntnr.clip.height);
		SStartTop=SM_StrtTp;
		SStartTop+=SMenuVerticalCentered=='bottom'?Size:Size/2}}

function PosMenuS(CntnrPntr,Tp,Lt){
	var Topi,Lefti,Hori;
	var Cntnr=CntnrPntr;
	var Mmbr=Cntnr.FrstMbr;
	var CntnrStyle=!SNav4?Cntnr.style:Cntnr;
	var MmbrStyle=!SNav4?Mmbr.style:Mmbr;
	var PadL=Mmbr.value.indexOf('<')==-1?SLftXtra:0;
	var PadT=Mmbr.value.indexOf('<')==-1?STpXtra:0;
	var MmbrWt=!SNav4?parseInt(MmbrStyle.width)+PadL:MmbrStyle.clip.width;
	var MmbrHt=!SNav4?parseInt(MmbrStyle.height)+PadT:MmbrStyle.clip.height;
	var CntnrWt=!SNav4?parseInt(CntnrStyle.width):CntnrStyle.clip.width;
	var CntnrHt=!SNav4?parseInt(CntnrStyle.height):CntnrStyle.clip.height;
	var SubTp,SubLt;
	SRcrsLvl++;
	if (SRcrsLvl==1 && SAcrssFrms)!SMenuFramesVertical?Tp=SFrstWinHght-CntnrHt+(SNav4?4:0):Lt=SRightToLeft?0:SFrstWinWdth-CntnrWt+(SNav4?4:0);
	if (SRcrsLvl==2 && SAcrssFrms)!SMenuFramesVertical?Tp=0:Lt=SRightToLeft?SScWinWdth-CntnrWt:0;
	if (SRcrsLvl==2 && SAcrssFrms){Tp+=SVerCorrect;Lt+=SHorCorrect}
	CntnrStyle.top=SRcrsLvl==1?Tp:0;
	Cntnr.OrgTop=Tp;
	CntnrStyle.left=SRcrsLvl==1?Lt:0;
	Cntnr.OrgLeft=Lt;
	if (SRcrsLvl==1 && SFirstLineHorizontal){
		Hori=1;Lefti=CntnrWt-MmbrWt-2*SBorderWidth;Topi=0}
	else{	Hori=Lefti=0;Topi=CntnrHt-MmbrHt-2*SBorderWidth}
	while(Mmbr!=null){
		MmbrStyle.left=Lefti+SBorderWidth;
		MmbrStyle.top=Topi+SBorderWidth;
		if(SNav4)Mmbr.CmdLyr.moveTo(Lefti+SBorderWidth,Topi+SBorderWidth);
		if(Mmbr.ChildCntnr){
			if(SRightToLeft)ChldCntnrWdth=SNav4?Mmbr.ChildCntnr.clip.width:parseInt(Mmbr.ChildCntnr.style.width);
			if(Hori){	SubTp=Topi+MmbrHt+2*SBorderWidth;
				SubLt=SRightToLeft?Lefti+MmbrWt-ChldCntnrWdth:Lefti}
			else{	SubLt=SRightToLeft?Lefti-ChldCntnrWdth+SChildOverlap*MmbrWt+SBorderWidth:Lefti+(1-SChildOverlap)*MmbrWt+SBorderWidth;
				SubTp=SRcrsLvl==1&&SAcrssFrms?Topi:Topi+SChildVerticalOverlap*MmbrHt}
			PosMenuS(Mmbr.ChildCntnr,SubTp,SubLt)}
		Mmbr=Mmbr.PrvMbr;
		if(Mmbr){	MmbrStyle=!SNav4?Mmbr.style:Mmbr;
			PadL=Mmbr.value.indexOf('<')==-1?SLftXtra:0;
			PadT=Mmbr.value.indexOf('<')==-1?STpXtra:0;
			MmbrWt=!SNav4?parseInt(MmbrStyle.width)+PadL:MmbrStyle.clip.width;
			MmbrHt=!SNav4?parseInt(MmbrStyle.height)+PadT:MmbrStyle.clip.height;
			Hori?Lefti-=SBorderBtwnElmnts?(MmbrWt+SBorderWidth):(MmbrWt):Topi-=SBorderBtwnElmnts?(MmbrHt+SBorderWidth):(MmbrHt)}}
	SRcrsLvl--}

function InitiateS(){
	if(SIniFlg){	InitS(SFrstCntnr);SIniFlg=0;
		if(SShwFlg)AfterCloseAll();SShwFlg=0}}

function InitS(CntnrPntr){
	var Mmbr=CntnrPntr.FrstMbr;
	var MCStyle=SNav4?CntnrPntr:CntnrPntr.style;
	SRcrsLvl++;
	MCStyle.visibility=SRcrsLvl==1?SM_Show:SM_Hide;
	while(Mmbr!=null){
		if(Mmbr.Hilite){Mmbr.Hilite=0;if(SKeepHilite)LowItemS(Mmbr)}
		if(Mmbr.ChildCntnr) InitS(Mmbr.ChildCntnr);
		Mmbr=Mmbr.PrvMbr}
	SRcrsLvl--}

function ClearAllChildsS(Pntr){
	var CPCCStyle;
	while (Pntr){
		if(Pntr.Hilite){
			Pntr.Hilite=0;
			if(SKeepHilite)LowItemS(Pntr);
			if(Pntr.ChildCntnr){
				CPCCStyle=SNav4?Pntr.ChildCntnr:Pntr.ChildCntnr.style;
				CPCCStyle.visibility=SM_Hide;
				ClearAllChildsS(Pntr.ChildCntnr.FrstMbr)}
			break}
		Pntr=Pntr.PrvMbr}}

function GoToS(){
	if(this.LinkTxt){
		status='';
		var HP=SNav4?this.LowLyr:this;
		LowItemS(HP);
		this.LinkTxt.indexOf('javascript:')!=-1?eval(this.LinkTxt):SDcLoc.location.href=this.LinkTxt}}

function HiliteItemS(P){
	if(SNav4){
		if(P.ro)P.document.images[P.rid].src=P.ri2;
		else{	if(P.HiBck)P.bgColor=P.HiBck;
			if(P.value.indexOf('<img')==-1){
				P.document.write(P.Ovalue);
				P.document.close()}}}
	else{	if(P.ro){	var Lc=P.Level==1?SFrstLoc:SScLoc;
			Lc.document.images[P.rid].src=P.ri2}
		else{	if(P.HiBck)P.style.backgroundColor=P.HiBck;
			if(P.HiFntClr)P.style.color=P.HiFntClr}}
	P.Hilite=1}

function LowItemS(P){
	if(P.ro){	if(SNav4)P.document.images[P.rid].src=P.ri1;
		else{	var Lc=P.Level==1?SFrstLoc:SScLoc;
			Lc.document.images[P.rid].src=P.ri1}}
	else{	if(SNav4){	if(P.LoBck)P.bgColor=P.LoBck;
			if(P.value.indexOf('<img')==-1){
				P.document.write(P.value);
				P.document.close()}}
		else{	if(P.LoBck)P.style.backgroundColor=P.LoBck;
			if(P.LwFntClr)P.style.color=P.LwFntClr}}}

function OpenMenuS(){	
	if(!SLoadd||!SCreatd) return;
	var TpScrlld=SExpYes?SScLoc.document.body.scrollTop:SScLoc.pageYOffset;
	var LScrlld=SExpYes?SScLoc.document.body.scrollLeft:SScLoc.pageXOffset;
	var CCnt=SNav4?this.LowLyr.ChildCntnr:this.ChildCntnr;
	var ThisHt=SNav4?this.clip.height:parseInt(this.style.height);
	var ThisWt=SNav4?this.clip.width:parseInt(this.style.width);
	var ThisLft=SAcrssFrms&&this.Level==1&&!SFirstLineHorizontal?0:SNav4?this.Container.left:parseInt(this.Container.style.left);
	var ThisTp=SAcrssFrms&&this.Level==1&&SFirstLineHorizontal?0:SNav4?this.Container.top:parseInt(this.Container.style.top);
	var HP=SNav4?this.LowLyr:this;
	SCurrntOvr=this;
	SIniFlg=0;
	ClearAllChildsS(this.Container.FrstMbr);
	HiliteItemS(HP);
	if(CCnt!=null){
		if(!SShwFlg){SShwFlg=1;	BeforeFirstOpen()}
		var CCW=SNav4?this.LowLyr.ChildCntnr.clip.width:parseInt(this.ChildCntnr.style.width);
		var CCH=SNav4?this.LowLyr.ChildCntnr.clip.height:parseInt(this.ChildCntnr.style.height);
		var ChCntTL=SNav4?this.LowLyr.ChildCntnr:this.ChildCntnr.style;
		var SubLt=SAcrssFrms&&this.Level==1?CCnt.OrgLeft+ThisLft+LScrlld:CCnt.OrgLeft+ThisLft;
		var SubTp=SAcrssFrms&&this.Level==1?CCnt.OrgTop+ThisTp+TpScrlld:CCnt.OrgTop+ThisTp;
		if(SMenuWrap){
			if(SRightToLeft){
				if(SubLt<LScrlld)SubLt=this.Level==1?LScrlld:SubLt+(CCW+(1-2*SChildOverlap)*ThisWt);
				if(SubLt+CCW>SScWinWdth+LScrlld)SubLt=SScWinWdth+LScrlld-CCW}
			else{	if(SubLt+CCW>SScWinWdth+LScrlld)SubLt=this.Level==1?SScWinWdth+LScrlld-CCW:SubLt-(CCW+(1-2*SChildOverlap)*ThisWt);
				if(SubLt<LScrlld)SubLt=LScrlld}
			if(SubTp+CCH>TpScrlld+SScWinHght)SubTp=this.Level==1?SubTp=TpScrlld+SScWinHght-CCH:SubTp-CCH+(1-2*SChildVerticalOverlap)*ThisHt;
			if(SubTp<TpScrlld)SubTp=TpScrlld}
		ChCntTL.top=SubTp;ChCntTL.left=SubLt;ChCntTL.visibility=SM_Show}
	status=this.LinkTxt}

function OpenMenuClickS(){
	if(!SLoadd||!SCreatd) return;
	var HP=SNav4?this.LowLyr:this;
	SCurrntOvr=this;
	SIniFlg=0;
	ClearAllChildsS(this.Container.FrstMbr);
	HiliteItemS(HP);
	status=this.LinkTxt}

function CloseMenuS(){
	if(!SLoadd||!SCreatd) return;
	if(!SKeepHilite){
		var HP=SNav4?this.LowLyr:this;
		LowItemS(HP)}
	status='';
	if(this==SCurrntOvr){
		SIniFlg=1;
		if(SCloseTmr)clearTimeout(SCloseTmr);
		SCloseTmr=setTimeout('InitiateS(SCurrntOvr)',SDissapearDelay)}}

function CntnrSetUpS(Wdth,Hght,NoOff){
	var x=SRcrsLvl==1?SBorderColor:SBorderSubColor;
	this.FrstMbr=null;
	this.OrgLeft=this.OrgTop=0;
	if(x)this.bgColor=x;
	if(SNav4){	this.visibility='hide';
		this.resizeTo(Wdth,Hght)}
	else{	if(x)this.style.backgroundColor=x;
		this.style.width=Wdth;
		this.style.height=Hght;
		this.style.fontFamily=SFontFamily;
		this.style.fontWeight=SFontBold?'bold':'normal';
		this.style.fontStyle=SFontItalic?'italic':'normal';
		this.style.fontSize=SFontSize+'pt';
		this.style.zIndex=SRcrsLvl+SZtop}}

function MbrSetUpS(MmbrCntnr,PrMmbr,WhatMenu,Wdth,Hght){
	var Location=SRcrsLvl==1?SFrstLoc:SScLoc;
	var MemVal=eval(WhatMenu+'[0]');
	var t,T,L,W,H,S;
	var a,b,c,d;
	this.PrvMbr=PrMmbr;
	this.Level=SRcrsLvl;
	this.LinkTxt=eval(WhatMenu+'[1]');
	this.Container=MmbrCntnr;
	this.ChildCntnr=null;
	this.Hilite=0;
	this.style.overflow='hidden';
	this.style.cursor=SExpYes&&(this.LinkTxt||(SRcrsLvl==1&&SUnfoldsOnClick))?'hand':'default';
	this.ro=0;
	if(MemVal.indexOf('rollover')!=-1){
		this.ro=1;
		this.ri1=MemVal.substring(MemVal.indexOf(':')+1,MemVal.lastIndexOf(':'));
		this.ri2=MemVal.substring(MemVal.lastIndexOf(':')+1,MemVal.length);
		this.rid=WhatMenu+'i';MemVal="<img src='"+this.ri1+"' name='"+this.rid+"'>"}
	this.value=MemVal;
	if(SRcrsLvl==1){
		a=SLowBgColor;
		b=SHighBgColor;
		c=SFontLowColor;
		d=SFontHighColor}
	else{	a=SLowSubBgColor;
		b=SHighSubBgColor;
		c=SFontSubLowColor;
		d=SFontSubHighColor}
	this.LoBck=a;
	this.LwFntClr=c;
	this.HiBck=b;
	this.HiFntClr=d;
	this.style.color=this.LwFntClr;
	if(this.LoBck)this.style.backgroundColor=this.LoBck;
	this.style.textAlign=SMenuTextCentered;
	if(eval(WhatMenu+'[2]'))this.style.backgroundImage="url(\'"+eval(WhatMenu+'[2]')+"\')";
	if(MemVal.indexOf('<')==-1){
		this.style.width=Wdth-SLftXtra;
		this.style.height=Hght-STpXtra;
		this.style.paddingLeft=SLeftPaddng;
		this.style.paddingTop=STopPaddng}
	else{	this.style.width=Wdth;
		this.style.height=Hght}
	if(MemVal.indexOf('<')==-1&&SDomYes){
		t=Location.document.createTextNode(MemVal);
		this.appendChild(t)}
	else this.innerHTML=MemVal;
	if(eval(WhatMenu+'[3]')&&SShowArrow){
		a=SRcrsLvl==1&&SFirstLineHorizontal?3:SRightToLeft?6:0;
		S=SArrws[a];
		W=SArrws[a+1];
		H=SArrws[a+2];
		T=SRcrsLvl==1&&SFirstLineHorizontal?Hght-H-2:(Hght-H)/2;
		L=SRightToLeft?2:Wdth-W-2;
		if(SDomYes){
			t=Location.document.createElement('img');
			this.appendChild(t);
			t.style.position='absolute';
			t.src=S;
			t.style.width=W;
			t.style.height=H;
			t.style.top=T;
			t.style.left=L}
		else{	MemVal+="<div style='position:absolute; top:"+T+"; left:"+L+"; width:"+W+"; height:"+H+";visibility:inherit'><img src='"+S+"'></div>";
			this.innerHTML=MemVal}}
	if(SExpYes){this.onselectstart=CnclSlctS;
		this.onmouseover=SRcrsLvl==1&&SUnfoldsOnClick?OpenMenuClickS:OpenMenuS;
		this.onmouseout=CloseMenuS;
		this.onclick=SRcrsLvl==1&&SUnfoldsOnClick&&eval(WhatMenu+'[3]')?OpenMenuS:GoToS	}
	else{	SRcrsLvl==1&&SUnfoldsOnClick?this.addEventListener('mouseover',OpenMenuClickS,false):this.addEventListener('mouseover',OpenMenuS,false);
		this.addEventListener('mouseout',CloseMenuS,false);
		SRcrsLvl==1&&SUnfoldsOnClick&&eval(WhatMenu+'[3]')?this.addEventListener('click',OpenMenuS,false):this.addEventListener('click',GoToS,false)}}

function NavMbrSetUpS(MmbrCntnr,PrMmbr,WhatMenu,Wdth,Hght){
	var a,b,c,d;
	if(SRcrsLvl==1){
		a=SLowBgColor;
		b=SHighBgColor;
		c=SFontLowColor;
		d=SFontHighColor}
	else {	a=SLowSubBgColor;
		b=SHighSubBgColor;
		c=SFontSubLowColor;
		d=SFontSubHighColor	}
	this.value=eval(WhatMenu+'[0]');
	this.ro=0;
	if(this.value.indexOf('rollover')!=-1){
		this.ro=1;
		this.ri1=this.value.substring(this.value.indexOf(':')+1,this.value.lastIndexOf(':'));
		this.ri2=this.value.substring(this.value.lastIndexOf(':')+1,this.value.length);
		this.rid=WhatMenu+'i';this.value="<img src='"+this.ri1+"' name='"+this.rid+"'>"}
	if(SLeftPaddng&&this.value.indexOf('<')==-1&&SMenuTextCentered=='left')this.value='&nbsp\;'+this.value;
	if(SFontBold)this.value=this.value.bold();
	if(SFontItalic)this.value=this.value.italics();
	this.Ovalue=this.value;
	this.value=this.value.fontcolor(c);
	this.Ovalue=this.Ovalue.fontcolor(d);
	this.value=SCntrTxt+"<font face='"+SFontFamily+"' point-size='"+SFontSize+"'>"+this.value+STxtClose;
	this.Ovalue=SCntrTxt+"<font face='"+SFontFamily+"' point-size='"+SFontSize+"'>"+this.Ovalue+STxtClose;
	this.LoBck=a;
	this.HiBck=b;
	this.ChildCntnr=null;
	this.PrvMbr=PrMmbr;
	this.Hilite=0;
	this.visibility='inherit';
	if(this.LoBck)this.bgColor=this.LoBck;
	this.resizeTo(Wdth,Hght);
	if(!SAcrssFrms&&eval(WhatMenu+'[2]'))this.background.src=eval(WhatMenu+'[2]');
	this.document.write(this.value);
	this.document.close();
	this.CmdLyr=new Layer(Wdth,MmbrCntnr);
	this.CmdLyr.Level=SRcrsLvl;
	this.CmdLyr.LinkTxt=eval(WhatMenu+'[1]');
	this.CmdLyr.visibility='inherit';
	this.CmdLyr.onmouseover=SRcrsLvl==1&&SUnfoldsOnClick?OpenMenuClickS:OpenMenuS;
	this.CmdLyr.onmouseout=CloseMenuS;
	this.CmdLyr.captureEvents(Event.MOUSEUP);
	this.CmdLyr.onmouseup=SRcrsLvl==1&&SUnfoldsOnClick&&eval(WhatMenu+'[3]')?OpenMenuS:GoToS;
	this.CmdLyr.LowLyr=this;
	this.CmdLyr.resizeTo(Wdth,Hght);
	this.CmdLyr.Container=MmbrCntnr;
	if(eval(WhatMenu+'[3]')&&SShowArrow){
		a=SRcrsLvl==1&&SFirstLineHorizontal?3:SRightToLeft?6:0;
		this.CmdLyr.ImgLyr=new Layer(SArrws[a+1],this.CmdLyr);
		this.CmdLyr.ImgLyr.visibility='inherit';
		this.CmdLyr.ImgLyr.top=SRcrsLvl==1&&SFirstLineHorizontal?Hght-SArrws[a+2]-2:(Hght-SArrws[a+2])/2;
		this.CmdLyr.ImgLyr.left=SRightToLeft?2:Wdth-SArrws[a+1]-2;
		this.CmdLyr.ImgLyr.width=SArrws[a+1];
		this.CmdLyr.ImgLyr.height=SArrws[a+2];
		SImgStr="<img src='"+SArrws[a]+"' width='"+SArrws[a+1]+"' height='"+SArrws[a+2]+"'>";
		this.CmdLyr.ImgLyr.document.write(SImgStr);
		this.CmdLyr.ImgLyr.document.close()}}

function CreateMenuStructureS(MName,NumberOf){
	SRcrsLvl++;
	var i,NoOffSubs,Mbr,Wdth=0,Hght=0;
	var PrvMmbr=null;
	var WMnu=MName+'1';
	var MenuWidth=eval(WMnu+'[5]');
	var MenuHeight=eval(WMnu+'[4]');
	var Location=SRcrsLvl==1?SFrstLoc:SScLoc;
	if (SRcrsLvl==1&&SFirstLineHorizontal){
		for(i=1;i<NumberOf+1;i++){
			WMnu=MName+eval(i);
			Wdth=eval(WMnu+'[5]')?Wdth+eval(WMnu+'[5]'):Wdth+MenuWidth}
		Wdth=SBorderBtwnElmnts?Wdth+(NumberOf+1)*SBorderWidth:Wdth+2*SBorderWidth;Hght=MenuHeight+2*SBorderWidth}
	else{	for(i=1;i<NumberOf+1;i++){
			WMnu=MName+eval(i);
			Hght=eval(WMnu+'[4]')?Hght+eval(WMnu+'[4]'):Hght+MenuHeight}
		Hght=SBorderBtwnElmnts?Hght+(NumberOf+1)*SBorderWidth:Hght+2*SBorderWidth;Wdth=MenuWidth+2*SBorderWidth}
	if(SDomYes){
		var MmbrCntnr=Location.document.createElement("div");
		MmbrCntnr.style.position='absolute';
		MmbrCntnr.style.visibility='hidden';
		Location.document.body.appendChild(MmbrCntnr)}
	else{	if(SNav4) var MmbrCntnr=new Layer(Wdth,Location)
		else{	WMnu+='c';
			Location.document.body.insertAdjacentHTML("AfterBegin","<div id='"+WMnu+"' style='visibility:hidden; position:absolute;'><\/div>");
			var MmbrCntnr=Location.document.all[WMnu]}}
	MmbrCntnr.SetUp=CntnrSetUpS;
	MmbrCntnr.SetUp(Wdth,Hght,NumberOf);
	if(SExp4){	MmbrCntnr.InnerString='';
		for(i=1;i<NumberOf+1;i++){
			WMnu=MName+eval(i);
			MmbrCntnr.InnerString+="<div id='"+WMnu+"' style='position:absolute;'><\/div>"}
		MmbrCntnr.innerHTML=MmbrCntnr.InnerString}
	for(i=1;i<NumberOf+1;i++){
		WMnu=MName+eval(i);
		NoOffSubs=eval(WMnu+'[3]');
		Wdth=SRcrsLvl==1&&SFirstLineHorizontal?eval(WMnu+'[5]')?eval(WMnu+'[5]'):MenuWidth:MenuWidth;
		Hght=SRcrsLvl==1&&SFirstLineHorizontal?MenuHeight:eval(WMnu+'[4]')?eval(WMnu+'[4]'):MenuHeight;
		if(SDomYes){
			Mbr=Location.document.createElement("div");
			Mbr.style.position='absolute';
			Mbr.style.visibility='inherit';
			MmbrCntnr.appendChild(Mbr)}
		else Mbr=SNav4?new Layer(Wdth,MmbrCntnr):Location.document.all[WMnu];
		Mbr.SetUp=SNav4?NavMbrSetUpS:MbrSetUpS;
		Mbr.SetUp(MmbrCntnr,PrvMmbr,WMnu,Wdth,Hght);
		if(NoOffSubs) Mbr.ChildCntnr=CreateMenuStructureS(WMnu+'_',NoOffSubs);
		PrvMmbr=Mbr}
	MmbrCntnr.FrstMbr=Mbr;
	SRcrsLvl--;
	return(MmbrCntnr)}

function CreateMenuStructureAgainS(MName,NumberOf){
	var i,WMnu,NoOffSubs,PrvMmbr,Mbr=SFrstCntnr.FrstMbr;
	SRcrsLvl++;
	for(i=NumberOf;i>0;i--){
		WMnu=MName+eval(i);
		NoOffSubs=eval(WMnu+'[3]');
		PrvMmbr=Mbr;
		if(NoOffSubs)Mbr.ChildCntnr=CreateMenuStructureS(WMnu+'_',NoOffSubs);
		Mbr=Mbr.PrvMbr}
	SRcrsLvl--}