// (C) 2007 - 2011 Serge Lamarche
// sergewebservice.ca
// All codes copyrights Serge Lamarche, any reproduction and
// use strictly forbidden without written consent.
// Toute reproduction est interdite sans autorisation écrite
// Contact sergewebservice@yahoo.ca or sergelamarche@gmail.com
// for help with your website. Reliable, inexpensive website service.
// Les effets javascripts sont disponibles à prix abordables. Merci.
var map = new Object(); conserveimage = false;
if (!nodetexte) var nodetexte = new Object();
function chargeimage(elementa) { if (!document.getElementById) return;
if (!document.getElementById("ecran")) return;
nilintervfonduench(); montre('ecran', true); //arrete fondu-enchainé et mets l'écran pour sur.
var lecran = document.getElementById("ecran");
if (!lecran.innerHTML||!document.documentElement.innerHTML) return; // bug sur opera 9.6 oblige d'enlever typeof().
if (conserveimage) { lecran.innerHTML=''; lecran.innerHTML = conserveimage; conserveimage = false; }; //remet si conservée.
transparence('img01', 0); montre('attend', true); //met en veilleuse un moment.
nilintervdiapofondu(); montre('screen', false); //arrête diapo et prends note ci-dessous:
var limg01 = document.getElementById("img01");
//laphotodsimg01 = limg01.src; //aussi: document.images["img01"].src;
laphotodsimg01 = limg01.getAttribute("href"); photodsimg01 = true;
var nomphoto = elementa.getAttribute("href");
//alert(nomphoto);
var ledebordement = (window.getComputedStyle) ? window.getComputedStyle(lecran,null).overflow : lecran.currentStyle.overflow;
var srcimage = "http://www.canadianheli-skiing.com/gallery-maps/"; var imgfraiche = ".jpg";
if (-1!=nomphoto.search(/gallery-maps/)&&-1==nomphoto.search(/HMLhelipad/)) { if (-1!=nomphoto.search(/gallery-maps/)&&-1==nomphoto.search(/HMLhelipad/)) nomphoto = nomphoto.substring(48, nomphoto.length-4); changelegende(map[nomphoto].legende);
//if (-1!=nomphoto.search(/\?khr/)) nomphoto = nomphoto.substring(23);
} else { var lawebcam; imgfraiche = "?"+Math.random();
if (-1!=nomphoto.search(/HMLhelipad/)) { srcimage = ""; lawebcam="HMLhelipad"; };
if (-1!=nomphoto.search(/alpineholidays/)) { srcimage = ""; lawebcam="gah"; }; imgfraiche = "";
if (-1!=nomphoto.search(/subCat=7572/)) { srcimage = ""; lawebcam="khreagleeye"; nomphoto=khreagleeyehub};
if (-1!=nomphoto.search(/subCat=11692/)) { srcimage = ""; lawebcam="khrstairway"; nomphoto=khrstairwayhub};
changelegende(map[lawebcam].legende); }
if (nomphoto=="gch-runmap-gd") { lecran.style.overflow = "hidden"; lecran.style.height = "507px"; limg01.style.position = "absolute"; limg01.style.left = "-1980px"; limg01.style.top = "-1400px"; limg01.style.cursor = "move"; dragDrop.initElement(limg01); } else if (ledebordement=="hidden") { lecran.style.height = "auto"; lecran.style.overflow = "auto"; limg01.style.position = "relative"; limg01.style.left = "auto"; limg01.style.top = "auto"; limg01.style.cursor = "auto"; };
//changelegende(photo[nomphoto].legende+" — by "+photo[nomphoto].proprio+" — "+photo[nomphoto].date);
//var x=document.getElementById("img01").offsetHeight||document.getElementById("img01").style.pixelHeight; alert(x);
changephotosrc('img01', srcimage+nomphoto+imgfraiche);
intervdefilepage = window.setInterval("defilepage(0)", 20);
intervattendimage = window.setInterval("attendimage()", 500); return false; };
//Remplacer ' par ’ dans les légendes:
map['bc-google'] = {
"proprio": "",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'Google map of British Columbia',
"affiche": '',
"titre": ""
};
map['hml-google'] = {
"proprio": "",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'Google map of Heather Mountain Lodge',
"affiche": '',
"titre": ""
};
map['gch-runmap'] = {
"proprio": "",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'All our runs are in the Purcell and Selkirk ranges. View full size (6MB - high quality)',
"affiche": '',
"titre": ""
};
map['gch-runmap-gd'] = {
"proprio": "",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'All our runs are in the Purcell and Selkirk ranges. Return to smaller size',
"affiche": '',
"titre": ""
};
map['HMLhelipad'] = {
"proprio": "",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'Webcam image at the helipad of Heather Mountain Lodge. Refresh',
"affiche": '',
"titre": ""
};
map['gah'] = {
"proprio": "Golden Alpine Holidays",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'Webcam image at Sentry Mountain Lodge webcam (2109 m) of Golden Alpine Holidays. Refresh',
"affiche": '',
"titre": ""
};
map['khreagleeye'] = {
"proprio": "Kicking Horse Resort",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'Webcam image at Eagle‘s Eye restaurant of Kicking Horse Resort. Refresh',
"affiche": '',
"titre": ""
};
map['khrstairway'] = {
"proprio": "Kicking Horse Resort",
"sousgroupe": "aucun",
"date": "2008-00-00",
"cote": 0,
"legende": 'Webcam image at Stairway to Heaven chairlift of Kicking Horse Resort. Refresh',
"affiche": '',
"titre": ""
};
/*
map[''] = {
"proprio": "",
"sousgroupe": "aucun",
"date": "2009-00-00",
"cote": 0,
"legende": '',
"affiche": '',
"titre": ""
};
*/
nodetexte['forecasts'] = {
"proprio": "Snow-forecast.com and Various Canadian government agencies",
"sousgroupe": "aucun",
"date": "Current",
"cote": 0,
"legende": "Forecasts",
"affiche": '',
"textehtml": '
Snow Forecast for GCH — (elevation 1006 to 3200 m, 3,300 to 10,500 ft)
Golden Forecast — (elevation 786 m, 2581 ft)
Revelstoke Forecast — (elevation 442 m, 1451 ft)
Glacier National Park Report
',
"description": "",
"titre": "Forecasts"
};
nodetexte['snowforecastfeed'] = {
"proprio": "Snow-forecast.com",
"sousgroupe": "aucun",
"date": "Current",
"cote": 0,
"legende": "Forecasts",
"affiche": '',
"textehtml": '',
"description": "",
"titre": "Forecasts"
};
nodetexte['satellites'] = {
"proprio": "Snow-forecast.com and Environment Canada",
"sousgroupe": "aucun",
"date": "Current",
"cote": 0,
"legende": "",
"affiche": '',
"textehtml": 'Snow-forecast Interactive Snowfall Maps
Environment Canada Satellite Loop — (Goes-West) Western Canada IR+Visible Small includes all 110 images.
',
"description": "",
"titre": "Satellites"
};
nodetexte['webcams'] = {
"proprio": "GCH, GAH, KHMR, BC",
"sousgroupe": "aucun",
"date": "Current",
"cote": 0,
"legende": "",
"affiche": '',
"textehtml": '
GCH webcam at our Heather Mountain Lodge
(1030 m, 3379 ft)
Rogers Pass — (elevation 1322m, 4337 ft)
Mt. Fidelity — (elevation 1874m, 6148 ft)
',
"description": "",
"titre": "Historic data"
};
/*
nodetexte[''] = {
"proprio": "",
"sousgroupe": "aucun",
"date": "2009-01-01",
"cote": 0,
"legende": "",
"affiche": '',
"textehtml": '',
"description": "",
"titre": ""
};
*/
//fonctions pour trainer la carte gracieuseté de (C) PPK 2009 au quirksmode.org:
//Following codes authored by PPK (C) 2009 at quirksmode.org:
//Codes were modified to apply to the map:
function addEventSimple(obj,evt,fn) {
if (obj.addEventListener)
obj.addEventListener(evt,fn,false);
else if (obj.attachEvent)
obj.attachEvent('on'+evt,fn);
}
function removeEventSimple(obj,evt,fn) {
if (obj.removeEventListener)
obj.removeEventListener(evt,fn,false);
else if (obj.detachEvent)
obj.detachEvent('on'+evt,fn);
}
dragDrop = {
//keyHTML: '#',
//keySpeed: 10, // pixels per keypress event
initialMouseX: undefined,
initialMouseY: undefined,
startX: undefined,
startY: undefined,
dXKeys: undefined,
dYKeys: undefined,
draggedObject: undefined,
initElement: function (element) {
//if (typeof element == 'string')
// element = document.getElementById(element);
element.onmousedown = dragDrop.startDragMouse; return false;
element.innerHTML += dragDrop.keyHTML;
var links = element.getElementsByTagName('a');
var lastLink = links[links.length-1];
lastLink.relatedElement = element;
lastLink.onclick = dragDrop.startDragKeys;
},
startDragMouse: function (e) {
dragDrop.startDrag(this);
var evt = e || window.event;
dragDrop.initialMouseX = evt.clientX;
dragDrop.initialMouseY = evt.clientY;
addEventSimple(document,'mousemove',dragDrop.dragMouse);
addEventSimple(document,'mouseup',dragDrop.releaseElement);
return false;
},
startDragKeys: function () {
dragDrop.startDrag(this.relatedElement); return false;
dragDrop.dXKeys = dragDrop.dYKeys = 0;
addEventSimple(document,'keydown',dragDrop.dragKeys);
addEventSimple(document,'keypress',dragDrop.switchKeyEvents);
this.blur();
return false;
},
startDrag: function (obj) {
if (dragDrop.draggedObject)
dragDrop.releaseElement();
dragDrop.startX = obj.offsetLeft;
dragDrop.startY = obj.offsetTop;
dragDrop.draggedObject = obj;
//obj.className += 'dragged';
},
dragMouse: function (e) {
var evt = e || window.event;
var dX = evt.clientX - dragDrop.initialMouseX;
var dY = evt.clientY - dragDrop.initialMouseY;
dragDrop.setPosition(dX,dY);
return false;
},
dragKeys: function(e) { return false;
var evt = e || window.event;
var key = evt.keyCode;
switch (key) {
case 37: // left
case 63234:
dragDrop.dXKeys -= dragDrop.keySpeed;
break;
case 38: // up
case 63232:
dragDrop.dYKeys -= dragDrop.keySpeed;
break;
case 39: // right
case 63235:
dragDrop.dXKeys += dragDrop.keySpeed;
break;
case 40: // down
case 63233:
dragDrop.dYKeys += dragDrop.keySpeed;
break;
case 13: // enter
case 27: // escape
dragDrop.releaseElement();
return false;
default:
return true;
}
dragDrop.setPosition(dragDrop.dXKeys,dragDrop.dYKeys);
if (evt.preventDefault)
evt.preventDefault();
return false;
},
setPosition: function (dx,dy) {
dragDrop.draggedObject.style.left = dragDrop.startX + dx + 'px';
dragDrop.draggedObject.style.top = dragDrop.startY + dy + 'px';
},
switchKeyEvents: function () {
// for Opera and Safari 1.3
removeEventSimple(document,'keydown',dragDrop.dragKeys);
removeEventSimple(document,'keypress',dragDrop.switchKeyEvents);
addEventSimple(document,'keypress',dragDrop.dragKeys);
},
releaseElement: function() {
removeEventSimple(document,'mousemove',dragDrop.dragMouse);
removeEventSimple(document,'mouseup',dragDrop.releaseElement);
//removeEventSimple(document,'keypress',dragDrop.dragKeys);
//removeEventSimple(document,'keypress',dragDrop.switchKeyEvents);
//removeEventSimple(document,'keydown',dragDrop.dragKeys);
dragDrop.draggedObject.className = dragDrop.draggedObject.className.replace(/dragged/,'');
dragDrop.draggedObject = null;
}
}
