// This file contains intellectual property and artistic creations 
// by Dennis Sandow and is copyright 2000-2010 by the author. 
// For use only on websites maintained by Dennis Sandow, or with
// specific permission.  Do not remove this notice.

var ksCFWD='',ksTimer='', ksU='',ksN='',ksSiz=1;
Captn[101]='Keyboard Shortcuts';
Mesage[101]='<b>Popup Pages</b><br>wx=Weather<br>dr=Driving Instr.<br>fo=Forms<br>rg=RiverGauge<br>tx=Time<br>wn=What\'s New'+
  '</td><td valign=top><font color="#000000" face="Verdana,Arial,Helvetica" SIZE=2>'+ //This messes with OL's payload table and anticipates defaults in OL not yet loaded when this is loaded.
  '<b>Frequent Pages</b><br>co=Contact Us<br>ca=Calendar<br>sp=SpecialEvents<br>cp=Construction Permits<br>pe=Other Permits<br>tv=TV Lineup<br>z=Post Offices'+
  '</td><td valign=top><font color="#000000" face="Verdana,Arial,Helvetica" SIZE=2>'+
  '<b>Departmental Pages</b><br>fi=Fire<br>fa=FirstAid<br>po=Police<br>pw=Public Works<br>li=Library<br>sc=Schools<br>rd=Recreation Dept.';
