
function change_bg(this_object)
{
  this_object.style.backgroundColor='#0033CC';
}

function restore_bg(this_object)
{
  this_object.style.backgroundColor='';
}

function w_page(this_page, this_title, this_level, is_new)
{
  if (is_new == false)
  {
    document.write("<img border=0 alt=\"*\" src=\"dot.gif\">");
  }
  else
  {
    document.write("<img border=0 alt=\"*\" src=\"new.jpg\">");
  }
  document.write("<a href=\"");
  document.write(this_level);
  document.write(this_page);
  document.write(" \" onmouseover=\"change_bg(this)\"");
  document.write(" onmouseOut=\"restore_bg(this)\">");
  document.write(this_title);
  document.write("</a><br>");
}

function give_css_menu(this_level)
{
  document.write("<div id=\"Menu\">");
  document.write("<p>");
  w_page("index.htm", "Home Page", this_level, false);
  w_page("news.htm", "Latest News", this_level, false);
  w_page("twork/twork.htm", "Trail Work & Volunteering", this_level, false);
  w_page("cs.htm", "Bear Creek Trail Status", this_level, false);
  w_page("events.htm", "Scheduled Coming Events In the Ranger District", this_level, false);
  w_page("duffy/duffy.htm", "George Duffy Farewell to the Wilderness", this_level, true);
  w_page("maps/layout.htm", "Topological Maps!", this_level, false);
  w_page("book/guestbook.php", "Sign our guestbook!", this_level, false);
  w_page("weather.php", "Current weather", this_level, false);
  w_page("userarea.php", "File upload Area for users", this_level, false);
  w_page("twitter.htm", "Twitter and Skype", this_level, false);
  w_page("dayhikes.htm", "Day Hikes in the Canyons", this_level, false);
  w_page("emails.htm", "Automatic emailed updates!", this_level, false);
  w_page("camp.htm", "Camp ground status", this_level, false);
  w_page("road.htm", "Road status Highway 39)", this_level, false);
  w_page("fire.htm", "Fire danger status", this_level, false);
  w_page("trails.htm", "Crystal Lake hiking trails", this_level, false);
  w_page("groups.htm", "Group Camping at Deer Flats", this_level, false);
  w_page("bike.htm", "Bicycle Riding in Crystal Lake", this_level, false);
  w_page("climbing.htm", "Tree Climbing, Rock Climbing", this_level, false);
  w_page("sgclimb.htm", "Mountain Climbing in the Area", this_level, false);
  w_page("center.htm", "USFS Visitor Center", this_level, false);
  w_page("fees.htm", "Entry fees and parking", this_level, false);
  w_page("cafe.htm", "Crystal Lake Trading Post", this_level, false);
  w_page("bears.htm", "Bear sightings and reports", this_level, false);
  w_page("photo.htm", "Photograph gallery", this_level, false);
  w_page("oldtyme.htm", "Thelma's Old Photographs Of Crystal Lake", this_level, false);
  w_page("water.htm", "Water, electricity, telephone", this_level, false);
  w_page("streams.htm", "Running water, Streams", this_level, false);
  w_page("service.htm", "Emergency services", this_level, false);
  w_page("outside.htm", "Coldbrook Campground, West Fork, Trails Outside", this_level, false);
  w_page("radio.htm", "Crystal Lake Radio 88.1 FM", this_level, false);
  w_page("amphit.htm", "Crystal Lake Amphitheater", this_level, false);
  w_page("gps.htm", "GPS Coordinates For Things", this_level, false);
  w_page("videos.htm", "Videos Camping, Hiking, Climbing, Biking", this_level, false);
  w_page("stories/stories.htm", "Short Stories to Read!", this_level, false);
  w_page("members/login.php", "Member Login", "", false);
  document.write("</div>");
}

