if($black=@file("admin/base/black.dat")) { foreach($black as $val) { $val=trim($val); list($url_pr,$mail_pr,$ip_pr)=explode('|',$val); if($REMOTE_ADDR==$ip_pr){$err=1;break;} } } if(!$err){echo "

";} echo ""; $str=round(count($arraz)/$stl+0.4); for($i=1;$i<=$stl;$i++) { echo ""; } echo "

"; for($j=1;$j<=$str;$j++) { if($spispr==1){if($kn>0){$not=1;}else{$not=7;}} else{if($kn>0){$not=11;}else{$not=8;}} $l=$j+($i-1)*$str; if($in=@$rz[$l]){ if($kn>0){echo "".$arraz[$in]." ";} else{echo "".$arraz[$in]." ";} if($show==1){echo '('.$rzarr[$in].')';} echo "
"; if($craz){ech($in,$arraz[$in]);echo "
";}} } echo "

"; } } else { if(!$arr=@file("admin/base/raz.dat")) { } else { $basarr=@file("admin/base/base.dat"); foreach($arr as $val) { list($rzd,$nrz)=explode('|',@$val); $nrz=trim($nrz); $cn = substr_count($rzd,'l'); if(ereg("^$category(l)[0-9]*$",$rzd)) { $arraz[$rzd]=$nrz; } $rzarr[$rzd]=0; $raz_arr[$rzd]=$nrz; } foreach($basarr as $vl) { list(,$dat,$raz,,,,$kom,,,,,,,,,,,,,,,$ps,$gt,,$stats)=explode('|',$vl); if(ereg("^$category(l)[0-9]*$",$raz)&&$stats!=9&&$stats!=7&&$stats!=0&&$raz!='none'&&$kom&&$gt!=1) { $arrrzd=explode('l',$raz); $rzd=''; for($i=1;$i$val) { $rz[$j]=$i; $j++; } foreach($arr as $i=>$val) { list($rzs,$nrz)=explode('|',@$arr[$i]); $arrazd[$rzs]=$nrz; } $j=1; foreach($arrazd as $i=>$val) { if(ereg("^$i((l)[0-9]?)*$",$category)) { if($i==$category){ topt($stcat.$val.' : '.strip_tags($nz));}else{$stcat.=$val.' : ';} } } if(substr_count($category,'l')==0&&$category) { foreach($file_array as $i=>$val) { list($nom,$dat,$raz,$url,$urlm,$email,$kom,$cy,$pr,,,,$pag,$name,$vw,,,,,,,$ps,$gt,,$stats)=explode('|',$val); if($category==$nom){break;} } list($kom,$kodbn)=explode('{}',$kom); topt(strip_tags($kom)); } echo "

$nz"; echo $ob3; echo "

"; if(substr_count($category,'l')!=0&&$category){echo "Каталог > ";} foreach($arrazd as $cat=>$val) { if($cat==$category||ereg("^$cat((l)[0-9]?)*$",$category)) { if($kn>0){echo "$val";}else{echo "$val";} if($cat!=$category&&substr_count($category,'l')>1){echo " > ";} } } ?> 0){echo ""; for($i=1;$i<=$stl;$i++) { echo ""; } echo "

"; for($j=1;$j<=$str;$j++) { if($kn>0){$not=1;}else{$not=7;} $l=$j+($i-1)*$str; if($in=@$rz[$l]){ if($kn>0){echo "".$arraz[$in]." ";} else{echo "".$arraz[$in]." ";} if($show==1){echo '('.$rzarr[$in].')';} echo "
"; } } echo "

";} echo "

"; } } if(!$file_array=@file("admin/base/base.dat")) { } elseif(!isset($category)) { if($newlink>=count($file_array)){$newlink=count($file_array);} $bal=0; for($i=count($file_array)-1;($newlink > $bal&&$i>=0); $i--) { list($nom,$dat,$raz,$url,$urlm,$email,$kom,$cy,$pr,,,,$pag,$name,$vw,,,,,,,$ps,$gt,,$stats)=explode('|',$file_array[$i]); if($stats!=9&&$stats!=7&&$stats!=0&&$raz!='none'&&$kom&&$gt!=1) { if(!$bal){echo $pz;} if($vw==1){$pr='-';} if($vw==2){$cy='-';} if(!$vw){$cy='-';$pr='-';} if($kn>0){$ln="index-$raz-$pag.htm";}else{$ln="index.php?category=$raz&page=$pag";} if($kn>0){$lnrz="index-$raz.htm";}else{$lnrz="index.php?category=$raz";} foreach($arr as $v) { list($rz,$nrz)=explode('|',$v); if($rz==$raz){$rzdel=trim($nrz);break;} } if(ereg("^www.",$url)){$burl=str_replace('www.','',$url);}else{$burl=$url;} $burl=ucfirst($burl); list($kom,$kodbn)=explode('{}',$kom); $kod=$kom; $kom=strip_tags($kom); if(strlen($kom)>150){$kom=substr($kom,0,150); if(strrpos($kom,' ')>strrpos($kom,'.')){$posn=strrpos($kom,' ');}else{$postn=strrpos($kom,'.');} $kom=substr($kom,0,$postn).' ...';} if($kn>0){$sturl="index-$nom.htm";} else{$sturl="index.php?category=$nom";} include "admin/base/ol.php"; if(strpos($ob,$email)) { if($ps) { list($do,$po)=explode('@',$email); $ob=str_replace("mailto:$email","javascript:namylo('$do','$po')",$ob); $ob=str_replace($email,"",$ob); } else{ $ob=str_replace($email,'',$ob);} } echo "$ob1"; $bal++; } } } if(isset($category)and$file_array) { if(@!$page){$page=1;} $pr='pgrn'; $cy='lnpl'; include "admin/base/ol.php"; $stcy=strpos($ob,'lnpl'); $stpr=strpos($ob,'pgrn'); if(substr_count($category,'l')!=0) { if(!$sortln){$sortln=1;} if($sortln>3){$file_array=array_reverse($file_array);} $s=0; $j=0; foreach($file_array as $i=>$val) { list(,$dat,$raz,$url,$urlm,$email,$kom,$cy,$pr,,,,$pag,$name,$vw,,,,,,,$ps,$gt,,$stats)=explode('|',$val); if(ereg("^$category((l)[0-9]?)*$",$raz)&&$stats!=7&&$stats!=9&&$stats!=0&&$raz!='none'&&$kom&&$gt!=1) { $s++; $arr[$s]=$val; if($sortln==1){$sortarr[$s]=$cy;} elseif($sortln==2){$sortarr[$s]=$pr;} } } if($sortln>0&&$sortln<3) { arsort($sortarr); $t=1; foreach($sortarr as $i=>$val) { $ar[$t]=$arr[$i]; $t++; } $arr=$ar; } for($i=($page-1)*$all+1; ($i<=$s)and($j<$all); $i++) { list($nom,$dat,$raz,$url,$urlm,$email,$kom,$cy,$pr,,,,$pag,$name,$vw,,,,,,,$ps,$gt,,$stats)=explode('|',$arr[$i]); if(ereg("^$category((l)[0-9]?)*$",$raz)&&$stats!=7&&$stats!=9&&$stats!=0&&$raz!='none'&&$kom&&$gt!=1) { if(($stcy>0||$stpr>0)&&$j==0) { echo "

Сортировка по:"; if($kn>0) { if($stcy>0){echo " тИЦ ";} if($stpr>0){echo " PageRank ";} echo " дате (старые), "; echo " дате (новые)

"; } else { if($stcy>0){echo " тИЦ ";} if($stpr>0){echo " PageRank ";} echo " дате (старые), "; echo " дате (новые) "; } echo "
"; } list($kom,$kodbn)=explode('{}',$kom); if($vw==1&&$stels[8]){$pr='-';} if($vw==2&&$stels[8]){$cy='-';} if(!$vw&&$stels[8]){$cy='-';$pr='-';} if(ereg("^www.",$url)){$burl=str_replace('www.','',$url);}else{$burl=$url;} $burl=ucfirst($burl); $kod=$kom; $kom=strip_tags($kom); if(strlen($kom)>150){$kom=substr($kom,0,150); if(strrpos($kom,' ')>strrpos($kom,'.')){$postn=strrpos($kom,' ');}else{$postn=strrpos($kom,'.');} $kom=substr($kom,0,$postn).' ...';} if($kn>0){$sturl="index-$nom.htm";} else{$sturl="index.php?category=$nom";} include "admin/base/ol.php"; if(strpos($ob,$email)) { if($ps) { list($do,$po)=explode('@',$email); $ob=str_replace("mailto:$email","javascript:namylo('$do','$po')",$ob); $ob=str_replace($email,"",$ob); } else{ $ob=str_replace($email,'',$ob);} } echo "$ob"; $j++; } } $pg=round($s/$all+0.49); if($pg>1){echo "

";} $rsb=$page-$pst; $rse=$page+$pst+$rsbb; if($rse>$pg){$rsee=$rse-$pg;} if($rsb<=0){$rsbb=-$rsb+1;$bpg=1;}else{$bpg=$page-$pst;if($rse>$pg){if($bpg-$rsee>=1){$bpg-=$rsee;}else{$bpg=1;}}} if($rse>$pg){$epg=$pg;}else{$epg=$page+$pst;if($rsb<=0){if($epg+$rsbb<=$pg){$epg+=$rsbb;}else{$epg=$pg;}}} if($bpg>1&&$kn>0){echo "< ";} if($bpg>1&&!$kn){echo "< ";} for($j=$bpg;$j<=$epg;$j++) { if($page==$j&&$pg>1){echo "[ $j ] ";} if($pg>1&&$page!=$j&&$kn>0){echo "[ $j ] ";} if($pg>1&&$page!=$j&&!$kn){echo "[ $j ] ";} } if($epg<$pg&&$kn>0){echo "> ";} if($epg<$pg&&!$kn){echo "> ";} if($pg>1){echo "

";} } elseif(substr_count($category,'l')==0&&$category) { foreach($file_array as $i=>$val) { list($nom,$dat,$raz,$url,$urlm,$email,$kom,$cy,$pr,,,,$pag,$name,$vw,,,,,,,$ps,$gt,,$stats)=explode('|',$val); if($category==$nom&&$stats!=7&&$stats!=9&&$stats!=0&&$raz!='none'&&$kom&&$gt!=1) { if($vw==1&&$stels[8]){$pr='-';} if($vw==2&&$stels[8]){$cy='-';} if(!$vw&&$stels[8]){$cy='-';$pr='-';} if(ereg("^www.",$url)){$burl=str_replace('www.','',$url);}else{$burl=$url;} $burl=ucfirst($burl); list($kom,$kodbn)=explode('{}',$kom); include "admin/base/ol.php"; if(strpos($ob2,$email)) { if($ps) { list($do,$po)=explode('@',$email); $ob=str_replace("mailto:$email","javascript:namylo('$do','$po')",$ob2); $ob=str_replace($email,"",$ob2); } else{ $ob2=str_replace($email,'',$ob);} } echo $ob2; } } } } bottomt(); ?>