Простой акваконтроллер ARDUINO - Сторінка 69 - Аквафорум

burnashev · 29.09.2018, 19:48

Поковырялся в коде))) сделал выводы на дисплей и изменил слегка часы) немного подправил мицро, мацро))) завтра скину скетч

tropfish.org.ua

burnashev · 30.09.2018, 09:17

Цитата:

Допис від burnashev

Поковырялся в коде))) сделал выводы на дисплей и изменил слегка часы) немного подправил мицро, мацро))) завтра скину скетч

tropfish.org.ua

Вот скетч не придумал ещё что можно сделать, но в планах повесить ph метр и сделать коррекцию хода часов из меню) изменил время кормления на 10 минут aqua_controll-rus_and_add515_udo.zip

tropfish.org.ua

burnashev · 30.09.2018, 10:06

Решил посчитать сколько стоит собрать контроллер может кому-то пригодится

Ардуино нано 85 грн.
Или
Ардуино про мини 62 грн.
+ Преобразователь (конвертер) USB - RS-232 TTL PL2303HX 25 грн.
Датчик ds18b20 у метр IP67. 40 грн.
Ds1307 под 2032 батарейку 17 грн.
LCD 5110 80 грн.
Я использую Irf520 1 модуль 17 грн.
У меня Расвет закат из 12в 0.3 а линейки, Кулер, Помпа тоже на этом модуле
метр лед линейки 35 грн.
Метр профиля 40 грн который будет нормально охлаждать)
4-Channel 5V Relay Module for Arduino
Четырехканальный релейный модуль для ARDUINO контроллеров. 70 грн.
Основная электроника)
2-Channel 5V Relay Module for Arduino
Двухканальный релейный модуль для ARDUINO контроллеров. 32 грн.
Со2 компрессор
SPE-400P
Контактная макетная плата
Макетная плата. 400 точек, шаг 2,54 мм. 85х55 мм. 42 грн.
Уже год как использую все руки не доходят до развести печатную плату
Модуль питания для макетной платы MB-102. 21 грн. Или
dc-dc понижалка 25 грн.
Кнопки делал сам это 40 грн)
Макетка резисторы и кнопки
Провода соединения мама-папа 10см 25 грн. 40 шт.
Провода соединения папа-папа 10 см 25 грн. 40 шт.
Бп 12в 5 ампер 200 грн.
Walfront DC 12 В D2 Помпу заказывал с Китая 1 шт. Обошлась примерно 200 грн.
Ну а дальше все зависит от фантазии куда это все впихнуть и какие розетки поставить, я планирую чёрный корпус и розетки РД 1
Цены на 30.09.18 в Харькове
800 грн. Без корпуса и помп)

tropfish.org.ua

AlexVOK · 05.10.2018, 14:48

burnashev,
по поводу работы УДО
Посмотрел вашу доработку скетча
1. есть просьба, выкладывайте вместе с библиотекой, так как не у всех желающих может оказаться нужная либа с нужным шрифтом.
2. Для корректной работы удо стоит поправить все строки где
delay(udo_tim * Calibration);
заменяем
delay(udo_tim * Calibration*1000);

burnashev · 05.10.2018, 20:14

Цитата:

Допис від AlexVOK

burnashev,
по поводу работы УДО
Посмотрел вашу доработку скетча
1. есть просьба, выкладывайте вместе с библиотекой, так как не у всех желающих может оказаться нужная либа с нужным шрифтом.
2. Для корректной работы удо стоит поправить все строки где
delay(udo_tim * Calibration);
заменяем
delay(udo_tim * Calibration*1000);

Последний вопрос пока для меня) в какой строке поправить гистерезис на 0.5 градуса) а то щелкает каждые 10-15 секунд)

tropfish.org.ua

Denisios · 09.10.2018, 10:07

Цитата:

Допис від burnashev

Последний вопрос пока для меня) в какой строке поправить гистерезис на 0.5 градуса) а то щелкает каждые 10-15 секунд)

Попробуйте так сделать. Найти данный код

// Управление нагревом и охлаждением ----------------------------------------------
if(cur_temp < (float)aquaT){
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
}else
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

заменить на это:

// Управление нагревом и охлаждением ----------------------------------------------
if(cur_temp < ((float)aquaT+0.5))
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
if (cur_temp > (float)aquaT)
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

burnashev · 09.10.2018, 13:14

Цитата:

Допис від Denisios

Попробуйте так сделать. Найти данный код

// Управление нагревом и охлаждением ----------------------------------------------
if(cur_temp < (float)aquaT){
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
}else
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

заменить на это:

