HYBRID W-ZERO3 mortscriptでキーライト オン/オフができた
以前にもちょっと書きましたが、アドエスや03ではキーボードライトのオン/オフをするソフトがあったのですが、HYBRID W-ZERO3では動かなくて仕方なくキーボードライトはオフにしたまま使っていました。webを散策していると「HyZERO3ブログ」に「HYBRID W-ZERO3で簡単にバックライト輝度調整(暫定)」と言う記事が。これはキーライトではなくて、画面の輝度を調節するmortscriptですが、設定してみると上手く動作しました。そこで、キーライトの設定をしているレジストリが分ったらキーライトオン/オフも出来るんじゃないかと思ってレジストリを探してみたら・・・・・・発見!![HKEY_LOCAL_MACHINE\ControlPanel\Power]の"KeyboardBacklightEnable"が「設定」-「システム」-「パワーマネージメント」-「キー点灯」の「キーボードの点灯設定」を保存しているっぽい。と言うか多分そう(笑)dword値が[0]で「OFF」、[1]で「バックライトの設定に従う」に対応していると思われる。早速、トグル動作のmortscriptを書いてテストしてみた。----------------------KeylightToggle.mscr---------------------------------ONF=RegRead("HKLM", "ControlPanel\Power", "KeyboardBacklightEnable")If(ONF=0) ONF=1 Else ONF=0EndIfRegWriteDword("HKLM", "ControlPanel\Power", "KeyboardBacklightEnable", ONF)ToggleDisplay(FALSE)ToggleDisplay(TRUE)-------------------------------------------------------------------------レジストリ値を読出して、0と1を切替える。ToggleDisplayで画面消灯・点灯をする(これをするとキーライトも反映される)成功!!!!で、さらに改良すべく「AC-Promenade」のキーライト・トグル(KeyLight_Toggle.mscr)を参考にしつつ、キーライト点灯時と消灯時で画面輝度を変えるようにしてみた。----------------------KeylightToggle2.mscr-------------------------------#外部電源でキーライト点灯時の画面輝度ExKon=2#バッテリでキーライト点灯時の画面輝度BtKon=2#外部電源でキーライト消灯時の画面輝度ExKof=4#バッテリでキーライト消灯時の画面輝度BtKof=3#現在外部電源かどうかの判定ExPwr=ExternalPowered()KLONF=RegRead("HKLM", "ControlPanel\Power", "KeyboardBacklightEnable")If(KLONF=0) KLONF=1 EBL=ExKon BBL=BtKon Else KLONF=0 EBL=ExKof BBL=BtKofEndIfIf(ExPwr) BL=EBL Else BL=BBLEndIfRegWriteDword("HKLM","ControlPanel\Power","KeyboardBacklightEnable",KLONF)RegWriteDword("HKCU","ControlPanel\BackLight","ExternalBrightness",EBL)RegWriteDword("HKCU","ControlPanel\BackLight","BatteryBrightness",BBL)RegWriteDWord("HKLM","Drivers\BuiltIn\BackLight","Level",BL)ToggleDisplay(FALSE)ToggleDisplay(TRUE)------------------------------------------------------------------------ちょっと試行錯誤はあったものの、割と簡単にできてしまった・・・・・ExKon~BtKofの値を書換えれば好みの設定になるかと。