// cmsmenu.js -- Curtis's main menu system with drop-down submenus
//
// Copyright 2004-2010 Curtis Smith
// No copyright is claimed on the structure or algorithm -- please
// feel free to copy and adapt to your own web sites without
// fear of my wrath, but do not steal the contents of my pages.
//
// This code implements a web-page menuing system with a list of
// principal menu items, each of which has its own submenu of choices.
//
// The submenus are implemented using the Document Object Module (DOM)
// and JavaScript. Browsers without JavaScript or DOM support for
// getElementById can't use submenus; the user will just be given
// the primary menu which will lead the user to another page
// containing the usual submenu choices.
//
// Files that incorporate this module should have the curtis.css
// stylesheet in the header of the .html (or .shtml etc.) file.
// This incorporation is done by including the HTML tag
//
// in the header. For instance here is the header of my main web page:
/*
Curtis's quarters
*/
// Also, at the position where the menu is desired, the following code
// (which includes a barebones primary menu for the non-JavaScript case)
// should be inserted (note that the precise code depends upon the
// relative directory; here we assume the code is being placed in a
// directory one level deep):
/*
*/
var show_reference_menu = 0;
var show_links_menu = 0;
var cms_shown_menu=''; /* menu currently being shown (empty string if none) */
var cms_menu_to_hide = ''; /* menu to be hidden in 1/4 second (or empty string) */
/*
Show a menu when the cursor is moved over the label word.
Hide a menu when
* showing another menu
or * the cursor has been out of the label word and the menu itself for 1/2 seconds
At all times, cms_menu_to_hide must be either cms_shown_menu or an empty string.
*/
function show_it(obj) // show (display) a submenu object
{
if ( document.getElementById )
{
// We only handle modern browsers (those that support getElementById)
// don't give submenus if screen be too narrow that the menu line
// had to be split
if ( cms_menu_to_hide == obj )
{
cms_menu_to_hide = '';
}
if ( cms_shown_menu == obj )
{
cms_shown_menu = ''; /* reset this in a moment or so */
}
if ( cms_shown_menu != '' )
{
prepare_to_hide(cms_shown_menu);
}
if ( document.getElementById('m_home').offsetTop ==
document.getElementById('m_me').offsetTop )
{
document.getElementById(obj).style.visibility = 'visible';
document.getElementById(obj).style.z_index = +2;
if ( cms_shown_menu != '' )
hide_it_now(cms_shown_menu);
cms_shown_menu = obj;
}
}
}
function hide_it(obj) // hide a submenu object in 250 ms
{
if ( cms_menu_to_hide != '' && cms_menu_to_hide != obj )
{
hide_it_now( cms_menu_to_hide );
}
cms_menu_to_hide = obj;
setTimeout( 'hide_it_now("*");', 500 );
}
function prepare_to_hide(obj) // hide a submenu object
{
if ( document.getElementById && obj != '' )
{
document.getElementById(obj).style.z_index = +1;
}
}
function hide_it_now(obj) // hide a submenu object
{
if ( obj == "*" )
obj = cms_menu_to_hide;
if ( document.getElementById && obj != '' )
{
document.getElementById(obj).style.visibility = 'hidden';
document.getElementById(obj).style.z_index = -1;
if ( cms_shown_menu == obj )
{
cms_shown_menu = '';
}
if ( cms_menu_to_hide == obj )
{
cms_menu_to_hide = '';
}
}
}
function locate_it(menuname) // put menu on screen in good position
{
// For a given menuname (e.g., 'poetry'), we assume that there are
// two items with id 'm_poetry' and 'sm_poetry'.
var choice = document.getElementById ( 'm_' + menuname );
var submenu = document.getElementById ( 'sm_' + menuname );
var menu = document.getElementById ( 'cmsmenubar' );
var home = document.getElementById ( 'm_me' ); /* me is last menu entry */
// If the submenu will fit, then we just leave it at offset 0, otherwise
// we make sure it doesn't go off the right-hand side.
entire_menu_width = home.offsetLeft +
home.offsetWidth;
if ( 0 && ( entire_menu_width == 0 || window.opera ) )
{
/* looks like we're running Opera web browser */
/* Opera has some serious problems trying to align
the submenu underneath the menu choice. We seem
to do OK, though, if we just use a left-aligned
menubar. In old Opera browsers, entire_menu_width
is 0. */
x0 = home.offsetLeft;
menu.style.textAlign = 'left';
if ( entire_menu_width == 0 ) return; /* old Opera browser */
if ( menu.style.marginLeft == 0 )
menu.style.marginLeft = x0 - home.offsetLeft;
}
submenu_extent = choice.offsetLeft + submenu.clientWidth;
if ( submenu_extent > entire_menu_width )
{
/* first attempt -- relocate menu after floating pictures */
//menu.style.clear="both";
submenu_extent = choice.offsetLeft + submenu.clientWidth;
}
if ( submenu_extent > entire_menu_width )
{
if ( submenu.offsetWidth >= entire_menu_width )
{
submenu.style.width = entire_menu_width + 'px';
submenu.style.left = -choice.offsetLeft;
}
else
{
submenu.style.left = ((entire_menu_width - submenu.clientWidth) -
choice.offsetLeft)+'px';
}
}
}
function make_cmsmenu()
{
var webleader = ' 0 )
{
/*
Note: In Firefox, scripturi is a full uri
(e.g., "http://plemta.com/cmsmenu.js"), but
in Internet Explorer, we might just have a
relative filename (e.g., "cmsmenu.js")
*/
lastslash = scripturi.lastIndexOf('/');
if ( lastslash >= 0 )
{
bp = scripturi.substring (0, lastslash + 1 );
bpleader = '');
document.writeln(bpleader+'">home');
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'">English ');
// document.writeln(bpleader+'de/">Deutsch ');
// document.writeln(bpleader+'es/">Español ');
// document.writeln(bpleader+'pl.html">Igpay Atinlay ');
// document.writeln(bpleader+'indexipa.html">iŋɡlɪʃ');
document.writeln('');
document.writeln('');
}
document.writeln('|');
if ( bp.length )
document.writeln('');
document.writeln( bpleader+'poem/">poetry' );
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'poem/being_close">Being close ');
document.writeln(bpleader+'poem/cheatress">The cheatress ');
document.writeln(bpleader+'poem/dancing_shepherd">The dancing shepherd ');
document.writeln(bpleader+'poem/error-3">Error negative three ');
document.writeln(bpleader+'poem/past">I like the past ');
document.writeln(bpleader+'poem/not_your_best_friend">I\'m not your best friend ');
document.writeln(bpleader+'poem/promise_of_life">Promise of for ever life ');
document.writeln(bpleader+'poem/prophet">The prophet of an unknown message ');
document.writeln(bpleader+'poem/expounder">Song of the expounder ');
document.writeln(bpleader+'poem/ten_commandments">Song of the Ten Commandments ');
document.writeln(bpleader+'poem/kiss_or_kick">To kiss me or to kick me? ');
document.writeln(bpleader+'poem/two_questions">The two questions ');
document.writeln(bpleader+'poem/fondness">Unmatched fondness ');
document.writeln(bpleader+'poem/valday2004">Valentine\'s Day 2004 ');
document.writeln(bpleader+'poem/linda">Without thee, I can\'t live');
document.writeln('');
document.writeln('');
}
document.writeln('|');
/* travels menu */
if ( bp.length )
document.writeln('');
document.writeln(bpleader+'trav/">travels');
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'trav/cruise_mmiv/">Bahamas (2004) ');
document.writeln(bpleader+'trav/cruise_2008/">Bahamas (2008) ');
document.writeln(bpleader+'trav/biloxi/">Biloxi (2007) ');
document.writeln(bpleader+'trav/cruise_mmvi/">Caribbean cruise (2006) ');
document.writeln(bpleader+'trav/china2006/">China (2006) ');
document.writeln(bpleader+'trav/france">France (1995) ');
document.writeln(bpleader+'trav/rudolstadt/">Germany (1995) ');
document.writeln(bpleader+'trav/gowanda">Gowanda (1996) ');
document.writeln(bpleader+'trav/hongkong">Hong Kong (1992) ');
document.writeln(bpleader+'trav/israel/">Israel (1997) ');
// document.writeln(bpleader+'trav/pottsville/">Pottsville (1979) ');
document.writeln(bpleader+'trav/">visited places list ');
document.writeln(bpleader+'trav/churches">visited churches list ');
document.writeln('');
document.writeln('');
}
document.writeln('|');
/* pictures */
if ( bp.length )
document.writeln('');
document.writeln(bpleader+'pix/">pix');
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'pix/animals/">animals ');
document.writeln(bpleader+'pix/atlanta/">Atlanta ');
document.writeln(bpleader+'pix/china/">Chinese landmarks ');
document.writeln(bpleader+'pix/nature/">natural scenery ');
document.writeln(bpleader+'pix/lawrenceville/">Lawrenceville ');
document.writeln(bpleader+'pix/vehicles/">vehicles ');
document.writeln(bpleader+'pix/disney_magic/">M/S Disney Magic ');
document.writeln(bpleader+'pix/disney_wonder/">M/S Disney Wonder ');
document.writeln(bpleader+'trav/"> also see various travels ');
document.writeln('Private gallery (credentials required) ');
document.writeln('');
document.writeln('');
}
document.writeln('|');
if ( 1 /* document.location.pathname.indexOf('/play/')>=0 */)
{
if ( bp.length )
document.writeln('');
document.writeln(bpleader+'play/">acting');
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'play/">Curtis\'s acting overview ');
document.writeln(bpleader+'play/ot20min">The Complete History of the Old Testament in Twenty Minutes ');
document.writeln(bpleader+'trav/gowanda#tax_collector">The Tax Collector ');
document.writeln(bpleader+'play/bethlehem_inn">The Bethlehem Inn ');
document.writeln(bpleader+'play/xglory">Crossroads to Glory ');
document.writeln(bpleader+'play/incidents">The Galilean Incidents (and auxiliary plays) ');
document.writeln(bpleader+'play/joebob/">Joe Bob ');
document.writeln(bpleader+'play/montley">The Mystery of Montley\'s Manor ');
document.writeln(bpleader+'play/cheap">Cheaper by the Dozen ');
document.writeln(bpleader+'play/christmas_carol">A Christmas Carol');
document.writeln('');
document.writeln('');
}
document.writeln('|');
}
if ( bp.length )
document.writeln('');
document.writeln ( bpleader+'misc/">misc.' );
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'misc/partiless_christmas">Bimillennial Christmas celebrations whacked everywhere ');
document.writeln(bpleader+'misc/timesheet">Cortez versus the timesheet ');
document.writeln(bpleader+'misc/luke_greg/">Luke and Greg conquer Florida ');
document.writeln(bpleader+'misc/jimmy_carter">thoughts on seeing Jimmy Carter ');
document.writeln(bpleader+'misc/vsi_name_game">VSI name explanation ');
document.writeln(bpleader+'misc/dekalb_officials">DeKalb County government personalities ');
// document.writeln(bpleader+'prog/parnas.html">Strengths and weaknesses of cycle-free software and the Willie kernel ');
// document.writeln(bpleader+'misc/great_kernel.html">The Great Kernel: Willie under Windows 2000 ');
document.writeln(bpleader+'misc/si">International System of Units (SI) cheat sheet ');
// document.writeln(bpleader+'ohbc/">Oak Hill Baptist Church ');
document.writeln(bpleader+'lang/">English language ');
document.writeln(bpleader+'prog/">computer programming ');
document.writeln(bpleader+'misc/test">web test information');
// document.writeln(bpleader+'lang/subjunctive_mood.html">The subjunctive mood ');
// document.writeln(bpleader+'lang/apostrophe.html">Using apostrophes correctly ');
document.writeln('');
document.writeln('');
}
document.writeln('|');
if ( show_reference_menu )
{
if ( bp.length )
document.writeln('');
document.writeln(bpleader+'reference.html">reference' );
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'writ/dekalb_officials">DeKalb County government personalities ');
document.writeln(bpleader+'great_kernel">The Great Kernel: Willie under Windows 2000 ');
document.writeln(bpleader+'si">International System of Units (SI) cheat sheet ');
document.writeln(bpleader+'ohbc/">Oak Hill Baptist Church ');
document.writeln(bpleader+'parnas">Strengths and weaknesses of cycle-free software and the Willie kernel ');
document.writeln(bpleader+'lang/subjunctive_mood">The subjunctive mood ');
document.writeln(bpleader+'lang/apostrophe">Using apostrophes correctly ');
document.writeln(bpleader+'test">Web test information');
document.writeln('');
document.writeln('');
}
document.writeln('|');
}
if ( show_links_menu )
{
if ( bp.length )
document.writeln('');
document.writeln(bpleader+'misc/links">links');
if ( bp.length )
{
document.writeln('');
document.writeln(webleader+'https://www.cleverness.us/curtis/">Secure version Curtis\'s Parlour ');
document.writeln(webleader+'http://webmail.cleverness.us">cleverness.us web mail ');
document.writeln(webleader+'http://www.thegoodnews.org/">the Good News ');
document.writeln(webleader+'http://www.shakespearetavern.com/">Shakespeare Tavern (Atlanta) ');
document.writeln(webleader+'http://validator.w3.org/">HTML validator ');
document.writeln(webleader+'http://www.afn.org/~afn38637/">Hugh\'s page ');
document.writeln(webleader+'http://www.mindspring.com/~christianrebel/">The Christian Rebel (Larry) ');
document.writeln('');
document.writeln('');
}
document.writeln('|');
}
if ( bp.length )
document.writeln('');
document.writeln(bpleader+'me/">about me');
if ( bp.length )
{
document.writeln('');
document.writeln(bpleader+'me/">letter from me to you ');
document.writeln(bpleader+'me/curriculum_vitae">résumé (curriculum vitæ) ');
document.writeln(bpleader+'me/contact">contact me ');
document.writeln(bpleader+'play/">acting and theatre ');
document.writeln(bpleader+'misc/links">my favourite links ');
// document.writeln(bpleader+'me/genealogy">genealogy information ');
document.writeln('');
document.writeln('');
if ( document.getElementById('m_home').offsetTop !=
document.getElementById('m_me').offsetTop )
{
/* the menu splits lines -- one last hope is to skip floated images
(applicable to main page but not many others) */
document.getElementById ( 'cmsmenubar' ).style.clear = 'both';
// menu.style.clear = 'both';
}
locate_it ( 'home' );
locate_it ( 'poetry' );
locate_it ( 'travels' );
locate_it ( 'pix' );
locate_it ( 'acting');
locate_it ( 'misc' );
if(show_reference_menu) locate_it( 'reference' );
if(show_links_menu) locate_it ( 'links' );
locate_it ( 'me' );
}
}
make_cmsmenu();