判斷ICQ是否線上的代碼

//判斷ICQ是否線上的代碼　

function get_status($uin)
{　
　　$fp = fsockopen ("wwp.icq.com", 80, &$errno, &$errstr, 30);　
　　if(!$fp)
　　{　
　　　　echo "$errstr ($errno)
";　
　　}
　　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
?>　

//作者/來源：Alpha.Z　

