PCCar.ru - Ваш автомобильный компьютер

PCCar.ru - Ваш автомобильный компьютер (http://pccar.ru/index.php)
-   iCarDS (http://pccar.ru/forumdisplay.php?f=121)
-   -   iCarDS + Сон, Гибридный сон и Гибернация (http://pccar.ru/showthread.php?t=23331)

Krysanov 28.08.2015 14:55

Цитата:

Сообщение от Игорь_К (Сообщение 336723)
выложи свой финальный скрипт, подредактирую для себя)))
и как у вас так у всех блюстак быстро грузится?
я качаю с инета устанавливаю и жду полминуты и то это на ноутбуке дома который более менее мощный...на системе в машине даже пробовать не стал...может сборка есть какая или настройки? я просто не в курсе

про блюстак тут

вот код

Код:

#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 ****

#include
; Это команда на сон
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("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")

    ; Закрываем программу по коннекту интернета
    ProcessClose("SP Dialer.exe")

    ; Закрываем GpsGate
    WinClose("Franson GpsGate")

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

  If (ProcessWaitClose("iCarDS.exe", 3) == 0) Then
        ProcessClose("iCarDS.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")

        ; Запускаем 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

Код буду менять по ходу еще...

seriousstas 28.08.2015 15:35

Lexx09
Попробовал - работает!
Krysanov
Тоже попробуй ,
просто добавь код в конец сюда :
C:\Users\HOME\Documents\iCarDS\skins\Chameleon\Scr ipts\iCarMainScript.au3
и скомпилируй (оригинал не забудь переименовать) - должно работать !
И не нужно никаких автозагрузок для скрипта :)

Lexx09 28.08.2015 15:44

Цитата:

Сообщение от Krysanov (Сообщение 336730)
вот код

Код:

...
Код буду менять по ходу еще...

  1. В первой строке нет (x86) в пути к иконке.
  2. #include и #include можно убрать.
  3. И что-то не нравится мне эта команда - WinClose("SP Dialer.exe"). В этой команде должен быть указан заголовок окна. Он действительно такой - SP Dialer.exe? Если хочешь завершать по имени процесса, тогда надо так: ProcessClose("SP Dialer.exe").

Krysanov 28.08.2015 17:20

Цитата:

Сообщение от Lexx09 (Сообщение 336738)
  1. В первой строке нет (x86) в пути к иконке.
  2. #include и #include можно убрать.
  3. И что-то не нравится мне эта команда - WinClose("SP Dialer.exe"). В этой команде должен быть указан заголовок окна. Он действительно такой - SP Dialer.exe? Если хочешь завершать по имени процесса, тогда надо так: ProcessClose("SP Dialer.exe").

1. Для Игоря старался...изменил
2. учту, уберу
3. Я просто последовал совету и заменил на WinClose, в принципе эта программа неплохо просыпается, но бывает зависает и тогда интернета нет, помогает только перезагрузка... В общем, изменю...
ПС. Как работает сейчас мне очень нравится!!!

Krysanov 28.08.2015 17:23

Цитата:

Сообщение от seriousstas (Сообщение 336735)

Krysanov
Тоже попробуй ,
просто добавь код в конец сюда :
C:\Users\HOME\Documents\iCarDS\skins\Chameleon\Scr ipts\iCarMainScript.au3
и скомпилируй (оригинал не забудь переименовать) - должно работать !
И не нужно никаких автозагрузок для скрипта :)

Я наверное, ужасно туплю.. но какой (свой?) код и куда надо добавить?:bye:

Krysanov 28.08.2015 19:22

Цитата:

Сообщение от Lexx09 (Сообщение 336738)
  1. В первой строке нет (x86) в пути к иконке.
  2. #include и #include можно убрать.
  3. И что-то не нравится мне эта команда - WinClose("SP Dialer.exe"). В этой команде должен быть указан заголовок окна. Он действительно такой - SP Dialer.exe? Если хочешь завершать по имени процесса, тогда надо так: ProcessClose("SP Dialer.exe").


Подправил код под свои нужды

Lexx09 28.08.2015 19:58

1. Должно быть так (забыл EndIf):
Код:

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

