1 Тема от liman324

  • liman324
  • Administrator
  • Неактивен
  • Зарегистрирован: 2019-08-21
  • Сообщений: 4,686

Тема: ENC28J60 - терморегулятор

http://forum.rcl-radio.ru/uploads/images/2020/02/fb5d89631650690b9e001160e2b7db85.png 

#include <EtherCard.h>
#include <OneWire.h>//https://github.com/PaulStoffregen/OneWire/archive/master.zip
#include <DallasTemperature.h>
#include <EEPROM.h>
OneWire oneWire(A0);
DallasTemperature t(&oneWire);

static byte mymac[] = { 0x74,0x69,0x69,0x2D,0x30,0x31 };
static byte myip[] = { 10,42,0,100 };

byte Ethernet::buffer[1000];
float temp;
int reg,temp0,temp1,a;
const byte gis = 1; // гистерезис 1 градус
BufferFiller bfill;
String line;

static word homePage() {
  bfill = ether.tcpOffset();
  bfill.emit_p(PSTR(
"<html><head><meta charset='UTF-8'>"
"<meta http-equiv='refresh' content='10'/>"
"<style>.tab1 {background-color:#F5F5F5;border-radius: 5px;margin: auto;}</style></head>"

"<br><TABLE class='tab1' align='center' width='470' BORDER='1' cellspacing='0' cellpadding='10'>"
"<td><center><big><b>Терморегулятор DS18B20</b></big></td><tr><td><center>"
"Температура: <b>$D.$D </b>&#176;C"
"</td><tr><td align='center'>Установка температуры регулирования (0...125&#176;C)"
"<form action='' method='GET'>"
"<br><input type='text' name='reg' autocomplete='off' size='1'></input>  "
"<button>Подтвердить</button></form></td><tr>"
"<td><center>Температура регулировки: <b>$D &#176;C</b></td>"
"</table>"
"</center></body></html> "
  ),temp0,temp1,reg);
  return bfill.position();
}

void setup () {
  Serial.begin(9600);
  pinMode(2, OUTPUT); // D2 управление реле нагревательного элемента
  ether.begin(sizeof Ethernet::buffer, mymac, 10);
  ether.staticSetup(myip);
  reg = EEPROM.read(0);
  t.begin(); 
  t.setResolution(9);
}

void loop () {
  t.requestTemperatures();
  temp = t.getTempCByIndex(0);
  temp0 = int(temp);
  temp1 = (temp-temp0)*100;

  word pos = ether.packetLoop(ether.packetReceive());
  if (pos){  // check if valid tcp data is received
    char *data = (char *) Ethernet::buffer + pos;
  
  line = data;a = line.indexOf("?reg=");if(a>0){reg = line.substring(a+5, a+8).toInt();
  if(reg<0){reg=0;}if(reg>125){reg=125;}EEPROM.update(0,reg);}

  if(reg >= temp + gis){digitalWrite(2,HIGH);}
  if(reg <= temp - gis){digitalWrite(2,LOW);} 
  
  ether.httpServerReply(homePage());   
}}

2 Ответ от liman324

  • liman324
  • Administrator
  • Неактивен
  • Зарегистрирован: 2019-08-21
  • Сообщений: 4,686

Re: ENC28J60 - терморегулятор

http://forum.rcl-radio.ru/uploads/images/2020/02/9e14cf254b05a87fdb88fed279562f53.png 

#include <EtherCard.h>         // EtherCard-master.zip 
#include <OneWire.h>           //https://github.com/PaulStoffregen/OneWire/archive/master.zip 
#include <DallasTemperature.h> // http://rcl-radio.ru/wp-content/uploads/2018/07/DallasTemperature.zip
#include <EEPROM.h>
OneWire oneWire(A0);
DallasTemperature t(&oneWire);
 
static byte mymac[] = { 0x74,0x69,0x69,0x2D,0x30,0x31 };
static byte myip[] = { 10,42,0,100 };
 
byte Ethernet::buffer[975];
float temp;
int reg,temp0,temp1,a;
byte times,w;
const byte gis = 1; // гистерезис 1 градус
BufferFiller bfill;
String line;
 
void setup () {
 // Serial.begin(9600);
  pinMode(2, OUTPUT); // D2 управление реле нагревательного элемента
  ether.begin(sizeof Ethernet::buffer, mymac, 10);
  ether.staticSetup(myip);
  reg = EEPROM.read(0);times = EEPROM.read(1);
  t.begin(); 
  t.setResolution(9);
}
 
void loop () {
  t.requestTemperatures();
  temp = t.getTempCByIndex(0);
  temp0 = int(temp);
  temp1 = (temp-temp0)*100;
  if(reg >= temp + gis){digitalWrite(2,HIGH);}
  if(reg <= temp - gis){digitalWrite(2,LOW);}
 
  word pos = ether.packetLoop(ether.packetReceive()); 
  if (pos){ char *data = (char *) Ethernet::buffer + pos;
  
  line = data;
  a = line.indexOf("?reg=");if(a>0){reg = line.substring(a+5, a+8).toInt();w=1; if(reg<0){reg=0;}if(reg>125){reg=125;}}
  a = line.indexOf("?p=");if(a>0){times = line.substring(a+3, a+6).toInt();w=1;}
 
  ether.httpServerReply(html());
  
  if(w==1){w=0;EEPROM.update(0,reg);EEPROM.update(1,times);}
}}

static word html(){
  bfill = ether.tcpOffset();
  bfill.emit_p(PSTR(
 "<html><head><meta charset='UTF-8'>"
 "<meta http-equiv='refresh' content='$D'/></head>"
 "<style>.tab1 {background-color:#F5F5F5;border-radius: 5px;margin: auto;}a{color:#333;</style></head>"
 "<br><TABLE class='tab1' align='center' width='470' BORDER='1' cellspacing='0' cellpadding='10'>"
 "<td><center><big><b>Терморегулятор DS18B20</b></big></td><tr><td><center>"
 "Температура: <b>$D.$D </b>&#176;C"
 "</td><tr><td align='center'>Установка температуры регулирования (0...125&#176;C)"
 "<form action='' method='GET'>"
 "<br><input type='text' name='reg' autocomplete='off' size='1'></input>  "
 "<button type='submit'>Подтвердить</button></form></td><tr>"
 "<td><center>Температура регулировки: <b>$D &#176;C</b></td>"
 "<tr><td><center><small>Время обновления страницы каждые $D сек | <b><a href='/?p=5'>5 сек</a> <a href='/?p=10'>10 сек</a> <a href='/?p=30'>30 сек</a> <a href='/?p=60'>1 мин</a></b>"
 "</td></table></center></html>"
  ),times,temp0,temp1,reg,times);
  return bfill.position();
  }

3 Ответ от andrys (2020-03-03 12:15:12 отредактировано andrys)

  • andrys
  • Участник
  • Неактивен
  • Зарегистрирован: 2019-09-16
  • Сообщений: 95

Re: ENC28J60 - терморегулятор

Отлично, всё работает.