// Cascading Popup Menus v5.2 - Single Frame Menu example script.


// If you're upgrading from v5.1, you can paste your existing menu data in, and if you're
// upgrading from v5.0 you need to add 'cursor' settings to your ItemStyles.
//
// And before going ANY further, you must have READ and AGREE TO the script license!
// It can be found on my site, in the syntax helpfile, or in the demo script document.

 
//


var hBar = new ItemStyle(110, 0, '', 0, 3, '#C5C5C5', '#E0E0E0', 'itemTextCn', 'itemTextCn', 'itemBorder', 'itemBorder',
 null, null, 'hand', 'default');

var hBarR = new ItemStyle(110, 0, '', 0, 3, '#C5C5C5', '#E0E0E0', 'itemTextCnR', 'itemTextCnR', 'itemBorder', 'itemBorder',
 null, null, 'hand', 'default');

var subM = new ItemStyle(22, 0, '>', -15, 3, '#C5C5C5', '#E0E0E0', 'itemText', 'itemtext',
 'itemBorder', 'itemBorder', null, null, 'hand', 'default');

var subMR = new ItemStyle(22, 0, '>', -15, 3, '#C5C5C5', '#E0E0E0', 'itemTextR', 'itemTextR',
 'itemBorder', 'itemBorder', null, null, 'hand', 'default');

var subMLft = new ItemStyle(22, 0, '<', -15, 3, '#C5C5C5', '#E0E0E0', 'itemText', 'itemtext',
 'itemBorder', 'itemBorder', null, null, 'hand', 'default');

var subMLg = new ItemStyle(22, 0, '>', -15, 3, '#0000DD', '#0088ff', 'itemHoverLg', 'itemTextLg',
 'itemBorder', 'itemBorder', null, null, 'hand', 'default');

var subBlank = new ItemStyle(22, 1, '>', -15, 3, '#CCCCDD', '#6699CC', 'itemHover', 'itemText',
 'itemBorder', 'itemBorder', null, null, 'hand', 'default');
  

var button = new ItemStyle(22, 1, '>', -15, 2, '#006633', '#CC6600', 'itemText', 'itemHover',
 'itemBorder', 'itemBorder', 80, 95, 'crosshair', 'default');

var pMenu = new PopupMenu('pMenu');
with (pMenu)

var exoffset = -300;
//if (navigator.userAgent.indexOf("Firefox") == -1) {ffoffset = 0;}
var ffoffset = ((navigator.userAgent.indexOf("MSIE") > -1)  && !window.opera) ? 0 : 9;  

// Create a PopupMenu() object, and pass its own name so it can reference itself later on.
// We also use a 'with' block to work with its properties and functions below.