2. Следить за HD-Quit.exe некорректно. Это же не сам Bluestacks, а спец. скрипт для его полного закрытия. Лучше следить за HD-Frontend.exe:
Код:

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

Или за HD-Agent.exe.

3. #include можно убрать.

Krysanov 28.08.2015 20:07

Цитата:

Сообщение от Lexx09 (Сообщение 336765)
1. Должно быть так (забыл EndIf):
Код:

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

2. Следить за HD-Quit.exe некорректно. Это же не сам Bluestacks, а спец. скрипт для его полного закрытия. Лучше следить за HD-Frontend.exe:
Код:

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

Или за HD-Agent.exe.

3. #include можно убрать.

Спасибо, дружище, подправил!!! Вот видишь какой из меня программист? На ровном месте косячу:blush: Хоть теперь понимаю, что и зачем в коде..:secret:

seriousstas 28.08.2015 23:10

Цитата:

Сообщение от Krysanov (Сообщение 336752)
Я наверное, ужасно туплю.. но какой (свой?) код и куда надо добавить?:bye:

1 В этот скрипт :
http://pccar.ru/showpost.php?p=336718&postcount=117
в конец добавть свой .
Это :
Код:

#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 ****
#include

добавь из своего скрипта в шапку iCarMainScript
2 Скомпилируй и перенеси с заменой по пути :
C:\Users\HOME\Documents\iCarDS\skins\Chameleon\Scr ipts\iCarMainScript.exe
3 Поудаляй всё остальное - пробуй

Krysanov 29.08.2015 08:20

seriousstas, попробовал, что ты посоветовал..
Вот что получилось

Код:

#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 ****
#include
Local $omyerror
$omyerror = ObjEvent("AutoIt.Error", "MyErrFunc")
Dim $vol_from_speed[201]
Global $rr = ObjCreate("RideRunner.sdk")
_main()

Func myerrfunc()
        $hexnumber = Hex($omyerror.number, 8)
        Exit
EndFunc

Func _initvolarray()
        $delta = 0
        $vol_from_speed[0] = $delta
        For $i = 0 To 150 Step 10
                $tmp_vol_from_speed = $rr.getinfo("=$vol_from_speed_" & $i + 10 & "$") / 10
                For $j = 1 To 10 Step 1
                        $delta = $delta + $tmp_vol_from_speed
                        $vol_from_speed[$i + $j] = Round($delta, 2)
                Next
        Next
        For $i = 162 To 200 Step 1
                $delta = $delta + $tmp_vol_from_speed
                $vol_from_speed[$i] = Round($delta, 2)
        Next
EndFunc

Func _main()
        Global $iswork = 1
        Global $isrun = 0
        Global $name = "[CLASS:TSkinForm]"
        Global $namecontrol = ""
        Global $foobarwindowtitleprev = ""
        Global $speed_prev = Round(Number($rr.getinfo("$IsDriveSpd$")), 0)
        Global $speed_prev_round = Round($speed_prev, -1)
        Global $vol_from_speed_full = 0
        Global $vol_min = Number($rr.getinfo("=$vol_from_speed_min$"))
        Global $vol_max = Number($rr.getinfo("=$vol_from_speed_max$"))
        _initvolarray()
        $rr.execute("SetVar;vol_from_speed_full;" & Round($vol_from_speed[$speed_prev], 2))
        While $iswork
                $handle = WinGetHandle($name)
                If @error Then
                        If $isrun Then
                                $iswork = 0
                        EndIf
                Else
                        $isrun = 1
                        If WinActive($name) OR WinActive("[CLASS:TOverlayForm]") OR WinActive("[CLASS:TPopupSkinForm]") OR WinActive("[CLASS:TModalSkinForm]") OR WinActive("[CLASS:TMediaForm]") Then
                                $rr.execute("SETIND;!iCarDS_Active;ON")
                        Else
                                $rr.execute("SETIND;!iCarDS_Active;OFF")
                        EndIf
                EndIf
                $volume = StringSplit($rr.getinfo("VOLUME"), "%")
                If @error = 0 Then
                        $current_volume = Number($volume[1])
                Else
                        $current_volume = 0
                EndIf
                $speed_current = Round(Number($rr.getinfo("$IsDriveSpd$")), 0)
                If $speed_current > $speed_prev Then
                        $delta_vol = Round($vol_from_speed[$speed_current] - $vol_from_speed[$speed_prev], 2)
                        If $current_volume + $delta_vol < $vol_max Then $rr.execute("volperc+;" & $delta_vol & "||SetVar;vol_from_speed_full;" & $vol_from_speed[$speed_current])
                Else
                        If $speed_current < $speed_prev Then
                                $delta_vol = Round($vol_from_speed[$speed_prev] - $vol_from_speed[$speed_current], 2)
                                If $current_volume - $delta_vol > $vol_min Then $rr.execute("volperc-;" & $delta_vol & "||SetVar;vol_from_speed_full;" & $vol_from_speed[$speed_current])
                        EndIf
                EndIf
                $speed_prev = $speed_current
                If Number($rr.getinfo("=$Is_new_vol_from_speed$")) = 1 Then
                        _initvolarray()
                        $rr.execute("SetVar;Is_new_vol_from_speed;0")
                EndIf
                Sleep(300)
        WEnd
