ガジェットにっき。特にNokiaと小さいPC

１）まず、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　ここまで--------------