Размер файла: 1.78Kb
<?
///////////////////////////////////////////////////////////////////////////////////////////
/////
///// Made by : VANTUZ
///// E-mail : [email protected]
///// WEB-site : http://www.pizdec.ru
///// WAP-site : http://wap.pizdec.ru
///// Skripts : http://wap.pizdec.ru/skripts
/////
//////////////////////////////////////////////////////////////////////////////////////////////
header("Content-Type: text/vnd.wap.wml");
print ("<?xml version=\"1.0\" encoding=\"UTF-8\"?><!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">\n");
print ("<wml>");
print ("<head><meta http-equiv=\"Cache-Control\" content=\"max-age=30\" forua=\"true\"/></head>");
print ("<card id=\"guest\" title=\"WAP.PIZDEC.RU\">");
if (isset($del))
{$info = "info.dat";
$infos = fopen ("$info", "w");
$text1 = "";
$text2 = "0";
fwrite($infos,$text1);
fclose($infos);
echo '<p><small><b>Статистика подчищена!</b></small></p>';}
print "<p><small> SP:<b>"; include "count.dat";
print " </b> * * * Кто [IP] [IN] [OUT]<br/></small>";
$text=30;
$info = "info.dat";
function show_mess()
{
global $info, $text;
$file = file($info);
$file = array_reverse($file);
if(sizeof($file) < $text) $text = sizeof($file);
for ($i = 0; $i < $text; $i++)
{
$mess = explode("|",$file[$i]);
echo "<small>$mess[0]</small>"; }}
show_mess();
print ("<anchor title=\"del\">.<go href=\"index.php?del\" method=\"post\">
<postfield name=\"add\" value=\"$(add)\"/></go></anchor>
</p></card>");
print ("</wml>");
?>