var ver_js=14;  // créer table__.html et h__.html sans oublier toutes les autres pages *.html
var hors=false;
var aujour=new Date(),numois=aujour.getMonth()+1,nuannee=aujour.getFullYear(),nujour=aujour.getDate();
var email_oblig=false;
var menotte='pointer';
// var stnav=navigator.userAgent.toUpperCase();if (stnav.indexOf('IE 5.',0)>=0 && stnav.indexOf('MAC',0)==-1) menotte='hand';
var lib_rg=new Array('Bridge','Tarot','Belote');
var lib_prix=new Array('150 €','125 €','100 €');
var lib_align=new Array('left','center','right');
var cle='',rep_serveur='',rep_serveur_memo='',pret=true,delai_incident=120000,stwait='Patientez...',idi=0,essai=0,lib_incident='',info_memo='';
var der_dll='',der_req='',der_act='';
var http = getHTTPObject();
var chy=new Array('?','T','K','C','P','S','V');
//var symy=new Array('','♣','♦','♥','♠','SA');  //var symy=new Array('','♣','♦','♥','♠','SA');
var id_jo=new Array('Sud','Ouest','Nord','Est');
var nbct_mx=new Array(13,18,8);
var regctrl=new RegExp("[\x00-\x1F$&=/%\x22]", "g");
var regplus=new RegExp("[+]", "g");     // pour kas.html
var id_over='*';
var anim_acc=false;
var qt_en_cours='';
var st_prime='un <B>tournoi prim&eacute;</B>';
var st_hors='<B>&agrave; volont&eacute;</B> des parties hors comp&eacute;tition';

var wwwwh=(window.location.host.toUpperCase().indexOf('WHI',0)>=0);

var tedit_mail='<input type="text" id="email" value="" size="35">';
var st_no_pub='exclusivement r&eacute;serv&eacute;e pour vous envoyer les infos utiles, aucune publicit&eacute; n’y sera envoy&eacute;e, '
 +'en aucune fa&ccedil;on ne sera public, vous pourrez vous d&eacute;sinscrire &agrave; tout moment';
var st_egarez='vous ne pourrez accèder aux tournois à votre crédit si vous égarez votre identifiant et/ou mot de passe';

var stu,stp,stcredit,stjour,stps,nudrap,stem,stopt;
var stniv=new Array();
function raz_cpt()
{var i; for (i=0;i<3;i++) stniv[i]='00';
 stu='';stp='';stcredit='0';stjour='0';stps='';nudrap='29';    // à peaufiner   +'&nudrap='+pays du navigateur ou trace de log
 stem='';stopt='0';
}
raz_cpt();



function lien_dr(act,i){maj_html('dvdrap','<a href="javascript:applique(\'dll\',\'req\',\'dem\',\'act='+act+i+'\');"><img border="0" src="/dpx/'+i+'.gif"></a>');}
function change_nudrap(st) {document.images['img_nudrap'].src='/dpx/'+st+'.gif';}      // mon compte
function valide_nudrap(st){rep_serveur_memo=rep_serveur;applique('dll','djc'+rg,'','drap'+st+'$'+cle);}   // à la table
function note_nudrap(i)   // souscrire
{
 lien_dr('selectdrpx',i);
 nudrap=i;
}



//function savoirplus(){dem_page('fonct');}
function savoirplus(){jouez('D');}

// *********************   idem dans u_delnst.pas  *****************************
var lib_bq_ip='IP',lib_bq_ccf='CCF',lib_bq_sim='SIM',lib_abonne_mensuel='AM',lib_prime_concours='PC';
var qt_moyen_ip=10,qt_maxi_ip=20;
var prix_unitaire_cts=70;
var etoile='*';
var nb_tranche_mx=6;
var qt_tranche=new Array(0,10,25,40,70,100,140);
var of_tranche=new Array(0, 1, 5,10,20, 40, 60);


function bonus_promo(qt)
{var bonus=0;
 for (var i=nb_tranche_mx;i>=1;i--) while (qt>=qt_tranche[i]) {bonus+=of_tranche[i]; qt-=qt_tranche[i];}

 /****      AVANT
 if (qt==200) bonus=100; else
 if (qt==100) bonus=40; else
 if (qt== 50) bonus=15; else
 if (qt== 30) bonus=8; else
 if (qt== qt_maxi_ip) bonus=5; else
 if (qt== qt_moyen_ip) bonus=2;
 ****/
 return bonus;
}

function st_promo(nu)
{var qt=qt_tranche[nu],bonus=bonus_promo(qt);

 st='<tr><td';
 if (nu==1) st+=' width="155"';
 st+='>'+qt+' tournois achet&eacute;s</td><td';
 if (nu==1) st+=' width="1"';
 st+='>=</td><td align="right"';
 if (nu==1) st+=' width="85"';
 st+='><strong>'+bonus+' offert';
 if (bonus>1) st+='s'; else st+='&nbsp;';

 st+='</strong></td><td align="right"';
 if (nu==1) st+=' width="62"';

 if (nu==4 || nu==6) st+=' style="color:yellow;font-weight:bold"';
 st+='>&nbsp;&nbsp;'+st_tarif(qt,lib_prime_concours)+'&euro;';

 st+='</td></tr>';
 return st;
}

// ************************************************


function dem_page(page){applique('dll','req','dem','act=page'+page);}

function enr_cooks()
{
 stu=next_dollar();
 stp=next_dollar();
 stps=next_dollar();
 nudrap=next_dollar();
 enr_cook('u',stu,365);
 enr_cook('p',stp,365);
}

function crea_bonjour()
{var st='';
 st='<font face="Times New Roman, Times, serif"><strong>&nbsp;Bonjour</strong></font><br>&nbsp;'
   +stps+'&nbsp;&nbsp;<img src="/dpx/'+nudrap+'.gif"><div class="loge">'
   +'<div class="align_ss"><a href="javascript:crea_rappel();">&nbsp;&gt; Mon compte&nbsp;&nbsp;&nbsp;&nbsp;</a></div>'
   +'<div class="align_ss"><a href="javascript:crea_souscrire(\'\',hors);">&nbsp;&gt; Souscrire&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</a></div>'
   +'<div class="align_ss"><a href="javascript:crea_conf_decx();">&nbsp;&gt; D&eacute;connexion</a></div></div>'
   +'<div class="reste">il me reste '+stcredit+' tournoi';
 if (stcredit!='0' && stcredit!='1') st+='s';
 st+='</div>';
 maj_html('etat',st);
}

function over_img(id,ov)
{
 if (id_over!=id || ov)
 {
  var st='/src/bt-'+id;
  if (id=='regle') st+=rg;
  if (ov) st+='-over';
  st+='.jpg';
  document.images['ibt'+id].src=st;
 }
}

function eff_ssm(){var i;for (i=1;i<=4;i++) elemy('ssm'+i).display='none';}
function aff_ssm(){var i;for (i=1;i<=4;i++) elemy('ssm'+i).display='block';}
var tempo=null;
function over_clst(id,ov)
{
 if (!ov) tempo=setTimeout("eff_ssm();clearTimeout(tempo);",300); else
 {
  if (tempo != null) clearTimeout(tempo);
  if (id=='') aff_ssm();
 }
 if (id!='') over_img('clst',ov);
 over_img('clst'+id,ov);
}

function over_rg(regle,ov){if (regle!=rg || ov) over_img('j'+regle,ov)}


function f_def_resultat(rg)
{var def_resultat='vos points obtenus en ';
 if (rg=='1') def_resultat+='Sud'; else def_resultat+='Nord-Sud';
 if (rg=='2') def_resultat+=' moins ceux de l’&eacute;quipe Est-Ouest';
 return def_resultat;
}

function f_def_ecart(rg,imp)
{var def_ecart='Les tournois de '+lib_rg[eval(rg)]+' se jouent en <b>duplicate</b>, votre <b>r&eacute;sultat</b> ('
    +f_def_resultat(rg)+') est compar&eacute; &agrave; celui d’un (ou plusieurs) autre(s) joueur(s) ayant jou&eacute;'
    +' la m&ecirc;me donne plusieurs jours avant vous, &agrave; chaque r&eacute;sultat des autres joueurs'
    +' l’<b>&eacute;cart</b> est ';
    if (imp) def_ecart+='converti en <b>IMP</b> selon le tableau ci-joint'; else def_ecart+='calcul&eacute;';
    def_ecart+=' et la moyenne est faite. ';
 return def_ecart;
}

