<HTML>
<HEAD>
<TITLE>Traitement Guestbook de Sébastien L'haire</TITLE>
</HEAD>
<BODY BGCOLOR=#FFFFFF>
<H2>Guest Book de Sébastien L'haire</H2>
<H1>Traitement</H1>
<?php

// cherche la date
$heure date("d.m.Y H:i:s");

$score 0;

echo(
"<H3>Bonjour $prenom $nom !<BR>Notre serveur vous donne la date et l'heure: $heure </H3>");
if (
$sexe == "h") {
  echo(
"Vous appartenez à la gent masculine.<p>");
} else {
  echo(
"Vous appartenez à la gent féminine.<p>");
}

echo(
"Vous venez de $pays, vous avez $age ans. Votre adresse email est <A HREF=\"mailto:");
echo(
"$email");
echo(
"\">");
echo(
"$email");
echo(
"</A></P>");

echo(
"Vous êtes arrivé sur ma page ");

switch (
$arrive){
  case 
"tecfa" :
    echo(
"par une petite promenade sur les pages du TECFA. Vous avez raison: se promener, c'est la santé!<P>");
    break;
  case 
"lien" :
    echo(
"par un lien sur une autre page. Un lien sur ma page, c'est le début de la célébrité.<P>");
    break;
  case 
"recherche" :
    echo(
"par les outils de recherche sur Internet. Avez-vous réellement trouvé ce que vous vouliez sur ma page??<P>");
    break;
  case 
"autre" :
    echo(
"par un moyen inconnu de nos services. Diable!<P>");
    break;
}

echo(
"Votre jugement sur ma page:<P><B>Graphisme</B>: ");

switch (
$graphisme){
  case 
"nul" :
    echo(
"nul. Vous n'êtes pas un peu dur?<P>");
    break;
  case 
"mauvais" :
    echo(
"mauvais. Pan dans les gencives!<P>");
    break;
  case 
"passable" :
    echo(
"passable. Ben oui, je ne suis pas graphiste...<P>");
    break;
  case 
"pas_mal" :
    echo(
"pas mal. Vous êtes indulgent(e).<P>");
    break;
  case 
"bon" :
    echo(
"bon. Très flatté.<P>");
    break;
 case 
"excellent" :
    echo(
"excellent. Je vais attraper la grosse tête.<P>");
    break;
 case 
"ss_rep" :
    echo(
"sans réponse. Courageux mais pas téméraire!<P>");
    break;
}

echo(
"<B>Convivialité</B>: ");

switch (
$convivialite){
  case 
"nul" :
    echo(
"nul. Vous n'y allez pas un peu fort?<P>");
    break;
  case 
"mauvais" :
    echo(
"mauvais. Et paf!<P>");
    break;
  case 
"passable" :
    echo(
"passable. Ben oui, y'a qu'un p'tit jeu, pas beaucoup d'interactivite...<P>");
    break;
  case 
"pas_mal" :
    echo(
"pas mal. C'est gentil.<P>");
    break;
  case 
"bon" :
    echo(
"bon. J'adore les compliments.<P>");
    break;
 case 
"excellent" :
    echo(
"excellent. C'est trop d'honneur.<P>");
    break;
 case 
"ss_rep" :
    echo(
"sans réponse. Vous ne vous mouillez pas, vous!<P>");
    break;
}

echo(
"<B>Dessins</B>: ");

switch (
$dessins){
  case 
"pas_assez" :
    echo(
"pas assez.<P>");
    break;
  case 
"suffisant" :
    echo(
"suffisamment.<P>");
    break;
  case 
"trop" :
    echo(
"trop.<P>");
    break;
  case 
"ss_rep" :
    echo(
"sans réponse.<P>");
    break;
}

if (
$rems <> ""){
  echo(
"Vos autres remarques:<P> $rems <P>");
}

echo(
"<HR><H3>Et maintenant vos réponses et les résultats du jeu</H3>");

echo(
"Genève compte environ ");
switch (
$gehab){
  case 
95 :
    echo(
"95 000 habitants. C'est trop peu. La bonne réponse est environ 180 000 habitants.<P>");
    break;
  case 
125 :
    echo(
"125 000 habitants. Vous êtes en dessous de la réalité. La bonne réponse est environ 180 000 habitants.<P>");
    break;
  case 
180 :
    echo(
"180 000 habitants. Bingo! Vous gagnez 5 points.<P>");
    
$score $score 5;
    break;
  case 
365 :
    echo(
"365 000 habitants. C'est trop. La bonne réponse est environ 180 000 habitants.<P>");
    break;
  case 
1200 :
    echo(
"1 200 000 habitants. C'est beaucoup trop. La bonne réponse est environ 180 000 habitants.<P>");
    break;
  case 
5000 :
    echo(
"5 000 000 habitants. Vous êtes complètement à côté. La bonne réponse est environ 180 000 habitants.<P>");
    break;
}

