/*********************************************************************************************************************************************
*	(c) Ger Versluis 2000 version 5.411 24 December 2001 (updated Jan 31st, 2003 by Dynamic Drive for Opera7)
*	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 AgntUsrR=navigator.userAgent.toLowerCase();
	var DomYesR=document.getElementById?1:0;
	var NavYesR=AgntUsrR.indexOf('mozilla')!=-1&&AgntUsrR.indexOf('compatible')==-1?1:0;
	var ExpYesR=AgntUsrR.indexOf('msie')!=-1?1:0;
	var OprR=AgntUsrR.indexOf('opera')!=-1?1:0;
	var OprR6orless=window.opera && navigator.userAgent.search(/opera.[1-6]/i)!=-1 //DynamicDrive.com added code
	var DomNavR=DomYesR&&NavYesR?1:0;
 	var DomExpR=DomYesR&&ExpYesR?1:0;
	var Nav4R=NavYesR&&!DomYesR&&document.layers?1:0;
	var Exp4R=ExpYesR&&!DomYesR&&document.all?1:0;
	var PosStrtR=(NavYesR||ExpYesR)&&!OprR6orless?1:0;

	var FrstLocR,ScLocR,DcLocR;
	var ScWinWdthR,ScWinHghtR,FrstWinWdthR,FrstWinHghtR;
	var ScLdAgainWinR;
	var FirstColPosR,SecColPosR,DocRColPosR;
	var RcrsLvlR=0;
	var FrstCreatR=1,LoaddR=0,CreatdR=0,IniFlgR,AcrssFrmsR=1;
	var FrstCntnrR=null,CurrntOvrR=null,CloseTmrR=null;
	var CntrTxtR,TxtCloseR,ImgStrR;
	var ZtopR=100;
	var ShwFlgR=0;
	var M_StrtTpR=StartTopR,M_StrtLftR=StartLeftR;
	var StaticPosR=0;
	var LftXtraR=DomNavR?LeftPaddngR:0;
	var TpXtraR=DomNavR?TopPaddngR:0;
	var M_HideR=Nav4R?'hide':'hidden';
	var M_ShowR=Nav4R?'show':'visible';
	var ParR=parent.frames[0]&&FirstLineFrameRR!=SecLineFrameRR?parent:window;
	var DocR=ParR.document;
	var BodR=DocR.body;
	var TriggerR=NavYesR?ParR:BodR;

	MenuTextCenteredR=MenuTextCenteredR==1||MenuTextCenteredR=='center'?'center':MenuTextCenteredR==0||MenuTextCenteredR!='right'?'left':'right';


	WbMstrAlrtsR=["Item not defined: ","Item needs height: ","Item needs width: "];

	if(TriggerR.onload)DummyR=TriggerR.onload;
	if(DomNavR&&!OprR)TriggerR.addEventListener('load',GoR,false);
	else TriggerR.onload=GoR;

function DummyR(){return}

function CnclSlctR(){return false}

function RePosR(){
	FrstWinWdthR=ExpYesR?FrstLocR.document.body.clientWidth:FrstLocR.innerWidth;
	FrstWinHghtR=ExpYesR?FrstLocR.document.body.clientHeight:FrstLocR.innerHeight;
	ScWinWdthR=ExpYesR?ScLocR.document.body.clientWidth:ScLocR.innerWidth;
	ScWinHghtR=ExpYesR?ScLocR.document.body.clientHeight:ScLocR.innerHeight;
	if(MenuCenteredR=='justify'&&FirstLineHorizontalR){
		FrstCntnrR.style.width=FrstWinWdthR;
		ClcJusR();
		var P=FrstCntnrR.FrstMbr,W=Menu1[5],i;
		for(i=0;i<NoOffFirstLineMenusR;i++){P.style.width=W;P=P.PrvMbr}}
	StaticPosR=-1;
	if(TargetLocR)ClcTrgtR();
	if(MenuCenteredR)ClcLftR();
	if(MenuVerticalCenteredR)ClcTpR();
	PosMenuR(FrstCntnrR,StartTopR,StartLeftR)}

function UnLoadedR(){
	if(CloseTmrR)clearTimeout(CloseTmrR);
	LoaddR=0; CreatdR=0;
	if(HideTop){
		var FCStyleR=Nav4R?FrstCntnrR:FrstCntnrR.style;
		FCStyleR.visibility=M_HideR}}

function ReDoWholeR(){
	if(ScWinWdthR!=ScLocR.innerWidth||ScWinHghtR!=ScLocR.innerHeight||FrstWinWdthR!=FrstLocR.innerWidth||FrstWinHghtR!=FrstLocR.innerHeight)DocR.location.reload()}

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

function WbMstrAlrtR(No,Xtra){
	return confirm(WbMstrAlrtsR[No]+Xtra+'   ')}

function GoR(){
	DummyR();
	if(LoaddR||!PosStrtR)return;
	BeforeStartR();
	CreatdR=0; LoaddR=1;
	status='Building menu';
	if(FrstCreatR){
		if(FirstLineFrameR =="" || !parent.frames[FirstLineFrameR]){
			FirstLineFrameR=SecLineFrameR;
			if(FirstLineFrameR =="" || !parent.frames[FirstLineFrameR]){
				FirstLineFrameR=SecLineFrameR=DocTargetFrameR;
				if(FirstLineFrameR =="" || !parent.frames[FirstLineFrameR])FirstLineFrameR=SecLineFrameR=DocTargetFrameR=''}}
		if(SecLineFrameR =="" || !parent.frames[SecLineFrameR]){
			SecLineFrameR=DocTargetFrameR;
			if(SecLineFrameR =="" || !parent.frames[SecLineFrameR])SecLineFrameR=DocTargetFrameR=FirstLineFrameR}
		if(DocTargetFrameR =="" || !parent.frames[DocTargetFrameR])DocTargetFrameR=SecLineFrameR;
		if(WebMasterCheckR){	if(!CheckR('Menu',NoOffFirstLineMenusR)){status='build aborted';return}}
		FrstLocR=FirstLineFrameR!=""?parent.frames[FirstLineFrameR]:window;
		ScLocR=SecLineFrameR!=""?parent.frames[SecLineFrameR]:window;
		DcLocR=DocTargetFrameR!=""?parent.frames[DocTargetFrameR]:window;
		if (FrstLocR==ScLocR) AcrssFrmsR=0;
		if (AcrssFrmsR)FirstLineHorizontalR=MenuFramesVertical?0:1;
		FrstWinWdthR=ExpYesR?FrstLocR.document.body.clientWidth:FrstLocR.innerWidth;
		FrstWinHghtR=ExpYesR?FrstLocR.document.body.clientHeight:FrstLocR.innerHeight;
		ScWinWdthR=ExpYesR?ScLocR.document.body.clientWidth:ScLocR.innerWidth;
		ScWinHghtR=ExpYesR?ScLocR.document.body.clientHeight:ScLocR.innerHeight;
		if(Nav4R){	CntrTxtR=MenuTextCenteredR!='left'?"<div align='"+MenuTextCenteredR+"'>":"";
			TxtCloseR="</font>"+MenuTextCenteredR!='left'?"</div>":""}}
	FirstColPosR=Nav4R?FrstLocR.document:FrstLocR.document.body;
	SecColPosR=Nav4R?ScLocR.document:ScLocR.document.body;
	DocColPosR=Nav4R?DcLocR.document:ScLocR.document.body;
	if (TakeOverBgColorR)FirstColPosR.bgColor=AcrssFrmsR?SecColPosR.bgColor:DocColPosR.bgColor;
	if(MenuCenteredR=='justify'&&FirstLineHorizontalR)ClcJusR();
	if(FrstCreatR){
		FrstCntnrR=CreateMenuStructureR('MenuR',NoOffFirstLineMenusR);
		FrstCreatR=AcrssFrmsR?0:1}
	else CreateMenuStructureAgainR('MenuR',NoOffFirstLineMenusR);
	if(TargetLocR)ClcTrgtR();
	if(MenuCenteredR)ClcLftR();
	if(MenuVerticalCenteredR)ClcTpR();
	PosMenuR(FrstCntnrR,StartTopR,StartLeftR);
	IniFlgR=1;
	InitiateR();
	CreatdR=1;
	ScLdAgainWinR=ExpYesR?ScLocR.document.body:ScLocR;
	ScLdAgainWinR.onunload=UnLoadedR;
	TriggerR.onresize=Nav4R?ReDoWholeR:RePosR;
	AfterBuildR();
	if(MenuVerticalCenteredR=='static'&&!AcrssFrmsR)setInterval('KeepPosR()',250);
	status='Menu ready for use'}

function KeepPosR(){
	var TS=ExpYesR?FrstLocR.document.body.scrollTop:FrstLocR.pageYOffset;
	if(TS!=StaticPosR){
		var FCStyleR=Nav4R?FrstCntnrR:FrstCntnrR.style;
		FCStyleR.top=FrstCntnrR.OrgTop=StartTopR+TS;StaticPosR=TS}}

function ClcJusR(){
	var a=BorderBtwnElmntsR?1:2,b=BorderBtwnElmntsR?BorderWidthR:0;
	var Size=Math.round(((FrstWinWdthR-a*BorderWidthR)/NoOffFirstLineMenusR)-b),i,j;
	for(i=1;i<NoOffFirstLineMenusR+1;i++){j=eval('MenuR'+i);j[5]=Size}
	StartLeftR=0}

function ClcTrgtR(){
	var TLoc=Nav4R?FrstLocR.document.layers[TargetLocR]:DomYesR?FrstLocR.document.getElementById(TargetLocR):FrstLocR.document.all[TargetLocR];
	StartTopR=M_StrtTpR;
	StartLeftR=M_StrtLftR;
	if(DomYesR){
		while(TLoc){StartTopR+=TLoc.offsetTop;StartLeftR+=TLoc.offsetLeft;TLoc=TLoc.offsetParent}}
	else{	StartTopR+=Nav4R?TLoc.pageY:TLoc.offsetTop;StartLeftR+=Nav4R?TLoc.pageX:TLoc.offsetLeft}}

function ClcLftR(){
	if(MenuCenteredR!='left'&&MenuCenteredR!='justify'){
		var Size=FrstWinWdthR-(!Nav4R?parseInt(FrstCntnrR.style.width):FrstCntnrR.clip.width);
		StartLeftR=M_StrtLftR;
		StartLeftR+=MenuCenteredR=='right'?Size:Size/2}}

function ClcTpR(){
	if(MenuVerticalCenteredR!='top'&&MenuVerticalCenteredR!='static'){
		var Size=FrstWinHghtR-(!Nav4R?parseInt(FrstCntnrR.style.height):FrstCntnrR.clip.height);
		StartTopR=M_StrtTpR;
		StartTopR+=MenuVerticalCenteredR=='bottom'?Size:Size/2}}

function PosMenuR(CntnrPntr,Tp,Lt){
	var Topi,Lefti,Hori;
	var Cntnr=CntnrPntr;
	var Mmbr=Cntnr.FrstMbr;
	var CntnrStyle=!Nav4R?Cntnr.style:Cntnr;
	var MmbrStyle=!Nav4R?Mmbr.style:Mmbr;
	var PadL=Mmbr.value.indexOf('<')==-1?LftXtraR:0;
	var PadT=Mmbr.value.indexOf('<')==-1?TpXtraR:0;
	var MmbrWt=!Nav4R?parseInt(MmbrStyle.width)+PadL:MmbrStyle.clip.width;
	var MmbrHt=!Nav4R?parseInt(MmbrStyle.height)+PadT:MmbrStyle.clip.height;
	var CntnrWt=!Nav4R?parseInt(CntnrStyle.width):CntnrStyle.clip.width;
	var CntnrHt=!Nav4R?parseInt(CntnrStyle.height):CntnrStyle.clip.height;
	var SubTp,SubLt;
	RcrsLvlR++;
	if (RcrsLvlR==1 && AcrssFrmsR)!MenuFramesVertical?Tp=FrstWinHghtR-CntnrHt+(Nav4R?4:0):Lt=RightToLeft?0:FrstWinWdthR-CntnrWt+(Nav4R?4:0);
	if (RcrsLvlR==2 && AcrssFrmsR)!MenuFramesVertical?Tp=0:Lt=RightToLeft?ScWinWdthR-CntnrWt:0;
	if (RcrsLvlR==2 && AcrssFrmsR){Tp+=VerCorrect;Lt+=HorCorrect}
	CntnrStyle.top=RcrsLvlR==1?Tp:0;
	Cntnr.OrgTop=Tp;
	CntnrStyle.left=RcrsLvlR==1?Lt:0;
	Cntnr.OrgLeft=Lt;
	if (RcrsLvlR==1 && FirstLineHorizontalR){
		Hori=1;Lefti=CntnrWt-MmbrWt-2*BorderWidthR;Topi=0}
	else{	Hori=Lefti=0;Topi=CntnrHt-MmbrHt-2*BorderWidthR}
	while(Mmbr!=null){
		MmbrStyle.left=Lefti+BorderWidthR;
		MmbrStyle.top=Topi+BorderWidthR;
		if(Nav4R)Mmbr.CmdLyr.moveTo(Lefti+BorderWidthR,Topi+BorderWidthR);
		if(Mmbr.ChildCntnr){
			if(RightToLeft)ChldCntnrWdth=Nav4R?Mmbr.ChildCntnr.clip.width:parseInt(Mmbr.ChildCntnr.style.width);
			if(Hori){	SubTp=Topi+MmbrHt+2*BorderWidthR;
				SubLt=RightToLeft?Lefti+MmbrWt-ChldCntnrWdth:Lefti}
			else{	SubLt=RightToLeft?Lefti-ChldCntnrWdth+ChildOverlap*MmbrWt+BorderWidthR:Lefti+(1-ChildOverlap)*MmbrWt+BorderWidthR;
				SubTp=RcrsLvlR==1&&AcrssFrmsR?Topi:Topi+ChildVerticalOverlap*MmbrHt}
			PosMenuR(Mmbr.ChildCntnr,SubTp,SubLt)}
		Mmbr=Mmbr.PrvMbr;
		if(Mmbr){	MmbrStyle=!Nav4R?Mmbr.style:Mmbr;
			PadL=Mmbr.value.indexOf('<')==-1?LftXtraR:0;
			PadT=Mmbr.value.indexOf('<')==-1?TpXtraR:0;
			MmbrWt=!Nav4R?parseInt(MmbrStyle.width)+PadL:MmbrStyle.clip.width;
			MmbrHt=!Nav4R?parseInt(MmbrStyle.height)+PadT:MmbrStyle.clip.height;
			Hori?Lefti-=BorderBtwnElmntsR?(MmbrWt+BorderWidthR):(MmbrWt):Topi-=BorderBtwnElmntsR?(MmbrHt+BorderWidthR):(MmbrHt)}}
	RcrsLvlR--}

function InitiateR(){
	if(IniFlgR){	InitR(FrstCntnrR);IniFlgR=0;
		if(ShwFlgR)AfterCloseAll();ShwFlgR=0}}

function InitR(CntnrPntr){
	var Mmbr=CntnrPntr.FrstMbr;
	var MCStyle=Nav4R?CntnrPntr:CntnrPntr.style;
	RcrsLvlR++;
	MCStyle.visibility=RcrsLvlR==1?M_ShowR:M_HideR;
	while(Mmbr!=null){
		if(Mmbr.Hilite){Mmbr.Hilite=0;if(KeepHilite)LowItemR(Mmbr)}
		if(Mmbr.ChildCntnr) InitR(Mmbr.ChildCntnr);
		Mmbr=Mmbr.PrvMbr}
	RcrsLvlR--}

function ClearAllChildsR(Pntr){
	var CPCCStyle;
	while (Pntr){
		if(Pntr.Hilite){
			Pntr.Hilite=0;
			if(KeepHilite)LowItemR(Pntr);
			if(Pntr.ChildCntnr){
				CPCCStyle=Nav4R?Pntr.ChildCntnr:Pntr.ChildCntnr.style;
				CPCCStyle.visibility=M_HideR;
				ClearAllChildsR(Pntr.ChildCntnr.FrstMbr)}
			break}
		Pntr=Pntr.PrvMbr}}

function GoRToR(){
	if(this.LinkTxt){
		status='';
		var HP=Nav4R?this.LowLyr:this;
		LowItemR(HP);
		this.LinkTxt.indexOf('javascript:')!=-1?eval(this.LinkTxt):DcLocR.location.href=this.LinkTxt}}

function HiliteItemR(P){
	if(Nav4R){
		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?FrstLocR:ScLocR;
			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 LowItemR(P){
	if(P.ro){	if(Nav4R)P.document.images[P.rid].src=P.ri1;
		else{	var Lc=P.Level==1?FrstLocR:ScLocR;
			Lc.document.images[P.rid].src=P.ri1}}
	else{	if(Nav4R){	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 OpenMenuR(){	
	if(!LoaddR||!CreatdR) return;
	var TpScrlld=ExpYesR?ScLocR.document.body.scrollTop:ScLocR.pageYOffset;
	var LScrlld=ExpYesR?ScLocR.document.body.scrollLeft:ScLocR.pageXOffset;
	var CCnt=Nav4R?this.LowLyr.ChildCntnr:this.ChildCntnr;
	var ThisHt=Nav4R?this.clip.height:parseInt(this.style.height);
	var ThisWt=Nav4R?this.clip.width:parseInt(this.style.width);
	var ThisLft=AcrssFrmsR&&this.Level==1&&!FirstLineHorizontalR?0:Nav4R?this.Container.left:parseInt(this.Container.style.left);
	var ThisTp=AcrssFrmsR&&this.Level==1&&FirstLineHorizontalR?0:Nav4R?this.Container.top:parseInt(this.Container.style.top);
	var HP=Nav4R?this.LowLyr:this;
	CurrntOvrR=this;
	IniFlgR=0;
	ClearAllChildsR(this.Container.FrstMbr);
	HiliteItemR(HP);
	if(CCnt!=null){
		if(!ShwFlgR){ShwFlgR=1;	BeforeFirstOpen()}
		var CCW=Nav4R?this.LowLyr.ChildCntnr.clip.width:parseInt(this.ChildCntnr.style.width);
		var CCH=Nav4R?this.LowLyr.ChildCntnr.clip.height:parseInt(this.ChildCntnr.style.height);
		var ChCntTL=Nav4R?this.LowLyr.ChildCntnr:this.ChildCntnr.style;
		var SubLt=AcrssFrmsR&&this.Level==1?CCnt.OrgLeft+ThisLft+LScrlld:CCnt.OrgLeft+ThisLft;
		var SubTp=AcrssFrmsR&&this.Level==1?CCnt.OrgTop+ThisTp+TpScrlld:CCnt.OrgTop+ThisTp;
		if(MenuWrap){
			if(RightToLeft){
				if(SubLt<LScrlld)SubLt=this.Level==1?LScrlld:SubLt+(CCW+(1-2*ChildOverlap)*ThisWt);
				if(SubLt+CCW>ScWinWdthR+LScrlld)SubLt=ScWinWdthR+LScrlld-CCW}
			else{	if(SubLt+CCW>ScWinWdthR+LScrlld)SubLt=this.Level==1?ScWinWdthR+LScrlld-CCW:SubLt-(CCW+(1-2*ChildOverlap)*ThisWt);
				if(SubLt<LScrlld)SubLt=LScrlld}
			if(SubTp+CCH>TpScrlld+ScWinHghtR)SubTp=this.Level==1?SubTp=TpScrlld+ScWinHghtR-CCH:SubTp-CCH+(1-2*ChildVerticalOverlap)*ThisHt;
			if(SubTp<TpScrlld)SubTp=TpScrlld}
		ChCntTL.top=SubTp;ChCntTL.left=SubLt;ChCntTL.visibility=M_ShowR}
	status=this.LinkTxt}

function OpenMenuClickR(){
	if(!LoaddR||!CreatdR) return;
	var HP=Nav4R?this.LowLyr:this;
	CurrntOvrR=this;
	IniFlgR=0;
	ClearAllChildsR(this.Container.FrstMbr);
	HiliteItemR(HP);
	status=this.LinkTxt}

function CloseMenuR(){
	if(!LoaddR||!CreatdR) return;
	if(!KeepHilite){
		var HP=Nav4R?this.LowLyr:this;
		LowItemR(HP)}
	status='';
	if(this==CurrntOvrR){
		IniFlgR=1;
		if(CloseTmrR)clearTimeout(CloseTmrR);
		CloseTmrR=setTimeout('InitiateR(CurrntOvrR)',DissapearDelay)}}

function CntnrSetUpR(Wdth,Hght,NoOff){
	var x=RcrsLvlR==1?BorderColor:BorderSubColor;
	this.FrstMbr=null;
	this.OrgLeft=this.OrgTop=0;
	if(x)this.bgColor=x;
	if(Nav4R){	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=FontFamily;
		this.style.fontWeight=FontBold?'bold':'normal';
		this.style.fontStyle=FontItalic?'italic':'normal';
		this.style.fontSize=FontSize+'pt';
		this.style.zIndex=RcrsLvlR+ZtopR}}

function MbrSetUpR(MmbrCntnr,PrMmbr,WhatMenuR,Wdth,Hght){
	var Location=RcrsLvlR==1?FrstLocR:ScLocR;
	var MemVal=eval(WhatMenuR+'[0]');
	var t,T,L,W,H,S;
	var a,b,c,d;
	this.PrvMbr=PrMmbr;
	this.Level=RcrsLvlR;
	this.LinkTxt=eval(WhatMenuR+'[1]');
	this.Container=MmbrCntnr;
	this.ChildCntnr=null;
	this.Hilite=0;
	this.style.overflow='hidden';
	this.style.cursor=ExpYesR&&(this.LinkTxt||(RcrsLvlR==1&&UnfoldsOnClick))?'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=WhatMenuR+'i';MemVal="<img src='"+this.ri1+"' name='"+this.rid+"'>"}
	this.value=MemVal;
	if(RcrsLvlR==1){
		a=LowBgColorR;
		b=HighBgColorR;
		c=FontLowColorR;
		d=FontHighColorR}
	else{	a=LowSubBgColorR;
		b=HighSubBgColorR;
		c=FontSubLowColorR;
		d=FontSubHighColorR}
	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=MenuTextCenteredR;
	if(eval(WhatMenuR+'[2]'))this.style.backgroundImage="url(\'"+eval(WhatMenuR+'[2]')+"\')";
	if(MemVal.indexOf('<')==-1){
		this.style.width=Wdth-LftXtraR;
		this.style.height=Hght-TpXtraR;
		this.style.paddingLeft=LeftPaddng;
		this.style.paddingTop=TopPaddng}
	else{	this.style.width=Wdth;
		this.style.height=Hght}
	if(MemVal.indexOf('<')==-1&&DomYesR){
		t=Location.document.createTextNode(MemVal);
		this.appendChild(t)}
	else this.innerHTML=MemVal;
	if(eval(WhatMenuR+'[3]')&&ShowArrow){
		a=RcrsLvlR==1&&FirstLineHorizontalR?3:RightToLeft?6:0;
		S=Arrws[a];
		W=Arrws[a+1];
		H=Arrws[a+2];
		T=RcrsLvlR==1&&FirstLineHorizontalR?Hght-H-2:(Hght-H)/2;
		L=RightToLeft?2:Wdth-W-2;
		if(DomYesR){

			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(ExpYesR){this.onselectstart=CnclSlctR;
		this.onmouseover=RcrsLvlR==1&&UnfoldsOnClick?OpenMenuRClick:OpenMenuR;
		this.onmouseout=CloseMenuR;
		this.onclick=RcrsLvlR==1&&UnfoldsOnClick&&eval(WhatMenuR+'[3]')?OpenMenuR:GoRToR	}
	else{	RcrsLvlR==1&&UnfoldsOnClick?this.addEventListener('mouseover',OpenMenuRClick,false):this.addEventListener('mouseover',OpenMenuR,false);
		this.addEventListener('mouseout',CloseMenuR,false);
		RcrsLvlR==1&&UnfoldsOnClick&&eval(WhatMenuR+'[3]')?this.addEventListener('click',OpenMenuR,false):this.addEventListener('click',GoRToR,false)}}

function NavMbrSetUpR(MmbrCntnr,PrMmbr,WhatMenuR,Wdth,Hght){
	var a,b,c,d;
	if(RcrsLvlR==1){
		a=LowBgColorR;
		b=HighBgColorR;
		c=FontLowColorR;
		d=FontHighColorR}
	else {	a=LowSubBgColorR;
		b=HighSubBgColorR;
		c=FontSubLowColorR;
		d=FontSubHighColorR	}
	this.value=eval(WhatMenuR+'[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=WhatMenuR+'i';this.value="<img src='"+this.ri1+"' name='"+this.rid+"'>"}
	if(LeftPaddng&&this.value.indexOf('<')==-1&&MenuTextCenteredR=='left')this.value='&nbsp\;'+this.value;
	if(FontBold)this.value=this.value.bold();
	if(FontItalic)this.value=this.value.italics();
	this.Ovalue=this.value;
	this.value=this.value.fontcolor(c);
	this.Ovalue=this.Ovalue.fontcolor(d);
	this.value=CntrTxtR+"<font face='"+FontFamily+"' point-size='"+FontSize+"'>"+this.value+TxtCloseR;
	this.Ovalue=CntrTxtR+"<font face='"+FontFamily+"' point-size='"+FontSize+"'>"+this.Ovalue+TxtCloseR;
	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(!AcrssFrmsR&&eval(WhatMenuR+'[2]'))this.background.src=eval(WhatMenuR+'[2]');
	this.document.write(this.value);
	this.document.close();
	this.CmdLyr=new Layer(Wdth,MmbrCntnr);
	this.CmdLyr.Level=RcrsLvlR;
	this.CmdLyr.LinkTxt=eval(WhatMenuR+'[1]');
	this.CmdLyr.visibility='inherit';
	this.CmdLyr.onmouseover=RcrsLvlR==1&&UnfoldsOnClick?OpenMenuRClick:OpenMenuR;
	this.CmdLyr.onmouseout=CloseMenuR;
	this.CmdLyr.captureEvents(Event.MOUSEUP);
	this.CmdLyr.onmouseup=RcrsLvlR==1&&UnfoldsOnClick&&eval(WhatMenuR+'[3]')?OpenMenuR:GoRToR;
	this.CmdLyr.LowLyr=this;
	this.CmdLyr.resizeTo(Wdth,Hght);
	this.CmdLyr.Container=MmbrCntnr;
	if(eval(WhatMenuR+'[3]')&&ShowArrow){
		a=RcrsLvlR==1&&FirstLineHorizontalR?3:RightToLeft?6:0;
		this.CmdLyr.ImgLyr=new Layer(Arrws[a+1],this.CmdLyr);
		this.CmdLyr.ImgLyr.visibility='inherit';
		this.CmdLyr.ImgLyr.top=RcrsLvlR==1&&FirstLineHorizontalR?Hght-Arrws[a+2]-2:(Hght-Arrws[a+2])/2;
		this.CmdLyr.ImgLyr.left=RightToLeft?2:Wdth-Arrws[a+1]-2;
		this.CmdLyr.ImgLyr.width=Arrws[a+1];
		this.CmdLyr.ImgLyr.height=Arrws[a+2];
		ImgStrR="<img src='"+Arrws[a]+"' width='"+Arrws[a+1]+"' height='"+Arrws[a+2]+"'>";
		this.CmdLyr.ImgLyr.document.write(ImgStrR);
		this.CmdLyr.ImgLyr.document.close()}}

function CreateMenuStructureR(MNameR,NumberOf){
	RcrsLvlR++;
	var i,NoOffSubs,Mbr,Wdth=0,Hght=0;
	var PrvMmbr=null;
	var WMnuR=MNameR+'1';
	var MenuWidth=eval(WMnuR+'[5]');
	var MenuHeight=eval(WMnuR+'[4]');
	var Location=RcrsLvlR==1?FrstLocR:ScLocR;
	if (RcrsLvlR==1&&FirstLineHorizontalR){
		for(i=1;i<NumberOf+1;i++){
			WMnuR=MNameR+eval(i);
			Wdth=eval(WMnuR+'[5]')?Wdth+eval(WMnuR+'[5]'):Wdth+MenuWidth}
		Wdth=BorderBtwnElmntsR?Wdth+(NumberOf+1)*BorderWidthR:Wdth+2*BorderWidthR;Hght=MenuHeight+2*BorderWidthR}
	else{	for(i=1;i<NumberOf+1;i++){
			WMnuR=MNameR+eval(i);
			Hght=eval(WMnuR+'[4]')?Hght+eval(WMnuR+'[4]'):Hght+MenuHeight}
		Hght=BorderBtwnElmntsR?Hght+(NumberOf+1)*BorderWidthR:Hght+2*BorderWidthR;Wdth=MenuWidth+2*BorderWidthR}
	if(DomYesR){
		var MmbrCntnr=Location.document.createElement("div");
		MmbrCntnr.style.position='absolute';
		MmbrCntnr.style.visibility='hidden';
		Location.document.body.appendChild(MmbrCntnr)}
	else{	if(Nav4R) var MmbrCntnr=new Layer(Wdth,Location)
		else{	WMnuR+='c';
			Location.document.body.insertAdjacentHTML("AfterBegin","<div id='"+WMnuR+"' style='visibility:hidden; position:absolute;'><\/div>");
			var MmbrCntnr=Location.document.all[WMnuR]}}
	MmbrCntnr.SetUp=CntnrSetUpR;
	MmbrCntnr.SetUp(Wdth,Hght,NumberOf);
	if(Exp4R){	MmbrCntnr.InnerString='';
		for(i=1;i<NumberOf+1;i++){
			WMnuR=MNameR+eval(i);
			MmbrCntnr.InnerString+="<div id='"+WMnuR+"' style='position:absolute;'><\/div>"}
		MmbrCntnr.innerHTML=MmbrCntnr.InnerString}
	for(i=1;i<NumberOf+1;i++){
		WMnuR=MNameR+eval(i);
		NoOffSubs=eval(WMnuR+'[3]');
		Wdth=RcrsLvlR==1&&FirstLineHorizontalR?eval(WMnuR+'[5]')?eval(WMnuR+'[5]'):MenuWidth:MenuWidth;
		Hght=RcrsLvlR==1&&FirstLineHorizontalR?MenuHeight:eval(WMnuR+'[4]')?eval(WMnuR+'[4]'):MenuHeight;
		if(DomYesR){
			Mbr=Location.document.createElement("div");
			Mbr.style.position='absolute';
			Mbr.style.visibility='inherit';
			MmbrCntnr.appendChild(Mbr)}
		else Mbr=Nav4R?new Layer(Wdth,MmbrCntnr):Location.document.all[WMnuR];
		Mbr.SetUp=Nav4R?NavMbrSetUpR:MbrSetUpR;
		Mbr.SetUp(MmbrCntnr,PrvMmbr,WMnuR,Wdth,Hght);
		if(NoOffSubs) Mbr.ChildCntnr=CreateMenuStructureR(WMnuR+'_',NoOffSubs);
		PrvMmbr=Mbr}
	MmbrCntnr.FrstMbr=Mbr;
	RcrsLvlR--;
	return(MmbrCntnr)}

function CreateMenuStructureAgainR(MNameR,NumberOf){
	var i,WMnuR,NoOffSubs,PrvMmbr,Mbr=FrstCntnrR.FrstMbr;
	RcrsLvlR++;
	for(i=NumberOf;i>0;i--){
		WMnuR=MNameR+eval(i);
		NoOffSubs=eval(WMnuR+'[3]');
		PrvMmbr=Mbr;
		if(NoOffSubs)Mbr.ChildCntnr=CreateMenuStructureR(WMnuR+'_',NoOffSubs);
		Mbr=Mbr.PrvMbr}
	RcrsLvlR--}