function f_def_score(rg,imp)   // ici activer nbd aprés v11 par donne_mx
{var  nbd='4'; if (rg=='2') nbd='8';
 var lib='&eacute;carts'; if (imp) lib='IMP'; 
 return 'Le terme du tournoi est fix&eacute; &agrave; <b>'+nbd
  +' donnes</b>, votre <b>score</b> final est donc la somme des '+nbd+' '+lib+'. ';
}

function lib_acc()
{var st='<div class="verdana22px_decalage">';
 if (numois==1) st+='Bonne Ann&eacute;e '+nuannee; else
 if (numois==12) if (nujour>=23 && nujour<=25) st+='Joyeux No&euml;l'; else st+='Joyeuses F&ecirc;tes'; else
 {
  st+='Bonjour'; if (stu=='') st+=' et bienvenue';
 }

 st+='</div><div class="verdana12px_text">';

 if (rg=='2')
 {
  st+=f_def_ecart(rg,false)+'<br>'+f_def_score(rg,false)
//  +'Vous &ecirc;tes confront&eacute; &agrave; des humains et non plus &agrave; une machine ! '
  +'vous participez ainsi &agrave; de la grande comp&eacute;tition. '
//  +'Le <span style="color:'+yy(6)+';background-color:'+bgy(6)+'">&nbsp;Tout-Atout&nbsp;</span> est install&eacute; depuis quelques mois. '
  +'Alors, amusez-vous bien ! et tentez de gagner';
 } else
 if (stu=='') st+='<br>Jouez d&egrave;s maintenant un tournoi de '+lib_rg[eval(rg)]+' et remportez'; else
 st+='Nous sommes heureux de vous retrouver sur whisterie.com et vous remercions de votre fid&eacute;lit&eacute;. Retrouvez nous vite autour de la table de jeux de '
 +lib_rg[eval(rg)]+' et tentez de gagner';

 st+='<div class="verdana14px_bold">jusqu’&agrave; '+lib_prix[eval(rg)]+' !</div>'
 +'<br>Débutants contre débutants, champions contre champions. Votre niveau de jeu est calculé automatiquement au fur et à mesure de vos participations.'
 +' Les joueurs en duplicate auront approximativement votre handicap. <b>Même les débutants peuvent remporter les meilleurs prix</b>.</div>';

 if (!hors)
 {
  st+='<br><center><input class="bt_';
  if (numois==1 || numois==12) st+='fete';else st+='image';
  st+='" type="submit" value="Jouer !" onClick="javascript:jouez(\'\');"></center>';
 }

 return st;
}

function click_rg(regle)
{var i,st=regle.toString();
if (regle==-1) window.location='/'; else
{
 if (st!=rg)
 {
  rg=st;
  enr_cook('regle',rg,365);
 }

 if (!anim_acc)
 {
  st='<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="529" height="562" style="float:left;">'
  +'<param name="movie" value="flash/anim-home.swf" />'
  +'<param name="quality" value="high" />'
  +'<param name="wmode" value="transparent" />'
  +'<embed src="/flash/anim-home.swf" quality="high" wmode="transparent" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="529" height="562" style="float:left;"></embed>'
  +'</object>'
  +'<div id="libacc" style="width:260px; float:left; padding-top:30px;"></div>';
  mainj('*','','','','',st);
  anim_acc=true;
 }

 over_img('clst',false);
 if (document.images['ibtprix']!=null)
 {
  over_img('prix',false);
  over_img('prime',false);
  hors=true; // (rg!='0');
  if (hors) {aff_id('hors');over_img('hors',false);} else
  {
   eff_id('hors');
   document.images['ibthors'].src='/src/interligne_sm.jpg';
  }
 }
 over_img('regle',false);
 over_img('truc',false);
 for (var i=0;i<3;i++) over_rg(i,(i==regle));

 maj_html('libacc',lib_acc());
 elemy('ftacc').backgroundImage='url("/src/bg_top_'+lib_rg[regle]+'.jpg")';

 if (!ie6)
 {
  if (numois==12 || (numois==1 && nujour<9) )
  {
   st='<img src="/src/sapin.gif" style="margin:';
   if (rg=='0') st+='-110px 0 0 780';else
   if (rg=='1') st+='-120px 0 0 780';else
   st+='-100px 0 0 780';
  } else
  {
   st='<img src="/src/carte-'+lib_rg[regle]+'.png" style="margin:';
   if (rg=='0') st+='-15px 0 0 780'; else st+='30px 0 0 650';
  }
  maj_html('ibox',st+'px; position:absolute;">');
 }

 if (stp=='')
 {
  st='<font style="margin: 4px 0px 0px 10px" face="Times New Roman, Times, serif"><strong>D&eacute;j&agrave; inscrit</strong></font>'
    +'<input style="margin: 4px 0px 0px 10px; width: 123px;" type="text" id="Identifiant" value="';
  if (stem=='') st+='Identifiant'; else st+=stem;
  st+='" onFocus="focus_id(this)" onblur="blur_id(this)">'
    +'<input style="margin: 4px 0px 0px 10px; width: 123px;" type="text" id="xxxx" value="xxxx"'
    +' onFocus="focus_id(this)" onblur="blur_id(this)">'
    +'<input src="/src/bt_valider.jpg" style="padding: 6px 0pt 0pt 16px;" type="image"'
    +' onClick="javascript:valide_log();">'

    +'<div class="deloge"><div class="align_ss"><a href="javascript:crea_oublie();">&nbsp;&gt; Mot de passe oubli&eacute;?</a></div>'
    +'<div class="align_ss"><a href="javascript:crea_souscrire(\'\',hors);">&nbsp;&gt; Souscrire</a></div></div>';

  maj_html('etat',st);
  if (stem!='') focuse('xxxx');
 } else if (stps=='') applique('dll','req','dem','act=logck'+ver_js+'&u='+stu+'&p='+stp);
}
}

function st_tarif(qt,pc)
{

 if (pc==lib_abonne_mensuel)
 {
  if (qt==1) st='1000'; else
  if (qt==3) st='2700'; else
  if (qt==6) st='4800'; else
  if (qt==12) st='7200'; else st='';
 } else st=(qt*prix_unitaire_cts).toString();


 if (st.length==1) st='0'+st;
 if (st.length==2) st='0'+st;
 st=st.substring(0,st.length-2)+','+st.substr(st.length-2,2);
 return st;
}

function next_dollar()
{
 var i=rep_serveur.indexOf('$');
 if (i==-1) i=rep_serveur.length;
 var st=rep_serveur.substring(0,i);
 rep_serveur=delete_str(rep_serveur,0,i+1);
 return st;
}

function lib_abrege_rg(){if (rg=='0') return 'b'; else if (rg=='1') return 't'; else if (rg=='2') return 'e';}
function lib_privil_rg(){if (rg=='0') return 'i'; else if (rg=='1') return 'r'; else if (rg=='2') return 'l';}
function lib_abonne_rg(){if (rg=='0') return 'g'; else if (rg=='1') return 'a'; else if (rg=='2') return 'o';}

function yy(y)
{var st;
 switch (y){
  case -3:st='#FFFFFF';break;
  case -2:st='#FFFFFF';break;
  case -1:st='#FFFFFF';break;
  case  0:st='#FFFFFF';break;
  case  1:st='#006000';break;
  case  2:st='#FF3300';break;
  case  3:st='#FF0000';break;
  case  4:st='#000080';break;
  case  5:st='#333333';break;
  case  6:st='#FFFF00';break;
 }
 return st;
}

function bgy(y)
{var st;
 switch (y){
  case -3:st='#000080';break;
  case -2:st='#0000FF';break;
  case -1:st='#FF0000';break;
  case  0:st='#006000';break;
  case  1:st='#ddFFdd';break;
  case  2:st='#FFFFdd';break;
  case  3:st='#FFdddd';break;
  case  4:st='#ddddFF';break;
  case  5:st='#dddddd';break;
  case  6:st='#C0C0C0';break;
 }
 return st;
}

function aff_info(st){info_memo=st;maj_html('info',st);}

function incident(st)
{lib_incident=st;
                     
//  aff_info(lib_incident); // ici
 /*
 if (essai<=2) {if (st=='timer') autre(); else setTimeout("demarre()",500+(essai-1)*delai_incident);} else
 if (confirm(essai.toString()+'e incident(s) "'+st+'". "Ok" pour R&eacute;essayer, "Annuler" pour actualiser plus tard')) window.location.reload();
 */
}

