判断ICQ是否在线的代码

//判断ICQ是否在线的代码 

<?  
function get_status($uin)
{  
    
$fp fsockopen ("wwp.icq.com"80, &$errno, &$errstr30);  
    if(!
$fp)
    {  
        echo 
"$errstr ($errno)<br> ";  
    }
    else
    {
        
fputs($fp"GET /scripts/online.dll?icq=$uin&img=5 HTTP/1.0 ");  
        
$do 'yes';  
        while(!
feof($fp)) 
        {
            
$line fgets ($fp,128);
            
$do = ($do == 'yes')?'yes':(eregi("^GIF89"$line))?'yes':'no';
            
//echo $line;
            
            
if($do == 'yes')
            {
                if(
ereg("@"$line))
                {
                    return 
'online';  
                }
                elseif(
ereg("醱"$line))
                {  
                    return 
'offline';  
                }
                elseif(
ereg("S"$line))
                {
                    return 
'disabled';  
                }
            }
            
        }
        
fclose($fp);  
    }  
    return 
'unknown!';  
}


$uin="72485936";  // sonymusic 的ICQ,呵呵。
echo get_status($uin);
// offline
?>