#NoTrayIcon
#include <Timers.au3>
;Активная схема
$sActivePowerScheme = RegRead('HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes', 'ActivePowerScheme')
;Перевод компьютера в спящий режим
$iCompToSleep = RegRead('HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\' & $sActivePowerScheme & '\238c9fa8-0aad-41ed-83f4-97be242c8f20\29f6c1db-86da-48c5-9fdb-f2b67b1f44da', 'ACSettingIndex')
;Отключение дисплея
$iDispToSleep = RegRead('HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\' & $sActivePowerScheme & '\7516b95f-f776-4464-8c53-06167f40cc99\3c0bc021-c8a8-4e07-a973-6b14cbcb2b7e', 'ACSettingIndex')
If $iCompToSleep = 0 Then
Exit
Else
AdlibRegister('__MouseMove', $iCompToSleep - 1000)
EndIf
Func __MouseMove()
Local $iIdleTime, $aMouseGetPos
$iIdleTime = _Timer_GetIdleTime()
If $iIdleTime > $iDispToSleep
$aMouseGetPos = MouseGetPos()
MouseMove($aMouseGetPos[0] + 2, $aMouseGetPos[1] + 2, 10)
Sleep(250)
MouseMove($aMouseGetPos[0] - 2, $aMouseGetPos[1] - 2, 10)
EndIf
EndFunc ;==>__MouseMove |