function getHTTPObject()
{
  var xmlhttp;
  if (window.XMLHttpRequest)
    xmlhttp=new XMLHttpRequest()
  else if (window.ActiveXObject)
    xmlhttp=new ActiveXObject("Microsoft.XMLHTTP")
  return xmlhttp;
}


function act_stwait(st)
{var ok=false;
 if (st.indexOf('act=')==0)
 {
  st+='&';
  var j=st.indexOf('&');
  st=st.substring(4,j);
  if (st=='oubli' || st=='oublix' || st=='crea' || st=='cree' || st=='cres' || st=='cret' || st=='Q' || st=='upd') ok=true;
 }
 return ok;
}


function erreur_delai()
{var st='Erreur de connexion, essayez plus tard.';
 idi=0;
 alert(st);
 // aff_info(st);
 window.location.reload();
}

function applique(chem,dll,act,st)
{if (pret)
{
 pret=false;


 if (dll=='djc0') chem='b'; else if (dll=='djc1') chem='t'; else if (dll=='djc2') chem='e';

 essai++;
 der_dll=dll;
 der_act=act;
 der_req=st;
 if (act!='') act="/"+act;

 chem='/'+chem;

 http.open("POST", chem+"/"+dll+".dll"+act,true);
 http.setRequestHeader('Content-Type','application/x-www-form-urlencoded');
 http.onreadystatechange=xmlhttpChange;
 http.send(st);
 idi=setTimeout("erreur_delai();",delai_incident);


  // avant if (st.indexOf('histo')!=0)
 if (dll!='req' && st.indexOf('histo')!=0 && st.indexOf('clst$')!=0 || act_stwait(der_req))
  if (essai==1) aff_info(stwait); else aff_info(essai.toString()+'e essai(s), incident '+lib_incident);

} // else alert('pas pret');
}

function xmlhttpChange()
{
 if (http.readyState==4)
 {st=http.status;
  if (st==200)
  {
   if (idi!=0){clearTimeout(idi);idi=0;}
   essai=0;
   lib_incident='';
   rep_serveur=http.responseText;

   if (rep_serveur=='' || rep_serveur=='baba') acc(); else
   if (der_req.indexOf('act=cheque')==0) analyse_cheque(); else
   if (der_dll=='req' || der_req.indexOf('clst$')==0) analyse_box(); else
   if (der_req.indexOf('histo')==0) analyse_histo(); else
   analyse_jeux();

   pret=true;

  } else incident(st);
 }// else alert('ici readystate=');
}

function elem(st){return document.getElementById(st);}
function elemy(st){return document.getElementById(st).style;}
function maj_html(stid,st){document.getElementById(stid).innerHTML=st;}
function maj_value(stid,st){document.getElementById(stid).value=st;}
function inner(st) {return  document.getElementById(st).innerHTML;}
function elemv(st){return document.getElementById(st).value;}


function maj_m(j,i,st) {document.getElementById('m'+j.toString()+i.toString()).innerHTML=st;}
function val_m(j,i) {return  document.getElementById('m'+j.toString()+i.toString()).innerHTML;}
function exit_m(j,i) {return  document.getElementById('m'+j.toString()+i.toString())}

function aff_id(nid){elemy(nid).visibility='visible';}
function eff_id(nid){elemy(nid).visibility='hidden';}  

function focuse(nid){document.getElementById(nid).focus();}
function indice_alpha(ch){return (ch.charCodeAt(0)-65);}
function delete_str(st,i,lg){return st.substring(0,i)+st.substring(i+lg,st.length);}
function sup_espace_str(st){var reg=new RegExp(" ", "g");return st.replace(reg,'');}
function sup_char_ctrl(st){return st.replace(regctrl,'');}


function url_wh()
{var retour='http://www.whisterie.com/?rg='+rg;
 // ici plus tard si pas de problème de référencement alors lit_cook...
 if (stu!='' && stp!='' && stp!='XXXX') retour+='&u='+stu+'&p='+stp; else if (cle!='') retour+='&cle='+cle;
 // ici si stp==XXXX  alors passer le mail dans l'url
 return retour;
}

function acc(){window.location='/';}
function eval_sy(ch){var i=0; switch (ch) {case 'T':i=1;break;case 'K':i=2;break;case 'C':i=3;break;case 'P':i=4;break;case 'S':i=5;break;}return i;}
function pct(i){var st=(i*50/donne_mx).toString(),j=st.indexOf('.');if (j!=-1) st=st.substring(0,j+2);return st+'%';}
function evaldon(ch){return (ch.charCodeAt(0)-64);}

function enr_cook(nom,valeur,nbjour)
{var date_exp = new Date();
 date_exp.setTime(date_exp.getTime()+nbjour*87840000); // =24*3660000
 document.cookie=nom+'='+escape(valeur)+'; expires='+date_exp.toGMTString()+'; path=\/';
}


function sup_cook(nom)
{
 enr_cook(nom,'',-1);
 /***
 var expdel=new Date();
 expdel.setTime(expdel.getTime()-100000);
 if (lit_cook(nom)!='') document.cookie=nom+'='+escape('')+'; expires='+expdel.toGMTString();
 ***/
}

function SetCookie (name,value,expires,path,domain,secure) {
      document.cookie = name + "=" + escape (value) +
        ((expires) ? "; expires=" + expires.toGMTString() : "") +
        ((path) ? "; path=" + path : "") +
        ((domain) ? "; domain=" + domain : "") +
        ((secure) ? "; secure" : "");
    }

function lit_cook(nom)
{var i,j,st;
 if (document.cookie) st=document.cookie; else st='';
 if (st==null) st='';
 if (st!='')
 {
  st=';'+sup_espace_str(st)+';';
  i=st.indexOf(';'+nom+'=');
  if (i==-1) st=''; else {i+=2;j=st.indexOf(';',i);st=st.substring(i+nom.length,j);}
 }
 return st;
}

function openPaymentPanel(url) {
  var win = window.open(url,'iPIN_PaymentPanel','width=544,height=370,left=10,top=10,resizable=yes,status,location=no');
}

function authorize(productId) {
   var url = 'http://www.whisterie.com/acteV2/pos_init?action=authorize&pid=' + productId ;
   openPaymentPanel(url);
}

function alphabet(st)
{var ch,i,ok=true;
 for (i=0;i<st.length;i++)
 {
  ch=st.charAt(i);
  if (!(ch>='a' && ch<='z' || ch>='A' && ch<='Z')) ok=false;
 }
 return ok;
}

function nomable(st)
{var ch,i,ok=true;
 for (i=0;i<st.length;i++)
 {
  ch=st.charAt(i);
  if (!(ch>='0' && ch<='9' || ch>='a' && ch<='z' || ch>='A' && ch<='Z' || ch=='-' || ch=='.' || ch=='_')) ok=false;
 }
 return ok;
}

function verif_email(st)
{
 var tai=st.length,arob=st.lastIndexOf("@"),nom=st.substring(0,arob),pointfinal=st.lastIndexOf(".");
 if (st.indexOf('@.')>0) arob=-1;
 var extension=st.substring(pointfinal+1,tai);
 var domaine=st.substring(arob+1,pointfinal);
 return (tai<120 && arob>0 && pointfinal>arob && nom.length>=2 && domaine.length>=2 && extension.length>=2
  && extension.length<=6 && nomable(nom) && nomable(domaine) && alphabet(extension));
}

function nettoi_id_email(oblig)
{
 maj_value('email',sup_char_ctrl(elemv('email')));
 var st=elemv('email');
 if (st=='email') st='';
 if (  oblig && st=='' || st!='' && !verif_email(st) ) {alert('courriel non-conforme');focuse('email');return '';} else return st;
}

function decx()
{
 sup_cook('u'); sup_cook('p'); sup_cook('etape'); sup_cook('em');
 // sup_cook('regle');
 raz_cpt();
 click_rg(eval(rg));
}

function crea_bt_vert(stj,stl) {return '<DIV class="BtnVert2"><A href="'+stj+'">'+stl+'</A></DIV>';}

