File size: 4.43Kb
<?
include 'dan.php';
/*
by Dionisij (c) 2006
[email protected]
Скрипт не предназначен для продажи!
При распространении необходимо обговорить условия распространения с автором скрипта.
Нарушение авторских прав преследуется по закону и по понятиям!
*/
include 'ver.php';
$rname=@file("$perfix$r/name");
$rname=trim($rname[0]);
$rnamet="$rname ";
if($rname!=""){$zag= substr($rnamet, 0, 25);
$strrpos=strrpos($zag, " ");
$zag=substr($rnamet, 0, $strrpos);
if($zag==""){$zag=$rnamet;} else {$zag="$zag...";}}
else{$zag="Ошибка!";}
if($ver!="html"){ $zag= str_replace("$", "$$", $zag);}
if($ver=="wml"){include 'wapzag.php';} else{include 'webzag.php';}
include'avt.php';
if($rname==""){print"Выбранного вами раздела не существует!";}
else{
if($mntem=="vsem" || ($login!="" & $mntem=="registr") || ($mntem=="moder" & $status=="moder")){print"<a href=\"ntem.php?ver=$ver&pas=$pas&login=$login&r=$r\">[новая тема]</a><br/><br/>";}
$dir = @opendir ("$perfix$r");
while ( $file = @readdir ($dir)){
if ( $file != "."& $file != ".."){
$prov=explode(".", $file);
if($prov[1]=="p"){
$arrtem[]=$file;
}
}
}
$dir = @opendir ("$perfix$r");
while ( $file = @readdir ($dir)){
if ( $file != "."& $file != ".." & $file>0){
$prov=explode(".", $file);
if($prov[1]!="p"){
$arizm[$file]=filemtime("$perfix$r/$file");
}}
}
if($arizm){arsort($arizm);
foreach( $arizm as $key => $value){
$arrtem[]=$key;
}}
$tp=1;
$nr=0;
if($pr=="" || $pr<=0){$pr=1;}
if($arrtem){foreach( $arrtem as $nomer => $val){
$nr++;
if($nr>$knme){$tp++; $nr=1;}
if($tp==$pr){
$artdan=@file("$perfix$r/$val");
if($ver!="html"){ $artdan= str_replace("$", "$$", $artdan);}
$namear=explode("<br/>", $artdan[0]);
$ss = @file("$perfix$r/$val");
$strok = sizeof($ss);
$strok=$strok-1;
$temdp=explode("<br/>", $artdan[1]);
$temdk=explode("<br/>", $artdan[$strok]);
$kotv=$strok-1;
if($temdp[0]==""){$temdp[0]="-$temdp[1]-";}
if($temdk[0]==""){$temdk[0]="-$temdk[1]-";}
$temdp[2]=date("d/m, H:i", $temdp[2]);
$temdk[2]=date("d/m, H:i", $temdk[2]);
if($namear[0]!=""){
if($status=="moder"){print"<small><a href=\"modtem.php?ver=$ver&pas=$pas&login=$login&r=$r&t=$val\">(mod)</a> </small>";}
$prnpo=explode(".", $val);
if($prnpo[1]=="p"){{print" <img src=\"pik/alert.gif\" alt=\"!\"/> ";}}
if($namear[1]!="vs"){print" <img src=\"pik/bez.GIF\" alt=\"8)\"/> ";}
print"<a href=\"topic.php?ver=$ver&pas=$pas&login=$login&r=$r&t=$val\">$namear[0]</a>
[$kotv] <small>[$temdp[0] ($temdp[2]) | $temdk[0] ($temdk[2])]</small><br/>";}
}
}
}
print"<br/>Страница $pr из $tp<br/>";
$prev=$pr-1;
$pprev=$pr-2;
$next=$pr+1;
$nnext=$pr+2;
if($pr>1){print"<a href=\"forum.php?ver=$ver&pr=1&pas=$pas&login=$login&r=$r\">1</a>|";}
if($pprev>1){print"<a href=\"forum.php?ver=$ver&pr=$pprev&pas=$pas&login=$login&r=$r\">$pprev</a>|";}
if($prev>1){print"<a href=\"forum.php?ver=$ver&pr=$prev&pas=$pas&login=$login&r=$r\">$prev</a>|";}
print"$pr|";
if($next<=($tp-1)){print"<a href=\"forum.php?ver=$ver&pr=$next&pas=$pas&login=$login&r=$r\">$next</a>|";}
if($next<=($tp-2)){print"<a href=\"forum.php?ver=$ver&pr=$nnext&pas=$pas&login=$login&r=$r\">$nnext</a>|";}
if($pr<$tp){print"<a href=\"forum.php?ver=$ver&pr=$tp&pas=$pas&login=$login&r=$r\">$tp</a>|";}
}
print"</p><p align=\"center\">";
if($ver=="html"){print"<table style=\"text-align: center; width: 98%;\"
border=\"1\" cellpadding=\"2\" cellspacing=\"2\">
<tbody>
<tr>
<td
style=\"background-color: rgb($color2);\" align=\"center\"
valign=\"top\">";}
if($login=="") { print"<a href=\"vxod.php?ver=$ver\">Вход</a><br/>";}
else {print"<a href=\"opc.php?ver=$ver&pas=$pas&login=$login\">[$login]</a><br/>";}
print"<a href=\"razdely.php?ver=$ver&pas=$pas&login=$login\">К разделам</a><br/>";
if($ver=="wml"){print"<a href=\"forum.php?ver=html&pas=$pas&login=$login&r=$r&pr=$pr\">wap 2.0</a><br/>";}
else{print"<a href=\"forum.php?ver=wml&pas=$pas&login=$login&r=$r&pr=$pr\">wap 1.2</a><br/>";}
print"<a href=\"$gen_link\">На главную</a>";
if($ver=="html"){print"</td>
</tr>
</tbody>
</table>
</body>
</html>
";}
else{print"</p></card></wml>";}
?>