'bitrix:im.messenger' is not a component

Автор Тема: Цифровой ТВ-Тюнер (Уже в действии)  (Прочитано 10207 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Canopus_

  • Майор
  • ****
  • Репутация: +15/-4
  • Не в сети Не в сети
  • Сообщений: 827
  • Город: ссср
Re: Цифровой ТВ-Тюнер (Уже в действии)
« Ответ #40 : 06 10 2011, 18:39:15 »

Да вот здесь всё по моему CarPC _http://www.prado-club.su/forum/index.php?topic=29351.0
Записан
- А вы парашюты качественно укладываете?
- Еще никто не жаловался....

Strateg

  • Генерал-Лейтенант
  • ********
  • Репутация: +234/-39
  • Не в сети Не в сети
  • Пол: Мужской
  • Сообщений: 15071
  • TLC 150 Executive
Re: Цифровой ТВ-Тюнер (Уже в действии)
« Ответ #41 : 06 10 2011, 22:39:21 »

Утилиту так и не увидел. :)
Записан

Canopus_

  • Майор
  • ****
  • Репутация: +15/-4
  • Не в сети Не в сети
  • Сообщений: 827
  • Город: ссср
Re: Цифровой ТВ-Тюнер (Уже в действии)
« Ответ #42 : 07 10 2011, 16:18:16 »

Утилиту так и не увидел. :)
Использую утилиту для CG3.4 для контроля пробочной информации и её обновления в случае устаревания ( а так же для контроля сети )
На экран выводит время с момента последнего апдейта пробок .

#NoTrayIcon      ; не отображать значок скрипта в трее
#SingleInstance force   ; перезагрузить скрипт, если он уже запущен
#NoEnv         ; запрещаем имена переменных как у переменных окружения
SendMode Input      ; ускорренный ввод
#Persistent      ; держать скрипт запущенным
SetTitleMatchMode 2   ; 2 - заголовок окна должен содержать значение, заданное в WinTitle
DetectHiddenWindows, On
; ----------- редактируемые переменные - настройки ------------
cityguide   := "City Guide"            ; название окна CityGuide
cityguidelite   := "City Guide Lite"         ; название окна CityGuideLite
myjamfile   := "C:\Program Files\MIT\City Guide\78SPb.jam" ; за каким файлом пробок следим (боевой)
jamgreen   := 8               ; до скольки минут считать возраст пробок зеленым
jamred      := 40               ; до скольки минут считать возраст пробок красным
empty      := "нет"            ; что пишем на экране, если пробочный файл очень старый
xPosition   := 700               ; x-позиция на экране
yPosition   := 305               ; y-позиция на экране
; -------- конец редактируемых переменных - настроек ----------
CityGuideActive := 0
Custom1Color := "600305"
Custom2Color := "036005"
MyTextEmpty := ""
gui, color, 000000
gui, font, s34 bold, Arial
Gui, Add, Text, c%Custom1Color% x200 y200 w130 h70 vMyRed, %MyText3%
Gui, Add, Text, c%Custom2Color% x0 y0 w130 h70 vMyGreen, %MyText1%
Gui, +LastFound +AlwaysOnTop
WinSet, TransColor, 000000 200
Gui, -Caption
Gui, Show, x%xPosition% y%yPosition% w130 h70 NoActivate, CGJAM
JamShow := 1
SetTimer, ShowHideJam ; отслеживать показ на экране только в окне СитиГида
SetTimer, SwitchText, 10000 ; проверять файл пробок каждые 10 секунд
SetTimer, SwitchProbki, 200000 ; обновлять файл пробок каждые 100 секунд
return

GuiSize:
   If (Errorlevel = 1)
      Gui, Restore ; противодействуем минимизации окна

ShowHideJam:
   WinKill, Error
   WinKill, About Cursor Hider
   WinKill, Google Планета Земля: Предлагаемое обновление
   Act := 0
   IfWinActive, %cityguide%
   {
      Act := 1
   }
   Else
   {
      IfWinActive, CGJAM
      {
         Act := 1
      }
   }
   If (Act = 1)
   {
      If (JamShow <> 1)
      {
         WinShow, CGJAM
         JamShow := 1
      }
   }
   Else
   {
      If (JamShow = 1)
      {
         WinHide, CGJAM
         JamShow = 0
      }
   }
   If CityGuideActive = 0
   {
      IfWinActive, %cityguide%
      {
; CityGuide не был запущен, а сейчас найден в списке окон
         CityGuideActive := 1
      }
   }
   Else
   {
         CityGuideActive := 0
   }
   return
SwitchProbki:
; обновляем пробки
      IfWinActive, %cityguide%
   {
   MouseClick, Left, 1035, 36 ; обновить пробки
   sleep 2000
   MouseClick, Left, -564, 36
;   send, {F5}
   CityGuideActive := 1
   }
   Else
    {
         CityGuideActive := 0
    }
   return

SwitchText:
; Получаем время файла пробок
   FileGetTime, OutputVar, %myjamfile%
   mhour := Substr(OutputVar, 9, 2)
   mmin := Substr(OutputVar, 11, 2)
   
; Собираем текущую отметку времени (в минутах)
   currconntimestamp := A_Min + A_Hour*60

   lastjamtimestamp := mmin + mhour*60

   If (currconntimestamp + 5 < lastjamtimestamp)
      currconntimestamp := currconntimestamp + 24*60

; Получаем возраст файла пробок
   jamtime := currconntimestamp - lastjamtimestamp
   If (jamtime > 9)
   {
      jamtime := "  " . jamtime
   }
   Else
   {
      jamtime := "   " . jamtime
   }

   jamexpired := 0
   If (currconntimestamp > lastjamtimestamp + jamgreen)
      jamexpired := 1
   If (currconntimestamp > lastjamtimestamp + jamred)
      jamtime := empty

; тут надо нарисовать цветом возраст пробочного файла
   If (jamexpired = 0)
   {
; Делаем зеленым
      GuiControl, Move, MyRed, x200 y200 ; сдвигать надо, чтобы красный текст не исчезал при показе
      GuiControl, Text, MyRed, %MyTextEmpty%
      GuiControl, Text, MyGreen, %jamtime%
      GuiControl, Move, MyGreen, x0 y0
   }
   Else
   {
; Делаем красным
      GuiControl, Move, MyGreen, x200 y200 ; сдвигать надо, чтобы красный текст не исчезал при показе
      GuiControl, Text, MyGreen, %MyTextEmpty%
      GuiControl, Text, MyRed, %jamtime%
      GuiControl, Move, MyRed, x0 y0
   }
   return

Написана под autohotkey !
Для режима тестировани сети корректируйте параметры обращения к серверу CityGuide ( ну например каждые 3 сек )
з ы ... это не логгер конечно ( такой задачи не было ) , но качественное представление даёт )
Записан
- А вы парашюты качественно укладываете?
- Еще никто не жаловался....

Strateg

  • Генерал-Лейтенант
  • ********
  • Репутация: +234/-39
  • Не в сети Не в сети
  • Пол: Мужской
  • Сообщений: 15071
  • TLC 150 Executive
Re: Цифровой ТВ-Тюнер (Уже в действии)
« Ответ #43 : 07 10 2011, 16:21:25 »

Реально, эта утилита только моргает "лампочкой" :)
Записан

РОВНЯК

  • Майор
  • ****
  • Репутация: +48/-7
  • Не в сети Не в сети
  • Пол: Мужской
  • Сообщений: 774
  • Город: Екатер
Re: Цифровой ТВ-Тюнер (Уже в действии)
« Ответ #44 : 12 11 2011, 02:26:16 »

Поставил себе такой, в Екатеринбурге нормально показывает эти каналы:
1 kanal (ОРТ)
Rossia 1
Rossia 2
Rossia K (Культура)
Rossia 2
НТВ
TRK 5 kanal
Bibigon

Но будьте бдительны, мне по ошибке подключили тюнер напрямую и он вынес в ноль за двое суток аккумулятор. Устанавливали не в гараже дяди Ашота, нормальный установочный центр. Проверяйте после установки допов токи утечки.

Записан
6 цилиндров 249 коней и никаких турбин

Canopus_

  • Майор
  • ****
  • Репутация: +15/-4
  • Не в сети Не в сети
  • Сообщений: 827
  • Город: ссср
Re: Цифровой ТВ-Тюнер (Уже в действии)
« Ответ #45 : 13 11 2011, 13:30:56 »

Реально, эта утилита только моргает "лампочкой" :)
софтина ведёт лог файл , допустим можете тестить сеть каждые 1-2 сек , хотя конечно у неё задача выводить на экран пробочный возраст ну а " моргать лампочкой " она просто не должна и не будет ... :)
Записан
- А вы парашюты качественно укладываете?
- Еще никто не жаловался....