function mainj(fond,titre,bt1,bt2,idf,corp)
{var i,st='',lib_bt,lib_java;

 anim_acc=false;
 qt_en_cours='';
 if (fond=='') fond='*';
 if (id_over!='*') st=id_over;
 id_over=fond;
 if (st!='') over_img(st,false);
 if (id_over!='*') over_img(id_over,true);

 st='';
 lib_java='';
 if (bt2=='D')
 {
  lib_bt='*Voir le d&eacute;tail du s&eacute;jour &agrave; Deauville et du dictionnaire';
  lib_java='javascript:dem_page(\'sejour\',false);';
 } else
 if (bt2=='S')
 {
  lib_bt='Voir le classement de la semaine derni&egrave;re';
  lib_java='javascript:classement(\'0\');';
 } else
 {
  i=bt2.indexOf('">');
  if (i>0)
  {
   lib_bt=bt2.substring(i+2,bt2.length);
   lib_java=bt2.substring(0,i);
  }
 }

 if (titre!='') st+='<h2>'+titre+'</h2>';
 st+=corp;

 if (lib_java!='')
 {
  /*****
  st+='<div><div class="a_droite">';
  if (lib_bt.length<10)
   st+='<div class="formulaire"><input class="bt_image" type="submit" value="'+lib_bt+'" onClick="'+lib_java+'"></div>';
  else
   st+='<div class="remonte">'+lib_bt+'</div><a href="'+lib_java+'"><img src="/src/bt_flech_suite.jpg" border="0"></a>';
  st+='</div></div>';
  ****/

  st+='<div><div class="a_gauche">';
  if (lib_bt.length<10)
   st+='<div class="formulaire"><input class="bt_image" type="submit" value="'+lib_bt+'" onClick="'+lib_java+'"></div>';
  else
   st+='<a href="'+lib_java+'"><img src="/src/bt_flech_retour.jpg" style="float:left;" border="0"></a><div class="remonte">'+lib_bt+'</div>';
  st+='</div></div>';
 }

 st+='<div id="info" style="clear:both;"></div>';

 maj_html('mainj',st);
 if (idf!='') focuse(idf);
}

function crea_conf_decx()
{
 var st='<p>Notez bien votre identifiant <B>'+stps+'</B> et votre mot de passe <B>'+stp
  +'</B>, ils seront n&eacute;cessaires pour vous identifier plus tard.';
 // ici en option ?!
 if (stem=='') st+='<I>(d\'autant que nous n\'avons pas votre adresse mail pour vous les rappeler)</I>';
 st+='</p>';
 mainj('*','D&eacute;connexion','_','javascript:decx();">Confirmer','',st);
}

function valide_log()
{var u=sup_char_ctrl(elemv('Identifiant')),p=sup_char_ctrl(elemv('xxxx'));
 maj_value('xxxx',p);
 maj_value('Identifiant',u);
 if (u!='')
 {
  if (p.length==4 && !isNaN(p)) applique('dll','req','dem','act=logma&u='+u+'&p='+p);
  else {alert('mot de passe erronné');focuse('xxxx');}
 }
}

function demarre_log()
{var i,j,st='',retour_bq=location.search.toUpperCase(),reloc=false;

 stu=lit_cook('u');
 stp=lit_cook('p');
 rg=lit_cook('regle');

 if (retour_bq!='')
 {

   reloc=true; // !!!!!!!!!!!!!!!!!!!!!!!!

   if (retour_bq.charAt(0)=='?') retour_bq=retour_bq.substring(1,retour_bq.length);
   i=retour_bq.indexOf('RG=');
   if (i>=0)
   {
    rg=retour_bq.charAt(i+3);
    enr_cook('regle',rg,365); // !!!!!!!!!!!!!!!!
   }
   if (stu=='' && stp=='')
   {
    j=retour_bq.indexOf('P=');
    if (j>=0)
    {
     stp=retour_bq.substr(j+2,4);
     i=retour_bq.indexOf('U=');
     if (i>=0)
     {
      j=retour_bq.indexOf('&',i);
      if (j<0) j=retour_bq.length;
      stu=retour_bq.substring(i+2,j);

      enr_cook('u',stu,365); enr_cook('p',stp,365);   // !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

     } else stp='';
    }
   }
   i=retour_bq.indexOf('CLE=');
   if (i>=0)
   {
    j=retour_bq.indexOf('&',i);
    if (j<0) j=retour_bq.length;
    cle=retour_bq.substring(i+4,j);
    enr_cook('cle',cle,365);
   }
 }

 if (reloc) window.location='/'; else
 {
  if (rg<'0' || rg>'2') rg='0';
  click_rg(eval(rg));
  if (st!='') aff_info(st);
 }

}

function crea_oublie()  // avant pour recevoir votre mot de passe laissez-nous votre courriel:
{var st='<h4>laissez-nous la m&ecirc;me adresse courriel que celle que vous avez mis dans votre formulaire d\'inscription:</h4>'+tedit_mail;
 mainj('*','Mot de passe oubli&eacute;','_','javascript:valide_oublie();">Valider','','<div>'+st+'</div>');
 focuse('email');
}

function valide_oublie() {var st=nettoi_id_email(true); if (st!='') applique('dll','req','dem','act=oubli&em='+st);}


function open_suivi()
{
// window.open('http://www.internetplus.fr/suivi-conso-internet+','name','');
 window.open('https://whainternet.orange.fr/app-am/node','name','');
}

var suivi_conso='<br>acc&eacute;dez au suivi conso Internet+ sur le lien suivant:'
  +'<br><a style="color:#FF3300;" href="javascript:open_suivi();">Suivi conso Internet+</A>';


function maj_soit()
{var qt=0,soit='';bonus=0;
 qt_en_cours=elemv('qtcom');
 if (qt_en_cours!='' && !isNaN(qt_en_cours)) qt=eval(qt_en_cours);
 if (qt<=0 || qt>500)
 {
  qt=0;
  maj_value('qtcom','')
  focuse('qtcom');
 } else
 {
  bonus=bonus_promo(qt);
  soit='soit <b>'+st_tarif(qt,lib_prime_concours)+'&euro;</b> pour '+qt+' tournoi';
  if (qt>1) soit+='s';
  if (bonus>0)
  {
   soit+=' + <b>'+bonus+' offert';
   if (bonus>1) soit+='s';
   soit+='</b> = '+(qt+bonus)+' tournois.';
  }
 }
 maj_html('soit',soit);
 return qt;
}


function st_secure(qt,pc)
{
 return '<span class="titre3"><br><br>Paiement en ligne s&eacute;curis&eacute;&nbsp;<img src="/src/clef.gif">&nbsp; pour '
  +st_tarif(qt,pc)+'&euro;</span>';
}

function openchq(st)
{
//window.location='cheque.html?'+st;
window.open('cheque.html?'+st,'name','height=700,width=630,toolbar=no,directories=no,status=no,linemenubar=no,scrollbars=no,resizable=no,modal=yes');
}



function aff_diff_mode_payement(bienvenue)
{qt_mini_cb_chq=5;
 var st,nb_logo=0,pc=lib_prime_concours;
 st=next_dollar();
 var i=st.indexOf(lib_abonne_mensuel);
 if (i>0)
 {
  st=st.substring(0,i);
  pc=lib_abonne_mensuel;
 }
 var qt=eval(st);
 var logo_ccf=next_dollar();
 var logo_wha=next_dollar();
 var logo_chq=next_dollar();
 var st_logo='<table cellpadding="0" cellspacing="20" border="0"><Tr>';

 if (pc==lib_abonne_mensuel || qt>=qt_mini_cb_chq)
 {
  if (logo_ccf!=''){nb_logo+=3;st_logo+='<td class="bt_mp">Par carte bancaire<br><br>'+logo_ccf+'</td>';}
  if (logo_chq!='')
  {nb_logo++ ;
   st_logo+='<td class="bt_mp">Par chèque<br><br>'+'<a href="javascript:openchq(\''+logo_chq+'\');"><IMG src="/src/cheque.jpeg" border="0"></A></td>';
  }
 }

 if ( (pc==lib_abonne_mensuel || qt<=10 || qt==25 || qt==40)  && (logo_wha!='') )
 {nb_logo++;
  st_logo+='<td class="bt_mp">Par votre facture d\'acc&egrave;s &agrave; Internet<br>'
  +'<a href="/acteV2/pos_init?action=authorize&pid='+logo_wha
  +'"><IMG src="/src/bt_wha.jpg" border="0"></A>'
  +suivi_conso+'</td>';
 }



 if ( (qt<qt_mini_cb_chq && pc!=lib_abonne_mensuel) || nb_logo==0)
  st_logo+='<td class="bt_mp">Pour un paiement par <b>carte bancaire</b> ou par ch&egrave;que, vous devez acheter <b>au moins '
  +qt_mini_cb_chq+'</b> tournois.<br>Pour un paiement par <b>Internet+</b> choisissez un montant inf&eacute;rieur ou &eacute;gal à 28&euro;.</td>';

 st_logo+='</tr></table>';

 if (bienvenue=='') st=''; else st='<br><br><span class="titre3_bienvenue">'+bienvenue+'</span><br><span class="lib_mp">'+st_egarez+'</span><br>';
 st+=st_secure(qt,pc);

 if (nb_logo>0)
 {
  st+='<span class="com_mp">&nbsp;&nbsp;(cliquez sur ';
  if (nb_logo==1) st+='le logo'; else st+='l\'un dès logos';
  st+=' ci-dessous)</span>';
 }

 maj_html('commande',st+st_logo);
}


