Нужна небольшая помощь со скриптом

Наверняка знаете скрипт Sep Pro 4.0 для DLE. В общем поставил себе на сайт prshark.ru, все отлично работает, но он не определяет PR, хотя должен. Насколько я понял, это дело в самом гугле, он поменял адрес, по которому раньше делались запросы.

Вроде бы проблема в данном файле:

<?php

/*

=====================================================

 http://dletweak.ru/

-----------------------------------------------------

 Copyright (c) 2009 DT DEV

=====================================================

 Данный код защищен авторскими правами

=====================================================

*/

if(!defined('DATALIFEENGINE'))

{

  die("Hacking attempt!");

}



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)

    {

        case 11: $c+=($url[$k+10]<<24);

        case 10: $c+=($url[$k+9]<<16);

        case 9 : $c+=($url[$k+8]<<8);

        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]);

    }

    $mix = mix($a,$b,$c);

    return $mix[2];

}



function strord($string) {

    for($i=0;$i<strlen($string);$i++) {

        $result[$i] = ord($string{$i});

    }

    return $result;

}



function getrank($url,$dc) {

$url = 'info:'.$url;

$ch = GoogleCH(strord($url));

$file = "http://".$dc."/search?client=navclient-auto&ch=6$ch&features=Rank&q=$url";



$out  = "GET /search?client=navclient-auto&ch=6$ch&features=Rank&q=$url HTTP/1.0\r\n";

$out .= "Host: $dc\r\n";

$out .= "\r\n";



$fp=@fsockopen($dc, 80, $errno, $errstr, 30);

if($fp)

    {

    stream_set_timeout($fp, 30);

    fputs($fp, $out);

    $Page="";

    while (!feof($fp))

        {

        $Page.=fgets($fp, 128);

        }

    fclose($fp);

    }

    else

    {

    $rank="н.д.";

    }

$data = substr($Page,strpos($Page,"\r\n\r\n"));

$rankarray = explode (':', $data);

$rank = $rankarray[2];





return $rank;



}



?>

Подскажите пожалуйста, что нужно сделать, чтобы PR определялся?? Желательно все разжевать (где что заменить), т.к. в php я не силен.