var pMenu = new PopupMenu('pMenu');
with (pMenu)
{

// Here's what the values in the next startMenu() command mean, in order:
//  'root': the name of this menu.
//   false: orientated as a horizontal menu (true creates a vertical menu).
//      10: the 'left' offset of this menu in pixels.
//       0: the 'top' offset of this menu in pixels.
//      17: the height of this menu (for vertical menus, this becomes the menu width).
//    hBar: the ItemStyle used to give this menu colours and layout/formatting.
//      '': this menu does not display within a frame (see the Frameset Example Script to do that).
//   false: this menu shows submenus on mouseover. 'true' means show on click.
//
// Most of the items are 'sm:' items popping out submenus, except the last 'js:' JavaScript command
// to pop open a new window. I've also given each item a length in pixels, overriding the ItemStyle.
  



startMenu('root', false,'window.page.winW()/2 - menuW/2 - ffoffset',128, 22, hBar);
addItem('Home Page', '/index.html', '','',103,null);
addItem('Our Province', 'mAboutEKP', 'sm:', '',100,null);
addItem('News', 'mNews', 'sm:','',103,null);
addItem('About Freemasonry', 'mAboutFM', 'sm:','',120,null );
addItem('Charity', 'mCharity', 'sm:','',120,null );
addItem('Library & Museum', '/Library.shtml', '','',120,null);
addItem('Royal Arch', 'mRoyalArch', 'sm:', '',105,null );

startMenu('mCharity', true, 0, 23, 200, subMLft);
addItem('Introduction', '/charity/introduction.shtml', '');
addItem('The Provincial Charity Steward', '/charity/structure.shtml', '');
addItem('The Provincial Almoner', '/charity/almonerstructure.shtml', '');
addItem('2014 Festival', 'mCharity2014', 'sm:');


startMenu('mCharity2014', true, -200, 0, 200, subM);
addItem('Introduction', '/charity/2014festival.shtml', '');
addItem('Festival FAQs', '/charity/FAQ.shtml', '');
addItem('Honorifics', '/charity/honorifics.shtml', '');
addItem('Jewel Application Form', 'window.open("/charity/2014JewelApplication.pdf")', 'js:');
addItem('Provincial Awards', '/charity/awards.shtml', '');

startMenu('mAboutEKP', true, 0, 23, 200, subM);
addItem('Introduction', '/Introduction.shtml', '');
addItem('History', '/history.shtml', '');
addItem('Executive Officers', '/Executive Officers.shtml', '');
addItem('Provincial Diary', '/Provincial Diary.shtml', '');
addItem('Centre and Lodge Information', 'mCentres', 'sm:');
addItem('Information and Downloads', 'mDownloads', 'sm:');
addItem('Contact Us', '/contact us.shtml', '');

startMenu('mDownloads', true, 200, 0, 215, subM);
addItem('Secretary', '/downloads/Secretary.shtml', '');
addItem('Charity', '/downloads/Charity.shtml', '');
addItem('Director of Ceremonies', '/downloads/DirectorOfCeremonies.shtml', '');
addItem('Library & Museum', '/downloads/LibraryDownloads.shtml', '');
addItem('Membership Support & Development <br> (formerly Mentoring)', '/support/mentoring.shtml', '',null,35);

// addItem('TEST PAGE - Almoner', 'window.open("http://www.ekpca.org.uk/copyright.shtml")', 'js:');

startMenu('mNews', true, 0, 23 , 160, subM);
addItem('East Kent Province News', 'mNewsItems', 'sm:');
addItem('Forthcoming Events', 'mEvents', 'sm:');
addItem('The Provincial Magazine', '/provincial/index.shtml', '');
addItem('The Information Team', '/informationteam.shtml', '');

startMenu('mNewsItems', true, 160, 0, 140, subM);
addItem('2010 News', 'mNews2010', 'sm:');
addItem('2009 News', 'mNews2009', 'sm:');
addItem('2008 News', 'mNews2008', 'sm:');
addItem('Earlier News', 'mEarlier', 'sm:');


startMenu('mNews2010', true, 140, 0, 250, subM);
addItem('Masonic Trout and Salmon Fishing - August', '/news/2010/august fishing.shtml', '');
addItem('50 Year Cert for Roger Nettleton-Hammond', '/news/2010/Nettleton.shtml', '');
addItem('Charitable West Kent', '/news/2010/Charitable West Kent.shtml', '');
addItem('Kent Show - 2010', '/news/2010/Kent Show.shtml', '');
addItem('Lodge Profile: Old Roffensian Lodge 8006', '/Profiles/Old Roffensian.shtml', '');
addItem('The Heart of Kent Hospice', '/news/2010/Heart of Kent Hospice.shtml', '');
addItem('Gravesend Open Day', '/news/2010/Gravesend Open Day.shtml', '');
addItem('1st Headcorn Scouts', '/news/2010/Headcorn Scouts.shtml', '');
addItem('A Summer Message of Appreciation', '/news/2010/PGM Summer Message.shtml', '');
addItem('Provincial Garden Party', '/news/2010/Garden Party.shtml', '');
addItem('Chatham Open Day', '/news/2010/Chatham Open Day.shtml', '');
addItem('Roy Williams (Obituary)', '/news/2010/williams.shtml', '');
addItem('Haiti Relief Chest Walk', '/news/2010/Haiti Walk.shtml', '');
addItem('Sheerness Mentoring Scheme Fete', '/news/2010/Sheerness Fete.shtml', '');
addItem('Provincial Cathedral Service', '/news/2010/Cathedral Service.shtml', '');
addItem('Provincial Chapter Convocation', '/news/2010/Convocation2010.shtml', '');
addItem('Masonic Trout and Salmon Fishing - May', '/news/2010/fishing.shtml', '');
addItem('50 Year Certificate for Eric Hewson', '/news/2010/Hewson.shtml', '');
addItem('A Double First at 7389', '/news/2010/DoubleFirst.shtml', '');
addItem('Provincial Craft Festival', '/news/2010/Festival2010.shtml', '');
addItem('A Night for St. George', '/news/2010/stgeorge.shtml', '');
addItem('Dane John Largesse', '/news/2010/Dane John.shtml', '');
addItem('Provincial Trainers (April 1st)', '/news/2010/april1st.shtml', '');
addItem('Lord Cornwallis and Douglas Lodge', '/news/2010/Douglas Lodge.shtml', '');
addItem('50 Year Certificate for Ron Martin', '/news/2010/Ron Martin.shtml', '');
addItem('Provincial Officers’ Mess (March)', '/news/2010/ProvincialOfficersMessMarch.shtml', '');
addItem('Toastmaster Retires After 65 years', '/news/2010/Ivan Smith.shtml', '');
addItem('Prostate Cancer Support', '/news/2010/Prostate Support.shtml', '');
addItem('50 Year Certificate for Gary Chapman', '/news/2010/Gary Chapman.shtml', '');
addItem('50 Year Certificate for Don Pullen', '/news/2010/Don Pullen.shtml', '');
addItem('Grand Charity Hospice Grants', '/news/2010/Hospice Grants.shtml', '');
addItem('50 Year Certificate for Alan Hills', '/news/2010/Alan Hills.shtml', '');
addItem('Never one to be Rushed', '/news/2010/John Skeer.shtml', '');
addItem('The Music Makers', '/news/2010/Music Makers.shtml', '');
addItem('Lodge Profile: De Shurland Lodge 1089', '/Profiles/deshurlandlodge.shtml', '');


startMenu('mCentres', true, 200, 0, 200, subM);
addItem('Centres’ Map', '/lodge_maps/lodge_map.shtml', '');
addItem('Numeric Lodge List', '/lodge_maps/lodge_list_number.shtml', '');
addItem('Alphabetical Lodge List', '/lodge_maps/lodge_list_alpha.shtml', '');



startMenu('mEarlier', true, 140, 0, 220, subM);
addItem('Sittingbourne Centre War Memorial', '/news/earlier/sittingbourne.shtml', '');
addItem('St. Michael’s Lodge Carey’s <br> Celestial and Terrestrial Globes', '/news/earlier/St Michaels.shtml', '',null,35);
addItem('The Rochester Cathedral Fresco', '/rochester.shtml', '');


startMenu('mMentoring', true, 200, 0, 200, subM);
addItem('Introduction', '/mentoring/introduction.shtml', '');
addItem('Contact Information', '/mentoring/contact.shtml', '');
addItem('Mentoring Downloads', '/mentoring/downloads.shtml', '');

startMenu('mEvents', true, 160, 0, 180, subM);
addItem('Provincial Diary', '/Provincial Diary.shtml', '');
addItem('Cornwallis Lecture 2010', '/news/2010/CornwallisLecture2010.shtml', '');
addItem('Masonic Fishing Events', '/news/2010/Fishing Events.shtml', '');
addItem('W v E Kent Cricket Match', '/news/2010/Cricketers.shtml', '');
addItem('1759 Ritual Demonstration', '/news/2010/1759 Ritual.shtml', '');
addItem('Remembrance Sunday', '/news/2010/remembrance day.shtml', '');
addItem('The Provincial Pantomime', '/news/2010/Pantomime.shtml', '');


startMenu('mNews2009', true, 140, 0, 230, subM);
addItem('A Christmas Cracker!', '/news/2009/ChristmasCracker.shtml', '');
addItem('A Family Festival of Christmas Music', '/news/2009/MusicFestival.shtml', '');
addItem('Hopson & Hopson', '/news/2009/Hopson.shtml', '');
addItem('The Freemasons’ Grand Charity', '/news/2009/Hospice.shtml', '');
addItem('United Services Support Our Soldiers', '/news/2009/WhitstableWI.shtml', '');
addItem('Sheerness Centre Centenary', '/news/2009/SheernessCentenary.shtml', '');
addItem('Provincial Executive Appointments', '/news/2009/provappointments2010.shtml', '');
addItem('Two Corinthian Lodges', '/news/2009/CorinthianLodges.shtml', '');
addItem('Provincial Officers’ Mess (October)', '/news/2009/ProvincialOfficersMessOct.shtml', '');
addItem('PGM’s Charity 2009 Awards', '/news/2009/CharityAwards2009.shtml', '');
addItem('Tanners Marathon', '/news/2009/TannersMarathon.shtml', '');
addItem('Erasmus Wilson', '/news/2009/Erasmus.shtml', '');
addItem('Bulls Eye for Union', '/news/2009/BullsEye.shtml', '');
addItem('50 Year Certificate for Roly Spiller', '/news/2009/RolySpiller.shtml', '');
addItem('Canterbury’s Buried Treasure', '/news/2009/Buried Treasure.shtml', '');
addItem('Cymru yn dod i Herne Bay', '/news/2009/Cymru.shtml', '');
addItem('Annual Croquet Match', '/news/2009/Croquet.shtml', '');
addItem('Paddock Wood Open Day', '/news/2009/PaddockWoodOpenDay.shtml', '');
addItem('60 Year Certificate for Dick Sturt', '/news/2009/DickSturt.shtml', '');
addItem('Canterbury Cathedral and the Craft', '/news/2009/cathedral.shtml', '');
addItem('W. v E. Kent Provincial Cricket Match', '/news/2009/ProvincialCricket.shtml', '');
addItem('Maidstone Street Collection', '/news/2009/MaidstoneStreetCollection.shtml', '');
addItem('TLC River Walk', '/news/2009/TLCRiverWalk.shtml', '');
addItem('Kent Show', '/news/2009/KentShowReport.shtml', '');
addItem('Provincial Summer Ball', '/news/2009/SummerBall.shtml', '');
addItem('Dover Open Day', '/news/2009/DoverOpenDay.shtml', '');
addItem('Canterbury Open Day', '/news/2009/CanterburyOpenDay.shtml', '');
addItem('William Blay Golf Championship', '/news/2009/WilliamBlayGolf.shtml', '');
addItem('East Kent Stewards 200th meeting', '/news/2009/Stewards200th.shtml', '');
addItem('Mentoring in Canterbury', '/news/2009/MentorsTale.shtml', '');
addItem('Provincial Chapter Convocation', '/news/2009/ProvincialConvocation.shtml', '');
addItem('Provincial Craft Festival', '/news/2009/ProvincialCraftFestival.shtml', '');
addItem('Monckton support Gurkha Children', '/news/2009/GurkhaPresentation.shtml', '');
addItem('Old Manwoodian 50th Anniversary', '/news/2009/OldManwoodians50th.shtml', '');
addItem('Provincial Officers’ Mess (March)', '/news/2009/ProvincialOfficersMess.shtml', '');
addItem('Romanians descend upon Canterbury', '/news/2009/RomanianInvasion.shtml', '');
addItem('St. Lawrence Lodge Centenary', '/news/2009/StLawrenceCentenary.shtml', '');
addItem('Birchington Temple Dedication', '/news/2009/BirchingtonDedication.shtml', '');
addItem('Appointments in Provincial Grand Lodge', '/news/2009/appointments.shtml', '');
addItem('Maidstone Masons Help Hospital Radio', '/news/2009/HospitalRadio.shtml', '');

startMenu('mNews2008', true, 140, 0, 230, subM);
addItem('Grand Charity grants to local Hospices', '/news/2008/Hospices.shtml', '');
addItem('Beanstalks and £2000 for charity', '/news/2008/pantomime.shtml', '');
addItem('New Provincial Office Opened By PGM', '/news/2008/office_move2.shtml', '');
addItem('60 Year Certificate For Keith Sharp', '/news/2008/certs/sharp.shtml', '');
addItem('Provincial Office Move', '/news/2008/office_move.shtml', '');
addItem('Remembrance Sunday', '/news/2008/Remembrance.shtml', '');
addItem('Second University Initiate', '/news/2008/University_Initiate2.shtml', '');
addItem('Simon Langton 50th Anniversary', '/news/2008/Simon_Langton.shtml', '');
addItem('Provincial Officer’s Mess (October)', '/news/2008/ProvOffMess2.shtml', '');
addItem('PGM’s Charity 2008 Awards', '/news/2008/PGM_awards.shtml', '');
addItem('2014 Festival Launched', '/news/2008/2014_launch.shtml', '');
addItem('UKC Leukaemia Research Open Evening', '/news/2008/leukaemia_2.shtml', '');
addItem('TLC River Walk', '/news/2008/TLC_Walk.shtml', '');
addItem('Freemasons at the Kent Show', '/news/2008/Kent_Show2.shtml', '');
addItem('Provincial Summer Ball', '/news/2008/Summer_Ball.shtml', '');
addItem('Provincial Garden Party', '/news/2008/GardenParty.shtml', '');
addItem('Maidstone Street Collection', '/news/2008/Maidstone_Street.shtml', '');
addItem('Provincial Croquet Match', '/news/2008/Croquet.shtml', '');
addItem('W v E Kent Provincial Cricket Match', '/news/2008/Cricket.shtml', '');
addItem('William Blay Golf Trophy', '/news/2008/William_Blay.shtml', '');
addItem('Provincial Chapter Meeting', '/news/2008/RA_fest.shtml', '');
addItem('First University Initiate', '/news/2008/University_Initiate.shtml', '');
addItem('Macartney Lodge Centenary', '/news/2008/Macartney.shtml', '');
addItem('Provincial Festival at Margate', '/news/2008/provfest.shtml', '');
addItem('Masonic Relief for Gurkhas', '/news/2008/Monckton.shtml', '');
addItem('Cycle Ride for Demelza House', '/news/2008/Bike_Ride.shtml', '');
addItem('Provincial Officers’ Mess (March)', '/news/2008/ProvOffMess.shtml', '');
addItem('Sir Edward Elgar Lodge Consecration', '/news/2008/Elgar.shtml', '');
addItem('60 Year Certificate For George Cooke', '/news/2008/certs/cooke.shtml', '');
addItem('Grand Charity Hospice Donation', '/news/2008/Demelza.shtml', '');
addItem('Challenging Behaviour Foundation', '/news/2008/ChallengingBehaviour.shtml', '');
addItem('Leukaemia Research Donation', '/news/2008/leukaemia.shtml', '');



startMenu('mNews2007', true, 140, 0, 230, subM);
addItem('A Gala Festival of Music', '/news/2007/GalaMusic.shtml', '');
addItem('Secretarial Seminar', '/news/2007/secretaries.shtml', '');
addItem('Remembrance Day Parades', '/news/2007/Remembrance.shtml', '');
addItem('King Edward VII Lives On', '/news/2007/KE_VII.shtml', '');
addItem('PGM’s Discretionary Fund Awards 2007', '/news/2007/discretionary.shtml', '');
addItem('Kent Air Ambulance Presentation', '/news/2007/Kent_Air_Ambulance.shtml', '');
addItem('Provincial Officers’ Mess', '/news/2007/ProvOffMess.shtml', '');
addItem('Scriveners’ Banner Dedication', '/news/2007/scriveners.shtml', '');
addItem('Kent Show', '/news/2007/Kent_Show.shtml', '');
addItem('Dinner at the Musicals', '/news/2007/Musical_Dinner.shtml', '');
addItem('Jutland at Pentalpha', '/news/2007/Jutland.shtml', '');
addItem('Only Here For The Bear ', '/news/2007/Teddy_Bears.shtml', '');
addItem('Summer Ball', '/news/2007/Summer_Ball.shtml', '');
addItem('APGM Flower Duet?', '/news/2007/FlowerDuet.shtml', '');
addItem('Grand Charity News', '/news/2007/grand_charity.shtml', '');
addItem('Provincial Almoners’ Meeting', '/news/2007/provincial_almoners.shtml', '');
addItem('United Service Lodge Awards', '/news/2007/united_service.shtml', '');
addItem('Sittingbourne Centre War Memorial', '/news/2007/Sittingbourne.shtml', '');
addItem('St. Michael’s Lodge Carey’s <br> Celestial and Terrestrial Globes', '/news/2007/St Michaels.shtml', '',null,35);

startMenu('mAboutFM', true, 0, 23, 210, subM);
addItem('Introduction', '/About.shtml', '');
addItem('The United Grand Lodge of England</p>', 'window.open("http://www.ugle.org.uk/")', 'js:');
addItem('Membership', '/membership.shtml', '');
addItem('University Scheme', '/news/2008/University_Scheme.shtml', '');
addItem('Beyond the Craft', '/beyondcraft.shtml', '');


startMenu('mRoyalArch', true, -70, 23, 175,subMLft);
addItem('About Royal Arch', '/RoyalArch.shtml', '');
addItem('Executive Officers', '/RoyalArch/Executive Officers.shtml', '');
addItem('Private Chapter Information', '/chapter_maps/lodge_map.shtml', '');
addItem('Information and Downloads', 'mRAdownloads', 'sm:');

startMenu('mRAdownloads', true, -160, 0, 160, subM);
addItem('Scribe E', '/downloads/Scribe E.shtml', ''); 
addItem('Charity', '/downloads/RACharity.shtml', '');
addItem('Director of Ceremonies', '/downloads/RADirectorOfCeremonies.shtml', '');
addItem('General', '/downloads/RAGeneral.shtml', '');

}

