var ns4=(document.layers)? true:false;
var ie4=((document.all)&&(!document.getElementById))? true:false;
var ope=(window.opera)? true:false;
var ie =(document.all&&!ope)? true:false;
var dom=document.getElementById;

// NAVIGATEUR
Navigateur = navigator.appName;
if ((Navigateur == 'Netscape')&&(parseInt(navigator.appVersion)<=4)) {document.write('<link rel="STYLESHEET" type="text/css" href="/xglobinc/nn.css">');}
else{if (Navigateur == 'Microsoft Internet Explorer'){document.write('<link rel="STYLESHEET" type="text/css" href="/xglobinc/ie.css">');}else{document.write('<link rel="STYLESHEET" type="text/css" href="/xglobinc/ie.css">');}}

// POP-UP
function openWin(theURL,winName,features) { opwin = window.open(theURL,winName,features); opwin.focus(); }

// PUBLICITE
function pub() {
	if (ns4 || ie4) {
		if(ns4) {
			document.sky.left = ((window.innerWidth/2)+392);
			}
		else {
			document.getElementById("sky").style.left = ((window.innerWidth/2)+384);
			}
		}
	else {
		if(ie) {
			sky.style.left = parseInt((document.body.clientWidth)/2)+392;
			}
		else {
			document.getElementById("sky").style.left = ((window.innerWidth/2)+384);
			}
		}
	}

function rotasky() {
	document.write("<div align='center' id='sky' style='position:absolute; top:85px; left:1000px; height:600px; width:120px;' name='sky'>");
	document.write("<IFRAME src='/pub/rotasky.php' width=120 height=600 scrolling=no frameborder='0'>Publicit&eacute; agricole</IFRAME>");
	document.write("</div>");
	}

// SELECT_MULTIPLE
function is_one_selected(obj)
	{
	for(var no=0; no < obj.length ;no++)
	if(obj[no].selected)
	return true;
	return false;
	}

// DEFILEMENT TOP & COLONNE
var marqueewidth=390;
var marqueeheight=12;
var speed=3;
var marqueecontents='<em class=n10vv>...  [ 02/03/2010 10:45 ] Tempête Xynthia : l\'arrêté de catastrophe naturelle a été publié au J.O ...&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</em>';
var scrollerwidth='115px';
var scrollerheight='160px';
var scrollerbgcolor='F3F3F3';
var scrollerbackground='';

var messages=new Array();
messages[0]="<em class=n10ag>PA.14348 - 15/03/2010 <br /><a href=/16-annonces/pa-14348.php>Offres de stage. ou travail saisonnier  Explotation danois rech 1-2 personne pour le saison.  270 Ha grande culture et foin d´herbe et lucerne  Exp avec machines, interesse en meca... </a><br /></em>";
messages[1]="<em class=n10ag>PA.14347 - 12/03/2010 <br /><a href=/16-annonces/pa-14347.php>arracheuse Grimme DL 1500 env 1988       vend Arracheuse de PDT Grimme DL 1500, 2 rgs, tapis tétine quasi neuf     ... </a><br /></em>";
messages[2]="<em class=n10ag>PA.14346 - 06/03/2010 <br /><a href=/16-annonces/pa-14346.php>Recherchons de 30 à 50 chèvres,de race pyrénéenne, et Alpines en lactation pour mise en place d\'une exploitation.  faites vos propositions raisonnables par mail ou phone.     ... </a><br /></em>";
messages[3]="<em class=n10ag>PA.14345 - 06/03/2010 <br /><a href=/16-annonces/pa-14345.php>Vds Herse Etrille HATZENBICHLER  Dimensions : 9 m  Repliage hydraulique  Heures travaillées : environ 100 H  Etat : excellent [proche du neuf]  Département : Hautes-Alpes [05]  Pri... </a><br /></em>";
messages[4]="<em class=n10ag>PA.14344 - 06/03/2010 <br /><a href=/16-annonces/pa-14344.php>Département Hérault   commune  Villetelle [34400]    à louer sur 11000 mètres carrés [classés agricole]:                                                bureau : 140 mètres carrés d... </a><br /></em>";

var ie=document.all;
var dom=document.getElementById;
if (messages.length>2)
	i=1;
else
	i=0;

function intializemarquee() {
	document.cmarquee01.document.cmarquee02.document.write(marqueecontents);
	document.cmarquee01.document.cmarquee02.document.close();
	thelength=document.cmarquee01.document.cmarquee02.document.width ;
	document.cmarquee01.document.cmarquee02.left=200;
	scrollit();
	}

function scrollit() {
	if (document.cmarquee01.document.cmarquee02.left>=thelength*(-1)) {
		document.cmarquee01.document.cmarquee02.left-=speed;
		setTimeout("scrollit()",100);
		}
	else {
		document.cmarquee01.document.cmarquee02.left=marqueewidth;
		scrollit();
		}
	}

