|
なでしこ製のTwitterクライアント
上記のプログラムがうまく動かないとの指摘。Webへの掲載時におかしくなったのかな。 ここに動くものをメモ。
#-----------------------------------------------------------
# Twitter クライアント
#-----------------------------------------------------------
# 認証設定
メール=「xxx」
パスワード=「xxxx」
#-----------------------------------------------------------
# APIのURL
API_SELF=「http://twitter.com/statuses/user_timeline.xml」
API_FRIENDS=「http://twitter.com/statuses/friends_timeline.xml」
API_UPDATE=「http://twitter.com/statuses/update.xml」
# 画面デザイン
表示用とはTエディタ。
表示用のレイアウトは「全体」
「,m1,発言,,,発言処理
,m2,更新,,,画面更新処理」をメニュー一括作成
画面更新処理。
# 更新頻度の設定
更新タイマーとはタイマー。
その間隔は60
その時満ちた時は~画面更新処理
更新タイマーを開始。
●画面更新処理
結果は空。
S=BASIC認証ヘッダをAPI_FRIENDSへHTTPゲット。
Sの改行&改行まで切り取る。# ヘッダを捨てる
Sから「status」の階層タグ切り出し
反復
対象から「screen_name」のタグ切り出してタグ削除。
もし、それが空ならば続ける。
結果=結果&「{それ}」
対象から「text」のタグ切り出し。
HTMLエンティティ復号。
「{\10}」を空に置換してタグ削除。
結果=結果&「『{それ}』{改行}」
もし、結果≠表示用ならば
BEEP
母艦は「Twitter(更新) - {今}」
表示用は結果。
●発言処理
更新タイマーを停止。
「何をしていますか?」と尋ねて発言に代入。
もし、発言=空ならば、戻る。
発言UTF=発言をUTF8N変換。
BASIC認証ヘッダと「status={発言UTF}」をAPI_UPDATEへHTTPポスト。
表示用は発言&改行&表示用。
更新タイマーを開始。
●BASIC認証ヘッダ
認証は「{メール}:{パスワード}」をBASE64エンコード。
ヘッダは「Authorization: Basic {認証}」
ヘッダを戻す。
コメント
→コメント編集
|