power manager script view
Choice "Power","(((KEYLIGHT BACKLIGHT MANAGER)))","KEYLIGHT OFF-screen 60 sec","KEYLIGHT ON--Screen 60 sec","KEYLIGHT OFF-Screen 30 sec","KEYLIGHT ON--Screen 30 sec","BACKLIGHT MANAGER"
Case 1
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 1 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 1 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\On", "kyl0:", 4 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "kyl0:", 4 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 0 )
%i% = 10
if expression %i% > 1
PlaySound "\Program Files\MortScript\Manager-Alerts\key1.wav"
sleep 0
%i% = %i% -1
endIf
# set custom levels
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 60 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 60 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 1 )
Case 2
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 1 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 1 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\On", "kyl0:", 0 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "kyl0:", 0 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 0 )
%i% = 10
if expression %i% > 1
PlaySound "\Program Files\MortScript\Manager-Alerts\key2.wav"
sleep 0
%i% = %i% -1
endIf
# set custom levels
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 60 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 60 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "kyl0:", 4 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 1 )
Case 3
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 1 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 1 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\On", "kyl0:", 4 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "kyl0:", 4 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 0 )
%i% = 10
if expression %i% > 1
PlaySound "\Program Files\MortScript\Manager-Alerts\key3.wav"
sleep 0
%i% = %i% -1
endIf
# set custom levels
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 30 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 30 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 1 )
Case 4
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 1 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 1 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\On", "kyl0:", 0 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "kyl0:", 0 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 0 )
%i% = 10
if expression %i% > 1
PlaySound "\Program Files\MortScript\Manager-Alerts\key4.wav"
sleep 0
%i% = %i% -1
endIf
# set custom levels
RegWriteDword ("HKCU", "ControlPanel\Backlight", "BatteryTimeout", 30 )
RegWriteDword ("HKCU", "ControlPanel\Backlight", "ACTimeout", 30 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "kyl0:", 4 )
RegWriteDword ("HKLM", "System\CurrentControlSet\Control\Power\State\BackLightOff", "bkl1:", 1 )
Case 5
Run "\Program Files\MortScript\Manager-Alerts\Backlight.lnk"
EndChoice