
var PgMenuFontInt;function DisplayPageMenu(Choices,MenuPath,Extended)
{var MenuFont;if(typeof(PgMenuFont)!='undefined')MenuFont=PgMenuFont;else MenuFont='font-family: Helvetica, Arial, san-serif; font-size: 12px;';if(typeof(MenuPath)=='number')MenuPath=''+MenuPath;else if(typeof(MenuPath)!='string')MenuPath='';if(typeof(Extended)!='boolean')Extended=false;var StyleRE=new RegExp(':');if(MenuFont.match(StyleRE))PgMenuFontInt='style="'+MenuFont+'"';else PgMenuFontInt='class="'+MenuFont+'"';PgMenuDrawInt(Choices,MenuPath,Extended,1);return;}
function PgMenuDrawInt(Tree,MenuPath,Extended,Level)
{var TreeDepth=Tree.length;var CurrElem=0;var PathElems;var PathElem=-1
var TerminalLevel=false;var ItemText;var ItemTextRE=/\|/g;if(Level>1){CurrElem=1;document.write('<br>');}
if(MenuPath.length>0)
{PathElems=MenuPath.split('.');if(Level<=PathElems.length)
{PathElem=parseInt(PathElems[Level-1]);if(Level<=1)PathElem--;if(Level==PathElems.length)TerminalLevel=true;}}
document.write('<span '+PgMenuFontInt+'>');while(CurrElem<TreeDepth)
{ItemText=Tree[CurrElem][0];if(ItemText.substr(0,6)=='image=')
{ItemHeight=ItemText.indexOf(',');if(ItemHeight>0)
{ItemText=ItemText.substring(ItemText.indexOf('=')+1,ItemHeight-1);}
else{ItemText=ItemText.substring(ItemText.indexOf('=')+1);}}
else if(ItemText.substr(0,5)=='size=')
{ItemHeight=ItemText.indexOf(',');if(ItemHeight>0){ItemText=ItemText.substring(ItemHeight+1);}
else{ItemText='';}}
if((ItemText.length<=0)||(((Extended)?Tree[CurrElem][3].length:Tree[CurrElem][1].length)<=0)){CurrElem++;continue;}
ItemText=ItemText.replace(ItemTextRE,' ');if(TerminalLevel&&(CurrElem==PathElem))
document.write(ItemText);else document.write('<a '+PgMenuFontInt+' href="'+
((Extended)?Tree[CurrElem][3]:Tree[CurrElem][1])+'">'+
ItemText+'</a>');if(CurrElem<(TreeDepth-1))document.write(' | ');CurrElem++;}
document.write('</span>');if(Extended)
{if(Level>1)CurrElem=1;else CurrElem=0;while(CurrElem<TreeDepth)
{if(((PathElem<0)||(CurrElem==PathElem))&&(typeof(Tree[CurrElem][2])=='object'))
PgMenuDrawInt(Tree[CurrElem][2],MenuPath,true,Level+1);CurrElem++;}}
return;}