function onou(qt,pc)
{var st;

 if (pc==lib_abonne_mensuel)
 {
  maj_html('lun','');
  maj_html('ou','');
  eff_id('btforfait');
 } else
 if (hors)
 {          
  maj_html('ou','');
  maj_html('lautre','');
 }

 if (stp=='')
 {
  st='<span class="titre3"><br>Choisissez un pseudonyme sympa :&nbsp;&nbsp;</span><input type="text" id="pseudo" size="15" value="">'
  +'<span class="com_mp">&nbsp;&nbsp;(indispensable)</span><br><span class="lib_mp">il vous servira d\'identifiant pour accèder aux tournois achetés.</span>'

  +'<span class="titre3"><br><br>Choisissez votre couleur défendue :&nbsp;&nbsp;</span><span id="dvdrap"></span>'
  +'<span class="com_mp">&nbsp;&nbsp;(cliquez sur le drapeau)</span><br><span class="lib_mp">vous pouvez choisir les couleurs de l\'Europe ou de n\'importe lequel des 192 états membres de l\'O.N.U.</span>'

  +'<span class="titre3"><br><br>Entrez votre adresse courriel :&nbsp;&nbsp;</span>'+tedit_mail
  +'<span class="com_mp">&nbsp;&nbsp;(facultatif mais recommandé)<br></span><span class="lib_mp">si vous n\'indiquez pas d\'adresse courriel liée au compte, '
  +st_egarez+' et nous ne pourrons entrer en contact avec vous en cas de problème ou pour vous informer.</span>'

  +st_secure(qt,pc)+'&nbsp;&nbsp;<input class="bt_image" type="submit" value="Continuer" onClick="continue_pseudo('+qt+',\''+pc+'\')">';

  maj_html('commande',st);
  lien_dr('selectdrpx',nudrap);

 } else
 {
  st='ns='+stu+'&psw='+stp+'&qt='+qt.toString()+'&rg='+rg+'&pc='+pc;
  if (stem!='') st+='&mail='+stem;
  applique('dll','req','pminit',st);
 }

}


function onclick_forfait(){onou(1,lib_abonne_mensuel);}

function onchange_qtcom()
{var qt=maj_soit();
 if (qt!=0) onou(qt,lib_prime_concours);
}


function crea_souscrire(titre,ou_abonne)
{var st='';

if (titre!='') st='<span class="titre3_acc"><br>'+titre+'</span>';

st+='<div id="lun"><div class="encart_promo_tp"><div class="tableau_tournoi_prime">'
+'<table>'+st_promo(1)+st_promo(2)+st_promo(3)+st_promo(4)+st_promo(5)+st_promo(6)+'</table></div></div>'

+'<span class="lib_ens_conc"><br>Cette semaine plus de 600&euro; &agrave; gagner sur l\'ensemble de nos concours de Bridge Tarot et Belote</span>'
+'<span class="titre3"><br>Participez aux tournois primés : prix unitaire de 0,70 &euro;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Combien en voulez-vous ?&nbsp;&nbsp;&nbsp;&nbsp;</span>'
+'<input type="text" id="qtcom" onChange="onchange_qtcom();" size="4" value="">'+crea_mini_bouton('suite',';')
+'<br><span class="lib_mp_vert" id="soit">Tapez le nombre de tournois à acheter. Les tournois offerts s’ajouteront automatiquement après validation.</span><br></div>';

if (ou_abonne)
{
 st+='<div id="ou"><br><span class="titre3">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OU<br><br></span></div>'
 +'<div id="lautre"><span class="titre3">Jouez des parties à volonté' //  de '+lib_rg[eval(rg)]
 +' pendant un mois&nbsp;:&nbsp;&nbsp;forfait unique 10&euro;&nbsp;&nbsp;&nbsp;</span>'
 +'<span id="btforfait">'+crea_mini_bouton('suite','onclick_forfait();')+'</span>'
 +'<br><span class="lib_mp_vert">' // +'*limité à un usage raisonnable ne dépassant pas 500 donnes par usager sur une même journée.<br>'
 +'Pas de dotation ni de classement sur ces parties.</span>'
 +'<div class="encart_promo_hc"><div class="tableau_partie_libre"><table><tr><td width="220px" align="center">Jouez ';
 // if (rg=='2') st+='à la '; else st+='au '; st+=lib_rg[eval(rg)];
 st+='<br>sans compter<br>pendant un mois !</td><td width="100px" align="center" style="color:yellow;font-weight:bold">10&euro;</td></tr></table></div></div></div>';
} else
{
 st+='<div id="ou"></div><div id="lautre"></div>';
}


mainj('*','','_','','',st+'<DIV id="commande"></DIV>');
focuse('qtcom');
}

function jouez(clef)
{             
// if (clef=='' && stp=='') crea_pseudo(); else


 if (clef=='' && stp=='') crea_souscrire('Bonjour !',false); else
 if (clef=='A' && stp=='') crea_souscrire('Bonjour !',hors); else
 if (clef=='' && stcredit=='0') crea_souscrire('Votre compte est à zéro',false); else
 if (clef=='A' && stjour=='0') crea_souscrire('Votre abonnement est expiré',hors); else
 if (clef=='A' && stjour=='-1') crea_souscrire('Vous n\'êtes pas abonné',hors); else
 {var st='/src/table'+ver_js.toString()+'.html?';

  if (clef=='D') st+=lib_abrege_rg(); else
  if (clef=='A') st+=lib_abonne_rg(); else
  if (clef=='P' || clef=='B') st+=lib_privil_rg(); else st+=rg;


  if (clef=='D')
  {
   if (stu=='') stu=lit_cook('u');
   if (stu!='') {stp=lit_cook('p'); /* option r1 */ if (stp=='') stp='XXXX'; /**/}
  }


  if (stu!='' && clef=='B') st+='XXXX'+stu; else if (stp!='') st+=stp+stu;


  window.location=st;
 }
}

function classement(encours)
{
 applique('dll','djc'+rg,'','clst$PC$'+encours+stp+stu);        // ou $PDA$
}

function crea_rappel()
{var st;
 jeu_de_carte='';
 applique('dll','req','dem','act=adr&jx='+rg+'&ns='+stu+'&p='+stp);
}

function demarre_question(){focuse('email');}

function remplace_bt_par_menotte()
{
 maj_html('btn','');
 elemy('cltap').cursor=menotte;
 aff_info('Cliquez sur le tapis.');
}

