わ〜い初期化しちゃったよー

W-ZERO3[es]がまったく言うこと効いてくれなくなったのでついに。
そっかー。最初はこんなだったよね(泣。つってもファームは最新のになってるな。ホームメニューも入ってる。工場出荷時の状態に戻るって訳でもないのか。
一応バックアップは取ってある*1けど、この際最初から環境作り直そうかな。

入れたもの

何かと必要なんだよなこれ。

ファイルエクスプローラの代替。

RealVGA化。

RealVGA化後の表示乱れを防ぐため。

  • MangaMeeyaCE_24beta_wm2003_vga

ノーコメント

時刻あわせ。

カメラのシャッター音を消す。盗撮用w。

キーロックと同時に画面オフ。バッテリの保ちが結構違う。スタートアップにこれだけは入れておかんと。

範囲選択、コピペ補助ツール。クリア長押しに設定しておく。

入力モードを[あ]→[_a]→[_1]の順に切り替えるツール。-r(逆順オプション)をつけたショートカットを文字キー長押しに設定してみた。以前は同じ作者さんのChgInputModeの方を使ってたが、[_a]も欲しいなと実際思ってたのでこっちを試してみる。

連休頃知って、まとめ&マニュアルを読みつついじってみてるとこ。読んでるだけで「なんでもできるぞー」な気がしてくる。

アナログ/デジタル時計、カレンダー、レジストリ情報などを自由に組み合わせたスキンをTodayに表示するソフト。ここが詳しい。

常駐しない軽いランチャ。細かいツールを登録しておく。画面回転ボタンに設定。

エディタはいるよなやっぱ。

自動ダイヤルアップ接続ツール。無精者なんでな。「ロードされているDllが多すぎるため、この機能を有効に出来ません。」とか怒られて悩んだ。rlTodayを一度はずしたら動いた。

Todayにメール着信を表示するだけならrlTodayだけでいいんだが、片手操作で開きたいので。

  • QDz(htc Fan Siteへの登録が必要)

連絡先の操作。軽い。右ソフトキーに割り当てて使う。

左右ソフトキーの割り当てを変更するためレジストリをいじりたい。やめた。決まったレジストリ値いじるだけくらいMortScriptでやりゃいいや。消す。

アドレス帳のデータは

昨年9月30日のバックアップがあったのでツールでリストアした。
用があるのはWS007SH_060930_103511.BK1だけなので、一緒にバックアップしてたProgram Filesフォルダをヨソに避けておいたが無事戻ったようだ。
って確認したらMy Documentsもバックアップしたときのに戻ってた。今日入れたファイルやフォルダがなくなってた。たいしたものなかったからいいけど、リストアもバックアップと同様に対象を選択できるようにしてもらえんもんかのぉ>シャープさん。

一応そんなこんなの設定を自動化する超おれ専用スクリプト書いてみた

MortScriptの練習がてら、な。

Windir	=	"\Windows"
Prgdir	=	Windir \ "スタート メニュー\プログラム"
PFiles	=	"\Program Files"

#「CycleInputMode」のショートカットに逆順オプションを付与
lnkFile	=	Prgdir \ "CycleInputMode.lnk"
orgFile	=	PFiles \ "CycleInputMode\CycleInputMode.exe"
CmdOpt	=	"-r"
Call UpdateShortcut

#「画像とビデオ」起動時からminiSDカードのDCIMフォルダを開くようにショートカットを変更する
lnkFile	=	Prgdir \ "画像とビデオ.lnk"
orgFile	=	Windir \ "\pimg.exe"
CmdOpt	=	"-directory:\miniSDカード\DCIM"
Call UpdateShortcut

# スタートアップにKeyLockSuspenderのショートカットを作成する
lnkFile	=	Windir \ "スタートアップ\KeyLockSuspender.lnk"
orgFile	=	PFiles \ "lock2suspend\lock2suspend.exe"
CmdOpt	=	""
Call UpdateShortcut

# 〇号テキスト エディタがインストールされていれば、ショートカットをSendToにコピーする
If ( FileExists( Prgdir \ "〇号テキスト エディタ.lnk" ) = 1 )
	Copy( Prgdir \ "〇号テキスト エディタ.lnk", Windir \ "SendTo\〇号テキスト エディタ.lnk", 1 )
EndIf

# 左ソフトキーに“ホームメニュー”、右ソフトキーに“QDz”を割り当てる
RegWriteString( "HKCU", "Software\Microsoft\Today\Keys\112", "Open", Windir \ "HomeMenu.exe" )
RegWriteString( "HKCU", "Software\Microsoft\Today\Keys\112", "", "ホームメニュー" )
RegWriteString( "HKCU", "Software\Microsoft\Today\Keys\113", "Open", PFiles \ "QDz\QDz_ES.exe" )
RegWriteString( "HKCU", "Software\Microsoft\Today\Keys\113", "", "連絡先" )

# バッテリ残量警告の通知を止める
RegWriteDWord( "HKCU", "ControlPanel\Notifications\{40299e05-135b-44d8-8f1d-783c06e93c26}", "Options", 0 )

# タスクバーの時刻の上に日付も表示
RegWriteDWord( "HKLM", "Software\Microsoft\Shell", "TBOpt", 3 )
RegWriteString( "HKLM", "nls\overrides", "SSDte", "M/d(ddd)" )

Message( "設定完了" )


# ショートカットファイルを作成/更新する(UpdateShortcut)
# 	lnkFile	: 作成されるショートカットファイル(フルパス)
# 	orgFile	: リンク元ファイル(フルパス)
# 	CmdOpt	: リンク元ファイルを実行する際のコマンドラインオプション
Sub UpdateShortcut
	If( FileExists( orgFile ) = 1 )
		If( CmdOpt eq "" )
			Target = orgFile
		Else
			Target = """" & orgFile & """ " & CmdOpt
		EndIf
		If ( FileExists( lnkFile ) = 1 )
			Delete( lnkFile )
		EndIf
		CreateShortcut( lnkFile, Target )
	EndIf
EndSub

これでもういつまた初期化するハメになっても安心だ!w