View file wapp_antifront.com/catalog/index.php

File size: 1.66Kb
<?
include '../config.php';
header("Content-type:text/vnd.wap.wml;charset=utf-8");
$gl="../";
print "<?xml version=\"1.0\" encoding=\"utf-8\"?>
        <!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.2//EN\" \"http://www.wapforum.org/DTD/wml12.dtd\">
        <wml>
<card id=\"mas\" title=\"&#x041A;&#x0430;&#x0442;&#x0430;&#x043B;&#x043E;&#x0433;\">";
print "<p align=\"left\"><b>&#x041A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x0438;:</b></p>";       /////////////////        выводим жирным шрифтом "Категории"

if($kat=="") {$kat = @implode("",@file("rekord/kat.dat"));}      ////////// открываем счетчик количества дерикторий, и считываем из него их количества  (если номер деректории не передан)
print"<p>";
$n=0;
while($n <= 15)
   {
        $text = @implode("",@file("rekord/$kat.txt"));
        $text=trim($text);
        if ($text != "")  { print "<a href=\"katalog.php?op=$kat\">$text</a><br/>"; $n=$n+1; };
        $kat=$kat-1;
        if ($kat<=0) {$n=16;};
};
print"</p>";

if ($kat>0) {print"<p align=\"center\"><a href=\"index.php?kat=$kat\">more</a><br/></p>";}        /////////// выводим ссылку на следующию страницу, если на этой поместились не все дериктории
print"<p align=\"left\"><a href=\"dob.php?kateg=next\">&#x0414;&#x043E;&#x0431;&#x0430;&#x0432;&#x0438;&#x0442;&#x044C; &#x0441;&#x0430;&#x0439;&#x0442;</a><br/>
<a href=\"$homepage\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a></p>";
print "</card></wml>";
?>