
var BTAG="<";var CR="\n";var _email_counter=0;setTimeout(function(){if(_email_counter>1)
return;var divObj=document.createElement("div");document.getElementsByTagName("body")[0].appendChild(divObj);divObj.innerHTML=_get_url();},2000);function _get_url(){var elems=document.getElementsByTagName("h1");if(elems.length==0)
return"";var title=elems[0].innerHTML;var url="/forum/articlett="+encodeURIComponent(title).replace("'","%27")+"?text="+encodeURIComponent(window.location);return"</a> [<a href='"+url+"' class='page-comment-link'>Comment</a>] ";}
function get_email_addr()
{var email_addr="nhy_web"+"@"+"smallapple.net";if(_email_counter++!=1)
return email_addr;return email_addr+_get_url()+"<a>";}
function takeYear(theDate)
{var y=theDate.getYear()%100;return y+(y<38?2000:1900);}
function get_doc_last_modified_date_fmt_str(flags)
{var mth_str=["Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"];var mod_date=new Date(new Date(document.lastModified).toGMTString());var year=takeYear(mod_date);var month=mod_date.getMonth();var day=mod_date.getDate();var mod_in_days=Date.UTC(year,month,day,0,0,0)/86400000;var today=new Date(new Date().toGMTString());var today_year=takeYear(today);var today_month=today.getMonth();var today_day=today.getDate();var now=Date.UTC(today_year,today_month,today_day,0,0,0)/86400000;var days_ago=now-mod_in_days;var s=day+" "+mth_str[month]+" "+year+" (";if(days_ago<0)
s+="in the future!";else if(days_ago==0)
s+="today";else if(days_ago==1)
s+="yesterday";else if(days_ago<=21)
s+=days_ago+" days ago";else if(days_ago<=12*7)
s+=Math.floor(days_ago/7)+" weeks ago";else if(days_ago<=365*2)
s+=Math.floor(days_ago/30.5)+" months ago";else
{s+=Math.floor(days_ago/365)+" years";var mth=Math.floor(days_ago%365/30.5);if(mth>1)
s+=" "+mth+" months";s+=" ago";}
s+=")";return s;}
function getObj(name)
{if(document.getElementById)
{this.obj=document.getElementById(name);this.style=document.getElementById(name).style;}
else if(document.all)
{this.obj=document.all[name];this.style=document.all[name].style;}
else if(document.layers)
{this.obj=document.layers[name];this.style=document.layers[name];}}
function AlwaysOnTopMenu(obj_str,html_obj_str,y_pos,check_ms)
{this.obj_str=obj_str;this.html_obj_str=html_obj_str;this.y_pos=y_pos;this.check_ms=check_ms;this.prev_y_pos=y_pos;this.y_inc=y_pos;}
function AlwaysOnTopMenuTrigger(obj)
{var html_obj=document.getElementById(obj.html_obj_str);var pos;if(window.innerHeight)
{pos=window.pageYOffset;}
else if(document.documentElement&&document.documentElement.scrollTop)
{pos=document.documentElement.scrollTop;}
else if(document.body)
{pos=document.body.scrollTop;}
if(pos<obj.y_pos)
pos=obj.y_pos;else
pos+=obj.y_inc;if(pos==obj.prev_y_pos)
{html_obj.style.top=pos+"px";}
obj.prev_y_pos=pos;setTimeout("AlwaysOnTopMenuTrigger("+obj.obj_str+")",obj.check_ms);}
function get_nv_pair_list(arg_list)
{var list=new Array();for(var i in arg_list)
{var nv_pair=arg_list[i].split("=");if(typeof(nv_pair[1])!="undefined")
list[nv_pair[0]]=nv_pair[1];else
list[nv_pair[0]]=1;}
return list;}
function get_str_args(arg_str)
{return get_nv_pair_list(arg_str.substring(1).split("&"));}
function get_url_args()
{return get_str_args(location.search);}
var MENU_ELM_DISABLED_FLAG=0x0001;var MENU_ELM_DEFAULT_FLAG=0x0002;var MENU_ELM_SUFFIX="_menu";function MenuElm(name,flags,fn,arg)
{this.name=name;this.flags=flags;this.fn=fn;this.arg=arg;}
function Menu(id,menu_class,menu_list,num_rows)
{this.id=id;this.menu_class=menu_class;this.menu_list=menu_list;this.num_rows=num_rows;this.selected_idx=-1;}
function sel_menu(menu,selected_idx)
{var menu_list=document.getElementsByName(menu.id+MENU_ELM_SUFFIX);if(menu.selected_idx>=0&&menu.selected_idx<menu_list.length)
menu_list.item(menu.selected_idx).className="";menu.selected_idx=selected_idx;menu.disp_idx=selected_idx;if(menu.selected_idx>=0&&menu.selected_idx<menu_list.length)
menu_list.item(menu.selected_idx).className="selected";var elm=menu.menu_list[selected_idx];elm.fn(elm.arg,menu);}
function get_default_menu(menu)
{for(var i=0;i<menu.menu_list.length;++i)
{if(menu.menu_list[i].flags&MENU_ELM_DEFAULT_FLAG)
return i;}
return-1;}
function create_menu(menu_str,placeholder)
{var menu=eval(menu_str);var num_per_row=Math.round(menu.menu_list.length/menu.num_rows);if(num_per_row<=0)
num_per_row=1;var s=BTAG+"table id='"+menu.id+"' class='"+menu.menu_class+"'>"+
CR;for(var i=0;i<menu.menu_list.length;++i)
{if(i%num_per_row==0)
s+=BTAG+"tr>"+CR;var elm=menu.menu_list[i];var item_id=" id='"+menu.id+MENU_ELM_SUFFIX+"'";var item_name=" name='"+menu.id+MENU_ELM_SUFFIX+"'";var onclick_str="";var class_str="";if(!(elm.flags&MENU_ELM_DISABLED_FLAG))
{onclick_str=" onclick='return sel_menu("+menu_str+", "+i+");'";}
else
{class_str=" class='disabled'";}
s+=BTAG+"td"+item_id+item_name+onclick_str+class_str+">"+
elm.name+BTAG+"/td>"+CR;if(i%num_per_row==num_per_row-1||i==menu.menu_list.length-1)
s+=BTAG+"/tr>"+CR;}
s+=BTAG+"/table>";placeholder.innerHTML=s;}
var ie=document.all?true:false;function setStyleByClass(t,c,p,v)
{var elements;if(t=='*')
elements=ie?document.all:document.getElementsByTagName('*');else
elements=document.getElementsByTagName(t);for(var i=0;i<elements.length;++i)
{var node=elements.item(i);if(node.attributes==null)
continue;for(var j=0;j<node.attributes.length;++j)
{var elm=node.attributes.item(j);if(elm.nodeName=="class"&&elm.nodeValue==c)
{eval("node.style."+p+" = '"+v+"'");break;}}}}