EndFunc
; Это команда на сон
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("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")

    ; Закрываем программу по коннекту интернета
    ProcessClose("SP Dialer.exe")

    ; Закрываем GpsGate
    WinClose("Franson GpsGate")

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

  If (ProcessWaitClose("iCarDS.exe", 3) == 0) Then
        ProcessClose("iCarDS.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")

        ; Запускаем 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

В автозагруке был только этот скрипт, который отключил (он у меня при включении компа все загружал)... и GpsGateWatcher скрипт...Потом заменил iCarMainScript на свой.... и перезагрузил комп... и тишина.. икар не загрузился...

Lexx09 29.08.2015 10:25

Попробуй так:
Код:

#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 ****

#include
; Это команда на сон
Global $PBT_APMSUSPEND = 0x0004
Global $PBT_APMRESUMESUSPEND = 0x0007

Local $omyerror
$omyerror = ObjEvent("AutoIt.Error", "MyErrFunc")
Dim $vol_from_speed[201]
Global $rr = ObjCreate("RideRunner.sdk")

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

; Запускаем GpsGate
ShellExecute("C:\Program Files (x86)\Franson\GpsGate 2.0\GpsGateXP.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("C:\Program Files (x86)\SP Dialer\SP Dialer.exe")
       
_main()

Func myerrfunc()
        $hexnumber = Hex($omyerror.number, 8)
        Exit
EndFunc

Func _initvolarray()
        $delta = 0
        $vol_from_speed[0] = $delta
        For $i = 0 To 150 Step 10
                $tmp_vol_from_speed = $rr.getinfo("=$vol_from_speed_" & $i + 10 & "$") / 10
                For $j = 1 To 10 Step 1
                        $delta = $delta + $tmp_vol_from_speed
                        $vol_from_speed[$i + $j] = Round($delta, 2)
                Next
        Next
        For $i = 162 To 200 Step 1
                $delta = $delta + $tmp_vol_from_speed
                $vol_from_speed[$i] = Round($delta, 2)
        Next
EndFunc

Func _main()
        Global $iswork = 1
        Global $isrun = 0
        Global $name = "[CLASS:TSkinForm]"
        Global $namecontrol = ""
        Global $foobarwindowtitleprev = ""
        Global $speed_prev = Round(Number($rr.getinfo("$IsDriveSpd$")), 0)
        Global $speed_prev_round = Round($speed_prev, -1)
        Global $vol_from_speed_full = 0
        Global $vol_min = Number($rr.getinfo("=$vol_from_speed_min$"))
        Global $vol_max = Number($rr.getinfo("=$vol_from_speed_max$"))
        _initvolarray()
        $rr.execute("SetVar;vol_from_speed_full;" & Round($vol_from_speed[$speed_prev], 2))
        While $iswork
                $handle = WinGetHandle($name)
                If @error Then
                        If $isrun Then
                                $iswork = 0
                        EndIf
                Else
                        $isrun = 1
                        If WinActive($name) OR WinActive("[CLASS:TOverlayForm]") OR WinActive("[CLASS:TPopupSkinForm]") OR WinActive("[CLASS:TModalSkinForm]") OR WinActive("[CLASS:TMediaForm]") Then
                                $rr.execute("SETIND;!iCarDS_Active;ON")
                        Else
                                $rr.execute("SETIND;!iCarDS_Active;OFF")
                        EndIf
                EndIf
                $volume = StringSplit($rr.getinfo("VOLUME"), "%")
                If @error = 0 Then
                        $current_volume = Number($volume[1])
                Else
                        $current_volume = 0
                EndIf
                $speed_current = Round(Number($rr.getinfo("$IsDriveSpd$")), 0)
                If $speed_current > $speed_prev Then
                        $delta_vol = Round($vol_from_speed[$speed_current] - $vol_from_speed[$speed_prev], 2)
                        If $current_volume + $delta_vol < $vol_max Then $rr.execute("volperc+;" & $delta_vol & "||SetVar;vol_from_speed_full;" & $vol_from_speed[$speed_current])
                Else
                        If $speed_current < $speed_prev Then
                                $delta_vol = Round($vol_from_speed[$speed_prev] - $vol_from_speed[$speed_current], 2)
                                If $current_volume - $delta_vol > $vol_min Then $rr.execute("volperc-;" & $delta_vol & "||SetVar;vol_from_speed_full;" & $vol_from_speed[$speed_current])
                        EndIf
                EndIf
                $speed_prev = $speed_current
                If Number($rr.getinfo("=$Is_new_vol_from_speed$")) = 1 Then
                        _initvolarray()
                        $rr.execute("SetVar;Is_new_vol_from_speed;0")
                EndIf
                Sleep(300)
        WEnd
EndFunc

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")

    ; Закрываем программу по коннекту интернета
    ProcessClose("SP Dialer.exe")

    ; Закрываем GpsGate
    WinClose("Franson GpsGate")

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

    If (ProcessWaitClose("iCarDS.exe", 3) == 0) Then
        ProcessClose("iCarDS.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")

    ; Запускаем 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


Krysanov 29.08.2015 12:34

Спасибо, попробую
Попробовал дома на ноуте

Скрипт компилировал, переименовал и подменил..
В планировщике задач все автозагрузки поотключал...
запустил икар, все запустилось, все хорошо.. закрыл крышку ноута, подождал пока не уснет.. открыл...
и.. чистый рабочий стол:shok:
Нажимаю на ярлык икара, - все запустилось..:yes2:
Теперь я не пойму... а зачем были эти танцы с бубнами для последнего подмененного скрипта iCarMainScript, если пока не ткнешь в ярлык икара не заработает?
Или этот скрипт надо в автозагрузку закинуть? Тогда чем он отличается от
этого?

Lexx09 29.08.2015 13:50

Это seriousstas что-то мутит. :dntknw:
Я - за отдельный скрипт! Правда, я пока не пользуюсь спящим режимом...

Krysanov 29.08.2015 14:08

Цитата:

Сообщение от Lexx09 (Сообщение 336815)
Это seriousstas что-то мутит. :dntknw:
Я - за отдельный скрипт! Правда, я пока не пользуюсь спящим режимом...

получается так.. запускаю САМ икар, переделанный скрипт iCarMainScript появляется в трее, загоняю в сон..просыпается ком .. ни икара ни скрипта ... и следа от них не осталось... Попробовал закинуть в автозагрузку скрипт, - та же песня..
Пока на отдельном скрипте посижу....

Lexx09, как в этом задержку на выход из сна уменьшить? ТОЧНЕЕ, чтобы икар быстрее загружался..!!
тут
Код:

$hGUI = GUICreate("Restart", 100, 100, 1, 1)
покрутить?

seriousstas 29.08.2015 14:12

Lexx09

Да я только за десятки одновременно работающих скриптов , НО
считаю , что цикличные процессы вредят стабильности.
Скрипты сейчас везде и в Фубарах ,
в этом например :
http://zeremy.deviantart.com/art/FooTube-545591551
и в других программах - конфликтов не избежать .
Это видно и на разных видео - то прогу нужно дважды запускать,
то кнопки навигации не работают ...
Я в сборке Фубара использую таймеры и эмуляцию клавы ,
и если закрыть Икар при работающем скрипте из фубара (и ту-же запустить) - получим белое окно с ошибкой о конфликте и тд и тп .
Если есть способ скрипту отработать и выйти - то почему-бы нет ?
Добавленные команды в iCarMainScript точно умеют задержать отключение
винды и выгрузить необходимое (как писал) Krysanov - чистый экран .
А дальше - дело техники ...
Krysanov
Можешь запустить Икар через планировщик

Krysanov 29.08.2015 14:26

Цитата:

Сообщение от seriousstas (Сообщение 336817)
Lexx09
...
Krysanov
Можешь запустить Икар через планировщик

Слушай, а зачем так, НАЗАД в БУДУЩЕЕ?? В этом скрипте есть все программы, которые загружаются и мне нужны... Этот же скрипт был у меня в автозагрузке и все работает..
Объясни чем твоя идея лучше (быстрее, надежней...) ? Как ты запускаешь икар и как он себя ведет после просыпания?

Lexx09 29.08.2015 14:29

Цитата:

Сообщение от Krysanov (Сообщение 336816)
Lexx09, как в этом задержку на выход из сна уменьшить?

Сделать апгрейд. :smile2: Больше никак. Нет там никакой специальной задержки.

Цитата:

Сообщение от seriousstas (Сообщение 336817)
Да я только за десятки одновременно работающих скриптов , НО
считаю , что цикличные процессы вредят стабильности.

Сильно сомневаюсь в этом. А вот зависнувший/заглючивший один процесс, в который запихнуто все-все-все, приведет к краху всего. Да и отлаживать легче по отдельности.
Но хозяин барин, делайте, кому как удобнее.

seriousstas 29.08.2015 15:26

Lexx09
Цитата:

один процесс, в который запихнуто все-все-все
тут интересный пример :
http://www.pccar.ru/showthread.php?p=78811#post78811
А наша задача простая и согласен на все 100 ! ,что :
Цитата:

хозяин барин, делайте, кому как удобнее.
Я лишь за разнообразие вариантов , поэтому экспериментирую
Мой пример в шапке ни разу не подкачал это два крохотных скрипта , а теперь есть и (за что БОЛЬШОЕ спасибо!) :
http://pccar.ru/showpost.php?p=336689&postcount=107
который можно добавить для подстраховки в iCarMainScript,например , если Икар "растолстеет" со временем.
Krysanov какое будущее ? :) , я лишь написал
Цитата:

поробуй
, тк не стоят все эти проги , было интересно ,что получится.
Цитата:

Объясни чем твоя идея лучше
Идею несколько раз озвучивал - искал способ (и нашел) - без дополнительных "следящих" скриптов , тк сталкивался с конфликтами в Икаре ,
который сам по-себе напичкан скриптами ...
Цитата:

все работает..
Это хорошо! Тему не зря подняли :)

Krysanov 29.08.2015 19:16

Цитата:

Сообщение от seriousstas (Сообщение 336824)
....я лишь написал
, тк не стоят все эти проги , было интересно ,что получится.

О, вот как !!...
Цитата:

Идею несколько раз озвучивал - искал способ (и нашел) - без дополнительных "следящих" скриптов , тк сталкивался с конфликтами в Икаре ,
который сам по-себе напичкан скриптами ...

Это хорошо! Тему не зря подняли :)

Лично для меня - обсуждаемая тема приблизила к очередной минимизации моих действий после поворота ключа в машине.. В идеале хочу так.. повернул ключ зажигания и все само включилось, подхватилось :derisive:.. а ты только "баранку" крутишь и новыми технологиями наслаждаешься....

seriousstas 29.08.2015 19:26

Цитата:

Сообщение от Krysanov (Сообщение 336831)
Лично для меня - обсуждаемая тема приблизила к очередной минимизации моих действий после поворота ключа в машине.. В идеале хочу так.. повернул ключ зажигания и все само включилось, подхватилось :derisive:.. а ты только "баранку" крутишь и новыми технологиями наслаждаешься....