function analyse_box()
{var st,produit_ip,action;

 if (act_stwait(der_req)) aff_info(''); // pour effacer stwait

 if (der_act=='pminit') aff_diff_mode_payement(''); else
 {
  action=next_dollar();


  if (action=='selectdrap') maj_html('dvdrap','<select id="nudrap" size="0" OnChange="valide_nudrap(this.value)">'
  +rep_serveur+'</select>'); else

  if (action=='selectdrpx') maj_html('dvdrap','<select id="nudrap" size="0" OnChange="note_nudrap(this.value)">'
  +rep_serveur+'</select>'); else


  if (action=='mainj') mainj(next_dollar(),next_dollar(),next_dollar(),next_dollar(),next_dollar(),rep_serveur);else
  if (action=='raz') decx(); else

  // à peaufiner
  if (action=='idinc') {alert('identifiant inconnu');focuse('Identifiant');} else
  if (action=='eminc') {alert('Attention, nous n\'avons pas de compte correspondant à cet adresse mail.');focuse('email');} else
  if (action=='emdej' || action=='eedej')
  {
   st=next_dollar();
   alert('Vous avez déjà un compte avec le courriel '+st
    +' , un rappel du mot de passe vient d\'y être envoyé. Saisissez-le dans la case ci-contre à gauche et validez.');
   if (action=='emdej')
   {
    // focuse('email');
    maj_value('Identifiant',st);
    focuse('xxxx');
   } else {stem=st;enr_cook('em',stem,365);remplace_bt_par_menotte();}
  } else
  if (action=='embiz')
  {
   alert('Vous avez déjà un compte avec le courriel '+next_dollar());
   focuse('email');
  } else
  if (action=='psdej' || action=='newdej')
  {
   alert('L\'identifiant '+next_dollar()
    +' existe déjà, merci d\'en choisir un autre ou de vous identifier avec son mot de passe correspondant.');
   focuse('pseudo');
  } else
  if (action=='iddej') {stem=next_dollar();enr_cook('em',stem,365);remplace_bt_par_menotte();} else
  if (action.indexOf('login')==0)
  {

   stcredit=next_dollar();
   stem=next_dollar();
   stopt=next_dollar();
   if (stopt=='') stopt='0';    // ici voir avec la dll
   for (i=0;i<3;i++)
   {
    stniv[i]=next_dollar();
    if (stniv[i]=='') stniv[i]='00';       // ici voir avec la dll
    if (stniv[i].length==1) stniv[i]='0'+stniv[i];       // ici voir avec la dll
   }
   enr_cooks();
   stjour=next_dollar();

   crea_bonjour();

   var ver_dll;
   if (action=='login') ver_dll=9; else ver_dll=eval(action.substring(5,action.length));

   if (ver_js<ver_dll) mainj('*','Nouvelle version.','_','','',
     '<a href="javascript:window.location.reload();">Cliquez ici pour actualiser la page.</a>'
     +'<p>(ou cliquez sur le bouton "actualiser" de votre navigateur)</p>');
   else if (qt_en_cours!='') crea_souscrire('',hors);


  } else
  if (action=='crea')
  {
   enr_cooks();
   crea_bonjour();
   stem=next_dollar();
//   enr_cook('em',stem,365);
   mainj('*','Bienvenue et merci de votre inscription.','_','','',next_dollar());
  } else
  if (action=='cres')
  {
   enr_cooks();
   crea_bonjour();
   stem=next_dollar();
//   enr_cook('em',stem,365);

   aff_diff_mode_payement('Vous &ecirc;tes connect&eacute; sous le pseudo <B>'+stps
    +'</B> et le mot de passe <B>'+stp+'</B> ne les oubliez pas !');

  } else

  if (action=='pwapres')
  {stu=next_dollar();
   stem=next_dollar();
   enr_cook('u',stu,365);
   enr_cook('em',stem,365);  // ici option
   enr_cook('etape','1',365);
   f_debuter_la_partie();
  } else
  if (action=='pwqqi')
  {stu=next_dollar();
   stem=next_dollar();
   enr_cook('u',stu,365);
   enr_cook('em',stem,365);  // ici option
   enr_cook('etape','2',365);
   acc();
//   f_qq_instant_pw();
  } else
  if (action=='pwsvp')
  {stu=next_dollar();
   stem=next_dollar();
   enr_cook('u',stu,365);
   enr_cook('em',stem,365); // ici  option
   enr_cook('etape','n',365);
   f_dem_pw(stem,'oub',true);
  } else
  if (action=='pwok')
  {
   enr_cooks();
   jouez('P');
  } else
  if (action=='pwinc') {alert('Le mot de passe ne correspond pas à l\'identifiant');focuse('xxxx');} else


  if (action=='aroublierr') alert('erreur d\'envoi'); else
  if (action=='aroubliok') f_dem_pw(stem,'',true); else


  if (action=='oubli')
  {
   stem=next_dollar();
   mainj('*','Message','_','','','<p>Consultez votre messagerie '+stem
    +' , vous y trouverez les r&eacute;f&eacute;rences de votre compte.</p>');

   maj_value('Identifiant',stem);
   focuse('xxxx');
//   click_rg(eval(rg));
  } else
  if (action=='upd')
  {
   st=next_dollar(); if (st!='') stem=st;
   st=next_dollar(); if (st!='') stps=st;
   nudrap=next_dollar();
   if (rep_serveur=='') click_rg(eval(rg)); else
   {
    mainj('*','Votre demande a &eacute;t&eacute; enregistr&eacute;e:','_','','',rep_serveur);
    var i=rep_serveur.indexOf('nouveau solde de');    // idem dans u_req.pas
    if (i>0)
    {
     var st=rep_serveur.substr(i+17,8);
     stcredit=st.substr(0,st.indexOf(' '));
    }
   }
   crea_bonjour();

  } else alert(action+rep_serveur);

 } // action

 rep_serveur=rep_serveur_memo;
 rep_serveur_memo='';
}

function envoyer()
{
 var st=nettoi_id_email(true);
 if (st!='')
 {
  var stt=elem('mess').value.replace(regctrl,etoile);
  if (stt.length<2) {alert('texte incomplet');focuse('mess');} else
  if (stt.length>1000) {alert('texte trop long (1000 caractères maxi)');focuse('mess');} else
  applique('dll','req','dem','act=Q&em='+st+'&mess='+stt);
 }
}

function focus_id(sender){if (sender.value==sender.id) sender.value='';}
function blur_id(sender)
{
 sender.value=sup_char_ctrl(sender.value);
 if (sender.value=='') sender.value=sender.id;
}
function change_accpub(sender)
{
 if (sender.value=='1') sender.value='0'; else sender.value='1';
 sender.style.Color='#CCCCCC';
}
function change_id(sender){sender.style.backgroundColor='#EEEEEE';}

var jeu_de_carte='';
function change_jeude(sender){jeu_de_carte=sender.value;}  

function adr_post_incomp()
{var ok='';
 for (var i=0;i<document.formadr.elements.length;i++)
  if (document.formadr.elements[i].id==document.formadr.elements[i].value) ok=document.formadr.elements[i].id;
 return ok;
}

function valide_gain(gain_chq,gain_tournois,crea)
{var ok=true,st='',act='',chq='';

 if (gain_chq>0) chq=elemv('ecompansation');

 if (chq=='-1') {ok=false; alert('Vous devez choisir le montant du chèque');} else
 if (elemv('email')!='email' || crea) {st=nettoi_id_email(crea);if (st=='') ok=false;}

 if ((ok) && (chq!='' || (jeu_de_carte!='' && jeu_de_carte!='N')))
 {
  st=adr_post_incomp();
  if (st!='') {ok=false;alert('complétez le champ "'+st+'"');focuse(st);}
 }

 if (ok)
 {
  act='act=upd&u='+stu+'&p='+stp+'&accpub='+elemv('accpub');
  if (stem!=elemv('email')) act+='&em='+elemv('email');

  if (!crea)
  {
   // ici nettoyer nom=nom,prenom=prenom,ville=ville ...
   act+='&nudrap='+elemv('nudrap')
    +'&genre='+elemv('egenre')
    +'&nom='+elemv('nom')
    +'&prenom='+elemv('prenom')
    +'&rue='+elemv('rue')
    +'&cp='+elemv('cp')
    +'&ville='+elemv('ville')
    +'&pays='+elemv('pays');
   if (stps!=elemv('pseudo')) act+='&ps='+elemv('pseudo');
   if (gain_tournois>0) act+='&gg='+gain_tournois.toString();
   if (chq!='') act+='&chq='+chq;
   if (jeu_de_carte!='N' && jeu_de_carte!='') act+='&carte='+jeu_de_carte;
  }

  applique('dll','req','dem',act);
  jeu_de_carte='';
 }
}

function contact()
{var st='<p>Une question ? une remarque ? Nous sommes &agrave; votre &eacute;coute.<BR>'
 +'Sachez que vos remarques sont souvent pertinentes et toujours les bienvenues.<BR>'
 +'Elles sont lues attentivement et chaque question aura une r&eacute;ponse.</p><br>'
 +'<h4>Laissez-nous un courriel valide pour vous r&eacute;pondre</h4>'
 +tedit_mail+'<br><br><br>'
 +'<h4>Votre message</h4>'
 +'<TEXTAREA id="mess" cols="40" rows="10"></TEXTAREA>';
 mainj('*','Contact','_','javascript:envoyer();">Envoyer','','<div>'+st+'</div>');
 if (stem=='' ) focuse('email'); else
 {
  focuse('mess');
  maj_value('email',stem);
 }

}