echo(
"Le texte historique à faire mention de Genève pour la première fois: ");
switch (
$hist){
  case 
"hdt" :
    echo(
"Hérodote. Mais non, c'est Jules César, 4 siècles après.<P>");
    break;
  case 
"thc" :
    echo(
"Thucydide. Mais non, c'est Jules César, 4 siècles après.<P>");
    break;
  case 
"ces" :
    echo(
"Jules César. Mais oui! Comme tous les lecteurs d'Astérix le savent, le pont du lac détruit par César a été reconstruit! Et vous gagnez 10 points!<P>");
    
$score $score 10;
    break;
  case 
"tit" :
    echo(
"Tite-Live. Non, c'est César, Jules, une génération plus tôt. Et il n'est pas sûr que Tite-Live mentionne Genève.<P>");
    break;
  case 
"mic" :
    echo(
"Michelet. Si ce grand historien a mentionné Genève (?), c'est César qui fut le premier à en parler.<P>");
    break;
}

echo(
"L'Escalade commémore ");
switch (
$esc){
  case 
"fond" :
    echo(
"la fondation de la ville. Mais non, on ne sait pas au juste de quand datent les premières occupations de la colline de la vieille ville et de la rade de Genève. L'Escalade commémore l'échec de l'attaque de la ville par le duc de Savoie le 12 décembre 1602.<P>");
    break;
  case 
"vict" :
    echo(
"une victoire militaire. Oui, il s'agit de l'échec de l'attaque de la ville par le duc de Savoie le 12 décembre 1602. 5 points pour vous.<P>");
    
$score $score 5;
    break;
  case 
"ref" :
    echo(
"l'adoption de la Réforme. Mais non! L'Escalade commémore l'échec de l'attaque de la ville par le duc de Savoie le 12 décembre 1602.<P>");
    break;
  case 
"ch" :
    echo(
"l'entrée de Genève dans la Confédération suisse. Mais non! L'Escalade commémore l'échec de l'attaque de la ville par le duc de Savoie le 12 décembre 1602.<P>");
    break;
  case 
"mbl" :
    echo(
"l'ascension du Mont-Blanc. Même si cet exploit a été réalisé par le naturaliste genevois Horace Bénédict de Saussure, le guide Balmat et leur équipe en 1786, l'Escalade commémore l'échec de l'attaque de la ville par le duc de Savoie le 12 décembre 1602.<P>");
    break;
}

echo(
"Genève a adopté la Réforme en ");
switch (
$ref){
  case 
1515 :
    echo(
"1515. Non, c'est trop tôt. C'est le 21 mai 1536.<P>");
    break;
  case 
1533 :
    echo(
"1533. Non, c'est la date de l'expulsion du dernier évêque. L'adoption de la Réforme, c'est le 21 mai 1536.<P>");
    break;
  case 
1536 :
    echo(
"1536. Oui, c'est le 21 mai qu'a eu lieu cet événement. Mais avec la discipline morale qui régnait, ça ne rigolait pas tous les jours... Vous avez quand même gagné 15 points!<P>");
    
$score $score 15;
    break;
  case 
1559 :
    echo(
"1559. Non, c'est la date de la fondation de l'Académie, aujourd'hui l'Université de Genève. L'adoption de la Réforme, c'est le 21 mai 1536.<P>");
    break;
  case 
1602 :
    echo(
"1602. Non, c'est la date de l'Escalade. L'adoption de la Réforme, c'est le 21 mai 1536.<P>");
    break;
}

echo(
"Genève est entrée dans la Confédération suisse en ");
switch (
$ch){
  case 
1291 :
    echo(
"1291. Non, ça c'est la date où les trois premiers cantons suisses ont fondé la Confédération. Genève n'y est entré qu'en 1815.<P>");
    break;
  case 
1470 :
    echo(
"1470. Non. Genève n'est entré dans la Confédération qu'en 1815.<P>");
    break;
  case 
1515 :
    echo(
"1515. Non. Genève n'est entré dans la Confédération qu'en 1815.<P>");
    break;
  case 
1627 :
    echo(
"1627. Non. Genève n'est entré dans la Confédération qu'en 1815.<P>");
    break;
  case 
1710 :
    echo(
"1710. Non. Genève n'est entré dans la Confédération qu'en 1815.<P>");
    break;
  case 
1815 :
    echo(
"1815. C'est exact. C'est suite au congrès de Vienne. Vous gagnez 10 points.<P>");
    
$score $score 10;
    break;
  case 
1835 :
    echo(
"1835. Non. Genève est entré dans la Confédération en 1815, 20 ans plus tôt..<P>");
    break;
  case 
1848 :
    echo(
"1848. Non, c'est la date de la première constitution moderne de la Suisse. Genève est entré dans la Confédération en 1815.<P>");
    break;
}

