IRC-Galleria

<?php
$tiedosto="online.txt"; // tiedoston nimi mihin kaikki homma tallennetaan

// tarkistetaan onko kyseisestä ipstä käyty 5 minuutin sisällä
$f=@file($tiedosto);
$f=array_reverse($f);
for($r=0;$r<count($f);$r++)
{
$rivi=explode("|", stripslashes(trim($f[$r])));
if ($rivi[1]<time()-300) { break; }
if ($REMOTE_ADDR==$rivi[0]) { $ip_on_jo=true; }
}
// jos ei niin tallennetaan käynti tiedostoon
if(!$ip_on_jo)
{
$filu=@fopen($tiedosto,"a");
fwrite($filu,$REMOTE_ADDR ."|". time() ."\n");
fclose($filu);
}
// tulostetaan käyttäjät online
$f=@file($tiedosto);
$f=array_reverse($f);
$yht=0;
for($r=0;$r<count($f);$r++)
{
$rivi=explode("|", stripslashes(trim($f[$r])));
if ($rivi[1]<time()-300) { break; }
$yht++;
}
echo $yht ." käyttäjä(ä) online";
?>