function move1(whichlayer) {
	tlayer=eval(whichlayer);
	if (tlayer.top>0&&tlayer.top<=5) {
		tlayer.top=0;
		setTimeout("move1(tlayer)",5000);
		setTimeout("move2(document.main.document.second)",5000);
		return;
		}
	if (tlayer.top>=tlayer.document.height*-1) {
		tlayer.top-=5;
		setTimeout("move1(tlayer)",50);
		}
	else {
		tlayer.top=parseInt(scrollerheight);
		tlayer.document.write(messages[i]);
		tlayer.document.close();
		if (i==messages.length-1)
			i=0;
		else
			i++;
		}
	}

function move2(whichlayer) {
	tlayer2=eval(whichlayer);
	if (tlayer2.top>0&&tlayer2.top<=5) {
		tlayer2.top=0;
		setTimeout("move2(tlayer2)",5000);
		setTimeout("move1(document.main.document.first)",5000);
		return;
		}
	if (tlayer2.top>=tlayer2.document.height*-1) {
		tlayer2.top-=5;
		setTimeout("move2(tlayer2)",50);
		}
	else {
		tlayer2.top=parseInt(scrollerheight);
		tlayer2.document.write(messages[i]);
		tlayer2.document.close();
		if (i==messages.length-1)
			i=0;
		else
			i++;
		}
	}

function move3(whichdiv) {
	tdiv=eval(whichdiv);
	if (parseInt(tdiv.style.top)>0&&parseInt(tdiv.style.top)<=5) {
		tdiv.style.top=0+"px";
		setTimeout("move3(tdiv)",5000);
		setTimeout("move4(second2_obj)",5000);
		return;
		}
	if (parseInt(tdiv.style.top)>=tdiv.offsetHeight*-1) {
		tdiv.style.top=parseInt(tdiv.style.top)-5+"px";
		setTimeout("move3(tdiv)",50);
		}
	else {
		tdiv.style.top=parseInt(scrollerheight)
		tdiv.innerHTML=messages[i];
		if (i==messages.length-1)
			i=0;
		else
			i++;
		}
	}

function move4(whichdiv) {
	tdiv2=eval(whichdiv)
	if (parseInt(tdiv2.style.top)>0&&parseInt(tdiv2.style.top)<=5) {
		tdiv2.style.top=0+"px";
		setTimeout("move4(tdiv2)",5000);
		setTimeout("move3(first2_obj)",5000);
		return;
		}
	if (parseInt(tdiv2.style.top)>=tdiv2.offsetHeight*-1) {
		tdiv2.style.top=parseInt(tdiv2.style.top)-5+"px";
		setTimeout("move4(second2_obj)",50);
		}
	else {
		tdiv2.style.top=parseInt(scrollerheight);
		tdiv2.innerHTML=messages[i];
		if (i==messages.length-1)
			i=0;
		else
			i++;
		}
	}

function startscroll() {
	if (ie||dom) {
		first2_obj=ie? first2 : document.getElementById("first2");
		second2_obj=ie? second2 : document.getElementById("second2");
		move3(first2_obj);
		second2_obj.style.top=scrollerheight;
		second2_obj.style.visibility='visible';
		}
	else if (document.layers) {
		document.main.visibility='show';
		move1(document.main.document.first);
		document.main.document.second.top=parseInt(scrollerheight)+5;
		document.main.document.second.visibility='show';
		setTimeout("window.onresize",450);
		intializemarquee();
		}
	}
window.onload=startscroll;

// FONCTION MAIL
function is_email (emailStr) {return emailCheck(emailStr)}
function emailCheck (emailStr) {
var checkTLD=1;
var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
var emailPat=/^(.+)@(.+)$/;
var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
var validChars="\[^\\s" + specialChars + "\]";
var quotedUser="(\"[^\"]*\")";
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
var atom=validChars + '+';
var word="(" + atom + "|" + quotedUser + ")";
var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
var matchArray=emailStr.match(emailPat);
if (matchArray==null) {return false;}
var user=matchArray[1];
var domain=matchArray[2];
for (i=0; i<user.length; i++) { if (user.charCodeAt(i)>127) {return false;} }
for (i=0; i<domain.length; i++) { if (domain.charCodeAt(i)>127) {return false;} }
if (user.match(userPat)==null) {return false;}
var IPArray=domain.match(ipDomainPat);
if (IPArray!=null) { for (var i=1;i<=4;i++) { if (IPArray[i]>255) {return false;} } return true; }
var atomPat=new RegExp("^" + atom + "$");
var domArr=domain.split(".");
var len=domArr.length;
for (i=0;i<len;i++) { if (domArr[i].search(atomPat)==-1) {return false;} }
if (checkTLD && domArr[domArr.length-1].length!=2 && 
domArr[domArr.length-1].search(knownDomsPat)==-1) {return false;}
if (len<2) {return false;}
return true;
}