";
}
$auth_ids=array();
$auth_titles=array();
$auth_types=array();
$auth_balls=array();
$auth_people=array();
$auth_percent=array();
$auth_count=0;
$f=fopen("data/authors.cgi","rt");
flock($f,1);
while (!feof($f))
{
$area=array();
$stroka=fgets($f,65535);
list($area[0],$area[1],$area[2],$area[3],$area[4],$area[5],$area[6])=split("\*\*",$stroka);
if ($area[0]!="")
{
$auth_ids[$auth_count]=$area[0];
$auth_titles[$auth_count]=$area[1];
$auth_types[$auth_count]=$area[6];
$auth_balls[$auth_count]=0;
$auth_people[$auth_count]=0;
$auth_count++;
}
}
flock($f,3);
fclose($f);
echo "|
";
for ($i1=0;$i1<$obj_count;$i1++)
{
foreach (split("--",$obj_authors[$i1]) as $aut)
{
for ($i=0;$i<$auth_count;$i++)
{
if ($auth_ids[$i]==$aut) {$auth_balls[$i]+=$obj_balls[$i1];$auth_people[$i]+=$obj_people[$i1];}
}
}
}
for ($i=0;$i<$auth_count;$i++)
{
if ($auth_people[$i]>0) {$auth_percent[$i]=round($auth_balls[$i]*10/$auth_people[$i]);} else {$auth_percent[$i]=0;}
}
arsort($auth_balls);
reset($auth_balls);
$count_obj=0;
$balls_prev=0;
$templ="";
$cou=0;
while ((list ($key, $val) = each ($auth_balls)) && ($count_obj<$top_n_ratings||$balls_prev==$val || $showall==1))
{
if ($val>0)
{
if ($balls_prev!=$val) {if ($cou>0) {echo " | \n| ".($count_obj).". | \n".$templ;}$templ="";$cou=0;}
else {$templ.=" ";}
$templ.="| ".$auth_titles[$key]." | (".(($auth_types[$key]==1)?"основной состав":"младший состав").") | ".$auth_percent[$key]."% | \n";
$cou++;
if ($balls_prev!=$val) {$count_obj++;$balls_prev=$val;}
}
else {break;}
}
if ($templ!="") {echo " | \n| ".($count_obj).". | \n".$templ;}
if ($count_obj==0) {echo " | Не найдено рейтингованных! | ";}
echo "
| \n";
echo "|
";
arsort($auth_percent);
reset($auth_percent);
$count_obj=0;
$balls_prev=0;
$templ="";
$cou=0;
while ((list ($key, $val) = each ($auth_percent)) && ($count_obj<$top_n_ratings||$balls_prev==$val || $showall==1))
{
if ($val>0)
{
if ($balls_prev!=$val) {if ($cou>0) {echo " |
\n| ".($count_obj).". | \n".$templ;}$templ="";$cou=0;}
else {$templ.="
";}
$templ.="| ".$auth_titles[$key]." | (".(($auth_types[$key]==1)?"основной состав":"младший состав").") | ".$auth_percent[$key]."% |
\n";
$cou++;
if ($balls_prev!=$val) {$count_obj++;$balls_prev=$val;}
}
else {break;}
}
if ($templ!="") {echo " |
\n| ".($count_obj).". | \n".$templ;}
if ($count_obj==0) {echo "
| Не найдено рейтингованных! |
";}
echo "
\n";
if ($template!="mp")
{
echo "
\n|
";
$links_id=array();
$links_objid=array();
$links_filename=array();
$links_downloaded=array();
$links_count=0;
$f=fopen("data/links.cgi","rt");
flock($f,1);
while (!feof($f))
{
$area=array();
$stroka=fgets($f,65535);
list($area[0],$area[1],$area[2],$area[3])=split("\*\*",$stroka);
if ($area[0]!="" && $area[1]==1)
{
for ($i=0;$i<$obj_count;$i++)
{
if ($obj_ids[$i]==$area[0])
{
$links_id[$links_count]=$area[3];
$links_objid[$links_count]=$i;
for ($i1=0;$i1<$area_count;$i1++)
{
if ($area_ids[$i1]==$obj_areas[$i])
{
$links_areaid[$links_count]=$i1;
}
}
$links_count++;
}
}
}
}
flock($f,3);
fclose($f);
$f=fopen("data/download.cgi","rt");
flock($f,1);
while (!feof($f))
{
$area=array();
$stroka=fgets($f,65535);
list($area[0],$area[1],$area[2],$area[3])=split("\*\*",$stroka);
if ($area[0]!="")
{
for ($i=0;$i<$links_count;$i++)
{
if ($links_id[$i]==$area[0])
{
$links_filename[$i]=$area[1];
$links_downloaded[$i]=$area[3];
}
}
}
}
flock($f,3);
fclose($f);
arsort($links_downloaded);
reset($links_downloaded);
$count_obj=0;
$balls_prev=0;
$templ="";
$cou=0;
while ((list ($key, $val) = each ($links_downloaded)) && ($count_obj<$top_n_ratings||$balls_prev==$val || $showall==1))
{
if ($val>0)
{
if ($balls_prev!=$val) {if ($cou>0) {echo " | \n| ".($count_obj).". | \n".$templ;}$templ="";$cou=0;}
else {$templ.=" | \n";}
$templ.="".(($where==0)?gettitleoftype($area_types[$links_areaid[$key]])." / ":"").$area_titles[$links_areaid[$key]]." / ".$obj_titles[$links_objid[$key]]."
\nФайл: ".$links_filename[$key]." | ".$val." | \n";
$cou++;
if ($balls_prev!=$val) {$count_obj++;$balls_prev=$val;}
}
else {break;}
}
if ($templ!="") {echo " | \n| ".($count_obj).". | \n".$templ;}
if ($count_obj==0) {echo " | Не найдено рейтингованных! | ";}
echo "
\n";
echo " | \n";
echo "|
";
arsort($area_visits);
reset($area_visits);
$count_obj=0;
$balls_prev=0;
$templ="";
$cou=0;
while ((list ($key, $val) = each ($area_visits)) && ($count_obj<$top_n_ratings||$balls_prev==$val || $showall==1))
{
if ($val>0)
{
if ($balls_prev!=$val) {if ($cou>0) {echo " | \n| ".($count_obj).". | \n".$templ;}$templ="";$cou=0;}
else {$templ.=" ";}
$templ.="| ".$area_titles[$key]." | ".(($where==0)?"".gettitleoftype($area_types[$key])."":" ")." | ".$val." | \n";
$cou++;
if ($balls_prev!=$val) {$count_obj++;$balls_prev=$val;}
}
else {break;}
}
if ($templ!="") {echo " | \n| ".($count_obj).". | \n".$templ;}
if ($count_obj==0) {echo " | Не найдено рейтингованных! | ";}
echo "
\n";
}
echo " |