Да - не дело это ковырять шашечки , когда ехать надо )

Krysanov 29.08.2015 19:37

Цитата:

Сообщение от Lexx09 (Сообщение 336821)
Сделать апгрейд. :smile2: Больше никак. Нет там никакой специальной задержки.

Ясно.. жаль..

Цитата:

Сильно сомневаюсь в этом. А вот зависнувший/заглючивший один процесс, в который запихнуто все-все-все, приведет к краху всего. Да и отлаживать легче по отдельности.
Но хозяин барин, делайте, кому как удобнее.
имхо... всему должен быть предел.. если повесить, скажем, 10 программ, то глюки неизбежны...
когда то.. когда я с 7-ки перешел на 8-ку неприятным для меня моментом было то, что автозагрузка икара (настроенная в конфигураторе икара) попросту не работала и пришлось изголяться, чтобы после загрузки винды СРАЗУ загружался икар, а рабочий стол был не виден... с этим боролся я долго.. менял разные сборки, остановился на планировщике задач...Думаю, что пройдет немного времени и это реализуется...

seriousstas 30.08.2015 13:57

В #138 имел ввиду http://pccar.ru/showpost.php?p=336689&postcount=107
ссылку поправил ... те теперь можно всегда задержать уход в сон.
при выключении ПК гаснет экран, но комп продолжает дополнительно работать (на величину задержки)и успевает завершить все процессы

