PCCar.ru - Ваш автомобильный компьютер - iCarDS + Сон, Гибридный сон и Гибернация

- iCarDS (http://pccar.ru/forumdisplay.php?f=121)

- - iCarDS + Сон, Гибридный сон и Гибернация (http://pccar.ru/showthread.php?t=23331)

Цитата:

Сообщение от 120705 (Сообщение 378272)

Что то я туплю...... Можно сделать, что бы Икар уходил в сон, а минут так через 20-30 переходил в Гибер?? Варианты решения???

Это делает за вас интеллектуальный БП, например, M2-ITX (если правильно поставить джампера)

Методом "проб" пришел к выводу,что лучше перезапуска Фубара ничего нет .
Фубаровские скрипты почти все имеют таймеры и проще перезапустить весь Фубар .
Обновил скрипт в шапке для этого .
Обновил так-же и сам Фубар (перезапуск и его версию) .
Можно сделать самому добавив :

Код:

if(vkey== VK_NUMPAD1) {

fb.RunMainMenuCommand("File/Restart");

}

после
...
//================================================== == On key down
function on_key_down(vkey) {
var mask = GetKeyboardMask();
<<СЮДА>>
if(vkey== VK_SPACEBAR) {
...
Кликнув ПКМ по кнопкам = > Configure
и перекомпилировась скрипт из шапки .
пример перезапуска (когда Фубар главный, либо за Ситигидом ):

120705
Да БП просто отключает питание , и получаешь Гибернацию .
Должен быть вкл. "Гибридный сон" в настройках питания Win.

Цитата:

И ещё обратил внимание, что в трее несколько (2-4) иконок Блюсолей

Вспомнил, что Ты писал про нормальную работу Блюсолеил .
Поставь ";" перед _BlueSoleilCS() и перезапуска служб не будет .

ну и проверь, как сейчас полный перезапуск Фубара, записал минутное видео в авто , сейчас залью..

Цитата:

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

Методом "проб" пришел к выводу,что лучше перезапуска Фубара ничего нет .
Обновил скрипт в шапке для этого.

привет Стас:pleasantry:

Я блин не успею за тобой)))
только кинусь обновлять по одному - ты уже сделал по иному)))
опять я запутался и задам 3 ключевых (не потятных вопроса):

1) у тебя куча версий на все случаи жизни.
решили, что Foobar лучше перезапускать целиком.
Вопрос: что с iCarDs - его нужно перезапускать всё таки для корректной работы после выхода из сна или нет? или твои готовые SUSPEND.exe всё делают?
Если нужно то как? (какой скрипт)

2) какую теперь версию SUSPEND.exe использовать? из готовых какую то, либо же этот код править под себя (обзывать его SUSPEND.exe и т.д.):

Код:

#NoTrayIcon

#RequireAdmin

#pragma compile(Icon, "C:\Program Files (x86)\AutoIt3\Icons\MyAutoIt3_Yellow.ico")

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_Compression=4

#AutoIt3Wrapper_UseUpx=y

#AutoIt3Wrapper_Run_AU3Check=n

#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include 

#include 

#include

_AlreadyRunning()

; Это команда на сон

Global $PBT_APMSUSPEND = 0x0004

Global $PBT_APMRESUMESUSPEND = 0x0007

$myAlpha = 50



$hGUI = GUICreate("Restart", 100, 100, 1, 1)

GUIRegisterMsg($WM_POWERBROADCAST, "Standby")

If @OSArch = "X86" Then

    $ProgramFileDir = "C:\Program Files"

    Else

    $ProgramFileDir = "C:\Program Files (x86)" 

    endif



Func Standby($hWnd, $Msg, $wParam, $lParam)

    Select

        Case $wParam = $PBT_APMSUSPEND

            Suspend()

        Case $wParam = $PBT_APMRESUMESUSPEND

            ResumeSuspend()

        Case Else

    EndSelect

EndFunc



While 1



$connect = _GetNetworkConnect() 

If Not $connect Then

_RunDOS('netsh interface set interface "Беспроводная сеть" DISABLE') ; выкл "Local Area Connection"

Sleep(1000)

_RunDOS('netsh interface set interface "Беспроводная сеть" ENABLE') ; вкл "Local Area Connection"

EndIf

Sleep(5000)

        $overlay_handle = WinGetHandle("[CLASS:TOverlayForm]")

        If ($overlay_handle And WinExists($overlay_handle)) Then

                Local $iTransColor, $iAlpha

                $iInfo = _WinAPI_GetLayeredWindowAttributes($overlay_handle, $iTransColor, $iAlpha)

                If ($iAlpha <= 100) Then

                Sleep(3000)

                        _WinAPI_SetLayeredWindowAttributes($overlay_handle, $iTransColor, $myAlpha)

                EndIf

        EndIf

WEnd



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

Func Suspend()

;_CloseIcarDS ()

EndFunc







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

Func ResumeSuspend()

Sleep(100)

_BlueSoleilCS()

Sleep(1000)

If Not (ProcessExists('iCarDS.exe')) Then

Sleep(1000)

If @OSArch = "X86" Then

    $ProgramFileDir = "C:\Program Files"

    Else

    $ProgramFileDir = "C:\Program Files (x86)" 

    Endif

Sleep(100)

ShellExecute($ProgramFileDir & "\TipTop software\iCar DS\iCarDS.exe")

Else

;_RadioUpd()



Sleep(100)

_restfoob()

Sleep(100)

_StartIcarDS()

;_restwifi()

Endif

EndFunc



Func _StartIcarDS()

If Not (ProcessExists('iCarDS.exe')) Then

If @OSArch = "X86" Then

    $ProgramFileDir = "C:\Program Files"

    Else

    $ProgramFileDir = "C:\Program Files (x86)" 

    Endif

        ; Запускаем iCarDS

    ShellExecute($ProgramFileDir & "\TipTop software\iCar DS\iCarDS.exe")

Endif

EndFunc



Func _CloseIcarDS()

Local $Class = '[Class:TSkinForm]', $Delay = Opt('WinWaitDelay', 0)

If WinExists($Class) Then

WinClose($Class)

Endif

EndFunc



Func _RadioUpd()        

Sleep(2000)

If (ProcessExists('iCarDS.exe')) Then ;check icar

$RRSDK = ObjCreate("RoadRunner.SDK") ;create obj

;Media Source

; Media_s : 0 - Audio  1 - Radio  2 - TV  3 - Video   4 - DVD  5 - WinampRadio  6 - InternetRadio  7 - SkinMedia

Global $media_source = $RRSDK.getInfo("=$Media_s$");check media source

If ($media_source == 1) Then

                ProcessClose('DSPlayer.exe');close proc

                Sleep(100)

                $RRSDK.execute("RADIO");call radio

                Sleep(100)

                $RRSDK.execute("plexec");call radio

                Sleep(4000)

                $RRSDK.execute("RADIO");call radio

                Sleep(100)

                $RRSDK.execute("plexec");call radio



EndIf

EndIf

EndFunc



Func _BlueSoleilCS()

If @OSArch = "X86" Then

    $ProgramFileDir = "C:\Program Files"

    Else

    $ProgramFileDir = "C:\Program Files (x86)" 

    endif

     ; Перезапуск BlueSoleilCS

     Run('taskkill /f /im BtTray.exe',"", @SW_HIDE)

     Run('taskkill /f /im BlueSoleilCS.exe',"", @SW_HIDE)

     Run('taskkill /f /im BsHelpCS.exe',"", @SW_HIDE)

     Run('taskkill /f /im BsMobileCS.exe',"", @SW_HIDE)

  Sleep(100)

ShellExecute($ProgramFileDir & "\IVT Corporation\BlueSoleil\BtTray.exe")

EndFunc



Func _restfoob()

ControlSend("[CLASS:{E7076D1C-A7BF-4f39-B771-BCBE88F2A2A8}]", "", "MegaPanelSplitterWindowContainer1", "{NUMPAD1}")

EndFunc



Func _restwifi()

$connect = _GetNetworkConnect() 

If Not $connect Then

_RunDOS('netsh interface set interface "Беспроводная сеть" DISABLE') ; выкл "Local Area Connection"

Sleep(200)

_RunDOS('netsh interface set interface "Беспроводная сеть" ENABLE') ; вкл "Local Area Connection"

EndIf

EndFunc



Func _GetNetworkConnect()

    Local Const $NETWORK_ALIVE_LAN = 0x1  ;net card connection

    Local $aRet, $iResult 

    $aRet = DllCall("sensapi.dll", "int", "IsNetworkAlive", "int*", 0) 

    If BitAND($aRet[1], $NETWORK_ALIVE_LAN) Then $iResult &= "LAN connected" & @LF

    Return $iResult