function crea_pseudo()
{var st='<table cellpadding="0" cellspacing="25" border="0"><Tr><TD>'
 +'<h4>Choisissez un pseudonyme:</h4>'
 +'<input type="text" id="pseudo" value="" size="15"><p>(Il vous servira d\'identifiant)</p><br><br><br>'
 +'<h4>Entrez votre adresse courriel:</h4>'
 +tedit_mail+'<p>(';
 if (email_oblig) st+='N&eacute;cessaire pour valider votre compte, '; else st+='Facultatif, ';
 st+=st_no_pub+')</p>'
 +'</TD><TD><div class="verdana12px_text">'
 +'Cette semaine plus de <b>600 &euro;</b> &agrave; gagner sur l’ensemble de nos concours de Bridge Tarot et Belote,'
 +' et aussi des jeux de cartes et des milliers de tournois &agrave; remporter.'
 +'</div></TD></Tr></TABLE>';
 mainj('*','Inscription','_','javascript:valide_pseudo();">Valider','','<div>'+st+'</div>');
 focuse('pseudo');
}

function pseudo_interdi(st)
{
 return ( (st=='')
 || (st.length>=2 && (st.charAt(0)=='a' || st.charAt(0)=='A') && !isNaN(st.substring(1,st.length)))
 || (st.length==8 && !isNaN(st.substring(1,8)))
 || (st.length==4 && !isNaN(st))
 || (st=='vous')
 || (st=='anonyme')
 );
}

function nettoi_id_pseudo()
{
 maj_value('pseudo',sup_char_ctrl(elemv('pseudo')));
 var st=elemv('pseudo');

 if (st!='')
 if (verif_email(st))
 {
  st='';
  alert('pour des raisons de confidentialité, n\'utilisez pas d\'adresse mail comme pseudonyme');
 } else
 if (pseudo_interdi(st))
 {
  st='';
  alert('pseudonyme déjà existant !');
 }

 if (st=='') focuse('pseudo');

 return st;
}

function valide_pseudo()
{var st=nettoi_id_pseudo();
 if (st!='')
 {
  st='act=crea&ps='+st+'&nudrap=0';   // à peaufiner   +'&nudrap='+pays du navigateur ou trace de log
  if (!email_oblig && elemv('email')=='')
  {
   cle=f_cle();
   applique('dll','req','dem',st+'&cle='+cle);
  } else
  {
   var ste=nettoi_id_email(email_oblig);
   if (ste!='') applique('dll','req','dem',st+'&em='+ste);
  }
 }
}

function continue_pseudo(qt,pc)
{var st=nettoi_id_pseudo();
 if (st!='')
 {
  st='act=cres&ps='+st+'&nudrap='+nudrap+'&qt='+qt.toString()+'&rg='+rg+'&pc='+pc;
  if (!email_oblig && elemv('email')=='')
  {
   cle=f_cle();
   applique('dll','req','dem',st+'&cle='+cle);
  } else
  {
   var ste=nettoi_id_email(email_oblig);
   if (ste!='') applique('dll','req','dem',st+'&em='+ste);
  }
 }
}

function evalcoul(st)
{var i,ch;
 if (st=='PA') i= 0; else
 if (st=='X' ) i=-1; else
 if (st=='XX') i=-2; else
 if (st=='AL') i=-3; else
 {
  ch=st.charAt(1);
  if (ch=='V') i=6; else
  if (ch=='S' || ch=='A' || ch==' ' || ch>='0' && ch<='9') i=5; else
  if (ch=='Z') i=eval(st.charAt(0)); else i=eval_sy(ch);
 }
 return i;
}

function evalniv(st)
{var i=0;
 st=st.toUpperCase();
 if (st.charAt(0)=='Z') i=8; else
 if (st.length==2 && st.charAt(1)=='Z') i=9; else
 if (!isNaN(st.charAt(0))) i=parseInt(st.charAt(0));
 return i;
}

function id_onglet(niv,y)
{var st;
 if (niv==0)
  switch (y){case 0:st='PA';break;case -1:st='X';break;case -2:st='XX';break;case -3:st='AL';break;}
 else if (niv==8) st='Z'+chy[y]; else if (niv==9) st=y.toString()+'Z'; else st=niv.toString()+chy[y];
 return st;
}

function lib_id_onglet(niv,y,sz)
{var st;
 if (niv==0)
 {
  st=id_onglet(niv,y);
  if (st=='PA') st='Passe'; else
  if (st=='AL') st='?';
 } else
 if (rg_tarot) switch (y)
 {
  case 1:st='Prise';break;
  case 2:st='Garde';break;
  case 3:if (sz<=3) st='G.Sans'; else st='Garde Sans';break;
  case 4:if (sz<=3) st='G.Cont'; else st='Garde Contre';break;
 } else
 {
  if (rg_belote) {niv=10*niv+70;if (niv==80) niv=82; else if (niv==160) niv=250;}
  st='<B>'+niv+'</B>';
  if (y<=4) st+='<img src="/ic/sy'+sz+chy[y]+'.gif">'; else
  {                    // pas de m/ car appelé par m/table* ou h*.html
   st+='<B>';
   if (y==6) st+='TA'; else st+='SA';
   st+='</B>';
  }
 }
// if (sz<=3 && rg_tarot) st=st.small();
 return st;
}

function st_expli_score(imp){return f_def_ecart(rg,imp)+f_def_score(rg,imp);}

function grille_imps()
{var bareme=new Array(0,20,50,90,130,170,220,270,320,370,430,500,600,750,900,1100,1300,1500,1750,2000,2250,2500,3000,3500,4000);
 var st='<table style="font-size:9" cellpadding="0" cellspacing="0" border="0"><tr><td rowspan="26" width="210">'
+'<table style="font-size:13" cellpadding="8" cellspacing="0" border="0"><tr><td>'
+st_expli_score(true)

 +'</td></tr></table>'
 +'</td>'

 +'<td colspan="2" align="center"><b>Ecart</b></td><td align="center"><b>IMP</b></td>'
 +'</tr>';

 for (var i=0;i<=24;i++)
 {
  st+='<tr><td>de '+bareme[i]+'</td><td>&nbsp;';
  if (i<24) st+='&agrave; '+(bareme[i+1]-10); else st+='et plus';
  st+='&nbsp;</td><td align="center">'+i+'</td></tr>';
 }
 st+='</table>';
 return st;
}

function crea_mini_bouton(fl,fct)
{if (fct=='') return ''; else
 {if (fct.indexOf(';')!=-1) fct='javascript:'+fct;
  return '<a href="'+fct+'"><img src="/src/flech_'+fl+'.jpg" border="0"></a>';
 }
}

function crea_bouton_tr(droi,fct,lib)
{var st='justify'; if (droi) st='right';
 return '<TR><TD colspan="4" width="100%" style="font-size:12px;text-align:'
  +st+';">'+lib+'</TD><TD valign="middle">'+crea_mini_bouton('suite',fct)+'</TD></TR>';
}

function crea_bouton_double(fct1,lib1,lib2,fct2)
{return '<TR><td width="1%" valign="middle">'+crea_mini_bouton('retour',fct1)
 +'</td><TD style="font-size:12px;text-align:left;">'+lib1
 +'</TD><TD></td><td style="font-size:12px;text-align:right;">'
 +lib2+'</td><td width="1%" valign="middle">'+crea_mini_bouton('suite',fct2)+'</TD></TR>';
}

function crea_boutons(lg,st)
{
 return '<DIV style="background-color:#DDDDDD;width:'+lg
 +';border-style:groove;border-width:2px;border-color:gray;"><TABLE cellpadding="2" cellspacing="0" border="0">'
  +st+'</table></DIV>';
}

function crea_bouton(droi,js,fct,lib)
{if (js) fct='javascript:'+fct;
 var st='<div><div class="a_';
 if (droi) st+='droite'; else st+='gauche';
 st+='"><a href="'+fct+'">';
 if (!droi) st+='<img src="/src/flech_retour.jpg" style="float:left;" border="0">';
 st+='<div class="remonte">'+lib+'</div>';
 if (droi)  st+='<img src="/src/flech_suite.jpg" border="0">';
 return st+'</a></div></div>';
}

function deconnexion(){sup_cook('u'); sup_cook('p'); sup_cook('etape'); sup_cook('em'); raz_cpt();}

function f_dem_new_jx()
{
 if (stu==''){stu=lit_cook('u');if (stu!='') stp=lit_cook('p');}

 if (stu!='' && stp!='') jouez('P'); else
 {
  stem=lit_cook('em');
  var etape=lit_cook('etape');
  elemy('bt_privi').backgroundImage='url(/src/bouton1b-fleche.jpg)';
  if (stem=='') maj_html('info',crea_boutons(220,
   crea_bouton_tr(true,'f_redem_em_jx();','Vous avez re&ccedil;u un mot de passe')
   +crea_bouton_tr(true,'f_dem_em_jx();','Demandez un mot de passe')));
  else
  if (etape=='1') f_debuter_la_partie(); else
  if (etape=='2') f_dem_pw(stem,'',true); else
  f_dem_pw(stem,'oub',true)
  ;
 }
}

function f_dem_em_jx()
{
 if (stem=='') stem=lit_cook('em');     // ici option
 maj_html('info',crea_boutons(370,crea_bouton_tr(false,'','Pour recevoir votre acc&egrave;s aux <B>parties &laquo;privil&egrave;ge&raquo; gratuites</B> entrez votre adresse courriel :')
 +crea_bouton_tr(true,'clic_em_jx();',tedit_mail)
 +crea_bouton_tr(false,'','votre adresse ne sera ni revendue, ni &eacute;chang&eacute;e, ni utilis&eacute;e &agrave; l\'ext&eacute;rieur.'.small()))
 //  'Pour en savoir plus :informations l&egrave;gales'.small()

 +'ou'.small()

 +crea_boutons(370,crea_bouton_tr(false,url_wh(),'Participez pour seulement 0,70&euro; &agrave; '+st_prime+' sur le site Whisterie.com (sans m&ecirc;me avoir &agrave; vous identifier)')));
 // pas assez de place pour le hors
 if (stem!='') maj_value('email',stem);
 focuse('email');   
}

function f_redem_em_jx()
{
 if (stem=='') stem=lit_cook('em');  // ici option
 maj_html('info',crea_boutons(300,
   crea_bouton_tr(false,'','Entrez votre adresse courriel :')
  +crea_bouton_tr(true,'clic_em_ou_pseudo_jx();',tedit_mail)));
 if (stem!='') maj_value('email',stem);
 focuse('email');     
}

function f_modif_em_jx(){ deconnexion(); f_redem_em_jx();}

function f_cle()
{var cleloc=lit_cook('cle');
 if (cleloc=='')
 {cleloc=aujour.getTime().toString();
  cleloc='D'+cleloc.substr(cleloc.length-7,7);
  enr_cook('cle',cleloc,365);
 }
 return cleloc;
}

function clic_em_jx()
{var st=nettoi_id_email(true);
 if (st!='')
 {cle=f_cle();
  applique('dll','req','dem','act=crex&em='+st+'&ps='+cle+'&rg='+lib_abrege_rg());
 }
}

function clic_em_ou_pseudo_jx()
{
 maj_value('email',sup_char_ctrl(elemv('email')));
 var st=elemv('email');
 if (st!='')
 if (verif_email(st)) clic_em_jx(); else
 if (pseudo_interdi(st) || st.indexOf('@')>=0) {alert('identifiant non-conforme');focuse('email');} else f_dem_pw(st,'em',true);
}

function f_oublie_fx(){if (stem!='') applique('dll','req','dem','act=oublix&em='+stem);}

function verif_pw(req)
{var p=sup_char_ctrl(elemv('xxxx'));
 if (p.length==4 && !isNaN(p))
 if (req) applique('dll','req','dem','act=xxxx&em='+stem+'&p='+p); else
 {
  rep_serveur_memo=rep_serveur;
  applique('dll','djc'+rg,'','xxxx'+p+'$'+cle);
 }
 else {alert('mot de passe erronné');focuse('xxxx');}
}

function f_dem_pw(st,mess,req)
{
 elemy('info').width=300;

 if (mess=='err') st=crea_bouton_tr(false,'','erreur de mot de passe.');else
 if (mess=='em')
 {
  stem=st;     // ici ! vrai/faux e-mail
  st=crea_bouton_tr(true,'f_modif_em_jx();','Oubli&eacute; ?')
//    +crea_bouton_tr(true,'deconnexion();','Déconnexion')
    ;
 }
 else
 if (mess=='oub')
 {
  st=crea_bouton_tr(true,'f_oublie_fx();','Oubli&eacute; ? le recevoir &agrave; l\'adresse<br>'+st)
    +crea_bouton_tr(true,'f_modif_em_jx();','Changer d\'adresse')
//    +crea_bouton_tr(true,'deconnexion();','Déconnexion')
    ;
 }
 else
 {
  st=crea_bouton_tr(false,'','Nous vous l\'avons envoy&eacute; &agrave; l\'adresse '+st)
    +crea_bouton_tr(true,'f_modif_em_jx();','Changer d\'adresse')
  ;
 }

 maj_html('info',crea_boutons(300,
  crea_bouton_tr(true,'verif_pw('+req+');','Votre mot de passe :<input style="background-color:#ffffff" type="text" id="xxxx" value="" size="4">')
  +st));
 focuse('xxxx');
}


function f_debuter_la_partie()
{
 maj_html('info',crea_boutons(300,
  crea_bouton_tr(false,'','Apr&egrave;s avoir d&eacute;but&eacute; la partie, vous recevrez sur '+stem+' un mot de passe qui vous sera demand&eacute; plus tard.')
 +crea_bouton_double('f_modif_em_jx();','Changer d\'adresse','D&eacute;buter la partie','jouez(\'B\');')
 ));
}

function f_qq_instant_pw()
{
 maj_html('info',crea_boutons(300,
  crea_bouton_tr(false,'','Dans quelques instants vous recevrez votre mot de passe sur '+stem)
 +crea_bouton_double('f_modif_em_jx();','Changer d\'adresse','Accueil','acc();')
 ));
}

function ouv_inf_leg()
{var st='/src/infleg.html?'+rg;
 window.open(st,'name','height=480,width=540,toolbar=no,directories=no,status=no,linemenubar=no,scrollbars=no,resizable=no,modal=yes');
}

function demarre_log_jbte()
{var i,j,st;

 stu=lit_cook('u');
 stp=lit_cook('p');


 if (stp=='')
 {
  st='D&eacute;j&agrave; inscrit:<br><input style="margin: 4px 0px 0px 10px; width: 123px;" type="text" id="Identifiant" value="';
  if (stem=='') st+='Identifiant'; else st+=stem;
  st+='" onFocus="focus_id(this)" onblur="blur_id(this)">'
  +'<input style="margin: 4px 0px 0px 10px; width: 123px;" type="text" id="xxxx" value="xxxx"'
  +' onFocus="focus_id(this)" onblur="blur_id(this)">'
  +'<input src="/src/bt_jouer_red.jpg" style="padding: 6px 0pt 0pt 16px;" type="image"'
  +' onClick="javascript:valide_log_jbte();">'
  +'<a href="javascript:crea_oublie();">&nbsp;&gt; Mot de passe oubli&eacute;?</a>'

  +'<br><br><br>Jamais inscrit:'
  +'<br>Choisissez un pseudonyme:'
  +'<input type="text" id="pseudo" value="" size="15"><br>(Il vous servira d\'identifiant)'
  +'<br><br>Entrez votre adresse courriel:'
  +tedit_mail+'<br>(Facultatif, '+st_no_pub+')<br>'


  +'<input src="/src/bt_jouer_red.jpg" style="padding: 6px 0pt 0pt 16px;" type="image"'
  +' onClick="javascript:valide_pseudo();">';

  maj_html('mainj',st);
  if (stem!='') focuse('xxxx');
 } else if (stps=='') applique('dll','req','dem','act=logck'+ver_js+'&u='+stu+'&p='+stp);



}


function valide_log_jbte()
{var u=sup_char_ctrl(elemv('Identifiant')),p=sup_char_ctrl(elemv('xxxx'));
 maj_value('xxxx',p);
 maj_value('Identifiant',u);
 if (u!='')
 {
  if (p.length==4 && !isNaN(p)) applique('dll','req','dem','act=logma&u='+u+'&p='+p);
  else {alert('mot de passe erronné');focuse('xxxx');}
 }
}