//<!--
/*
    Menu Library
    Author: Louis Daoust
*/
if (!document.layers&&!document.all&&!document.getElementById)
    event="test";

var baseurl="/";

function ShowToolTip(current,e,text)
{
    if(document.all||document.getElementById)
    {
        thetitle=text.split("<br>");

        if (thetitle.length>1)
        {
            thetitles='';
            for (i=0;i<thetitle.length;i++)
                thetitles+=thetitle[i];
            current.title=thetitles;
        }
        else
            current.title=text;

        self.status = text;
    }
    else if (document.layers)
    {
        document.tooltip.document.write("<layer bgColor='white' style='border:1px solid black;font-size:12px;'>"+text+"</layer>");
        document.tooltip.document.close();
        document.tooltip.left=e.pageX+5;
        document.tooltip.top=e.pageY+5;
        document.tooltip.visibility="show";

        self.status = text;
    }
}

function HideToolTip()
{
    if (document.layers)
        document.tooltip.visibility="hidden";

    self.status = "";
}

//This will simply add a tooltip div
//document.write( "<div id='tooltip' style='position:absolute;visibility:hidden'></div>" );

function HiliteMenuItem( itemobj, bHilite )
{
    if( bHilite )
    {
        itemobj.style.backgroundColor='#99CCFF';
        itemobj.style.color='black';
    }
    else
    {
        itemobj.style.backgroundColor='#336699';
        itemobj.style.color='white';
    }
}

function GotoForecastLink( objSelect, szTarget )
{
    var szUrl = objSelect.options[objSelect.selectedIndex].value;

    CLSetCookie("title"," - Météo - "+objSelect.options[objSelect.selectedIndex].text );

    CLSetCookie( "forecastcity", objSelect.selectedIndex );

    UTGotoURL( szUrl, szTarget );
}

function MakeMenu( szText, szToolTip, szLink, szTarget )
{
    var str = "<div class='menugroup'";

    if( szLink )
        str = str + " onClick=\"UTGotoURL('"+szLink+"','"+szTarget+"')\"";

    str = str + " onMouseOver=\"ShowToolTip(this,event,'"+szToolTip+"')\" onMouseOut='HideToolTip()'";

    str = str + ">"+szText;

    str = str + "</div>";

    return( str );
}

function MakeMenuItem( szText, szHref, szTarget, szOnClickHandler )
{
    var str = "<div class='menulink' onClick=";
    
    if( szHref != "" )
        str = str + "UTGotoURL('"+szHref+"','"+szTarget+"');";

    if( szOnClickHandler != "" )
        str = str + "\""+szOnClickHandler+"\";";

    if( szTarget[0] == '_' && szTarget[1] == '_' )
        eval( szTarget.setfocus() );

    str = str + " onMouseOver='HiliteMenuItem(this,1)' onMouseOut='HiliteMenuItem(this,0)'>"+szText+"</div>";

    return( str );
}

function MakeMenuItemList( szName )
{
    var str = "<select id='"+szName+"' name='"+szName+"'></select>";

    return( str );
}

function AddMenuItemList( objName, szItem, szLink )
{
    var obj = document.getElementById( objName );

    var nElem = obj.length;

    obj.options[nElem] = new Option(szItem,szLink);
}

function SetGoButton( goBut,bHilite)
{
    if( bHilite )
        goBut.src=baseurl+"buttons/goh.gif";
    else
        goBut.src=baseurl+"buttons/go.gif";
}

function UpdateWeather()
{
    //Use a date as a parameter to fool browser cache
    var tdate = new Date();
    uniq = "?"+tdate.getTime();

    document.images.weatherimg.src = "http://banners.wunderground.com/banner/gizmotimetemp_both/language/french/global/stations/71627.gif"+uniq;
    setTimeout("UpdateWeather()",300000)
}