// LONG MENU SCROLLING
//
// I've supplied two different versions of this code -- one for newer browsers that support the
// CSS2 'overflow' property (i.e. MSIE, Mozilla/NS6+, and recent Opera/Safari versions), and
// another below that is more generic. Pick and use one, not both!

// Overflow version: Paste this at the end of your menu data (either POP_DATA or your frameset).
// It will apply scrollbars to long vertical menus.
// For bonus points, you can remove the setInterval call and rewrite it to call checkMenuScroll()
// on menu show or window scroll/resize...

PopupMenu.prototype.checkMenuScroll = function() { with (this)
{
 for (var mN in litNow)
 {
  var mD = menu[mN][0], eP = eval(mD.par);
  if (!eP) eP = window;
  var pH = eP.page.winH(), pY = eP.page.scrollY();
  if (!(mD.counter % 100)) with (mD.lyr)
  {
   if (mD.menuH + y() >= pY + pH)
   {
    sty.clip = 'rect(0px auto auto 0px)';
    sty.width = (mD.menuW + 15) + 'px';
    sty.height = (pY + pH - y()) + 'px';
    sty.overflow = 'auto';
    ref.onmouseover = new Function('clearTimeout(' + myName + '.hideTimer)');
    ref.onmouseout = new Function(myName + '.out("' + mN + '", 0)');
   }
   else
   {
    sty.height = (mD.menuH + 2) + 'px';
    sty.overflow = 'visible';
   }
  }
 }
}};
for (var mObj in PopupMenu.list)
{
 if (!isNS4) setInterval(mObj + '.checkMenuScroll()', 500);
}