EndFunc



Func _AlreadyRunning()

    If ProcessExists(@Scriptname) Then

        $list = ProcessList()

            for $i = 1 to $list[0][0]

            If $list[$i][0] = @ScriptName And $list[$i][1] <> @AutoItPID Then 

                Exit

            EndIf

            Next

    EndIf

EndFunc

Цитата:

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

Vkey_ARDUINO.exe (AHK)- для эмуляции клавиш ARDUINO (без устройства) , использования хоткеев из вне (например для кнопок руля)

Объясни, этот "экзешник" мне нужно использовать или нет?
Я просто не вкурю это для корректной работы плагина iCarDuino и скомпилированого AHK (код ниже) или для чего то другого?

Код:

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.

; #Warn  ; Enable warnings to assist with detecting common errors.

SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.

SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.



~f1::

icar := ComObjCreate("RideRunner.SDK")

icar.Execute("SetVar;duino_key;duino_11111111||OnDuinoKeyPress")

return



~f2::

icar := ComObjCreate("RideRunner.SDK")

icar.Execute("SetVar;duino_key;duino_11111112||OnDuinoKeyPress")

return



~f3::

icar := ComObjCreate("RideRunner.SDK")

icar.Execute("SetVar;duino_key;duino_11111113||OnDuinoKeyPress")

return



~f7::

icar := ComObjCreate("RideRunner.SDK")

icar.Execute("SetVar;duino_key;duino_11111114||OnDuinoKeyPress")

return



~f9::

icar := ComObjCreate("RideRunner.SDK")

icar.Execute("SetVar;duino_key;duino_11111115||OnDuinoKeyPress")

return

Цитата:

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

Обновил так-же и сам Фубар (перезапуск и его версию) .

если ты обновил саму версию фубара, то чисдо добавления пару строк в код (для перезапуска) не обойтись же?

P.S. У тебя работает CityGuide и iCarDS... как ты победил то его? у меня (да и у многих на сколько я читал) связка iCar + CityGuide не работает (ошибка была в ситигиде)! Win 8 x64 стоит...
если можешь залей куда то CityGuide + карты (ключ активации у меня куплен, валяется без дела)

P.S.S> Ты проделываешь колосальную работу за что тебе просто !РИСПЕКТ!:yes4:
рассписываешь всё очень развёрнуто, но оч много вариаций и всё спутано и легко потерятся (... часто не понятно что применять, а что пропустить.

Да, Стас, выложи здесь ссылки на последние твои разработки..

Цитата:

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

120705
Держи :

В сикбар в самый конец :

Код:

function on_key_down(vkey) {

if  (vkey == 0x63) {

window.Reload();}

}

Сделал изменения в скрипте Сикбара. После запуска строка бежит (около 3-5 сек.) Может не так долго, как было.. Потом останавливается. Чем больше комп находится в режиме сна, тем дольше по времени строка бежит при выходе компа из сна---это из моего наблюдения. Такое впечатления, что она что то нагоняет, т.е. пролистывает пропущенные треки (радио).

Пожелания: (это больше касается Seriousstas). Если можно в скриптах, которые в шапке или позже выложенные, в начале или в конце скрипта писать версию скрипта или дату его создания, что бы понять, на сколько это свежая запись или правка скрипта. Начинается путаница, какие скрипты оригинальные, какие уже с исправлениями, а дальше будет больше.

shumaz Привет! (на все Твои вопросы давал ответ по пару раз ;) )

Цитата:

ошибка была в ситигиде

Что за ошибка ? Мне известна только ошибка микшера Икара ,
её победил через адаптер для USB (звук карта USB) .
На домашнем (Win10) - ситик работает без проблем

Перезапускать Икар или нет - решает каждый сам .
Если нет много фоновых загрузок (в режиме "восстановление") а в автозагрузке 1-2
программы - лучше перезапустить сняв коммент ";" перед ;_CloseIcarDS () при входе в сон .
Я пока не перезапускаю - еще тесты ..
Фубар перезапускать обязательно .

Цитата:

2) какую теперь версию SUSPEND.exe

Скрипт обновляю сейчас каждый день - пока не отлажу...
Слава сделал Wi-Fi следилку без перезапуска адаптера - сегодня добавлю его наработки в скрипт ..

Цитата:

Vkey_ARDUINO