echo(
"Et enfin, la Suisse compte ");
switch (
$habch){
  case 
400 :
    echo(
"400 000 habitant-e-s. Non, pas la taille du Luxembourg! C'est 7 millions.<P>");
    break;
  case 
:
    echo(
"3 millions d'habitant-e-s. Non, c'est trop peu. C'est 7 millions.<P>");
    break;
  case 
:
    echo(
"6 millons  d'habitant-e-s. Non, c'est un million de plus, 7 millions!<P>");
    break;
  case 
:
    echo(
"7 millions d'habitant-e-s. Oui, c'est exact et vous gagnez 5 points.<P>");
    
$score $score 5;
    break;
  case 
12 :
    echo(
"12 millions d'habitant-e-s. Non, c'est trop. La Suisse n'a que 7 millions d'habitantes.<P>");
    break;
  case 
22 :
    echo(
"22 millions d'habitant-e-s. Non, c'est trop. La Suisse n'a que 7 millions d'habitantes.<P>");
    break;
}

echo(
"Vous avez $score points sur un total de 50!<P>");

if (
$score == 50){
   echo(
"Bravo! C'est génial!<P>");
} elseif (
$score 40){
   echo(
"C'est un bon score!<P>");
} elseif (
$score 30){
   echo(
"C'est plutôt moyen!<P>");
} elseif (
$score 20){
   echo(
"Pourrait faire mieux!<P>");
} elseif (
$score 10){
   echo(
"À améliorer absolument!<P>");
} elseif (
$score 0){
   echo(
"Presque le minimum! À vos livres!<P>");
} else {
   echo(
"Soit vous n'avez rien répondu, et alors vous êtes un peu paresseux(se), soit c'est le sort qui s'acharne sur vous!<P>");
}
   

//ouvrir un fichier pour écrire à la fin
$fichier fopen("guestbook.txt","a");
if (
$fichier <> 0){
   
//fichier ouvert, écriture
   
fputs($fichier"$heure\n$nom $prenom, ");
   if (
$sexe == "h") {
      
fputs($fichier"homme, ");
   } else {
      
fputs($fichier"femme, ");
   }
   
fputs($fichier"$age ans, de $pays");
   
fputs($fichier". Email: $email\n");
   
fputs($fichier"Score au jeu: $score (sur 50). Venu(e) par ");
   switch (
$arrive){ 
      case 
"tecfa" :
        
fputs($fichier" promenade tecfa.\n");
        break;
      case 
"lien" :
        
fputs($fichier"lien d'une autre page.\n");
        break;
      case 
"recherche" :
        
fputs($fichier"moteurs de recherche.\n");
        break;
      case 
"autre" :
        
fputs($fichier"moyen inconnu.\n");
        break;
   }
   
fputs($fichier"Jugement: graphisme: ");
   switch (
$graphisme){
     case 
"nul" :
        
fputs($fichier"nul. ");
        break;
     case 
"mauvais" :
        
fputs($fichier"mauvais. ");
        break;
     case 
"passable" :
        
fputs($fichier"passable. ");
        break;
     case 
"pas_mal" :
        
fputs($fichier"pas mal. ");
        break;
     case 
"bon" :
        
fputs($fichier"bon. ");
        break;
     case 
"excellent" :
        
fputs($fichier"excellent. ");
        break;
     case 
"ss_rep" :
        
fputs($fichier"sans réponse. ");
        break;
   }
   
fputs($fichier"Convivialité: ");
   switch (
$graphisme){
     case 
"nul" :
        
fputs($fichier"nul. ");
        break;
     case 
"mauvais" :
        
fputs($fichier"mauvais. ");
        break;
     case 
"passable" :
        
fputs($fichier"passable. ");
        break;
     case 
"pas_mal" :
        
fputs($fichier"pas mal. ");
        break;
     case 
"bon" :
        
fputs($fichier"bon. ");
        break;
     case 
"excellent" :
        
fputs($fichier"excellent. ");
        break;
     case 
"ss_rep" :
        
fputs($fichier"sans réponse. ");
        break;
   }
   
fputs($fichier"Dessins: ");
   switch (
$dessins){
     case 
"pas_assez" :
       
fputs($fichier"pas assez.\n");
       break;
     case 
"suffisant" :
       
fputs($fichier"suffisant.\n");
       break;
    case 
"trop" :
       
fputs($fichier"trop.\n");
       break;
    case 
"ss_rep" :
       
fputs($fichier"sans réponse.\n");
       break;
   }
   if (
$rems <> ""){
      
fputs($fichier"Autres remarques:\n");
      
fputs($fichier"$rems\n");
   }
   
fputs($fichier"\n");
   
fclose($fichier);
} else{
   echo(
"Je n'arrive pas à ouvrir le guestbook. Il faudra revenir une autre fois pour recommencer. SVP informez <A HREF=\"mailto:lhaire@lettres.unige.ch\">Sébastien L'haire</A>!<p>");
}

echo(
"Et maintenant, voici le guestbook<P><PRE>");
include(
"guestbook.txt");
echo(
"</PRE>");

?>
</BODY>
</HTML>