if (ksOK) { // excludes pages with forms inputs
  if (ns4A||ns6A) document.captureEvents(Event.KEYPRESS)
  document.onkeypress=GoTo
};
function GoTo(e){
  if ( ns6A && e.ctrlKey ) return;
  if (ns4A||ns6A){ hotkey=new Number(e.which) } else { hotkey=new Number(event.keyCode) ; };
//  if ( hotkey == 0 ) { nd(); return; } ; // trial 2/26/06 'esc' kills popup
  matchkey=ksCFWD+unescape('%'+hotkey.toString(16));
// alert(hotkey+' '+matchkey);
  switch (matchkey) {
    case ( 'A' ): ksU="admin/newsmenu.htm"; break;
    case ( 'c' ): ksU="contactu.htm"; break;
    case ( 'ca' ): ksU="calendar.htm"; break;
    case ( 'cl' ): ksU="clerk.htm"; break;
    case ( 'cc' ): ksU="commuctr.htm"; break;
    case ( 'co' ): ksU="contactu.htm"; break;
    case ( 'cp' ): ksU="copermit.htm"; break;
    case ( 'd' ): ksU="dmv.htm"; break;
    case ( 'dm' ): ksU="dmv.htm"; break;
    case ( 'dr' ): ksU="driving.htm"; ksN='d'; break;
    case ( 'f' ): ksU="firedepa.htm"; break;
    case ( 'fa' ): ksU="firstaid.htm"; break;
    case ( 'fe' ): ksU="federal.htm"; break;
    case ( 'fi' ): ksU="firedepa.htm"; break;
    case ( 'fo' ): ksU="forms.htm"; break;
    case ( 'g' ): ksU="gilfield.htm"; break;
    case ( 'h' ): ksU="index.htm"; break;
    case ( 'hi' ): ksU="history.htm"; break;
    case ( 'ho' ): ksU="index.htm"; break;
    case ( 'i' ): ksU="siteindx.htm"; break;
    case ( 'j' ): ksU="state.htm"; break;
    case ( 'l' ): ksU="library.htm"; break;
    case ( 'li' ): ksU="library.htm"; break;
    case ( 'ln' ): ksU="nolibrar"; break;
    case ( 'm' ): ksU="county.htm"; break;
    case ( 'ma' ): ksU="maps.htm"; break;
    case ( 'mc' ): ksU="clerk.htm"; break;
    case ( 'mo' ): ksU="county.htm"; break;
    case ( 'ms' ): ksU="calendar.htm"; break;
    case ( 'M' ): ksU="mailer.htm?X"; ksN='xmailer'; break;
    case ( 'MX' ): ksU="mailer.htm?X"; ksN='xmailer'; break;
    case ( 'n' ): ksU="state.htm"; break;
    case ( 'nj' ): ksU="state.htm"; break;
    case ( 'o' ): ksU="organiza.htm"; break;
    case ( 'p' ): ksU="police.htm"; break;
    case ( 'pe' ): ksU="clpermit.htm"; break;
    case ( 'po' ): ksU="police.htm"; break;
    case ( 'pn' ): ksU="nopolice"; break;
    case ( 'pu' ): ksU="pubworks.htm"; break;
    case ( 'pw' ): ksU="pubworks.htm"; break;
    case ( 'q' ): ksU="contents.htm"; break;
    case ( 'qu' ): ksU="contents.htm"; break;
    case ( 'r' ): ksU="recreati.htm"; break;
    case ( 'rd' ): ksU="recdept.htm"; break;
    case ( 're' ): ksU="recyclng.htm"; break;
    case ( 'rg' ): ksU="http://waterdata.usgs.gov/nj/nwis/uv/?site_no=01379000&PARAmeter_cd=00065,00060"; ksN='rivergauge'; ksSiz=2; break;
    case ( 'ro' ): ksU="recother.htm"; break;
    case ( 'rr' ): ksU="gladston.htm"; break;
    case ( 's' ): ksU="lhtschol.htm"; break;
    case ( 'sc' ): ksU="lhtschol.htm"; break;
    case ( 'se' ): ksU="sewage.htm"; break;
    case ( 'sp' ): ksU="nospecev"; break;
    case ( 't' ): ksU="townhall.htm"; break;
    case ( 'tc' ): ksU="contents.htm"; break;
    case ( 'tv' ): ksU="lineup.htm"; break;
    case ( 'tx' ): if (!isWeb) { alert( 'You are Local!'); ksU=''; break; };
                   sendD=new Date(); ksU="../cgi-local/timxpndr.cgi?"+sendD.valueOf(); ksN='TX'; ksSiz=2; break;
    case ( 'u' ): ksU="federal.htm"; break;
    case ( 'us' ): ksU="federal.htm"; break;
    case ( 'v' ): ksU="visit.htm"; break;
    case ( 'w' ): ksU="whatsnew.htm"; ksN='WN'; break;
    case ( 'we' ): ksU="webmastr.htm"; ksN=''; break;
    case ( 'wn' ): ksU="whatsnew.htm"; ksN='WN'; break;
    case ( 'wx' ): ksU="http://www.wunderground.com/US/NJ/Gillette.html"; ksN='WX'; break;
    case ( 'W' ): ksU="webmastr.htm"; break;
    case ( 'WT' ): ksU="wts.htm"; ksN='w'; break;
    case ( 'z' ): ksU="postoffi.htm"; break;
    case ( '?' ): HintStick(101,'',450); ksU=''; break;
    case ( '$' ): ksU="assessmt.htm"; break;
    case ( '$$' ): ksU="assessmt.htm"; break;
    case ( '%0' ): ksU=''; nd(); break; // trial 2/26/06 'esc' kills popup
    default:  ksU='';
  };
  xnd();
  if (ksU && ! ksTimer) {
    ksTimer=setTimeout("DoGoTo()", 3000); ksCFWD=matchkey; return;
  } else if (ksU){ clearTimeout(ksTimer); DoGoTo(); 
  } else if (ksTimer) clearTimeout(ksTimer);
  ksCFWD=''; ksTimer='';
  return;
};

function DoGoTo(){
  if (! ksU) return;
// offsite 
  if ( ksU.indexOf('http://') >= 0 ){
    if (isWeb) NewWd(ksU,ksSiz,'KS'+ksN); else alert( 'You are Local!');
// Normal htm or OnSite new window
  } else if ( ksU.indexOf('.htm') > 0 || ksN=='TX' ){
    if (isWeb) ksU='/lht/'+ksU; else ksU='../lht/'+ksU ;
    if (ksN) NewWd( ksU,ksSiz ); else window.location=ksU; 
// Notices and agendas via cgi
  } else if (isWeb) { 
    window.location='/cgi-local/news.cgi?'+ksU;
  } else window.location='../lht/'+ksU+'.htm';
  ksN=''; ksSiz=1; return;
};