/**********************************************************************************   
PopupDescriptions 
*   Copyright (C) 2001 <a href="/dhtmlcentral/thomas_brattli.asp">Thomas Brattli</a>
*   This script was released at DHTMLCentral.com
*   Visit for more great scripts!
*   This may be used and changed freely as long as this msg is intact!
*   We will also appreciate any links you could give us.
*
*   Made by <a href="/dhtmlcentral/thomas_brattli.asp">Thomas Brattli</a> 
*********************************************************************************/

function lib_bwcheck(){ //Browsercheck (needed)
	this.ver=navigator.appVersion
	this.agent=navigator.userAgent
	this.dom=document.getElementById?1:0
	this.opera5=this.agent.indexOf("Opera 5")>-1
	this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom && !this.opera5)?1:0; 
	this.ie6=(this.ver.indexOf("MSIE 6")>-1 && this.dom && !this.opera5)?1:0;
	this.ie4=(document.all && !this.dom && !this.opera5)?1:0;
	this.ie=this.ie4||this.ie5||this.ie6
	this.mac=this.agent.indexOf("Mac")>-1
	this.ns6=(this.dom && parseInt(this.ver) >= 5) ?1:0; 
	this.ns4=(document.layers && !this.dom)?1:0;
	this.bw=(this.ie6 || this.ie5 || this.ie4 || this.ns4 || this.ns6 || this.opera5)
	return this
}
var bw=new lib_bwcheck()



/***************************************************************************************
Variables to set:
***************************************************************************************/
messages=new Array()
//Write your descriptions in here.
messages[0] = '<div class="clCaption">Nos bateaux d\'expédition</div><br>Caractéristiques de nos navires d\'expédition pour les croisières antarctiques (brise glace et à coque renforcée) avec une aide sur comment choisir votre bateau d\'expédition</font</div>'
messages[1] = '<div class="clCaption">Se rendre en Antarctique</div><br> Itinéraire type et conseils pour les croisières antarctique partant d\'Ushuaia, Argentine</div>'
messages[2] = '<div class="clCaption">Quand y aller et que voir</div><br>Saisons de voyage en Antarctique avec calendrier de la faune et des attractions naturelles</div>'
messages[3] = '<div class="clCaption">Croisière classique</div><br>"10 à 13 jours"<br>Croisières vers la péninsule Antarctique et les îles Shetlands du sud à bord de navires d\'expédition, au départ d\'Ushuaia, Argentine<br>Se sont les croisières les plus courtes et les plus économiques</div>'
messages[4] = '<div class="clCaption">Croisière Exploration</div><br> "17  à 21 jours"<br>Croisières vers la péninsule Antarctique, les îles Shetlands, les Malouines et la Géorgie du sud à bord de navires d\'expédition, au départ d\'Ushuaia, Argentine<br>Se sont les croisières les plus complètes, idéales pour la découverte de la faune antarctique.</div>'
messages[5] = '<div class="clCaption">Croisières plongé</div><br> "10 à 20 jours"<br> Croisières à destination de la péninsule antarctique est îles Shetlands (occasionellement Malouines et Géorgie du Sud) avec option plongée sous marine" </div>'
messages[6] = '<div class="clCaption">Circumnavigation of Antarctica</div>"30 à 66 jours"<br> Une grande aventure autour du continent blanc de la Nouvelle Zélande jusqu\'à Ushuaia, Argentine</div>'
messages[7] = '<div class="clCaption">Cercle Polaire Antarctique </div><br> "12 jours"<br>Croisières vers la péninsule Antarctique et les îles Shetlands du sud jusqu\'au cercle polaire Antarctique à bord de navires d\'expédition, au départ d\'Ushuaia, Argentine.</div>'
messages[8] = '<div class="clCaption">Croisière en mer de Weddell</div><br> "12 jours"<br> Croisières vers les îles Shetlands du sud et à travers la mer de Weddell explorant le coté orientale rarement visité de la la péninsule Antarctique à bord de navires d\'expédition, au départ d\'Ushuaia, Argentine </div>'
messages[9] = '<div class="clCaption">South Georgia</div>"16 jours"<br> Explorez en profondeur la géorgie du Sud, une île aux paysages extraordinnaires et regorgeant de vie sauvage</div>'
messages[10] = '<div class="clCaption">Emperor Penguin Expedition</div>"27 jours"<br> Une expédition absolument unique à travers la mer de Ross pour découvrir les <b>colonies immenses de manchots empereurs </b>entourés de superbes icebergs et de banquise san fin à bord de brise glace.</div>'

//To have more descriptions just add to the array.

fromX = 50 //How much from the actual mouse X should the description box appear?
fromY = -20 //How much from the actual mouse Y should the description box appear?

//To set the font size, font type, border color or remove the border or whatever,
//change the clDescription class in the stylesheet.

//Makes crossbrowser object.
function makeObj(obj){								
   	this.evnt=bw.dom? document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?document.layers[obj]:0;
	if(!this.evnt) return false
	this.css=bw.dom||bw.ie4?this.evnt.style:bw.ns4?this.evnt:0;	
   	this.wref=bw.dom||bw.ie4?this.evnt:bw.ns4?this.css.document:0;		
	this.writeIt=b_writeIt;																
	return this
}

// A unit of measure that will be added when setting the position of a layer.
var px = bw.ns4||window.opera?"":"px";

function b_writeIt(text){
	if (bw.ns4){this.wref.write(text);this.wref.close()}
	else this.wref.innerHTML = text
}

//Capturing mousemove
var descx = 0
var descy = 0
function popmousemove(e){descx=bw.ns4||bw.ns6?e.pageX:event.x; descy=bw.ns4||bw.ns6?e.pageY:event.y}

var oDesc;
//Shows the messages
function popup(num){
   if(oDesc){
		oDesc.writeIt('<div class="clDescription">'+messages[num]+'</div>')
		if(bw.ie5||bw.ie6) descy = descy+document.body.scrollTop
		oDesc.css.left = (descx+fromX)+px
		oDesc.css.top = (descy+fromY)+px
		oDesc.css.visibility = "visible"
    }
}
//Hides it
function popout(){
	if(oDesc) oDesc.css.visibility = "hidden"
}
function setPopup(){
   	if(bw.ns4)document.captureEvents(Event.MOUSEMOVE)
    document.onmousemove = popmousemove;
	oDesc = new makeObj('divDescription')
}