// Управление нагревом и охлаждением ----------------------------------------------
if(cur_temp < ((float)aquaT+0.5))
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
if (cur_temp > (float)aquaT)
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

Спасибо попробую)

tropfish.org.ua

bobus · 09.10.2018, 17:23

Цитата:

Допис від Denisios

заменить на это:

// Управление нагревом и охлаждением ----------------------------------------------
if(cur_temp < ((float)aquaT+0.5))
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
if (cur_temp > (float)aquaT)
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

Груба помилка, бо якщо, наприклад, виставлена температура 25, то
якщо температура нижче 25,5 нагрівач включаємо
якщо вище 25, то виключаємо.
В результаті нагріваємо до тих же 25 градусів без гістерезису.

Потрібно додати пів градуса не в першу умову, а в другу !
Ну а якщо робити справді коректно, то так

// Управление нагревом и охлаждением ----------------------------------------------
if(cur_temp < ((float)aquaT-0.25))
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
if (cur_temp > ((float)aquaT+0.25))
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

Тоді температура буде підтримуватися з точністю +-0,25 градуса

burnashev · 13.10.2018, 09:02

Поправил отображение канала лэд))) играюсь с температурой

tropfish.org.ua

bobus · 13.10.2018, 21:39

Скопіюйте у допис ту частину вашого скетча, котра управляє нагрівачем.

burnashev · 13.10.2018, 21:59

Цитата:

Допис від bobus

Скопіюйте у допис ту частину вашого скетча, котра управляє нагрівачем.

Подскажите пожалуйста что нужно поправить в коде чтоб выключал обогреватель когда на берет нужную температуру а включался когда температура упадёт на 0.5 градуса

// Управление нагревом и охлаждением ----------------------------------------------

if(cur_temp < (float)aquaT){

digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель

}else

digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель
Второй вариант

// Управление нагревом и охлаждением ----------------------------------------------

if(cur_temp < ((float)aquaT))

digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель

if (cur_temp > (float)aquaT)

digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

tropfish.org.ua

burnashev · 13.10.2018, 22:03

Вот полная часть первого кода // Управление нагревом и охлаждением —--------------------------------------------
if(cur_temp < (float)aquaT){
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
}else
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

if (CoolingEnabled) {
if(cur_temp > ((float)aquaT+0.1)){ // Разрешено ли охлаждение куллером
int coll_cur = minCool+(((float)(maxCool - minCool))/100)*(((float)(cur_temp-aquaT))/0.5)*100;
if (coll_cur > maxCool) { coll_cur = maxCool;}
analogWrite(EXT_COOLING_PIN, coll_cur); // включает куллер
}else{
analogWrite(EXT_COOLING_PIN, minCool); // включаем режим проветривания

tropfish.org.ua

Denisios · 13.10.2018, 22:39

Цитата:

Допис від burnashev

Вот полная часть первого кода // Управление нагревом и охлаждением —--------------------------------------------
if(cur_temp < (float)aquaT){
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
}else
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель

if (CoolingEnabled) {
if(cur_temp > ((float)aquaT+0.1)){ // Разрешено ли охлаждение куллером
int coll_cur = minCool+(((float)(maxCool - minCool))/100)*(((float)(cur_temp-aquaT))/0.5)*100;
if (coll_cur > maxCool) { coll_cur = maxCool;}
analogWrite(EXT_COOLING_PIN, coll_cur); // включает куллер
}else{
analogWrite(EXT_COOLING_PIN, minCool); // включаем режим проветривания

tropfish.org.ua

Зря не захотели использовать мой вариант, он отлично работает. А что бы не щелкало реле нагревателя, лучше собрать схемку на симисторе.

burnashev · 13.10.2018, 22:46

Я перебрал последний скетч от Антонио он добавил все украшательства, я добавил на его скетч колибровку удо, пока ещё ведётся настройка этого блока, а вот на счёт температуры хочу чтоб температура выключала обогреватель на отметке заданной в термостате а включала - 0.5 градуса) а на счёт варисторов это конечно хорошо но я хочу допилить проэкт так чтоб заказал модули собрал работает.

Цитата:

Допис від Denisios

Зря не захотели использовать мой вариант, он отлично работает. А что бы не щелкало реле нагревателя, лучше собрать схемку на симисторе.

tropfish.org.ua

bobus · 14.10.2018, 14:03

без проблем:

// Управление нагревом и охлаждением ----------------------------------------------
if(cur_temp < ((float)aquaT-0.5))
digitalWrite(EXT_HEATER_PIN, HIGH); // включает нагреватель
if (cur_temp > (float)aquaT)
digitalWrite(EXT_HEATER_PIN, LOW); // выключает нагреватель