Модераторы: PILOT
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Работа на 1 час (несложная), Доработка скрипта определения PR 
:(
    Опции темы
RED DEVIL
Дата 3.11.2005, 04:37 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Здрасти , есть скрипт определения Page Rank
Код

<? 

define('GOOGLE_MAGIC', 0xE6359A60); 

//unsigned shift right 
function zeroFill($a, $b) 
{ 
$z = hexdec(80000000); 
if ($z & $a) 
{ 
$a = ($a>>1); 
$a &= (~$z); 
$a |= 0x40000000; 
$a = ($a>>($b-1)); 
} 
else 
{ 
$a = ($a>>$b); 
} 
return $a; 
} 

function mix($a,$b,$c) { 
$a -= $b; $a -= $c; $a ^= (zeroFill($c,13)); 
$b -= $c; $b -= $a; $b ^= ($a<<8); 
$c -= $a; $c -= $b; $c ^= (zeroFill($b,13)); 
$a -= $b; $a -= $c; $a ^= (zeroFill($c,12)); 
$b -= $c; $b -= $a; $b ^= ($a<<16); 
$c -= $a; $c -= $b; $c ^= (zeroFill($b,5)); 
$a -= $b; $a -= $c; $a ^= (zeroFill($c,3)); 
$b -= $c; $b -= $a; $b ^= ($a<<10); 
$c -= $a; $c -= $b; $c ^= (zeroFill($b,15)); 

return array($a,$b,$c); 
} 

function GoogleCH($url, $length=null, $init=GOOGLE_MAGIC) { 
if(is_null($length)) { 
$length = sizeof($url); 
} 
$a = $b = 0x9E3779B9; 
$c = $init; 
$k = 0; 
$len = $length; 
while($len >= 12) { 
$a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24)); 
$b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24)); 
$c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24)); 
$mix = mix($a,$b,$c); 
$a = $mix[0]; $b = $mix[1]; $c = $mix[2]; 
$k += 12; 
$len -= 12; 
} 

$c += $length; 
switch($len) /* all the case statements fall through */ 
{ 
case 11: $c+=($url[$k+10]<<24); 
case 10: $c+=($url[$k+9]<<16); 
case 9 : $c+=($url[$k+8]<<8); 
/* the first byte of c is reserved for the length */ 
case 8 : $b+=($url[$k+7]<<24); 
case 7 : $b+=($url[$k+6]<<16); 
case 6 : $b+=($url[$k+5]<<8); 
case 5 : $b+=($url[$k+4]); 
case 4 : $a+=($url[$k+3]<<24); 
case 3 : $a+=($url[$k+2]<<16); 
case 2 : $a+=($url[$k+1]<<8); 
case 1 : $a+=($url[$k+0]); 
/* case 0: nothing left to add */ 
} 
$mix = mix($a,$b,$c); 
/*-------------------------------------------- report the result */ 
return $mix[2]; 
} 

//converts a string into an array of integers containing the numeric value of the char 
function strord($string) { 
for($i=0;$i<strlen($string);$i++) { 
$result[$i] = ord($string{$i}); 
} 
return $result; 
} 

function get_pr($url) { 
$result=array("",-1); 

if (($url.""!="")&&($url.""!="http://")): 
// check for protocol 
if (substr(strtolower($url),0,7)!="http://"): 
$url="http://".$url; 
endif; 

$url="info:".$url; 
$checksum=GoogleCH(strord($url)); 
$google_url=sprintf("http://www.google.com/search?client=navclient-auto&ch=6%u&features=Rank&q=".$url,$checksum); // url to get from google 

$contents=""; 

$handle = fopen($google_url, "rb"); 
$contents = ''; 
while (!feof($handle)) { 
$contents.= fread($handle, 8192); 
} 
fclose($handle); 
$p=explode(":",$contents); 
if (isset($p[2])): 
$result[1]=$p[2]; 
endif; 
endif; 

return $result; 
} 

function getPR_url($url) 
{ 
global $db; 

if (eregi('^http://www.',$url)) { 
$url_www = str_replace('http://www.','http://',$url); 
} else { 
$url_www = str_replace('http://','http://www.',$url); 
} 

$pr=get_pr($url); 
$output=$pr[0]; 
$pagerank=$pr[1]; 
sleep(1); 
$pr=get_pr($url_www); 
$output_www=$pr[0]; 
$pagerank_www=$pr[1]; 

if ($pagerank<$pagerank_www) { 
$pagerank=$pagerank_www; 
} 
if ($pagerank==-1) { 
$pagerank=0; 
} 
return intval($pagerank); 
} 
echo $_GET['url'].' '.getPR_url($_GET['url']); 
?>

Запрос произвидится так:
http://anysite.ru/prcheck.php?url=сайт для проверки

Нужно добавить следующие функции.
1- Чтоб в зависимости от определённого рейтинга выдавал кнопку GIF из папки с написанным на ней рейтингом , или сам генерил по средствам GD.
2- Чтобы , ввёл например сайт в текстовое поле, нажал Submit и он тебе выдал код для этой самой кнопки.

Денег не очень много , да и работа не сложная.
Могу помочь достать любой скрипт!
Народ , помогите я уже почти отчаялся smile
  Вверх
werwr
Дата 3.11.2005, 10:40 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











има... мой кодsmile
  Вверх
xyz
Дата 3.11.2005, 16:36 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











