File size: 1.99Kb
<?
Error_Reporting(E_ALL & ~E_NOTICE);
header("Content-type:text/vnd.wap.wml;charset=utf-8");
include 'config.php';
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>";
$mes = @implode("",@file("rek/razd.razd")); ///// открываем счетчик с количеством тем
if ($nrazd=="") {$nrazd=1;}
$nf=1;
while($nf <= 15)
{ $naz = @implode("",@file("rek/$nrazd.tp"));
$naz=trim($naz);
if($naz!=""){print"
<img src=\"st/18.gif\" alt =\"+\"/>
<a href=\"prazd.php?log=$log&par=$par&razd=$nrazd\"><font color=\"blue\">$naz</font></a><br/>"; $nf=$nf+1;}
$nrazd=$nrazd+1;
if($nrazd>$mes) {$nf=20;}
};
if($nrazd<$mess) {print"<a href=\"index.php?log=$log&par=$par\">Далее</a><br/>";}
$privat = @implode("",@file("profil/$log.shp"));
$privat=trim($privat);
print "---<br/>";
if($log!="") {print"
<img src=\"st/67.gif\" alt =\"+\"/>
<a href=\"profil.php?mest=index&log=$log&par=$par\"><font color=\"blue\">[$log]</font></a>";}
else {print"
<img src=\"st/48.gif\" alt =\"+\"/>
<a href=\"vxod.php?mest=index\"><font color=\"blue\">[$sktext[1]]</font></a>
<br/>---<br/>
<img src=\"st/22.gif\" alt =\"+\"/>
<a href=\"pravila.php\"><font color=\"blue\">[правила форума]</font></a>
<br/>
<img src=\"st/21.gif\" alt =\"+\"/>
<a href=\"stat.php\"><font color=\"blue\">[статистика]</font></a>
";}
print"
<br/>---<br/>
<img src=\"st/44.gif\" alt =\"+\"/>
<a href=\"$gl\"><font color=\"blue\">[$sktext[0]]</font></a>
<br/>---<br/>
<img src=\"st/32.gif\" alt =\"+\"/>
<font color=\"black\">wap.1.2</font>+<a href=\"index2.php\"><font color=\"blue\">html</font></a>
";
print "</p></card></wml>";
?>