function SetMenu()
{
    var websitename="";
    var trgtFrame="_top";

    var ldmenu = document.getElementById( "ldmenu" );

    if( CLGetCookie('language') == 'en' )
    {
        ldmenu.innerHTML = "<div class='menubar' id='menu'>"+
        MakeMenu( "Fishing", "All about sport fishing", baseurl+"fishing/fishing.html", trgtFrame )+
        MakeMenuItem( "Image Gallery", baseurl+"fishing/fish_gallery/index.html", trgtFrame, "" )+
        MakeMenuItem( "Species", baseurl+"fishing/fish_species.html", trgtFrame, "" )+
        MakeMenuItem( "Records", baseurl+"fishing/fish_records.html", trgtFrame, "" )+
        MakeMenuItem( "Good periods", baseurl+"fishing/fish_periods.html", trgtFrame, "" )+
        MakeMenuItem( "Water quality", "", "", "OpenSimpleWindow('http://www.rsma.qc.ca/cum_code_asp_v2/niveau0_v2.asp', 'resultats', 'menubar=yes,width=720,height=500')" )+
        MakeMenuItem( "Tournaments", baseurl+"fishing/fish_tournaments.html", trgtFrame, "" )+
        MakeMenuItem( "Knots", baseurl+"fishing/fish_knots.html", trgtFrame, "" )+
        MakeMenuItem( "Tricks,Tips,Tools", baseurl+"fishing/fish_tips.html", trgtFrame, "" )+
        MakeMenuItem( "Accessories", baseurl+"fishing/fish_stuff.html", trgtFrame, "" )+
        MakeMenuItem( "Outfitters", baseurl+"fishing/fish_outfitters.html", trgtFrame, "" )+
        MakeMenuItem( "Links", baseurl+"fishing/fish_links.html", trgtFrame, "" )+
        "<br>"+
        MakeMenu( "MNRF", "Ministère des Ressources Naturelles et de la Faune", "http://www.mrnf.gouv.qc.ca/faune/", "_blank" )+
        MakeMenuItem( ".Opening dates", "http://www.fapaq.gouv.qc.ca/en/publications/fishing/index_05-06.htm", "_blank", "" )+
        MakeMenuItem( "Rules", "http://www.fapaq.gouv.qc.ca/en/publications/fishing/index_05-06.htm", "_blank", "" )+
        MakeMenuItem( "SOS Poaching" , "http://www.fapaq.gouv.qc.ca/en/sos_brac/sos_brac.htm", "_blank", "" )+
        MakeMenuItem( "Maps of zones", "http://www.fapaq.gouv.qc.ca/en/publications/fishing/index.htm", "_blank", "" )+
        "<br>"+
        MakeMenu( "FQGZ", "Fédération Québécoise des Gestionnaires de ZECs", "http://www.zecquebec.com", "_blank" )+
        "<br>"+
        MakeMenu( "SEPAQ", "Société des établissements de plein air du Québec", "http://www.sepaq.com/", "_blank" )+
        "<br>"+
        MakeMenu( "<img src='"+baseurl+"images/flags/very_small/ca-qc.gif' align='absmiddle' />Environment", "Ministère de l&#146environnement du Québec", "http://www.menv.gouv.qc.ca/index-en.htm", "_blank" )+
        MakeMenuItem( "Consumption(fr)", "http://www.menv.gouv.qc.ca/eau/guide/", "_blank", "" )+
        MakeMenuItem( "Atlas of Quebec(fr)", "http://www.atlasduquebec.qc.ca/", "_blank", "" )+
        "<br>"+
        MakeMenu( "<img src='"+baseurl+"images/flags/very_small/canada.gif' align='absmiddle' />Environment", "Environment Canada", "http://www.ec.gc.ca/envhome.html", "_blank" )+
        MakeMenuItem( "Tide tables", "http://www.lau.chs-shc.gc.ca/french/Canada.shtml", "_blank", "" )+
        MakeMenuItem( "Atlas of Canada", "http://atlas.gc.ca/site/english/index.html", "_blank", "" )+
        MakeMenuItem( "Parks Canada", "http://www.parcscanada.gc.ca/index_e.asp", "_blank", "" )+
        MakeMenuItem( "Weather", "http://meteo.ec.gc.ca/forecast/canada/qc_e.html", "_blank", "" )+
        "<table><tr><td>"+
        MakeMenuItemList( "regions" )+
        "&nbsp;<img src='"+baseurl+"buttons/go.gif' onClick=GotoForecastLink(regions,'_blank') onMouseOver='SetGoButton(this,1)' onMouseOut='SetGoButton(this,0)' style='cursor:hand' align='absmiddle' />"+
        "</td></tr></table>"+

        /*
        "<br><br>"+
        "<center>"+
        "<a href='weather.html' target='_top'>"+
        "<img id='weatherimg' width=114 src='http://banners.wunderground.com/banner/gizmotimetemp_both/language/french/global/stations/71627.gif'"+
        "alt='Cliquez pour les prévision de Montréal' height='41' width='127' /></a>"+
        "<br>"+
        */

        "<!-- Begin WeatherLink Flash Fragment -->"+
        "<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0' width='160' height='110'>"+
            "<param name=movie value='http://www.weatheroffice.ec.gc.ca/FlashFeed/WxLinks/CYUL.swf'>"+
            "<param name=quality value=high>    <embed src='http://www.weatheroffice.ec.gc.ca/FlashFeed/WxLinks/CYUL.swf' quality='high' pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' width='160' height='110'>"+
        "</object>"+
        "<!-- End WeatherLink Flash Fragment -->"+

        "</center>"+

        /* Guestbook */
        /*
        "<br />"+
        "<font size='4' color='white'>Guestbook</font>"+
        "<a href='http://ldaoust.signmyguestbook.com/'><img src='"+baseurl+"buttons/guestbook2.gif' border='0' /></a><br />"+
        "<a href='http://signmyguestbook.com/'><small>powered by signmyguestbook.com</small></a>"+
        */
        "</div>";

        AddMenuItemList( "regions", "Montréal", "http://meteo.ec.gc.ca/city/pages/qc-147_metric_f.html" );
        AddMenuItemList( "regions", "Trois-Rivières", "http://meteo.ec.gc.ca/city/pages/qc-130_metric_f.html" );
        AddMenuItemList( "regions", "Québec", "http://meteo.ec.gc.ca/city/pages/qc-133_metric_f.html" );
        AddMenuItemList( "regions", "Maniwaki", "http://meteo.ec.gc.ca/city/pages/qc-102_metric_f.html" );
        AddMenuItemList( "regions", "Mont-Laurier", "http://meteo.ec.gc.ca/city/pages/qc-47_metric_f.html" );
        AddMenuItemList( "regions", "St-Agathe", "http://meteo.ec.gc.ca/city/pages/qc-33_metric_f.html" );
        AddMenuItemList( "regions", "Gatineau", "http://meteo.ec.gc.ca/city/pages/qc-126_metric_f.html" );
        AddMenuItemList( "regions", "Gaspé", "http://meteo.ec.gc.ca/city/pages/qc-101_metric_f.html" );
        AddMenuItemList( "regions", "Rivière-du-loup", "http://meteo.ec.gc.ca/city/pages/qc-108_metric_f.html" );
    }
    else
    {
        ldmenu.innerHTML = "<table class='menubar' id='menu' valign='top' cellpadding='0' cellspacing='0'><tr><td valign='top'>"+
        MakeMenu( "Pêche", "Tous sur la pêche sportive", baseurl+"fishing/fishing.html", trgtFrame )+
        MakeMenuItem( "Galerie d'images", baseurl+"fishing/fish_gallery/index.html", trgtFrame, "" )+
        MakeMenuItem( "Espèces", baseurl+"fishing/fish_species.html", trgtFrame, "" )+
        MakeMenuItem( "Records", baseurl+"fishing/fish_records.html", trgtFrame, "" )+
        MakeMenuItem( "Bonnes périodes", baseurl+"fishing/fish_periods.html", trgtFrame, "" )+
        MakeMenuItem( "Qualité de l'eau", "", "", "OpenSimpleWindow('http://www.rsma.qc.ca/cum_code_asp_v2/niveau0_v2.asp', 'resultats', 'menubar=yes,width=720,height=500')", "" )+
        MakeMenuItem( "Tournois", baseurl+"fishing/fish_tournaments.html", trgtFrame, "" )+
        MakeMenuItem( "Noeuds", baseurl+"fishing/fish_knots.html", trgtFrame, "" )+
        MakeMenuItem( "Trucs,Conseils,Outils", baseurl+"fishing/fish_tips.html", trgtFrame, "" )+
        MakeMenuItem( "Accessoires", baseurl+"fishing/fish_stuff.html", trgtFrame, "" )+
        MakeMenuItem( "Pourvoiries", baseurl+"fishing/fish_outfitters.html", trgtFrame, "" )+
        MakeMenuItem( "Liens", baseurl+"fishing/fish_links.html", trgtFrame, "" )+
        "<br>"+
        MakeMenu( "MNRF", "Ministère des Ressources Naturelles et de la Faune", "http://www.mrnf.gouv.qc.ca/faune/", "_blank" )+
        MakeMenuItem( "Dates et Règlements", "http://www.mrnf.gouv.qc.ca/publications/enligne/faune/reglementation-peche/index.asp", "_blank", "" )+
        MakeMenuItem( "SOS Braconnage", "http://www.fapaq.gouv.qc.ca/fr/sos_brac/sos_brac.htm", "_blank", "" )+
        MakeMenuItem( "Carte des zones", "http://www.mrnf.gouv.qc.ca/publications/enligne/faune/reglementation-peche/carte-generale-zones-peche.asp", "_blank", "" )+
        "<br>"+
        MakeMenu( "FQGZ", "Fédération Québécoise des Gestionnaires de ZECs", "http://www.zecquebec.com", "_blank" )+
        "<br>"+
        MakeMenu( "SEPAQ", "Société des établissements de plein air du Québec", "http://www.sepaq.com/", "_blank" )+
        "<br>"+
        MakeMenu( "<img src='"+baseurl+"images/flags/very_small/ca-qc.gif' align='absmiddle' />Environnement", "Ministère de l&#146environnement du Québec", "http://www.menv.gouv.qc.ca", "_blank" )+
        MakeMenuItem( "Consommation", "http://www.menv.gouv.qc.ca/eau/guide/", "_blank", "" )+
        MakeMenuItem( "Atlas du Québec", "http://www.atlasduquebec.qc.ca/", "_blank", "" )+
        "<br>"+
        MakeMenu( "<img src='"+baseurl+"images/flags/very_small/canada.gif' align='absmiddle' />Environnement", "Environnement Canada", "http://www.ec.gc.ca/fenvhome.html", "_blank" )+
        MakeMenuItem( "Table des marées", "http://www.lau.chs-shc.gc.ca/french/Canada.shtml", "_blank", "" )+
        MakeMenuItem( "Atlas du Canada", "http://atlas.gc.ca/site/francais/index.html", "_blank", "" )+
        MakeMenuItem( "Parcs Canada", "http://www.parcscanada.gc.ca/index_f.asp", "_blank", "" )+
        MakeMenuItem( "Météo", "http://meteo.ec.gc.ca/forecast/canada/qc_f.html", "_blank", "" )+
        "<table><tr><td>"+
        MakeMenuItemList( "regions" )+
        "<img src='"+baseurl+"buttons/go.gif' onClick=\"GotoForecastLink(regions,'_top')\" onMouseOver='SetGoButton(this,1)' onMouseOut='SetGoButton(this,0)' style='cursor:hand' align='absmiddle' /><br>"+
        "</td></tr></table>"+

        /*
        "<br><br>"+
        "<center>"+
        "<a href='weather.html' target='_top'>"+
        "<img id='weatherimg' width=114 src='http://banners.wunderground.com/banner/gizmotimetemp_both/language/french/global/stations/71627.gif'"+
        "alt='Cliquez pour les prévision de Montréal' height='41' width='127' /></a>"+
        "<br />"+
        "</center>"+
        */

        //Bouton meteomedia
        "<table width='100%'><tr><td align='center'>"+

        '<iframe marginheight="0" marginwidth="0" name="wxButtonFrame" id="wxButtonFrame" height="110" src="http://www.meteomedia.com/boutonmeteo/template2.php?placeCode=CAQC0363&amp;category0=Cities&amp;placeCode1=CAQC0441&amp;category1=Cities&amp;placeCode2=CAQC0354&amp;category2=Cities&amp;containerWidth=120&amp;btnNo=100&amp;backgroundColor=blue&amp;multipleCity=1&amp;citySearch=1&amp;celsiusF=C" align="top" frameborder="0" width="120" scrolling="no"></iframe>'+

        "</td></tr></table>"+


        /*
        "<!-- Begin WeatherLink Flash Fragment -->"+
        "<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0' width='180' height='110'>"+
            "<param name=movie value='http://www.weatheroffice.com/FlashFeed/WxLinksf/CYUL.swf'>"+
            "<param name=quality value=high>   <embed src='http://www.weatheroffice.com/FlashFeed/WxLinksf/CYUL.swf' quality='high' pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' width='180' height='110'>"+
      	"</object>"+
        "<!-- End WeatherLink Flash Fragment -->"+
        */

        /*
        "<!-- Begin WeatherLink Flash Fragment -->"+
        "<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0' width='160' height='110'>"+
            "<param name=movie value='http://www.weatheroffice.com/FlashFeed/WxLinksf/CYUL.swf'>"+
            "<param name=quality value=high>    <embed src='http://www.weatheroffice.com/FlashFeed/WxLinksf/CYUL.swf' quality='high' pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' width='160' height='110'>"+
        "</object>"+
        "<!-- End WeatherLink Flash Fragment -->"+
        */
        /* Guestbook */
        /*
        "<br /><br />"+
        "<a href='http://ldaoust.signmyguestbook.com/'><img src='"+baseurl+"buttons/guestbook2.gif' border='0' align='center' alt='Livre des invités' title='Livre des invités'>"+
        "<font size='3' color='white'>Livre d'invités</font></a>"+
        */
        "</td></tr></table>";

        AddMenuItemList( "regions", "Montréal", "http://meteo.ec.gc.ca/city/pages/qc-147_metric_f.html" );
        AddMenuItemList( "regions", "Trois-Rivières", "http://meteo.ec.gc.ca/city/pages/qc-130_metric_f.html" );
        AddMenuItemList( "regions", "Québec", "http://meteo.ec.gc.ca/city/pages/qc-133_metric_f.html" );
        AddMenuItemList( "regions", "Maniwaki", "http://meteo.ec.gc.ca/city/pages/qc-102_metric_f.html" );
        AddMenuItemList( "regions", "Mont-Laurier", "http://meteo.ec.gc.ca/city/pages/qc-47_metric_f.html" );
        AddMenuItemList( "regions", "St-Agathe", "http://meteo.ec.gc.ca/city/pages/qc-33_metric_f.html" );
        AddMenuItemList( "regions", "Gatineau", "http://meteo.ec.gc.ca/city/pages/qc-126_metric_f.html" );
        AddMenuItemList( "regions", "Gaspé", "http://meteo.ec.gc.ca/city/pages/qc-101_metric_f.html" );
        AddMenuItemList( "regions", "Rivière-du-loup", "http://meteo.ec.gc.ca/city/pages/qc-108_metric_f.html" );
    }

    var nForecastRegion = CLGetCookie( "forecastcity" );
    if( nForecastRegion != null )
    {
        var obj = regions;
        obj.selectedIndex = parseInt(nForecastRegion);
    }

   //UpdateWeather();
}