Нужен для общения хоткеями из вне . Например для кнопок руля .
В скрипте задаешь хоткей который передаешь в Икар ,
а в настройках Икара - что делать при его получении .
Если нет кнопок - он не нужен .

Цитата:

4) Фубар обновил и добавил пару строк для перезапуска .

Перезапуск через Numpad1 (можно поменять)
Строки можно и самому добавить в МПС (писал выше об этом) .
120705
Задержки можно уменьшить - но лучше перезапустить Фубар тк кнопки работать
сразу не будут после долгого сна.

Цитата:

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

shumaz Привет! (на все Твои вопросы давал ответ по пару раз ;) )

Что за ошибка ? Мне известна только ошибка микшера Икара ,
её победил через адаптер для USB (звук карта USB) .
На домашнем (Win10) - ситик работает без проблем

Перезапускать Икар или нет - решает каждый сам .
Если нет много фоновых загрузок (в режиме "восстановление") а в автозагрузке 1-2
программы - лучше перезапустить сняв коммент ";" перед ;_CloseIcarDS () при входе в сон .
Я пока не перезапускаю - еще тесты ..
Фубар перезапускать обязательно .

Скрипт обновляю сейчас каждый день - пока не отлажу...
Слава сделал Wi-Fi следилку без перезапуска адаптера - сегодня добавлю его наработки в скрипт ..

Нужен для общения хоткеями из вне . Например для кнопок руля .
В скрипте задаешь хоткей который передаешь в Икар ,
а в настройках Икара - что делать при его получении .
Если нет кнопок - он не нужен .

Перезапуск через Numpad1 (можно поменять)
Строки можно и самому добавить в МПС (писал выше об этом) .
120705
Задержки можно уменьшить - но лучше перезапустить Фубар тк кнопки работать
сразу не будут после долгого сна.

по ситигиду: я не помню ошибку, но IcarDS + CityGuide у меня не работал (ошибку выдавало какую то...вроде icar крашился). если в микшере ошибка и только встроеная звуковая то видимо не победить?

по перезапуску icarDS: вот снова же каша)))
ты отвечал по несколько раз (ЗА ЧТО ТЕБЕ СНОВА СПАСИБО! что терпишь нас спамеров :blush:)
вот решил я перезапускать всё же iCarDS + foobar.
что мне нужно?
SUSPEND_rest_foob в папку icarDS + скомпилировать скрипт с первого сообщения (и добавить его в автозагрузку) или сам скрипт будет и icarDS перезапускать и foobar?
вот в чём для меня непонятка.

Цитата:

вот решил я перезапускать всё же iCarDS + foobar.

Цитата:

звуковая то видимо не победить?

Попробуй Win 7 или Win 10, можно вытащить из Нави программ - не будет приглушения звука при подсказках, но и не будет падений ..

Цитата:

SUSPEND_rest_foob

перезапустит только скрипты Фубара , что не решит проблемы (тут - проехали) .
Тебе нужно скомпилировать скрипт из шапки и закинуть его к Икару (Взять сборку или добавить в МПС строчки , что выше),
а дальше почитать здесь(я обновил в архиве все кроме SUSPEND - он в шапке) :
http://pccar.ru/showpost.php?p=376595&postcount=516

Цитата:

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

либо Икар , либо Фубар внутри Икара ..
Если ты закрываешь-открываешь Икар то ничего больше не нужно .
Он сам перезапустит все программы .
Ты больше пробуй - вопросы отпадут .
Можно перезапустить только Фубар - тогда будет , как на видео .

Попробуй Win 7 или Win 10, можно вытащить из Нави программ - не будет приглушения звука при подсказках, но и не будет падений ..

перезапустит только скрипты Фубара , что не решит проблемы (тут - проехали) .
Тебе нужно скомпилировать скрипт из шапки и закинуть его к Икару (Взять сборку или добавить в МПС строчки , что выше),
а дальше почитать здесь(я обновил в архиве все кроме SUSPEND - он в шапке) :
http://pccar.ru/showpost.php?p=376595&postcount=516

Тьфу... Дошло!
Как то не задумывался, что при перезапуске iCarDS все проги встроеные тоже перезапустятся.
Скомпилированый скрипт "SUSPEND" назвать если ити по первому пункту (запуск icar как оболочки с подгрузкой раб. стола)?

С фубаром понял... Обновил уже.

Спасибо.

P.S. постараюсь больше на практике применять, просто не хочется винду положить)