// CREATE ANOTHER MENU OBJECT here if you want multiple menus on a page, or you can just
// duplicate this entire file and rename 'pMenu' to something else.
// Every menu object MUST have a menu named 'root' in it, as that's always visible.

//var anotherMenu = new PopupMenu('anotherMenu');
//with (anotherMenu)
//{
// startMenu('root', .....);
// ... make menus here ...
//}




// ******************** MENU EFFECTS ********************
//
// Now you've created a basic menu object, you can add optional effects like borders and
// shadows to specific menus. You can remove this section entirely if you want, the
// functions called are found at the bottom of this file.



// BORDER: Added to all menus in a named object using a specified ItemStyle. The syntax is:
//  addMenuBorder(menuObject, ItemStyle,
//   opacity of border, 'border colour', border width, 'padding colour', padding width);
// Opacity is a number from 0 to 100, or null for solid colour (just like the ItemStyles).

addMenuBorder(pMenu, window.subBlank,
 null, '#666666', 1, '#CCCCDD', 2);



// DROPSHADOW: added to specific ItemStyles again. The syntax is similar, but later on you
// pass arrays [...] for each layer of the shadow you want. I've used two grey layers
// here, but you can use as many or as few as you want. The syntax for the layers is:
//  [opacity, 'layer colour', X offset, Y offset, Width Difference, Height difference]
// Opacity is from 0 to 100 (or null to make it solid), and the X/Y offsets are the
// distance in pixels from the menu's top left corner to that shadow layer's corner.
// The width/height differences are added or subtracted to the current menu size, for
// instance the first layer of this shadow is 4px narrower and shorter than the menu
// it is shadowing.