function SetHeader( szTitle )
{
    var home = baseurl+"fr/home.html";

    if( CLGetCookie('language') == 'en' )
        home = baseurl+"en/home.html";

    var hdr = "<table class='titlebar' width='100%' cellspacing='0' cellpadding='0'><tr>"+
              "<td id='title' width='78%'>"+
              "<a href='"+home+"' target='_top'><img src='"+baseurl+"logos/ldlogo4.gif' border='0' align='absmiddle' /></a>"+
              " - "+szTitle+"</td>"+
              "<td width='22%' valign='top' align='center'><div id='liveclock' class='liveclock2'></div></td>"+
              "</tr></table>";

    document.write( hdr );

    //ShowClock(0,false,60);
}

function SetFooter()
{
    var str = "<br clear=all>";
    var mailinfo  = "<a href='mailto:Pecheur-Info-Comments <pecheurinfo@videotron.ca>?subject=Commentaire Général'><img src='"+baseurl+"buttons/email7.gif' border=0 alt='commentaires/suggestions' /></a>&nbsp";
    var guestbook = "<a href='http://ldaoust.signmyguestbook.com'><img src='"+baseurl+"buttons/guestbook2.gif' border=0 alt='Livre des invités' /></a>";
    var entrance = "Entrée principale";

    var copyright = "Copyright © Pêcheur-Info. Touts droits réservés.";

    if( CLGetCookie('language') == 'en' )
    {
        mailinfo  = "<a href='mailto:Pecheur-Info-Comments <pecheurinfo@videotron.ca>?subject=General comments'><img src='"+baseurl+"buttons/email7.gif' border=0 alt='comments/suggestions' /></a>&nbsp";
        copyright = "Copyright © 2002 Angler-Info. All rights reserved.";
        guestbook = "<a href='http://ldaoust.signmyguestbook.com'><img src='"+baseurl+"buttons/guestbook2.gif' border=0 alt='Guestbook' /></a>";
        entrance = "Main entrance";
    }

    str = str + "<table class='footerbar' border='0'>"+
    "<tr><td width='20%' align='left'>"+
    "<a href='/'><img src='"+baseurl+"buttons/home2.gif' border='0' alt='"+entrance+"' /></a>"+
    mailinfo+
    //guestbook+
    "</td>"+
    "<td text='white' width='33%' align='center'>"+
    copyright+
    "</td>"+
    "<td width='20%' align='right'>"+
    "<a href='"+baseurl+"webcams/webcams.html' target='_top'><img src='"+baseurl+"buttons/camera.gif' border=0 alt='web cams' /></a>"+
    "</td></tr></table>";

    document.write( str );
}
//-->