里々ゴーストに天気予報機能を付加する簡易スクリプトです。~ 使用改造などご自由にどうぞ。 #br **仕様 [#zae88785] -情報取得元 http://feedproxy.google.com/tenkirss?format=xml 更新履歴 -2013/6/19 次の日の降水確率の後ろに消し忘れ文字列が付く問題を修正 -2011/2/9 コマンドの使用ミスで情報処理ルーチンが狂ってたのを修正&新スクリプト公開 -2011/1/18 未使用変数・消し忘れ変数を削除 -2011/1/16 スクリプトの抜本的な修正を行いました -2010/11/7 リンク切れにつき情報取得先を変更しました #br **導入に必要なもの [#d91f2916] -httpc.dll [[satoriya-shiori>http://code.google.com/p/satoriya-shiori/]] から [[httpc-phase7a>http://code.google.com/p/satoriya-shiori/downloads/detail?name=httpc-phase7a.zip]] にてDL 導入前にエントリやセーブデータ用の変数が被っていないか一応チェックして下さい。~ 同じ名称のものが辞書内に存在すると正常に動作しません。 **導入方法 [#k1d52dac] ***SAORIを登録 [#n7be7db5] 通常のSAORI登録方法と同じくhttpcを登録して下さい。~ (&color(Red){satori_conf.txt};の「@SAORI」行の下に以下を追記し、ghost/master/saoriフォルダに&color(Red){httpc.dll};をコピーして下さい) httpc,saori/httpc.dll ***選択肢を付加 [#l7e807c5] ダブルクリックメニューなどに↓のように「天気予報を調べる」へジャンプする選択肢を作って下さい。~ あとはスクリプトをコピペするだけです。 _天気予報を調べる #br **新スクリプト全文 [#k72f0a5c] -フォント色変更コマンド部分のみSSPしか適応できません @天気予報の情報取得先 http://feedproxy.google.com/tenkirss?format=xml @b1 (sprintf,%c,1) *天気予報を調べる :\*\_q接続中...\n ※サーバ混雑時は完了まで時間がかかります\n 情報取得中は動けないので暫くお待ち下さい\w9\w9 \![raise,天気予報情報取得開始] *天気予報情報取得開始 $天気情報【タブ】(httpc(b1)(天気予報の情報取得先)(b1)<item>(b1)</rss>) >天気予報判別【タブ】(変数「天気情報」の存在)&&(変数「天気予報場所」の存在) >天気予報地域【タブ】(変数「天気情報」の存在) :\_q※取得失敗\_q *天気予報地域 :\*\_q\b[2]φ \f[color,50,50,250]<北海道>\f[color,default] \q[旭川,天気予報表示] \q[釧路,天気予報表示] \q[帯広 ,天気予報表示] \q[札幌,天気予報表示] \f[color,50,50,250]< 東北 >\f[color,default] \q[青森,天気予報表示] \q[秋田,天気予報表示] \q[仙台 ,天気予報表示] \q[盛岡,天気予報表示] \f[color,50,50,250]< 関東 >\f[color,default] \q[千葉,天気予報表示] \q[東京,天気予報表示] \q[宇都宮,天気予報表示] \q[横浜,天気予報表示] \f[color,50,50,250]< 中部 >\f[color,default] \q[新潟,天気予報表示] \q[長野,天気予報表示] \q[金沢 ,天気予報表示] \q[静岡,天気予報表示] \q[名古屋,天気予報表示] \f[color,50,50,250]< 近畿 >\f[color,default] \q[京都,天気予報表示] \q[大阪,天気予報表示] \q[和歌山,天気予報表示] \f[color,50,50,250]< 中国 >\f[color,default] \q[岡山,天気予報表示] \q[松江,天気予報表示] \q[広島 ,天気予報表示] \f[color,50,50,250]< 四国 >\f[color,default] \q[高松,天気予報表示] \q[高知,天気予報表示] \f[color,50,50,250]< 九州 >\f[color,default] \q[福岡,天気予報表示] \q[熊本,天気予報表示] \q[鹿児島,天気予報表示] \q[那覇,天気予報表示] \q[石垣島,天気予報表示] \_q >天気予報表示部【タブ】(変数「天気今日の日付」の存在) \_q\n\n\n\n\n\n\n\n\n[half]\![*]\q[終了 ,天気予報セクション終了]\_q *天気予報表示部 \0\_q▼【\f[color,120,140,0]\f[bold,1](天気予報場所)\f[bold,default]\f[color,default]】 予想気温 \f[color,0,0,255](天気今日の気温)\f[color,default] \n[half](天気今日の日付) ... \f[color,200,0,0](天気今日の予報)\f[color,default] \f[color,120,120,120]降水確率 ~12:00 - \f[color,default]\f[color,0,50,200](天気降水確率1)\f[color,default] \f[color,120,120,120] ~18:00 - \f[color,default]\f[color,0,50,200](天気降水確率2)\f[color,default] \f[color,120,120,120] ~24:00 - \f[color,default]\f[color,0,50,200](天気降水確率3)\f[color,default] \n[half](天気明日の日付) ... \f[color,200,0,0](天気明日の予報)\f[color,default] \f[color,120,120,120] ~ 6:00 - \f[color,default]\f[color,0,50,200](天気降水確率4)\f[color,default] \n[half]\![*]\q[終了 ,天気予報セクション終了]\_q *天気予報表示 $天気予報場所【タブ】(erase(b1)(選択ラベル)(b1) ) >天気予報判別 *天気予報判別 $temp【タブ】(replace(b1)(天気情報)(b1)(天気予報場所)(b1)∇) $temp【タブ】(nop(b1)(split(b1)(temp)(b1)∇))(S1) $temp【タブ】(substr(b1)(temp)(b1)0(b1)300) $temp【タブ】(erase(b1)(temp)(b1) ) $temp【タブ】(erase(b1)(temp)(b1)気温) $temp【タブ】(erase(b1)(temp)(b1)雨12時まで) $temp【タブ】(erase(b1)(temp)(b1)雨18時まで) $temp【タブ】(erase(b1)(temp)(b1)雨24時まで) $temp【タブ】(erase(b1)(temp)(b1)雨06時まで) $temp【タブ】(replace(b1)(temp)(b1)くもり(b1)曇り) $temp【タブ】(replace(b1)(temp)(b1)%(b1)%) $temp【タブ】(replace(b1)(temp)(b1)月(b1)φ(月φ)) $temp【タブ】(replace(b1)(temp)(b1)火(b1)φ(火φ)) $temp【タブ】(replace(b1)(temp)(b1)水(b1)φ(水φ)) $temp【タブ】(replace(b1)(temp)(b1)木(b1)φ(木φ)) $temp【タブ】(replace(b1)(temp)(b1)金(b1)φ(金φ)) $temp【タブ】(replace(b1)(temp)(b1)土(b1)φ(土φ)) $temp【タブ】(replace(b1)(temp)(b1)日(b1)φ(日φ)) $temp【タブ】(replace(b1)(temp)(b1)<description>(b1)・) $temp【タブ】(replace(b1)(temp)(b1)</description>(b1)・) $temp【タブ】(replace(b1)(temp)(b1)<br/>(b1)・) $temp【タブ】(split(b1)(temp)(b1)・) $天気今日の日付【タブ】(S1) $天気今日の予報【タブ】(S2) $天気今日の気温【タブ】(S3) $天気降水確率1【タブ】(S4) $天気降水確率2【タブ】(S5) $天気降水確率3【タブ】(S6) $天気明日の日付【タブ】(S7) $天気明日の予報【タブ】(S8) $temp【タブ】(S9) $temp【タブ】(split(b1)(temp)(b1)<) $天気降水確率4【タブ】(S0) >天気予報地域 #(天気予報場所)は次回のデフォルト表示に使用するため消さない。 *天気予報セクション終了 $天気情報【タブ】 $temp【タブ】 $天気今日の日付【タブ】 $天気今日の予報【タブ】 $天気今日の気温【タブ】 $天気降水確率1【タブ】 $天気降水確率2【タブ】 $天気降水確率3【タブ】 $天気明日の日付【タブ】 $天気明日の予報【タブ】 $天気降水確率4【タブ】 #br