Файл: forum/inc/tema.php
Строк: 247
<?
##########################################
## Автор PITBULL ##
## icq 647732 ##
## mail mobilas91@gmail.com ##
## запрещено торговать скриптом ##
##########################################
echo'<div class="text">';
$q1 =DB::run()->query("select * from `forum_t` where `id`=? ",array($fid) );
$tem = $q1->fetch();
if(empty($tem['name'])){echo'<b>Такой темы не существует! Возможно она была удалена модератором.</b>';
echo gb.'<a href="./">Форум</a>'.div;
foot();
}
if($user['level']<$tem['level']){
echo'<b><font color=red>Вам сюда нельзя</font></b>';
}else{
$t_name = $tem ['name'];
$f = $tem ['f_id'];
$r = $tem ['r_id'];
$temes=$tem['id'];
$for = DB::run()->queryFetch( "select * from `forum_f` where id=?",array($f) );
$raz = DB::run()->queryFetch( "select * from `forum_r` where id=?",array($r) );
//if(!empty($_GET['er'])) echo '<font color="red"><b>'.$_GET['er'].'</b></font><br />';
if($_GET['er']==1) echo '<font color="red"><b>Короткое сообщение!</b></font><br/>';
else if($_GET['er']==2) echo '<font color="red"><b>Не пишите так часто!</b></font><br/>';
else if($_GET['er']==3) echo '<font color="red"><b>Такое сообщение уже есть!</b></font><br/>';
else if($_GET['er']==4) echo '<font color="red"><b>Запрещено загружать фаил более '.$limit_razm.' кб !</b></font><br/>';
else if($_GET['er']==5) echo '<font color="red"><b>Данный формат запрещено использовать!!!</b></font><br/>';
echo '<a href="./">Форумы</a>|<a href="razdel_'.$f.'">'.$for[name].'</a>';
echo '|<a href="temes_'.$r.'">'.$raz[name].'</a>|<b>'.$t_name.'</b><dl><dt></dt></dl><a href="#down">Вниз</a> | <a href="?">Обновить</a> | <a href="bookmarks_'.$fid.'">В закладки</a>';
if ($tem['close']==0 && $user['level']<5 && $tem['user_id']==$user['id'])echo ' | <a href="?close">Закрыть</a>';
if ($user['level']>=5){
if ($tem['close'] == 1)echo ' | <a href="?open">Открыть</a>|';
else echo ' | <a href="?close">Закрыть</a>|';
if ($tem['zak'] == 0)echo '<a href="?fix">Закрепить</a>|';
else echo '<a href="?unfix">Открепить</a>|';
echo '<a href="?delet">Удалить</a><br/>';
echo '<a href="admin_editt_'.$temes.'">Перенести</a> '; }
if($user['level']>=5 and $tem['on']==0 or $user['id']==$tem['user_id']and $tem['on']==0){ echo '<a href="vote?id='.$tem['id'].'">Добавить опрос</a>';}
elseif($user['level']>=5 or $tem['on']==1 and $user['id']==$tem['user_id']){echo'|<a href="?delvote">Удалить опрос</a>';}
//Delete vote//
if(isset($_GET['delvote']) and $user['level']>=5 or $user['user_id']==$tem['user_id']){
DB::run()->query("DELETE FROM `forum_vote` WHERE `t_id`=?",array($fid));
DB::run()->query("UPDATE `forum_t` SET `vop`=?,`otv`=?, `otv2`=?,`otv3`=?,`otv4`=? WHERE `id`=?",array('','','','','',$fid));
header('location:?');
}
// Закрываем тему
if (isset($_GET['close']) ){
if($user['level']>4){
DB::run()->query("UPDATE `forum_t` SET `close` = ? WHERE `id` = ?",array(1,$fid));
$msg = '.temazakr.Тема закрыта для обсуждения!';
DB::run()-> query ("INSERT INTO forum_msg
(f_id,r_id,t_id,user_id,msg,time) VALUES
(?,?,?,?,?,?)",array($tem['f_id'],$tem['r_id'],$fid,$user['id'],$msg,$time));
DB::run()->query("UPDATE `forum_t` SET `time` = ? WHERE `id` =?",array($time,$fid));
header('location:?'.SID);
}elseif($user['id']==$tem['user_id']){
DB::run()->query("UPDATE `forum_t` SET `close` = ? WHERE `id` = ?",array(1,$fid));
$msg = '.temazakr.Тема закрыта для обсуждения!';
DB::run()-> query ("INSERT INTO forum_msg
(f_id,r_id,t_id,user_id,msg,time) VALUES
(?,?,?,?,?,?)",array($tem['f_id'],$tem['r_id'],$fid,$user['id'],$msg,$time));
DB::run()->query("UPDATE `forum_t` SET `time` = ? WHERE `id` =?",array($time,$fid));
header('location:?'.SID);
}
}
echo'</div>';
// Открываем тему
if (isset($_GET['open'])){
if ($user[level]>=5){if($db->sql_query("UPDATE `forum_t` SET `close` = '0' WHERE `id` = '".$fid."'")){
$msg = ".temaotkr. Тема открыта для обсуждения!";
DB::run()->query("INSERT INTO forum_msg (f_id,r_id,t_id,user_id,msg,time) VALUES
(?,?,?,?,?,?)",array($tem['f_id'],$tem['r_id'],$fid,$user['id'],$msg,$time));
$db->sql_query("UPDATE `forum_t` SET `time` = '$time' WHERE `id` = '".($fid)."'");
}
}
header ('Location: ?'.SID);
}
// Закрепляем тему
if (isset($_GET['fix'])){
if ($user[level]>=5)DB::run()->query("UPDATE `forum_t` SET `zak` = ? WHERE `id` =? ",array(1,$fid));
header ('Location: ?'.SID);
}
// Открепляем тему
if (isset($_GET['unfix'])){
if ($user[level]>=5)DB::run()->query("UPDATE `forum_t` SET `zak` = ? WHERE `id` = ?",array(0,$fid));
header ('Location: ?'.SID);
}
// Удаляем тему
if (isset($_GET['delet'])){
if ($user[level]>=5){
$q = DB::run()->query("SELECT * FROM `forum_msg` where t_id = ?;",array($fid));
while($d = $q->fetch()){
if($d['file']!=NULL)unlink ('../files/forum/'.$d['file'].'');
}
DB::run()->query("DELETE FROM `forum_msg` where t_id = ?",array($fid));
DB::run()->query("DELETE FROM `forum_t` where id = ?",array($fid));
}
header ('Location: temes_'.$r.'?'.SID);
}
if (empty($user['max'])) $user['max']=10;
$max = $user['max'];
$k_post=DB::run()->querySingle("select COUNT(*) from forum_msg WHERE `f_id` = ? and `t_id` = ? and r_id = ?;",array($f,$fid,$r));
$k_page=k_page($k_post,$max);
$page=page($k_page);
$start=$max*$page-$max;
if ($tem['close'] == 1)echo '<br /><b>Тема закрыта для обсуждения!</b><br />';
else{
echo '<dl><dt></dt></dl>';
echo '<img src="'.H.'img/add.png" alt="*"/> <a href="addpost_'.$fid.'_'.$page.'"><b>Ответить</b></a><dl><dt></dt></dl>';
}
#######################Голосование###################################
############Хотел для удобства закоментировать в функцию но это готовые запросы
$otv=DB::run()->querySingle("SELECT COUNT(*) FROM `forum_vote` WHERE `var`=? and `t_id`=?",array(1,$fid));
$otv2=DB::run()->querySingle("SELECT COUNT(*) FROM `forum_vote` WHERE `var`=? and `t_id`=?",array(2,$fid));
$otv3=DB::run()->querySingle("SELECT COUNT(*) FROM `forum_vote` WHERE `var`=? and `t_id`=?",array(3,$fid));
$otv4=DB::run()->querySingle("SELECT COUNT(*) FROM `forum_vote` WHERE `var`=? and `t_id`=?",array(4,$fid));
$us_v=DB::run()->queryFetch("SELECT * FROM `forum_vote` WHERE `t_id`=?",array($fid));
$vote=(isset($_GET['vot'])?check($_GET['vot']):NULL);
if(isset($vote)and $user['id']!=$us_v['user_id']){
$var=check($_POST['var']);
if(empty($var)){echo'<div class="gb"><b>Вы не выбрали вариант ответа</b></div>';
}else{
DB::run()->query("INSERT INTO `forum_vote` (`user_id`,`var`,`t_id`)VALUES(?,?,?)",array($user['id'],$var,$fid));
header('location:?');
}
}
if(!empty($tem['vop'])){
if($user['id']!=$us_v['user_id']){
echo'<div class="text"><form action="?vot" method="post"> <b>'.$tem['vop'].'</b></br>
<input name="var" type="radio" value=1 /> '.$tem['otv'].'<br />
<input name="var" type="radio" value=2 /> '.$tem['otv2'].'<br />
'.(!empty($tem['otv3'])?'<input name="var" type="radio" value=3 /> '.$tem['otv3'].'<br />':NULL).'
'.(!empty($tem['otv4'])?'<input name="var" type="radio" value=4/>'.$tem['otv4'].'</br>':NULL).'
<input type="submit" value="Голосовать" /></form><br /></div>
';
}else{
echo'<div class="text">Вопрос:<b>'.$tem['vop'].'</b></div>
<div class="text">1.'.$tem['otv'].' ('.$otv.')<br>2.'.$tem['otv2'].' ('.$otv2.')<br>'.(!empty($tem['otv3'])?'3.'.$tem['otv3'].' ('.$otv3.')</br>':Null).'
'.(!empty($tem['otv4'])?'4.'.$tem['otv4'].' ('.$otv4.')':Null).'</div>';
}
}
####################################################################3
if (isset($_GET['del']) and $user['level']>4){
$d = DB::run()->queryFetch("SELECT * FROM `forum_msg` where id=?;",array(intval($_GET['del'])));
if($d['file']!=NULL)unlink ('../files/forum/'.$d['file'].'');
if (DB::run()->query("UPDATE `forum_msg` SET `del`= ?,`del_id`=? WHERE `id` = ?",array(1,$user['id'],intval($_GET['del'])))); header('Location: ?');
}
if (isset($_GET['delf'])){
if ($user[level]>4){
$d = DB::run()->queryFetch("SELECT * FROM `forum_msg` where id=?;",array(intval($_GET['delf'])));
if($d['file']!=NULL){unlink ('../files/forum/'.$d['file'].'');
DB::run()->query("UPDATE `forum_msg` SET `file` = ? WHERE `id` = ?",array(del,intval($_GET['delf'])));}
}else{
$d = DB::run()->queryFetch("SELECT * FROM `forum_msg` where id=? and user_id=?;",array(intval($_GET['delf']),$user['id']));
if($d['file']!=NULL){unlink ('../files/forum/'.$d['file'].'');
DB::run()->query("UPDATE `forum_msg` SET `file` = 'del' WHERE `id` = ? and user_id=?",array(intval($_GET['delf']),$user['id']));}
}
header ('Location: ?'.SID);
}
$delites = DB::run()->queryFetch("select * from `forum_msg` where `t_id`=? ;",array($fid) );
if($user['level']<8){
$q2 = DB::run()->query("SELECT * from `forum_msg` WHERE `t_id` = ? and `del`!=? order by time limit $start, $max;",array($fid,1) );
}else if($user['level']>=8){
$q2 = DB::run()->query("SELECT * from `forum_msg` WHERE `t_id` = ? order by time limit $start, $max;",array($fid) );
}
$k = $q2->rowCount();
if ($k_post == 0)echo '<br />Здесь сообщений пока нет :)<br />';
//$k_page2 = $k_post-$start;
$post_k=$start+1;
while($mess = $q2->fetch()){
$time = $mess['time'];
$m = $mess['id'];
if (empty($mess['privat'])){ // если написали не в Приват
echo links;
//echo "".$k_page2--.". ";
echo ($post_k++);
if($mess['user_id']==$tem['user_id'] ){$avtor='<b>[автор]</b>';} else $avtor='';
if($for['md']==$mess['user_id']){$md='<b><font color=red>[мд]</font></b>';}else $md='';
########################################################################################################
$tl=DB::run()->queryFetch("SELECT `t_id` FROM `forum_msg` WHERE `luch`=? and `t_id`=? ",array(1,$mess['t_id']));
if(isset($_GET['luch']) and $user['id']==$tem['user_id'] and $tl['t_id']==0 ){
if (DB::run()->query("UPDATE `forum_msg` SET `luch` = ? WHERE `id` = ?",array(1,intval($_GET['luch'])))){
header('Location: tema_'.$fid.'_'.$mess[user_id].'_'.$page.'?');
}
}
$th=DB::run()->queryFetch("SELECT `t_id` FROM `forum_msg` WHERE `hudsh`=? and `t_id`=? ",array(1,$mess['t_id']));
if(isset($_GET['hudsh']) and $user['id']==$tem['user_id'] and $th['t_id']!= $mess['t_id']){
if (DB::run()->query(" UPDATE forum_msg SET `hudsh` = ? WHERE `id` = ? ",array(1,intval($_GET['hudsh'])))){
header('Location: ?'); }
}
if($th['t_id']==0 and $user['id']==$tem['user_id'] and $user['id']!=$mess['user_id']){$hud= '<a href="tema_'.$fid.'_'.$mess[user_id].'_'.$page.'?hudsh='.$m.'" title="худший ответ">[худш]</a>';}else $hud='';
if($tl['t_id']==0 and $user['id']==$tem['user_id']and $user['id']!=$mess['user_id']){$luh='<a href="tema_'.$fid.'_'.$mess[user_id].'_'.$page.'?luch='.$m.'" title="Лудш">[лудш]</a>';}else $luh='';
if($mess['luch']==1){$luch='<b><font color=red>Лучший ответ</font></b>';}else{ $luch= '';}
if($mess['hudsh']==1){$hudsh='<b><font color=red>Худший ответ</font></b>';}else{ $hudsh= '';}
echo ''.nik($mess['user_id']).' '.$md.' '.$avtor.''.$luch.' '.$hudsh.' </br>';
echo '['.times($mess['time']).']</br>';
echo'<font color=red><b>'.mysql_result(mysql_query("SELECT `status` FROM `users` WHERE `id`='$mess[user_id]'"),0).'</b></font>';
if (user_inf($mess[user_id],'postsf')>=10000){
echo ' <img src="'.H.'str.gif" act="*" title="Больше 10000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 10000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 10000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 10000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 10000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 10000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 10000 постов" />';
}else if (user_inf($mess[user_id],'postsf')>=5000){
echo ' <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" />';
}else if (user_inf($mess[user_id],'postsf')>3000){
echo ' <img src="'.H.'str.gif" act="*" title="Больше 3000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 5000 постов" />';
}else if (user_inf($mess[user_id],'postsf')>=1000){
echo ' <img src="'.H.'str.gif" act="*" title="Больше 1000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 1000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 1000 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 1000 постов" />';
}else if (user_inf($mess[user_id],'postsf')>=500){
echo ' <img src="'.H.'str.gif" act="*" title="Больше 500 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 500 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 500 постов" />';
}else if (user_inf($mess[user_id],'postsf')>=300){
echo ' <img src="'.H.'str.gif" act="*" title="Больше 300 постов" /> <img src="'.H.'str.gif" act="*" title="Больше 300 постов" />';
}else if (user_inf($mess[user_id],'postsf')>=100){
echo ' <img src="'.H.'str.gif" act="*" title="Больше 100 постов" />';
}else if (user_inf($mess[user_id],'postsf')>=0){
}
if ($mess['del']==1){echo'<br/><a href="?vost='.$m.'" title="Востановить"><font color=SeaGreen>[Востановить]</a></font> <a href="?dell='.$m.'" title="Удалить"><font color=red>[Удалить оканчательно]</a></font>';}
echo '</br>';
////статус
////конец
if ($tem['close']!=1 and $mess['del']!=1){
if ($user['id']!=$mess['user_id'])echo '<a href="addpost_'.$fid.'_'.$mess[user_id].'_'.$page.'" title="Ответить">[Отв]</a>|<a href="cit_'.$m.'_'.$page.'" title="Цитировать">[Цит]</a>|<a href="spam_'.$fid.'_'.$mess[user_id].'_'.$page.'?id='.$m.'" title="Спам">[Cпам]</a>'.$luh.''.$hud.'';
if($user['level']>4 and $user['id']!=$mess['user_id'])echo '<a href="nar?us='.$mess['user_id'].'&t='.$mess['t_id'].'">[нар]</a>';
##############################################################################
######################################################################################
if(($user['level']>4 )&&($user['level']>=user_inf($mess['user_id'],'level'))) echo '<a href="?del='.$m.'" title="Удалить">[Удал]</a>|';
if(($user['level']>4)&&($user['level']>=user_inf($mess['user_id'],'level'))||($user['id']==$mess['user_id']))echo '<a href="editp_'.$m.'_'.$page.'" title="Изменить">[Изм]</a>';
}
if($user['id']!=$mess['user_id'])
echo '</br>';
echo div;
if ($mess['cit']) echo links.' <i>'.bbcode($mess['cit']).'</i>'.div;// Сцитата
if($user['sizep']==0)
echo text($mess['msg']);
else{
$msg=substr($mess['msg'], 0, $user['sizep']);
$kol=strlen($msg);
echo''.text ($msg).'';
if (strlen($mess['msg'])>$user['sizep'])echo '<br /><a href="read_'.$m.'_'.$page.'">Читать все >></a>';
}
echo'<br/>';
if($mess['del']==1 and $user['level']>=8){
echo '<font color=red><b>Сообщение удалено </b></font>';
echo '<font color=red> удалил '.nik($mess['del_id']).'</font></br>';
}
if(isset($_GET['dell'])){
DB::run()->query("DELETE FROM `forum_msg` WHERE `id` = ?",array(intval($_GET['dell']))); header('Location:?');
}
if(isset($_GET['vost'])){
DB::run()->query("UPDATE forum_msg SET `del`=?,`del_id`=? WHERE `id` =?",array(2,$user['id'],intval($_GET['vost'])));
header('Location:?');
}
if($mess['del']==2){
echo '<font color= StGren>[Пост востановил '.nik($mess['del_id']).']</font>';
}
########################################################################
if ($mess['file']!=NULL){
echo "<br/>";
if ($mess['file']==del)echo ' Файл удален! ['.$mess['sfile'].'|'.round($mess['fsize']/1024,1).' кб.]';
else{
echo " Файл: <a href="down_".$mess['id']."" title="Скачать файл ".$mess['fname']."">".$mess['fname']."</a> [".$mess['sfile']."|".round($mess['fsize']/1024,1)." кб.]";
if(($user['level']>4)&&(user_inf($user['level']>=$mess[user_id],'level'))||($user['id']==$mess['user_id']))echo ' <a href="?delf='.$m.'" title="Удалить">[Удал]</a>|';}
}
if(!empty($mess['izm'])) echo $mess['izm'];// Сообщенио о редактировании поста
echo '<dl></dl>';
}else if($mess['privat']==$user['id']||$mess['user_id']==$user['id']||$user['level']>=$set['for_privat'])
{ // Если приват = челу
echo links;
//echo "".$k_page2--.". ";
echo ($post_k++);
echo '. '.nik($mess['user_id']).' ';
if ($tem['close']!=1){
if ($user['id']!=$mess['user_id'])echo '<a href="addpost_'.$fid.'_'.$mess[user_id].'_'.$page.'" title="Ответить">[Отв]</a>|<a href="cit_'.$m.'_'.$page.'" title="Цитировать">[Цит]</a>|';
if($user['level']>4)echo '<a href="?del='.$m.'" title="Удалить">[Удал]</a>|';
if(($user['level']>4)&&(user_inf($user['level']>=$mess[user_id],'level'))||($user['id']==$mess['user_id']))echo '<a href="editp_'.$m.'_'.$page.'" title="Изменить">[Изм]</a>';
}
echo '('.times($mess['time']).')<font color="red">Приватное!</font>';
include'rat.php';
echo div;
if ($mess['cit']) echo citata.' <i>'.bbcode($mess['cit']).'</i>'.div;// Сцитата
if($user['sizep']==0)echo text($mess['msg']);
else{
$msg=substr($mess['msg'], 0, $user['sizep']);
$kol=strlen($msg);
$msg=preg_replace('#^(?:[x00-x7F]|[xC0-xFF][x80-xBF]+){0,0}'.'((?:[x00-x7F]|[xC0-xFF][x80-xBF]+){0,500}).*#s','$1',$msg);
echo text($msg);
if (strlen($mess['msg'])>$user['sizep'])echo '<br /><a href="read_'.$m.'_'.$page.'">Читать все >></a>';
}
if ($mess['file']!=NULL){
echo "<br/>";
if ($mess['file']==del)echo ' Файл удален! ['.$mess['sfile'].'|'.round($mess['fsize']/1024,1).' кб.]';
else{
echo " Файл: <a href="down_".$mess['id']."" title="Скачать файл ".$mess['fname']."">".$mess['fname']."</a> [".$mess['sfile']."|".round($mess['fsize']/1024,1)." кб.]";
if(($user['level']>4)&&($user['level']>=user_inf($mess[user_id],'level'))||($user['id']==$mess['user_id']))echo ' <a href="?delf='.$m.'" title="Удалить">[Удал]</a>|';}
}
if($user['redp']==1) echo $mess['izm'];// Сообщенио о редактировании поста
echo '<dl></dl>';
}else{ // если чел левый
echo links;
//echo "".$k_page2--.". ";
echo ($post_k++);
echo '. '.nik($mess['user_id']).' ';
echo '('.times($mess['time']).')';
include'rat.php';
echo div;
echo 'Приватное сообщение, видит только адресат...';
echo '<dl></dl>';
}
}
if ($k_page>1){
echo '<br /><dl><dt></dt></dl>';
str2("tema_$fid",$k_page,$page); // Вывод страниц
echo '<br /><dl><dt></dt></dl>';
}
if ($tem['close']== 1)echo '<br /><b>Тема закрыта для обсуждения!</b><br/>';
else{
if($user['forma']==0)echo '<img src="'.H.'img/add.png" alt="*"/> <a href="addpost_'.$fid.'_'.$page.'"><b>Ответить</b></a><dl><dt></dt></dl>';
else if($user['forma']==1) {
if ($ver!='wml') echo '<form action="addpost_'.$fid.'_'.$page.'?'.SID.'" method="post">';
if ($ver=='wml')echo 'Сообщение:<br /><input name="msg'.$ref.'" title="Сообщение"/><br/>';
else echo 'Сообщение:<br /><textarea cols="'.$user['pole2'].'" rows="'.$user['pole1'].'" name="msg"></textarea><br />';
if ($ver=='wml'){
echo '<anchor title="go">Добавить<go href="addpost_'.$fid.'_'.$page.'?'.SID.'" method="post">';
echo '<postfield name="msg" value="$msg'.$ref.'"/>
<postfield name="act" value="act"/>
<postfield name="privat" value="$privat"/>
<postfield name="opprivat" value="$opprivat"/>
</go></anchor><br/>';
}else{
echo '<input name="act" type="hidden" value="act"/>';
echo '<input type="submit" class="ibutton" value="Добавить"/></form><br />';
}
}
}
if($user['level']>=7){
$d = DB::run()->queryFetch("SELECT * FROM `forum_spam` WHERE t_id =?",array($tem['id']));
if ($d['readin'] == 0){DB::run()->query ("Update forum_spam set readin = ?,us_id=?",array(1,$user['id'])); } }
$who = DB::run()->querySingle("SELECT count(*) FROM `who` WHERE `room` = ? and `rm` = ?",array($mod,$fid));
echo '<a name="down"></a>
<br /><dl><dt></dt></dl>
<a href="#up">Вверх</a> | <a href="who_'.$mod.'_'.$fid.'">Кто тут?('.$who.')</a> | ';
}
echo'</div>';
?>