<?
define('GOOGLE_MAGIC', 0xE6359A60);
//unsigned shift right
function zeroFill($a, $b)
{
$z = hexdec(80000000);
if ($z & $a)
{
$a = ($a>>1);
$a &= (~$z);
$a |= 0x40000000;
$a = ($a>>($b-1));
}
else
{
$a = ($a>>$b);
}
return $a;
}
function mix($a,$b,$c) {
$a -= $b; $a -= $c; $a ^= (zeroFill($c,13));
$b -= $c; $b -= $a; $b ^= ($a<<8);
$c -= $a; $c -= $b; $c ^= (zeroFill($b,13));
$a -= $b; $a -= $c; $a ^= (zeroFill($c,12));
$b -= $c; $b -= $a; $b ^= ($a<<16);
$c -= $a; $c -= $b; $c ^= (zeroFill($b,5));
$a -= $b; $a -= $c; $a ^= (zeroFill($c,3));
$b -= $c; $b -= $a; $b ^= ($a<<10);
$c -= $a; $c -= $b; $c ^= (zeroFill($b,15));
return array($a,$b,$c);
}
function GoogleCH($url, $length=null, $init=GOOGLE_MAGIC) {
if(is_null($length)) {
$length = sizeof($url);
}
$a = $b = 0x9E3779B9;
$c = $init;
$k = 0;
$len = $length;
while($len >= 12) {
$a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24));
$b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24));
$c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24));
$mix = mix($a,$b,$c);
$a = $mix[0]; $b = $mix[1]; $c = $mix[2];
$k += 12;
$len -= 12;
}
$c += $length;
switch($len) /* all the case statements fall through */
{
case 11: $c+=($url[$k+10]<<24);
case 10: $c+=($url[$k+9]<<16);
case 9 : $c+=($url[$k+8]<<8);
/* the first byte of c is reserved for the length */
case 8 : $b+=($url[$k+7]<<24);
case 7 : $b+=($url[$k+6]<<16);
case 6 : $b+=($url[$k+5]<<8);
case 5 : $b+=($url[$k+4]);
case 4 : $a+=($url[$k+3]<<24);
case 3 : $a+=($url[$k+2]<<16);
case 2 : $a+=($url[$k+1]<<8);
case 1 : $a+=($url[$k+0]);
/* case 0: nothing left to add */
}
$mix = mix($a,$b,$c);
/*-------------------------------------------- report the result */
return $mix[2];
}
//converts a string into an array of integers containing the numeric value of the char
function strord($string) {
for($i=0;$i<strlen($string);$i++) {
$result[$i] = ord($string{$i});
}
return $result;
}
function get_pr($url) {
$result=array("",-1);
if (($url.""!="")&&($url.""!="http://")):
// check for protocol
if (substr(strtolower($url),0,7)!="http://"):
$url="http://".$url;
endif;
$url="info:".$url;
$checksum=GoogleCH(strord($url));
$google_url=sprintf("http://www.google.com/search?client=navclient-auto&ch=6%u&features=Rank&q=".$url,$checksum); // url to get from google
$contents="";
$handle = fopen($google_url, "rb");
$contents = '';
while (!feof($handle)) {
$contents.= fread($handle, 8192);
}
fclose($handle);
$p=explode(":",$contents);
if (isset($p[2])):
$result[1]=$p[2];
endif;
endif;
return $result;
}
function getPR_url($url)
{
global $db;
if (eregi('^http://www.',$url)) {
$url_www = str_replace('http://www.','http://',$url);
} else {
$url_www = str_replace('http://','http://www.',$url);
}
$pr=get_pr($url);
$output=$pr[0];
$pagerank=$pr[1];
sleep(1);
$pr=get_pr($url_www);
$output_www=$pr[0];
$pagerank_www=$pr[1];
if ($pagerank<$pagerank_www) {
$pagerank=$pagerank_www;
}
if ($pagerank==-1) {
$pagerank=0;
}
return intval($pagerank);
}
//echo $_GET['url'].' '.getPR_url($_GET['url']);
function kartina($cislo)
{
//
switch($cislo)
{
case "1" :
echo "<img src=\"/images/1.gif\" >";
break;
case "2" :
echo "<img src=\"/images/2.gif\" >";
break;
case "3":
echo "<img src=\"/images/3.gif\" >";
break;
case "4":
echo "<img src=\"/images/4.gif\" >";
break;
case "5":
echo "<img src=\"/images/5.gif\" >";
break;
case "6":
echo "<img src=\"/images/6.gif\" >";
break;
case "7":
echo "<img src=\"/images/7.gif\" >";
break;
case "8":
echo "<img src=\"/images/8.gif\" >";
break;
case "9":
echo "<img src=\"/images/9.gif\" >";
break;
case "10":
echo "<img src=\"/images/10.gif\" >";
break;
}
}
echo $_GET['url'].kartina(getPR_url($_GET['url']));


?>

сделай папку /images/ вставь туда картинки и брось сюда немного денег Z185943638535 и все.....

  Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Объявления о найме специалистов"
BearBeer
  • Придерживайтесь правил форума.

  • Если вы предлагаете НЕ удалённую работу, то

    название города и фирмы обязательно указывать уже в названии темы(!)

  • Одна вакансия - одна тема.

    Вам будет удобней следить за ответами, ищущим работу - выбирать.


  • В случае, если у нас возникнут обоснованные подозрения

    о неблагонадежности Вашего электронного адреса, ваш аккаунт будет удалён, а доступ к форуму запрещён!


  • Хотите быстрее найти специалиста? Разместите тогда ваше объявление вверху всех страниц сайта! Тогда его будут ежедневно видеть более 4000 программистов! Обратите внимание на верхний левый угол сайта - там вы найдете дополнительные инструкции при клике на линк.

В случае невыполнения данных правил Ваши сообщения могут быть удалены без предупреждения.


Полный спискок правил. С уважением, BearBeer.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Объявления о найме специалистов | Следующая тема »


 




[ Время генерации скрипта: 0.0458 ]   [ Использовано запросов: 20 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.