mobileあと、ヨメ（今実家に帰っているので空想ですが。）が使うときにもいちいち「レジストリエディタ開いて。。。」なんて言えません。
んで、１クリックでレジストリの変更が出来るスクリプトを作りました。
一つのレジストリを変更するだけです。
スクリプトはMortScriptを使用。
うん。すごい便利。
スクリプトを１クリックで変更できますだ。
スクリプトはテキストで上げておくので、どうぞコピペして、お好きなファイルネーム付けて。お使いくださいませ。
(3/4 18:35追記。）
スクリプトは稚拙なものなので、お好きにコピペしてお使いください。改変。２次配布。好きなようにお使いくださいませ。）
詳細な使用方法とスクリプトは続きから。。。
１）まず、MortScriptを導入します。
.NETのフレームワークみたいなもの？？まぁ。簡単に言えばそんな感じ。JREみたいかな？
まぁ。これが無いとスクリプトが動きません。
インストールするだけでMortScriptの拡張子も関連付けてくれます。
公式サイトからMortScriptをダウンロードして下さい。
http://www.sto-helit.de/
左側のペインにMortScript (PC, PPC)とあるので、そこを開いて、ダウンロードを選択。
ダウンロードするとzip
ファイルになります。
その中で、"cab"というフォルダの中に
MortScript-4.1-PPC.cab
というファイルがあるので、そのファイルを端末の中に転送してあげて、インストールするのみです。
２）以下のスクリプトをコピペしてテキストファイルとし、拡張子をmscrとします。
それを端末に転送してあげます。
３）あとはGSFinder等のファイラーでクリック。開くだけです。
４）スクリプトの説明です。
2種類あります。
changeICSsetting.mscr：メニュー形式で実行できます。
値を0000か00a0にするか選べます。
元に戻すことが出来るので、こちらの方がいいかも。
changeICSsetting_simple.mscr：シンプルなものです。
メニューもなく、実行するだけです。
１クリックでレジストリの変更が終了します。
元の値に戻す機能はありません。
元に戻す場合は、ファイルネームを変え、中の値を160->0にするだけです。
５−１）使い方。changeICSsetting.mscr
まず、GSFinder等のファイラーでスクリプトを開きます。
メニューが開きます。
当然ながら、"ICSValu変更"を選択。
現在の値が上部にでるので、これからWMWifiRouterを起動する場合は、したの0000a0を選択。
画面のようなエラーメッセージが出ればOK。
５−２）使い方。changeICSsetting_simple.mscr
まず、GSFinder等のファイラーでスクリプトを開きます。
下のような画面が出ればOK。
６）WMWifiRouterを起動します。
ほら。出来た。
--------------changeICSsetting.mscr ここから--------------
#changeICSsetting.mscr
#by moo2man
#tobe HKEY_LOCAL_MACHINE\System\State\Phone Status"=dword:00000000 to "Status"=dword:000000a0
regselect[1]="ICSvalu変更"
reg[1]= "HKLM,System\State\Phone,Status"
sel[1]="00000000,000000a0"
val[1]="0,160"
x=Choice("レジストリ変更","変更するレジストリを選択",1,0,regselect)
If(x<>0)
Split(reg[x],",",0,regval)
Split(sel[x],",",0,sellist)
split(val[x],",",0,vallist)
If(RegKeyExists(regval[1],regval[2]))
y=RegRead(regval[1],regval[2],regval[3])
i=1
ForEach var in array (vallist)
If(y=var)
nowval=i
EndIf
i=i+1
EndForEach
z=Choice(regselect[x],"現在の値："&sellist[nowval],nowval,0,sellist)
If(z<>0)
RegWriteDWord(regval[1],regval[2],regval[3],vallist[z])
EndIf
Else
Message("レジストリが見つかりません","エラー")
Endif
EndIf
--------------changeICSsetting.mscr ここまで--------------
--------------changeICSsetting_simple.mscr ここから--------------
#changeICSsetting_simple.mscr
#by moo2man
#tobe HKEY_LOCAL_MACHINE\System\State\Phone Status"=dword:00000000 to "Status"=dword:000000a0
RegWriteDWord ("HKLM","System\State\Phone","Status",160)
--------------changeICSsetting_simple.mscr ここまで--------------
1
