|
|
Bienvenue - Nous sommes
le
.
Il y a actuellement
/* -------------------------------------------------------- */
/* Script Compteur Temps Réel */
/* Auteur: Matthieu Chevalier */
/* Web-Site: http://matthieu.chevalier.free.fr/ */
/* Email: matthieu.chevalier@free.fr */
/* */
/* -------------------------------------------------------- */
/* Valeur à modifier pour appliquer à votre site */
$tempmax = 180; // temps au bout duquel le visiteur n'est plus compté présent s'il ne racharge pas une page. (en secondes)
$userfile="data/visitonline.dat"; // nom de votre fichier de comptage(recommandé de ne pas le changer)
$tempfile="data/tempfile.dat"; //nom du fichier temporaire
/* Ne plus rien modifier en dessous de cette ligne */
$sec = time();
$expire=$sec + $tempmax;
$ipvisit="$REMOTE_ADDR";
function substrcount($haystack, $needle) {
$offset=0;
$i = 0;
$counter = 0;
while ($i==0) {
$longueur = strlen($haystack);
$position=strpos($haystack,$needle,$offset);
if ($position && ($offset + strlen($needle)) <= $longueur) {
$offset = $position+strlen($needle);
$counter++;
} else {
$i++;
}}
return $counter;
}
$cont=fopen("$userfile","r+");
$contenu="";
while (!feof($cont)) {
$suite=fgets($cont, 4096);
$contenu.="$suite";
}
fclose($cont);
$nbreligne=substrcount("$contenu","\n");
$visit = explode("\n",$contenu);
$j=0;
$ligneecrite="$ipvisit|$expire\n";
$tempfi=fopen("$tempfile","a+");
fwrite($tempfi,"$ligneecrite");
fclose($tempfi);
$nbreonline++;
while ($j < $nbreligne){
$idvisit=explode("|",chop($visit[$j]));
if ($idvisit[0] != $ipvisit){
if ($idvisit[1] >= $sec){
$ligneecrite="$idvisit[0]|$idvisit[1]\n";
$tempfi=fopen("$tempfile","a+");
fputs($tempfi,"$ligneecrite");
fclose($tempfi);
}}
$j++;
}
copy("$tempfile","$userfile");
$conte = fopen("$userfile","r");
$contenu2 = "";
$contenu="";
while (!feof($conte)) {
$suite2=fgets($conte, 4096);
$contenu2.="$suite2";
}
fclose ($conte);
$nbreligne2 = substrcount("$contenu2","\n");
$nbreonline = "$nbreligne2";
$testtemp=fopen("$tempfile","w+");
fseek($testtemp,0);
fputs($testtemp,"");
fclose($testtemp);
if ($nbreonline==1){$afficher="$nbreonline personne";}
if ($nbreonline>1){$afficher="$nbreonline personnes";}
if ($voir=="js"){
print "document.write('".$afficher."');";
}
if ($voir=="php"){
echo("$afficher");
}
if ($voir=="no"){
}
?> sur le site.
Il y a eu
include("compteur.php");
?>
pages vues. |
|
|
|
Je voudrais vous revoir
Cette lettre peut vous surprendre
Mais sait-on ? peut-être pas
Quelques braises échappées des cendres
D'un amour si loin déjà
Vous en souvenez-vous?
Nous étions fous de nous
Nos raisons renoncent, mais pas nos mémoires
Tendres adolescences, j'y pense et j'y repense
Tombe mon soir et je voudrais vous revoir
Nous vivions du temps, de son air
Arrogants comme sont les amants
Nous avions l'orgueil ordinaire
Du "nous deux c'est différent"
Tout nous semblait normal, nos vies seraient un bal
Les jolies danses sont rares, on l'apprend plus tard
Le temps sur nos visages a soumis tous les orages
Je voudrais vous revoir et pas par hasard
Sûr il y aurait des fantômes et des décors à réveiller
Qui sont vos rois, vos royaumes ? mais je ne veux que savoir
Même si c'est dérisoire, juste savoir
Avons-nous bien vécu la même histoire ?
L'âge est un dernier long voyage
Un quai de gare et l'on s'en va
Il ne faut prendre en ses bagages
Que ce qui vraiment compta
Et se dire merci
De ces perles de vie
Il est certaines
Blessures au goût de
Victoire
Et vos gestes, y reboire
Tes parfums, ton regard
Ce doux miroir
Où je voudrais nous revoir
|