Krysanov 30.08.2015 16:24

Цитата:

Сообщение от seriousstas (Сообщение 336873)
В #138 ...
ссылку поправил ... те теперь можно всегда задержать уход в сон.
при выключении ПК гаснет экран, но комп продолжает дополнительно работать (на величину задержки)и успевает завершить все процессы

интересно посмотреть ссылку... только где она?

seriousstas 30.08.2015 16:36

Цитата:

Сообщение от Krysanov (Сообщение 336880)
интересно посмотреть ссылку... только где она?

Дык вот-же выше в #142 ... , просто в #138 по ошибке вставил другую
- сейчас поправил...

Krysanov 30.08.2015 18:34

Цитата:

Сообщение от seriousstas (Сообщение 336882)
Дык вот-же выше в #142 ... , просто в #138 по ошибке вставил другую
- сейчас поправил...

:acute::acute::bye:

Krysanov 30.08.2015 21:08

Ребята, скрипт работает на 100 %, чему я несказанно рад!!
Теперь хотелось бы, чтобы после просыпания икар начинал с того самого места как и засыпал ... А у меня происходит так: сначала настройки икара, потом блюстак с лаунчером от lexx09, потом фубар (который что то долговато грузится (12-я версия))... Как сделать так, чтобы процессы загрузок блюстака и всего остального было в скрытом режиме,а?
В настройках икара стоит режим восстановление и в зависимости от программы
Завтра запишу на телефон видео и выложу на посмотреть, чтобы было понятней, что у меня происходит

Вот, что на домашнем ноуте




Вот так в машине


Krysanov 31.08.2015 11:52

seriousstas

Подскажи, почему после сна, у меня фубар отображает старый плейлист с радио, а не новый фоткой исполнителя, до ухода в сон было как надо? Это связано с не сохранением настроек икара ?

seriousstas 31.08.2015 13:03

Цитата:

Сообщение от Krysanov (Сообщение 336952)
seriousstas

Подскажи, почему после сна, у меня фубар отображает старый плейлист с радио, а не новый фоткой исполнителя, до ухода в сон было как надо? Это связано с не сохранением настроек икара ?

да, потому-что у тебя Икар закрывается по второму условию , через :
Цитата:

If (ProcessWaitClose("iCarDS.exe", 3) == 0) Then
ProcessClose("iCarDS.exe")
EndIf
Предполагаю ,здесь тоже нужно проверять через
https://www.autoitscript.com/autoit3...nWaitClose.htm
Но это лучше пусть Lexx09 подскажет

sirota 31.08.2015 17:21

Krysanov

Цитата:

Вот так в машине
Замечательно работает :bye:

Krysanov 31.08.2015 18:33

Цитата:

Сообщение от sirota (Сообщение 336976)
Krysanov



Замечательно работает :bye:

Да, только хочется чтобы перед глазами не мельтешило !! А как сделать не знаю:dntknw: пытался поднастроить икар, но информация по настройке сильно устарела...:be: может ты подскажешь как убрать это мельтешение ?

dk-fsb 01.09.2015 17:04

Цитата:

Сообщение от Krysanov (Сообщение 336904)
Ребята, скрипт работает на 100 %, чему я несказанно рад!!
Теперь хотелось бы, чтобы после просыпания икар начинал с того самого места как и засыпал ... А у меня происходит так: сначала настройки икара, потом блюстак с лаунчером от lexx09, потом фубар (который что то долговато грузится (12-я версия))... Как сделать так, чтобы процессы загрузок блюстака и всего остального было в скрытом режиме,а?
В настройках икара стоит режим восстановление и в зависимости от программы
Завтра запишу на телефон видео и выложу на посмотреть, чтобы было понятней, что у меня происходит

Вот, что на домашнем ноуте





Вот так в машине


классно работает. есть вопрос написал в лычку

Krysanov 01.09.2015 22:34

UP!!!!

Цитата:

.....
Теперь хотелось бы, чтобы после просыпания икар начинал с того самого места как и засыпал ... А у меня происходит так: сначала настройки икара, потом блюстак с лаунчером от lexx09, потом фубар (который что то долговато грузится (12-я версия))... Как сделать так, чтобы процессы загрузок блюстака и всего остального было в скрытом режиме,а?
В настройках икара стоит режим восстановление и в зависимости от программы
Парни, что, нет решения этому ? У всех так?:pleasantry::wacko2:

seriousstas 02.09.2015 05:19

Цитата:

Сообщение от Krysanov (Сообщение 337051)
UP!!!!


Парни, что, нет решения этому ? У всех так?:pleasantry::wacko2:

У меня не засыпает столько экранов . сложно сказать ,
но ,как и на видео в первом сообщении , если заснул с Фубаром ,
то так и просыпается ...

Krysanov 04.09.2015 20:32

Экспериментировал сегодня дома... Отключил скрипт, перезапустил комп, руками все запустил (гейт, икар). В икаре настройки не менял (восстановление и в зависимости от загрузки)
Закинул в сон... вышел с него
Вот видео


seriousstas 05.09.2015 04:50

Krysanov
Цитата:

Экспериментировал сегодня дома... Икар спит безо всяких скриптов
Я Икар перезапускаю , тк есть проблемы с BT + приветствие нравится :)
А если все ОК , то и "бубен" не нужен тогда ...

Krysanov 05.09.2015 07:36

покатаюсь пока так, с недельку... Икар так быстро не сдается:no2:

Krysanov 08.10.2015 17:13

модем или другое устройство связи уже используется как решить
 
Вот, что заметил... после выхода из сна бывает, что программа, которая запускает интернет (SP DIALER), его не подключает.... вывожу окно на рабочий стол и вижу, что программа пытается подключиться к модему, количество подключений растет... выдаетс такое предупреждение:
модем или другое устройство связи уже используется ...
Закрытие программы и открытие ее вновь, проблему не решает. Заметил вот еще что.. Модем висит на 11 порту, в Гейте создан вирт порт 11... Так вот, когда не получается соединиться, вирт порт в гейте выдает ошибку 80-ю...:shok:
Помогает только перезагрузка..

Krysanov 09.10.2015 17:56

Никто не поможет?

Krysanov 09.10.2015 18:38

Парни, задавал здесь вопрос http://www.pccar.ru/showpost.php?p=3...postcount=2090, но меня не поняли и отнеслись не серьёзно.
Вопрос актуальный.. Как закрыть все экраны в икаре, и оставить только те, которые нужны при просыпании икара? Может где в настройках что почистить?

Glouck 10.10.2015 04:14

Цитата:

Сообщение от Krysanov (Сообщение 339955)
Модем висит на 11 порту, в Гейте создан вирт порт 11... Так вот, когда не получается соединиться, вирт порт в гейте выдает ошибку 80-ю...:shok:
Помогает только перезагрузка..

Дык не надо вешать модем и вирт порт на один и тот же номер...


Часовой пояс GMT +4, время: 08:55.

Работает на vBulletin® версия 3.8.4.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot