[Krysanov]

вот скрипт

#pragma compile(Icon, "C:\Program Files (x86)\AutoIt3\Icons\au3script_v9.ico")
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=y
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#NoTrayIcon
#include <SysTray_UDF.au3>
Local $PID

While 1
    $PID = _SysTrayIconPids()
    For $i = 0 To UBound($PID)-1
        If $PID[$i] = -1 Then _SysTrayIcon_MouseOver($i)
    Next
    Sleep(3000)
WEnd

Func _SysTrayIcon_MouseOver ($iIndex)
    Local $TrayIcon_Pos = _SysTrayIconPos($iIndex)
    Local $Old_Mouse_Pos = MouseGetPos()
    MouseMove($TrayIcon_Pos[0], $TrayIcon_Pos[1], 0)
    Sleep(10)
    MouseMove($Old_Mouse_Pos[0], $Old_Mouse_Pos[1], 0)
EndFunc
#include <WindowsConstants.au3>
; Это команда на сон
Global $PBT_APMSUSPEND = 0x0004
Global $PBT_APMRESUMESUSPEND = 0x0007

$hGUI = GUICreate("Restart", 100, 100, 1, 1)
GUIRegisterMsg($WM_POWERBROADCAST, "Standby")

 ; Запускаем GpsGate
    ShellExecute("C:\Program Files (x86)\Franson\GpsGate 2.0\GpsGateXP.exe")

; Запускаем iCarDS
ShellExecute("C:\Program Files (x86)\TipTop software\iCar DS\iCarDS.exe")

; Запускаем Bluestacks вместе с лаунчером MyLauncher
	$Bluestacks_path = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Bluestacks", "InstallDir")
	ShellExecute($Bluestacks_path & "HD-RunApp.exe", "-p ru.znalexey.mylauncher -a ru.znalexey.mylauncher.LauncherActivity")

; Запускаем программу фубар
     ShellExecute("D:\fubar\4Icar_12_2ц\4Icar_12_2\foobar2000\foobar2000.exe")

	; Запускаем программу по коннекту интернета (У кого нет такой программы, тогда эту и следующие строки удалить!)
    ShellExecute("C:\Program Files (x86)\SP Dialer\SP Dialer.exe")


While 1
    Sleep(100)
WEnd

Func Standby($hWnd, $Msg, $wParam, $lParam)
    Select
        ; Вход в спящий режим
        Case $wParam = $PBT_APMSUSPEND
            Suspend()
        ; Выход из спящего режима
        Case $wParam = $PBT_APMRESUMESUSPEND
            ResumeSuspend()
        Case Else
    EndSelect
EndFunc

; Вход в спящий режим
Func Suspend()

    ; Закрываем iCarDS
    WinClose("iCar DS")

    ; Закрываем программу по коннекту интернета
    ShellExecute("C:\Program Files (x86)\SP Dialer\SP Dialer.exe", "-exit")

    ; Закрываем GpsGate
    ShellExecute("C:\Program Files (x86)\Franson\GpsGate 2.0\GpsGateXP.exe", "-exit")

	; Закрываем GPSBridge
	ShellExecute("C:\ADB\adb.exe", "shell am force-stop com.rbc.gpsbridge");

	;Закрываем Блюстак
	 ShellExecute("C:\Program Files (x86)\BlueStacks\HD-Quit.exe")

	 ; Закрываем программу фубар
     ShellExecute("D:\fubar\4Icar_12_2ц\4Icar_12_2\foobar2000\foobar2000.exe")

   If (ProcessWaitClose("iCarDS.exe", 3) == 0) Then
        ProcessClose("iCarDS.exe")
   EndIf
    If (ProcessWaitClose("foobar2000.exe", 3) == 0) Then
        ProcessClose("foobar2000.exe")
   EndIf

If (ProcessWaitClose("SP Dialer.exe", 3) == 0) Then
        ProcessClose("SP Dialer.exe")
   EndIf
   If (ProcessWaitClose("HD-Frontend.exe", 3) == 0) Then
    ProcessClose("HD-Frontend.exe")
EndIf

EndFunc

; Выход из спящего режима
Func ResumeSuspend()

    ; Запускаем GpsGate
    ShellExecute("C:\Program Files (x86)\Franson\GpsGate 2.0\GpsGateXP.exe")

    ; Запускаем программу по коннекту интернета
    ShellExecute("C:\Program Files (x86)\SP Dialer\SP Dialer.exe")

 ; Запускаем программу фубар
     ShellExecute("D:\fubar\4Icar_12_2ц\4Icar_12_2\foobar2000\foobar2000.exe")

	; Запускаем Bluestacks вместе с лаунчером MyLauncher
	$Bluestacks_path = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Bluestacks", "InstallDir")
	ShellExecute($Bluestacks_path &"HD-RunApp.exe", "-p ru.znalexey.mylauncher -a ru.znalexey.mylauncher.LauncherActivity")

    ; Запускаем iCarDS
    ShellExecute("C:\Program Files (x86)\TipTop software\iCar DS\iCarDS.exe")
EndFunc