function o_page(this_page, this_title, this_level)
{
  if (is_new == false)
  {
    document.write("<img border=0 alt=\"*\" src=\"dot.gif\">");
  }
  else
  {
    document.write("<img border=0 alt=\"*\" src=\"new.jpg\">");
  }
  document.write("<a href=\"");
  document.write(this_level);
  document.write(this_page);
  document.write(" \" onmouseover=\"change_bg(this)\"");
  document.write(" onmouseOut=\"restore_bg(this)\">");
  document.write(this_title);
  document.write("</a><br>");
}
function give_old_menu(this_level)
{
  document.write("<center>");
  document.write("<img border=0 alt=\"---\" src=\"greenbar.gif\">");
  document.write("</center>");
  document.write("<br>");
  o_page("index.htm", "Home Page", this_level, false);
  o_page("news.htm", "Latest News", this_level, false);
  o_page("twork/twork.htm", "Trail Work & Volunteering", this_level, false);
  o_page("events.htm", "Scheduled Coming Events In the Ranger District", this_level, false);
  o_page("duffy/duffy.htm", "George Duffy Farewell to the Wilderness", this_level, true);
  o_page("maps/layout.htm", "Topological Maps!", this_level, false);
  o_page("book/guestbook.php", "Sign our guestbook!", this_level, false);
  o_page("weather.php", "Current weather", this_level, false);
  o_page("userarea.php", "File upload Area for users", this_level, false);
  o_page("twitter.htm", "Twitter and Skype", this_level, false);
  o_page("dayhikes.htm", "Day Hikes in the Canyons", this_level, false);
  o_page("emails.htm", "Automatic emailed updates!", this_level, false);
  o_page("camp.htm", "Camp ground status", this_level, false);
  o_page("road.htm", "Road status Highway 39)", this_level, false);
  o_page("fire.htm", "Fire danger status", this_level, false);
  o_page("trails.htm", "Crystal Lake hiking trails", this_level, false);
  o_page("groups.htm", "Group Camping at Deer Flats", this_level, false);
  o_page("bike.htm", "Bicycle Riding in Crystal Lake", this_level, false);
  o_page("climbing.htm", "Tree Climbing, Rock Climbing", this_level, false);
  o_page("sgclimb.htm", "Mountain Climbing in the Area", this_level, false);
  o_page("center.htm", "USFS Visitor Center", this_level, false);
  o_page("fees.htm", "Entry fees and parking", this_level, false);
  o_page("cafe.htm", "Crystal Lake Trading Post", this_level, false);
  o_page("bears.htm", "Bear sightings and reports", this_level, false);
  o_page("photo.htm", "Photograph gallery", this_level, false);
  o_page("oldtyme.htm", "Thelma's Old Photographs Of Crystal Lake", this_level, false);
  o_page("water.htm", "Water, electricity, telephone", this_level, false);
  o_page("streams.htm", "Running water, Streams", this_level, false);
  o_page("service.htm", "Emergency services", this_level, false);
  o_page("outside.htm", "Coldbrook Campground, West Fork, Trails Outside", this_level, false);
  o_page("radio.htm", "Crystal Lake Radio 88.1 FM", this_level, false);
  o_page("amphit.htm", "Crystal Lake Amphitheater", this_level, false);
  o_page("gps.htm", "GPS Coordinates For Things", this_level, false);
  o_page("videos.htm", "Videos Camping, Hiking, Climbing, Biking", this_level, false);
  o_page("stories/stories.htm", "Short Stories to Read!", this_level, false);
  o_page("members/login.php", "Member Login", "", false);
}

function build_menu(this_level)
{
  var browserName = navigator.appName.substring(0, 3);
  var browserVer  = parseInt(navigator.appVersion);

  if (browserName == "Net" && browserVer >= 5)
  {
    give_css_menu(this_level);
  }
  else if (browserName == "Mic")
  {
    give_css_menu(this_level);
  }
  else
  {
    give_old_menu(this_level);
  }
}

