Kód: Vybrať všetko

<? 
Header("Cache-Control: no-cache");                    //zajistí, aby se výsledek skriptu neukládal do vyrovnávací paměti 
if (!File_Exists ("counter.dat")):                    //neexistuje soubor counter.dat ? 
    $fp = FOpen ("counter.dat", "w");                //vytvoří soubor counter.dat 
    FWrite ($fp, "1");                                //zápis do souboru counter.dat 
    FClose ($fp);                                    //zavře soubor counter.dat 
else:                                                //soubor counter.txt existuje 
    $fp = FOpen ("counter.dat", "r+");                //otevře soubor counter.dat pro čtení a zapis 
    $data = FRead ($fp, FileSize("counter.dat")) +1;//přečte data ze souboru a uloží do proměnné data1 
    Rewind($fp); 
    FWrite ($fp, $data);                            //zápis do souboru counter.dat 
    FClose ($fp);                                    //zavře soubor counter.dat 
endif; 

$fp = FOpen ("counter.dat", "r");                    //otevře soubor counter.dat pro čtení 
$obsah = FRead ($fp, 10);                            //do proměnné data uloží jeho obsah 
FClose ($fp); 

$size = StrLen($obsah);                                //zjistí délku řetězce (čísla) 

for ($x=0;$x<=$size-1;$x++): 
$a = SubStr($obsah, $x, 1); 
echo "<img src=$a.gif border=0>"; 
endfor; 
?> 

Kód: Vybrať všetko

<?php
Header("Cache-Control: no-cache"); // vyrovnávacia pamäť off
$ip = $_SERVER("REMOTE_ADDR"); // zistím IP návštevníka
$ip_adresy = file("adresy.txt"); // zavolám pole s IP adresami

if(in_array($ip,$ip_adresy)) // ak sa v poli IP nachádza
   {
   // nevykoná sa žiadna akcia len sa prečíta počet návštevníkov
   $otvor = FOpen("navstevnost.txt","r");
   $pocet = FRead($otvor,FileSize("navstevnost.txt"));
   FClose ($otvor);
   }
else  // ak sa v poli nenáchádza
   {
   // zaradíme ju do poľa
   $otvor1 = FOpen("adresy.txt","w+");
   FWrite ($otvor1,$ip."\n");
   FClose ($otvor1);
   // a navýšime návštevnosť
   $otvor2 = FOpen("navstevnost.txt","r");
   $pocet = FRead($otvor2,FileSize("navstevnost.txt"));
   FClose ($otvor2);
   $otvor3 = FOpen("navstevnost.txt","w");   
   FWrite ($otvor3,($pocet + 1));
   FClose ($otvor3);
   }

echo "počet návštevníkov: ".$pocet;  // výpis výsledku, resp. v tvojom prípade ten prevod na grafiku ako ho máš hore - pozor na názvy premenných

?>