addDropShadow(pMenu, window.subM,
 [40,"#333333",6,6,-4,-4], [40,"#666666",4,4,0,0]);
addDropShadow(pMenu, window.subBlank,
 [40,"#333333",6,6,-4,-4], [40,"#666666",4,4,0,0]);



// ANIMATION SETTING: We add this to the 'pMenu' menu object for supported browsers.
// IE4/Mac and Opera 5/6 don't support clipping, and Mozilla versions prior to 1.x (such as
// Netscape 6) are too slow to support it, so I'm doing some browser sniffing.
// If you don't want animation, delete this entirely, and the menus will act normally.
// Change the speed if you want... it's the last number, between -100 and 100, and is
// defined as the percentage the animation moves each frame (defaults are 10 and 15).

if ((navigator.userAgent.indexOf('rv:0.')==-1) &&
    !(isOp&&!document.documentElement) && !(isIE4&&!window.external))
{
 pMenu.showMenu = new Function('mN','menuAnim(this, mN, 10)');
 pMenu.hideMenu = new Function('mN','menuAnim(this, mN, -15)');

 // Add animation to other menu objects like this...
 //anotherMenu.showMenu = new Function('mN','menuAnim(this, mN, 10)');
 //anotherMenu.hideMenu = new Function('mN','menuAnim(this, mN, -15)');
}







