バックライト

HYBRID W-ZERO3

きちんと切り替えができないので、「一時的に輝度を最大に」という使い方に変更しました　http://d.hatena.ne.jp/tom_kat/20100324
　
普段は３にしているが、外では輝度を上げないと見づらい時がある
切り替える操作がわずらわしいので、mortscriptで以下のようにしてみた
一瞬画面が消えるが(^^;　とりあえず１操作です

# バックライト　通常←→MAX
bl_base=3
bl_max =5
bl_b = RegRead( "HKCU", "ControlPanel\BackLight", "BatteryBrightness" )
bl_a = RegRead( "HKCU", "ControlPanel\BackLight", "ACBrightness" )
if ( bl_b = bl_base )
    bl_b = bl_max
  else
    bl_b = bl_base
endif
RegWriteDWord( "HKCU", "ControlPanel\BackLight", "BatteryBrightness", bl_b )
RegWriteDWord( "HKLM", "Drivers\BuiltIn\BackLight", "Level", bl_b )
SetBacklight( bl_b , bl_a )
ToggleDisplay(FALSE)
ToggleDisplay(TRUE)