<?php

//Angenommene Dauer des Homepagebesuches pro Benutzer (in Sekunden)
$Vmem[0]="600";

if(!headers_sent()) {
$Vmem[1]=trim(implode(file("iframe.template"),""));
}
else {
$Vmem[1]=trim(implode(file("include.template"),""));
}

$Vdat=explode("#", trim(implode(file("Vzaehler.txt"),"")));
for ($Vv=0;$Vv<count($Vdat);$Vv++) {
$Vdat[$Vv]=explode("+",$Vdat[$Vv]);
}

$Vmem[2]=count($Vdat[4]);

for ($Vv=0;$Vv<$Vmem[2];$Vv++) {
if($Vdat[4][$Vv]<time()-$Vmem[0] OR $Vdat[5][$Vv]==$_SERVER["REMOTE_ADDR"]) { unset($Vdat[4][$Vv]); unset($Vdat[5][$Vv]); }
}
$Vdat[4]=explode("+",implode("+",$Vdat[4]));
$Vdat[5]=explode("+",implode("+",$Vdat[5]));
if ($Vdat[4][0]=="" OR $Vdat[5][0]=="") {
$Vdat[4][0]=time();
$Vdat[5][0]=$_SERVER["REMOTE_ADDR"];
} 
else {
$Vdat[4][]=time();
$Vdat[5][]=$_SERVER["REMOTE_ADDR"];
}
if($Vdat[0][0].$Vdat[0][1].$Vdat[0][2]==date("jny")) { if(!in_array($_SERVER["REMOTE_ADDR"],$Vdat[1])){ $Vdat[1][]=$_SERVER["REMOTE_ADDR"]; $Vdat[6][0]++; } }
else {
if($Vdat[0][1]==date("n") OR $Vdat[0][1]==date("n")-1 OR $Vdat[0][1]==date("n")+11) {
$Vmem[4]=array();
$Vmem[3]=array();
for ($Vv=0;$Vv<count($Vdat[1]);$Vv++) {
$Vmem[2]=explode(".",$Vdat[1][$Vv]);
if (!isset($Vmem[4][$Vmem[2][0].".".$Vmem[2][1].".".$Vmem[2][2]])) { $Vmem[4][$Vmem[2][0].".".$Vmem[2][1].".".$Vmem[2][2]]=0; }
$Vmem[4][$Vmem[2][0].".".$Vmem[2][1].".".$Vmem[2][2]]++;
if ($Vmem[4][$Vmem[2][0].".".$Vmem[2][1].".".$Vmem[2][2]]>=5 AND !in_array($Vmem[2][0].".".$Vmem[2][1].".".$Vmem[2][2],$Vmem[3])) { $Vmem[3][]=$Vmem[2][0].".".$Vmem[2][1].".".$Vmem[2][2]; }
}
$Vmem[4]=count($Vdat[1]);
for ($Vv=0;$Vv<$Vmem[4];$Vv++) {
$Vmem[2]=explode(".",$Vdat[1][$Vv]);
if (in_array($Vmem[2][0].".".$Vmem[2][1].".".$Vmem[2][2],$Vmem[3])) { unset($Vdat[1][$Vv]); $Vdat[6][0]=$Vdat[6][0]-1; }
}
$Vv=$Vdat[0][0];
$Vdat[7][$Vv]=count($Vdat[1]);
}
if($Vdat[7][0]!=date("n")) {
if($Vdat[7][0]==date("n")-1 OR $Vdat[7][0]==date("n")+11) { $Vdat[8]=$Vdat[7]; }
else {
for ($Vv=0;$Vv<=31;$Vv++) { $Vdat[8][$Vv]=0; }
$Vdat[8][0]=date("n");
}
for ($Vv=0;$Vv<=31;$Vv++) { $Vdat[7][$Vv]=0; }
$Vdat[7][0]=date("n");
}
if ($Vdat[0][0].$Vdat[0][1].$Vdat[0][2]==date("jny", time()-24*60*60)){ $Vdat[2][0]=count($Vdat[1]); } else { $Vdat[2][0]=0; }
if(count($Vdat[1])>$Vdat[3][0]){ $Vdat[3][0]=count($Vdat[1]); }
$Vdat[6][0]++;
$Vdat[0][0]=date("j"); $Vdat[0][1]=date("n"); $Vdat[0][2]=date("y");
$Vv=1; while(count($Vdat[1])>1) { unset($Vdat[1][$Vv]); $Vv++; }
$Vdat[1][0]=$_SERVER["REMOTE_ADDR"];
}

echo "<!-- Counter-Script von http://www.vekpos.de.vu -->";
echo str_replace(array("%%heute%%", "%%gestern%%", "%%rekord%%", "%%aktiv%%", "%%gesamt%%"), array(count($Vdat[1]),$Vdat[2][0],$Vdat[3][0],count($Vdat[4]),$Vdat[6][0]), $Vmem[1]);

for($Vv=0;$Vv<9;$Vv++) { $Vdat[$Vv]=implode("+",$Vdat[$Vv]); }
$Vdat=implode("#",$Vdat);
$Vfp=fopen("Vzaehler.txt","w+");
fwrite($Vfp, $Vdat);
fclose($Vfp);

?>