// ******************** FUNCTIONS CALLED BY THE EFFECTS SECTION ********************

// These can be deleted if you're not using them. Alternatively, if you're using several menu
// data files, you may want to move them to the "core" script file instead.



// This is the "positioning from page anchors" code used by the advanced positioning expressions.
page.elmPos=function(e,p)
{
 var x=0,y=0,w=p?p:this.win;
 e=e?(e.substr?(isNS4?w.document.anchors[e]:getRef(e,w)):e):p;
 if(isNS4){if(e&&(e!=p)){x=e.x;y=e.y};if(p){x+=p.pageX;y+=p.pageY}}
 if (e && this.MS && navigator.platform.indexOf('Mac')>-1 && e.tagName=='A')
 {
  e.onfocus = new Function('with(event){self.tmpX=clientX-offsetX;' +
   'self.tmpY=clientY-offsetY}');
  e.focus();x=tmpX;y=tmpY;e.blur()
 }
 else while(e){x+=e.offsetLeft;y+=e.offsetTop;e=e.offsetParent}
 return{x:x,y:y};
};




// Animation:
//
// Each menu object you create by default shows and hides its menus instantaneously.
// However you can override this behaviour with custom show/hide animation routines,
// as we have done in the "Menu Effects" section. Feel free to edit this, or delete
// this entire function if you're not using it. Basically, make functions to handle
// menuObj.showAnim() and .hideAnim(), both of which are passed menu names.
//
// Customisers: My lyr.clip() command gets passed the parameters (x1, y1, x2, y2)
// so you might want to adjust the direction etc. Oh, and I'm adding 2 to the dimensions
// to be safe due to different box models in some browsers.
// Another idea: add some if/thens to test for specific menu names...?

