root/lang/php/misc/scratch/kamikitter.php

<?php
mb_language('Japanese');
mb_internal_encoding('UTF-8');
//set_time_limit(0);

require_once "Services/Twitter.php";
require_once "HTTP/Request.php";
define("TWITTER_USER", "kamikitter");
define("TWITTER_PASS", "********************");
echo "kamikitter is running...\n\n";

$st =& new Services_Twitter(TWITTER_USER, TWITTER_PASS);
$st->setAppName('kamikitter');
$st->setAppVersion('0.2');
$st->enableJsonConvert();

$friends = array();

//teitter検索のfeedから24時間以内の発言にreply
$url = "http://twitter.1x1.jp/rss/search/keyword=%E4%B9%85%E3%81%97%E3%81%B6%E3%82%8A+OR+%E3%82%BF%E3%83%A2%E3%83%AA+OR+%E3%81%84%E3%81%84%E3%81%A8%E3%82%82&lang=&text=1";
$doc = sendRequest($url);
$doc = preg_replace("/&/", "&amp;", $doc);
$xml = new SimpleXMLElement($doc);

foreach($xml->channel->item as $key => $val) {
    if (strtotime($val->pubDate) > strtotime("-1 day") && preg_match("/^@(.+)\s&lt;.+&gt;$/", $val->title, $matches)) {
        $friends[$matches[1]] = "あれ、髪切った？";
    }
}

//APIの@kamikitterにユーザ名があればそのユーザにreplyなければ紹介してもらう
for ($page = 1; $page < 4; $page++) {
    $replies = $st->getReplies($page);
    if (!is_array($replies) || count($replies) < 1) { break; }
    foreach ($replies as $reply) {
        if (strtotime($reply["created_at"]) < strtotime("-1 day")) { //24時間以内
            break 2;
        } elseif (preg_match("/^@kamikitter\s.*(@[a-z0-9_]+).*/i", $reply["text"], $matches)) { //紹介された
            $friends[$matches[1]] = "@" . $matches[1] . " @" . $reply['user']['screen_name'] . "さんとは仲いいの？ あれ、髪切った？";
        } else { //返信された
            $friends[$reply['user']['screen_name']] = "それじゃそろそろお友達を… @で教えてくれるかな？";
        }
    }
}

//発言する
foreach ($friends as $friend => $val) {
    $res = $st->setUpdate("@" . $friend . " " . $val);
    echo $friend . "::" . $val . PHP_EOL;
}


/********************************
** httpリクエスト関数
*********************************/

function sendRequest($url) {
    $request = new HTTP_Request($url);
    $response = $request->sendRequest();
    if (PEAR::isError($response)) {
        echo $request->getResponseCode();
        echo "http requesr error...";
        exit;
    }
    return $request->getResponseBody();
}

?>