File size: 2.75Kb
<?
// ////// // // // //
// // // // ///// /////
///// \\ // // // // // // // // // // // //
// // \\ // // // // // // // // // ////// // //
// // \\ // // // // // // // // // // // //
///// \// ////// // // // // // ///// // //
// /////
//
/////////////////////////// [email protected] ///////////////////////////////
Error_Reporting(E_ALL & ~E_NOTICE); /////////////// игнорируем ошибки
header("Content-type:text/vnd.wap.wml;charset=utf-8"); //////// тип и кодировка документа
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=\"Smile\"><p>";
///////////// выводим вмл заголовок
$ss = file("$op.txt");
$id = sizeof($ss);
$st=7; ///////количество выводимых строк
if($ns==""){$ns=0;}
$ks=$st+$ns;
while($ns < $ks){
$dan=@file("$op.txt"); ////открываем файл с текстом
$udan=explode(":||:",$dan[$ns]);
$ns=$ns+1;
if($ns>$id){$ns=$ks+1;}
$text=trim($udan[0]);
print"$text";}
if($ns<=$id) {print "<br/><anchor title=\"chat\">Далее
<go href=\"smile.php?nc=$nc\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"op\" value=\"$op\"/>
<postfield name=\"ns\" value=\"$ns\"/>
</go>
</anchor><br/>";}
print"<br/><anchor title=\"say\">Вернутся к добавлению сообщения
<go href=\"say.php\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
</go>
</anchor><br/>
</p></card></wml>";
?>