Просмотр файла wapp_antifront.com/catalog/katalog.php

<?
include "../config.php";
header("Content-type:text/vnd.wap.wml;charset=utf-8");      //////// тип и кодировка документа

$gl="$homepage/";        /////////// ссылка на главную
$zag="&#x041A;&#x0430;&#x0442;&#x0430;&#x043B;&#x043E;&#x0433;";                                               /////////// Загаловок

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=\"$zag\"><p>";
                                                        ///////////// выводим вмл заголовок

$vsego = @implode("",@file("rekord/$op.dat")); ///// окрываем счетчик деректории
///////если он равен нулю, говорим мол: нету здесь ничего:
if($vsego<=0){print"&#x0412; &#x044D;&#x0442;&#x043E;&#x0439; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x0438; &#x043F;&#x043E;&#x043A;&#x0430; &#x043D;&#x0435;&#x0442; &#x043D;&#x0438; &#x043E;&#x0434;&#x043D;&#x043E;&#x0433;&#x043E; &#x0441;&#x0430;&#x0439;&#x0442;&#x0430;.<br/>";}
if($nach=="") {$nach=1;} /////////определяем начальную позицию

        $i=1;
         while($i <= 10)
           {$text = @implode("",@file("rekord/$nach=$op.dion"));
        $text=trim($text);
        $nach=$nach+1;
         if($text!="") {print "$text";
        $i=$i+1; }
        if($nach>$vsego) {$i=12;}
                };                /////выводи ссылки и описания сайтов

print"<br/>";
if($nach < $vsego) {print"<a href=\"katalog.php?op=$op&amp;nach=$nach\">Next>></a><br/>";}



/////////выводим ссылки на главную и тд:
print "<a href=\"$homepage\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a><br/>
<a href=\"./\">&#x041D;&#x0430;&#x0437;&#x0430;&#x0434;</a></p></card></wml>";

?>