function menuAnim(menuObj, menuName, dir)
{
 // The array index of the named menu (e.g. 'mFile') in the menu object (e.g. 'pMenu').
 var mD = menuObj.menu[menuName][0];
 // Add timer and counter variables to the menu data structure, we'll need them.
 if (!mD.timer) mD.timer = 0;
 if (!mD.counter) mD.counter = 0;

 with (mD)
 {
  // Stop any existing animation.
  clearTimeout(timer);

  // If the litNow() array doesn't show this menu as lit, and we're still showing it,
  // force a quick hide (this stops miscellaneous timer errors).
  //if (dir>0 && !menuObj.litNow[menuObj.menu[menuName][0].parentMenu]) dir = -100;

  // If the layer doesn't exist (cross-frame navigation) quit.
  if (!lyr || !lyr.ref) return;
  // This next line is not strictly necessary, but it stops the one-in-a-hundred menu that
  // shows and doesn't hide on very quick mouseovers.
  if (!visNow && dir>0) dir = 0-dir;
  // Show the menu if that's what we're doing.
  if (dir>0) lyr.vis('visible');
  // Also raise showing layers above hiding ones.
  lyr.sty.zIndex = dir>0 ? mD.zIndex + 1 : 1001;

  // Alpha fade in IE5.5+. Mozilla's opacity (pre-v1.7) isn't well suited as it's an inheritable
  // property rather than a block-level filter, and it's slow, but uncomment and try it perhaps.
  // WARNING: This looks funny if you're mixing opaque and translucent items e.g. solid menus
  // with dropshadows. If you're going to use it, either disable dropshadows or set the opacity
  // values for your items to numbers instead of null.
  //if (isIE && window.createPopup) lyr.alpha(counter&&(counter<100) ? counter : null);

  // Clip the visible area. The syntax is:   lyr.clip(left, top, right, bottom);
  // As you can see in these examples, three are static at either zero or the edge of a menu item,
  // and either the top or bottom is a complicated formula based on the 'counter' variable which
  // counts from 0 to 100 and back again; this give a nice accelerating-sliding animation.
  // Feel free to experiment with your own animations, here are some samples (use one only):

  // Straightforward downwards clipping animation (default setting):
  lyr.clip(0, 0, menuW+2, (menuH+2)*Math.pow(Math.sin(Math.PI*counter/200),0.75) );
  // If you want, comment out the above line and enable this one to animate bottom-upwards:
  //lyr.clip(0, (menuH+2)-(menuH+2)*Math.pow(Math.sin(Math.PI*counter/200),0.75), menuW+2, menuH+2);
  // Another alternative: Move+clip sliding animation. Looks really cool :).
  //if (!counter) mD.origY = lyr.y();
  //var newY = (menuH+2)-(menuH+2)*Math.pow(Math.sin(Math.PI*counter/200),0.75);
  //lyr.clip(0, newY, menuW+2, menuH+2);
  //lyr.y(mD.origY - newY);

  // Increment the counter and if it hasn't reached the end (counter is 0% or 100%),
  // set the timer to call the animation function again in 40ms to contine the animation.
  // Note that we hide the menu div on animation end in that direction.
  counter += dir;
  if (counter>100) { counter = 100; lyr.sty.zIndex = mD.zIndex }
  else if (counter<0) { counter = 0; lyr.vis('hidden') }
  else timer = setTimeout('menuAnim('+menuObj.myName+',"'+menuName+'",'+dir+')', 40);
 }
};




