Я построил «загородный» дом, потому что не живу в нем, и столкнулся с проблемой определения температуры.
Моя свекровь живет на стройке.
В систему отопления залита вода.
Экспериментально установлено, что при +8 в доме начинают промерзать трубы на стенах за гипсокартоном, а при +18 свекровь заболевает. Так возникла идея контролировать температуру удаленно.
После поиска в интернете были куплены 2 устройства: отечественного производства.
Программное обеспечение было включено в оба.
Китайский креатив был сырой, но по функционалу немного превосходил наш, но к нашему прибору можно подключить до 10 датчиков DS18B20. Этот аргумент был решающим.
На данный момент в системе 4 датчика: улица, 1 этаж, 2 этаж и чердак.
Накоплена статистика за год. Фасад выглядит так:
СПАСИБО Деннси термометр в проекте openweathermap.org, станция здесь .
СПАСИБО Ссар термометр в проекте narodmon.ru, станция здесь .
Родной сайт tarasii.dyndns.org из-за ограничений в Windows XP вылетает при 10 подключениях.
Программное обеспечение BM1707 может записывать результаты измерений в текстовые файлы.
Итак, долго не думая, был набросан конвертер файлов в таблицы на ASP. Читать такие таблицы оказалось сложно, а главное, сложно заметить момент, когда температура не в норме.
Именно здесь мои коллеги (спасибо KOJISI) пришли на помощь и подтолкнули меня на правильный путь.
JavaScript появился в поле зрения Хайсток .
Как им пользоваться описано в статьях Highstock: мониторинг Премии Рунета И Динамические графики на основе highstock .
После некоторого бдения таблицы ASP были объединены с JS. По сути графики оказались такими же, как и сейчас, но построены из файлов.
После двух месяцев работы от файлов пришлось отказаться.
Обработка файлов заняла невероятно много времени.
Решение было принято молниеносно — читаем графики из MySQL. Программное обеспечение BM1707 позволяет периодически опрашивать датчики, а затем запускать bat-файлы.
Был написан VBScript, сохраняющий результаты измерений в MySQL. Скрипт преобразует текстовую дату в дату в секундах начиная с 1970 года, а также проверяет наличие записи с этим временем.
Теги: #Сделай сам или Сделай сам #jQuery #ds18b20 #термометр #highstock #BM1707Const ForReading = 1 Const TristateUseDefault = -2 Dim FSO Set FSO = CreateObject("Scripting.FileSystemObject") Dim FilePath FilePath = "C:\BM1707\bm1707.temp" set cn = CreateObject("ADODB.Connection") cn.connectionstring = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;DataBase=test; " &_ "USER=usr;PASSWORD=psw;" cn.open If FSO.FileExists(FilePath) Then
-
Тайна Графа
19 Oct, 24 -
Kotlin Для Android: Теперь Официально
19 Oct, 24 -
Игры Для Реальной Жизни
19 Oct, 24