Просмотр файла wr-anekdot/index.php

<?
include "config.php";

$lines = file($datafile);
// выбираем случайное число больше 0
$mrandom = rand($qq, sizeof($lines));
$i = $mrandom;
$n="0";

if ($i>$qq) {$a1=$i-$page; $u=$a1-$qq;} else {$a1=$i; $u=0;}

do {$a1--;  $dt = explode("|", $lines[$a1]);

// заменяем текстовые смайлики на графические
$dt[0]=str_replace(":-))",$s1,$dt[0]);
$dt[0]=str_replace(":-)",$s2,$dt[0]);
$dt[0]=str_replace(":-P",$s3,$dt[0]);
$dt[0]=str_replace("8-)",$s4,$dt[0]);
$dt[0]=str_replace(":-(",$s5,$dt[0]);
$dt[0]=str_replace(":-O",$s6,$dt[0]);
$dt[0]=str_replace(";-)",$s7,$dt[0]);
$dt[0]=str_replace(":roll:",$s8,$dt[0]);
$dt[0]=str_replace(":rf:",$s9,$dt[0]);
$dt[0]=str_replace("8-(",$s10,$dt[0]);
$dt[0]=str_replace("`-(",$s11,$dt[0]);
$dt[0]=str_replace(":REDBOLD:",$s12, $dt[0]);

if ($a1>=0) {print"<table bgcolor=$acolor border=$brd bordercolor=$brdcolor cellpadding=5 cellspacing=1 width=$wdth>
<tr><td height=$heght><font color=$fontcolor>$dt[0]</font></td></tr>";
if ($podpis=="1") {print "<tr><td><center><b><a href=mailto:$dt[2]>$dt[1]</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$dt[3]</B>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font size=-1>$dt[4]</font></td>";}
print "</table>";}
} while($a1 > $u);
?>