// Borders and Dropshadows:
//
// Here's the menu border and dropshadow functions we call above. Edit ot delete if you're
// not using them. Basically, they assign a string to pMenu.menu.menuName[0].extraHTML, which
// is written to the document with the menus as they are created -- the string can contain
// anything you want, really. They also adjust the menu dimensions and item positions
// to suit. Dig out the Object Browser script and open up "pMenu" for more info.

function addMenuBorder(mObj, iS, alpha, bordCol, bordW, backCol, backW)
{
 // Loop through the menu array of that object, finding matching ItemStyles.
 for (var mN in mObj.menu)
 {
  var mR=mObj.menu[mN], dS='<div style="position:absolute; background:';
  if (mR[0].itemSty != iS) continue;
  // Loop through the items in that menu, move them down and to the right a bit.
  for (var mI=1; mI<mR.length; mI++)
  {
   mR[mI].iX += bordW+backW;
   mR[mI].iY += bordW+backW;
  }
  // Extend the total dimensions of menu accordingly.
  mW = mR[0].menuW += 2*(bordW+backW);
  mH = mR[0].menuH += 2*(bordW+backW);

  // Set the menu's extra content string with divs/layers underneath the items.
  if (isNS4) mR[0].extraHTML += '<layer bgcolor="'+bordCol+'" left="0" top="0" width="'+mW+
   '" height="'+mH+'" z-index="980"><layer bgcolor="'+backCol+'" left="'+bordW+'" top="'+
   bordW+'" width="'+(mW-2*bordW)+'" height="'+(mH-2*bordW)+'" z-index="990"></layer></layer>';
  else mR[0].extraHTML += dS+bordCol+'; left:0px; top:0px; width:'+mW+'px; height:'+mH+
   'px; z-index:980; '+
   (alpha!=null?'filter:alpha(opacity='+alpha+'); -moz-opacity:'+alpha+'%; opacity:'+(alpha/100):'')+
   '">'+dS+backCol+'; left:'+bordW+'px; top:'+bordW+'px; width:'+(mW-2*bordW)+'px; height:'+
   (mH-2*bordW)+'px; z-index:990"></div></div>';
 }
};

function addDropShadow(mObj, iS)
{
 // Pretty similar to the one above, just loops through list of extra parameters making
 // dropshadow layers (from arrays) and extending the menu dimensions to suit.
 for (var mN in mObj.menu)
 {
  var a=arguments, mD=mObj.menu[mN][0], addW=addH=0;
  if (mD.itemSty != iS) continue;
  for (var shad=2; shad<a.length; shad++)
  {
   var s = a[shad];
   // Safari 1.2 bug: it inherits alpha values SIDEWAYS!?!? What were they thinking?
   var alpha = (s[0]!=null && navigator.userAgent.indexOf('AppleWebKit') == -1);
   if (isNS4) mD.extraHTML += '<layer bgcolor="'+s[1]+'" left="'+s[2]+'" top="'+s[3]+'" width="'+
    (mD.menuW+s[4])+'" height="'+(mD.menuH+s[5])+'" z-index="'+(arguments.length-shad)+'"></layer>';
   else mD.extraHTML += '<div style="position:absolute; background:'+s[1]+'; left:'+s[2]+
    'px; top:'+s[3]+'px; width:'+(mD.menuW+s[4])+'px; height:'+(mD.menuH+s[5])+'px; z-index:'+
    (a.length-shad)+'; '+
    (alpha?'filter:alpha(opacity='+s[0]+'); -moz-opacity:'+s[0]+'%; opacity:'+(s[0]/100):'')+
    '"></div>';
   addW=Math.max(addW, s[2]+s[4]);
   addH=Math.max(addH, s[3]+s[5]);
  }
  mD.menuW+=addW; mD.menuH+=addH;
 }
};