EMONSTER で、MMS 受信時にバイブを動かす MortScript ／7月1日追加

Home > [keitai] > EMONSTER で、MMS 受信時にバイブを動かす MortScript ／7月1日追加

Newer
Older

EMONSTER で、MMS 受信時にバイブを動かす MortScript ／7月1日追加

2009-06-30 (火) 22:17
[keitai]
EMONSTER | MortScript | S11HT | WinodwsMobile | プログラミング | 携帯電話

なぜかイーモンスターは MMS 受信時にバイブを動かすことができません。(うちだけ？) 設定項目はあるのに、設定しても受信時に動かないんです。しかたがないので、

よくある質問 – EMONSTER S11HT まとめWiki
mms受信時、バイブにできないの？
TOP ↑ ↓ 編集

設定-音と通知-通知タブのイベントの所で、接続の終了にバイブを設定で出来る。
MMS関係の設定では、バイブ動作しないので注意。

という方法をとっていたのですが、これだと接続の終了時にバイブがなって鬱陶しいです。そこで、サスペンドから復帰したときに未読メール数が0でなければバイブを動かす MortScript を書いてみました。……課題そっちのけで(汗

注意点／問題点
・RunOnPowerOn を使っているので、下手するとエラーまみれになるかも
・使用をやめるときは、必ず kaijo_mms_chk.mscr を実行したのち削除すること
・設置フォルダを変更する場合も、kaijo_mms_chk.mscr を実行したのち移動すること

・ファイル名を変更する場合は適宜置き換え
・まだお試し中で、問題が起きるかもしれない／うまく動かないかもしれない
・余計な作業をするわけだから、バッテリの減りが早くなるかも？
~~・未読のままにしておくと、毎期同時にバイブが動く~~／7月1日変更
~~・受信待機時間の15秒は長すぎるか？~~
・短かった。30秒に変更
・EMONSTER 以外は試してないのでわからない。レジストリの値がWM共通かどうか
・うまく解除できないときは、Notification_Queue_Log.txtを参照して解除する／7月1日追加
・Notification_Queue_Log.txt は、touroku_mms_chk.mscr を起動するたびに追記するので、あまりに大きくなったら適宜削除する／7月1日追加
*普通は touroku_mms_chk.mscr は一度しか起動しないので問題ないと思われる

使用方法
・WM 自体の設定として、設定の音と通知のイベント:新着 MMS で画面にメッセージを表示するをONに
・touroku_mms_chk.mscr を一度だけ起動すると、以後は毎回動作する
・スタートアップに登録する必要はない／7月1日追加
・使用を中止するときは、kaijo_mms_chk.mscr を起動させる
ダウンロード:mms_chk.zip／7月1日変更

touroku_mms_chk.mscr

ep = SystemPath("ScriptExe")\"MortScript.exe"

				mp = """"&SystemPath("ScriptPath")\"mms_chk.mscr"&""""
				Message("登録しました。mms_chkを削除する、移動／フォルダ名変更などでパスを変更する場合、kaijo.mms_chk.mscrを先に実行してください。","登録")

				Message("Notification_Queue_Log.txtに追記しました","登録")

#重複を回避 RemoveNotifications( ep , mp) RunOnPowerOn( ep , mp) WriteFile( "Notification_Queue_Log.txt", "RemoveNotifications( "&ep&" , "&mp&" )^NL^", True )

kaijo_mms_chk.mscr

ep = SystemPath("ScriptExe")\"MortScript.exe"

				mp = """"&SystemPath("ScriptPath")\"mms_chk.mscr"&""""

RemoveNotifications( ep , mp) Message("解除しました。パスの変更等によりエラーが出る場合、Notification_Queue_Log.txtを参照して解除してください","解除")

mms_chk.mscr



				Count = RegRead( "HKCU", "System\State\Messages\SMS\Unread", "Count" )

				Sleep( 30000 )

				If( RegRead( "HKCU", "System\State\Messages\SMS\Unread", "Count" ) > Count)

				　Vibrate( 500 )

				　Sleep( 200 )

				　Vibrate( 1000 )

				EndIf

ここのバイブの時間の設定はお好みで。

＊関連する投稿

Comments:0

Trackbacks:0

Trackback URL for this entry: http://denpa-shinbun.com/keitai/emonste-mms-vibrate.html/trackback
Listed below are links to weblogs that reference: EMONSTER で、MMS 受信時にバイブを動かす MortScript ／7月1日追加 from 新電波

Home > [keitai] > EMONSTER で、MMS 受信時にバイブを動かす MortScript ／7月1日追加

検索

アーカイブ

Links

Tag cloud