January, 2016 | 3l3c7r1c pl4y6r0und

Irrigation Part 7 – ESP8266 Breakout Board

When I started layouting the PCB for my irrigation sensor I realized the advantages of a breakout board. They are handy for developing, sure. But they also bear the big advantage that you do not have to take care about repetitive tasks (such as pull-up resistors). Additionally they ease up layouting by adding two additional layers to your design. That simplifies the design and it also minimizes the footprint of the final PCB.

Size was the most important factor for me. It isn’t just a question of space, it is also a question of price (PCB cost ist based on cm²). Beside the pull up resistors for CH_PD, GPIO_0, GPIO_2 and RESET and the buttons to ground RESET and GPIO_0 (PROG) I have also foreseen a pin header for connecting my XCSOURCE FT232RL USB<->TTL. The voltage supply of the USB-TTL converter can be enabled or disabled with a jumper. Additionally I have foreseen solder jumpers CTS->REST and DTR->GPIO_0. I’ve not tried personally but some sources say that this connections make the manual buttons obsolete by handing over this task to the USB-TTL converter. Finally there is also a solder jumper to connect GPIO_16 and RESET (for wake up after deep sleep) and a capacitor as voltage stabilizer. Other boards like the Huzzah Board use a voltage converter for this but I have made good experience with the capacitor.

My followers on twitter know that it took several attempts before I got my final version ready (special thanks here to @ccxx72, @i_grr, @bdcatalin und @tzapulica for their help). I also faced some troubles with Fritzing but finally you can download my result at Github: https://github.com/Stromspielplatz/misc/tree/master/ESP8266%20ESP-12%20Breakout

ESP8266-ESP12 Breakout Board Circuit Diagram

Tracking Motion Level using Raspberry PI and MATLAB/SIMULINK

Some days ago I have already confessed to be somehow fascinated of the Netflix Socks. Every evening I have to search for the episode (actually I look “The Man in the High Castle” based on the novel from Philip K. Dick) and the time I fell asleep. So something like the Netflix Socks was ideal but I have some major doubts.

First of all I have no problem with cold feet. So I rather take my socks off. Then there is the issue with the battery. I really don’t want wo have another wearable I have to take care about. And last but not least I often watch movies with my wife. And to be honest I’m not even a Netflix customer. For me is Amazon Prime in combination with a Fire TV Stick the better choice but that is another story. So I had the idea to make something video based. I’m not sure if this will work, because if it would be so easy, I’m sure my Samsung TV would have such function. But I want to give it a try and start with a little feasibility study.

The idea of all the sleep tracking is to measure movements. Wearables to this with acceleration sensors. I want to do this with a Raspberry PI and the Raspberry PI Cam. I will use MATLAB/SIMULINK for programming. MATLAB/SIMULINK is a rather more a platform than a programming language and in my opinion predestined for engineers. They follow a common marketing approach and sell it cheap for students and make expensive (really expensive) for professionals. Fortunately there is a Home Edition since some years. When I found it I was a bit disappointed because it is still rather expensive for private persons (for the basis and some toolboxes you pay already more than 200$) But I really like the system and as they support Raspberry, Arduino, Lego Mindstorms, and other platforms and therefore it is a nice playground for makers like me.

After following the installation procedure of the development software itself you have to get the Hardware Support Package for Raspberry. A wizard will lead you through the installation process and at the end you will have SD card with Raspbian and the MATLAB software. In my case the network setup afterwards didn’t work so I had to connect a monitor, keyboard and mouse and make the network setting manually. For programming you have to use SIMULINK to run your software permanently on the Raspberry. I will not explain how to use the software. They have tons of tutorials on their website and in the meanwhile you find a lot of resources in the internet. Before you can use the Raspberry PI Cam you have to follow a few steps.

The SIMULINK model is really easy. I just connect the camera with “Sum of absolute metrics” directly and through a delay block. Then make a small type conversion and put it to a UDP socket. Additionally I connect an Image Viewer to align the camera. For testing I use a socket server I’ve downloaded from the internet.

For data acquisition I use the server of my irrigation project. I create a table tblmotion to store my measuring values.

CREATE TABLE `tblmotion` (
  `dt` datetime(6) NOT NULL DEFAULT CURRENT_TIMESTAMP(6),
  `motionvalue` double DEFAULT NULL,
  `byte0` int(11) DEFAULT NULL,
  `byte1` int(11) DEFAULT NULL,
  `byte2` int(11) DEFAULT NULL,
  `byte3` int(11) DEFAULT NULL,
  PRIMARY KEY (`dt`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1;

CREATE TABLE `tblmotion` (

`dt` datetime(6) NOT NULL DEFAULT CURRENT_TIMESTAMP(6),

`motionvalue` double DEFAULT NULL,

`byte0` int(11) DEFAULT NULL,

`byte1` int(11) DEFAULT NULL,

`byte2` int(11) DEFAULT NULL,

`byte3` int(11) DEFAULT NULL,

PRIMARY KEY (`dt`)

) ENGINE=InnoDB DEFAULT CHARSET=latin1;

Beside the motion measurment value I also store the raw bytes coming from my model because it was late in the evening when I did this and so I was not sure if my type conversion was working. I didn’t want to loose the data from the trial and with raw data I could have corrected the type conversion afterwards if it would have failed.

As socket server I use a PHP script. To run a PHP script in the Raspberry shell you have to install the PHP-CLI.

<?php
    $servername = "server";
    $username = "user";
    $password = "password";
    $dbname = "templogg";
    $conn = new mysqli($servername, $username, $password, $dbname);
    $socket = socket_create(AF_INET, SOCK_DGRAM, SOL_UDP);
    if (!$socket) die('Unable to create socket');
    if (!socket_bind($socket, '10.0.0.3', 10004)) die('Unable to bind socket');
     $data = '';
    echo 'reading.';
    while(true) {
        $data = @socket_read($socket, 15);
        $val=strval((ord($data[0])*1)+  (ord($data[1])*256) + (ord($data[2])*65536) + (ord($data[3])*16777216));
        echo $val."\r\n";
        $sql = "INSERT INTO tblmotion (motionvalue, byte0, byte1, byte2, byte3) VALUES (".$val.",".ord($data[0]).",".ord($data[1]).",".ord($data[2]).",".ord($data[3]).")";
        $conn->query($sql);
    }
    $conn->close();
    socket_close($socket);
?>

<?php

$servername = "server";

$username = "user";

$password = "password";

$dbname = "templogg";

$conn = new mysqli($servername, $username, $password, $dbname);

$socket = socket_create(AF_INET, SOCK_DGRAM, SOL_UDP);

if (!$socket) die('Unable to create socket');

if (!socket_bind($socket, '10.0.0.3', 10004)) die('Unable to bind socket');

$data = '';

echo 'reading.';

while(true) {

$data = @socket_read($socket, 15);

$val=strval((ord($data[0])*1)+ (ord($data[1])*256) + (ord($data[2])*65536) + (ord($data[3])*16777216));

echo $val."\r\n";

$sql = "INSERT INTO tblmotion (motionvalue, byte0, byte1, byte2, byte3) VALUES (".$val.",".ord($data[0]).",".ord($data[1]).",".ord($data[2]).",".ord($data[3]).")";

$conn->query($sql);

}

$conn->close();

socket_close($socket);

After having a nap in front of the TV I did the data analysis the next day with MATLAB. I did not invest in the database toolbox so I just query the data, export it to CSV and import it in MATLAB. I’ wearing a Garmin Vivosmart so I knew I felt asleep approx. 01:00. Looking at the data there seems to be a trend in the motion value.

So I do a bit of data analytics. I build some statistic values (STDDEV, AVG, VARIANCE) over different periods (1min, 5min, 10min, 20min) in SQL and import the data in MATLAB

%% Analyzing Motion Data - Electric Playground
%% Initialize
clear;
clc;
%% Data Import
% Raw Data
filename = 'C:\Temp\Bewegungstest.csv';
delimiter = ',';
startRow = 2;
formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%f%[^\n\r]';
fileID = fopen(filename,'r');
dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'EmptyValue' ,NaN,'HeaderLines' ,startRow-1, 'ReturnOnError', false);
fclose(fileID);
dt = dataArray{:, 1};
motionvalue = dataArray{:, 2};
byte0 = dataArray{:, 3};
byte1 = dataArray{:, 4};
byte2 = dataArray{:, 5};
byte3 = dataArray{:, 6};
clearvars filename delimiter startRow formatSpec fileID dataArray ans;

% Aggregated Data 1 min
filename = 'C:\Temp\Bewegungstest_agg1min.csv';
delimiter = ',';
startRow = 2;
formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';
fileID = fopen(filename,'r');
dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);
fclose(fileID);
dt1min = dataArray{:, 1};
avg_motion1min = dataArray{:, 2};
std_motion1min = dataArray{:, 3};
var_motion1min = dataArray{:, 4};
clearvars filename delimiter startRow formatSpec fileID dataArray ans;

% Aggregated Data 5 min
filename = 'C:\Temp\Bewegungstest_agg5min.csv';
delimiter = ',';
startRow = 2;
formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';
fileID = fopen(filename,'r');
dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);
fclose(fileID);
dt5min = dataArray{:, 1};
avg_motion5min = dataArray{:, 2};
std_motion5min = dataArray{:, 3};
var_motion5min = dataArray{:, 4};
clearvars filename delimiter startRow formatSpec fileID dataArray ans;

% Aggregated Data 10 min
filename = 'C:\Temp\Bewegungstest_agg10min.csv';
delimiter = ',';
startRow = 2;
formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';
fileID = fopen(filename,'r');
dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);
fclose(fileID);
dt10min = dataArray{:, 1};
avg_motion10min = dataArray{:, 2};
std_motion10min = dataArray{:, 3};
var_motion10min = dataArray{:, 4};
clearvars filename delimiter startRow formatSpec fileID dataArray ans;
% Aggregated Data 20 min
filename = 'C:\Temp\Bewegungstest_agg20min.csv';
delimiter = ',';
startRow = 2;
formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';
fileID = fopen(filename,'r');
dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);
fclose(fileID);
dt20min = dataArray{:, 1};
avg_motion20min = dataArray{:, 2};
std_motion20min = dataArray{:, 3};
var_motion20min = dataArray{:, 4};
clearvars filename delimiter startRow formatSpec fileID dataArray ans;

%% plot data

subplot(3,1,1);
plot(dt1min,avg_motion1min,dt5min,avg_motion5min,dt10min,avg_motion10min,dt20min,avg_motion20min);
title('Average');
ylim([5.5E5, 7E5]);

subplot(3,1,2);
plot(dt1min,std_motion1min,dt5min,std_motion5min,dt10min,std_motion10min,dt20min,std_motion20min);
title('Standard Deviation');
ylim([0, 1E5]);

subplot(3,1,3);
plot(dt1min,var_motion1min,dt5min,var_motion5min,dt10min,var_motion10min,dt20min,var_motion20min);
title ('Variance');
ylim([0, 1E10]);

100

101

%% Analyzing Motion Data - Electric Playground

%% Initialize

clear;

clc;

%% Data Import

% Raw Data

filename = 'C:\Temp\Bewegungstest.csv';

delimiter = ',';

startRow = 2;

formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%f%[^\n\r]';

fileID = fopen(filename,'r');

dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'EmptyValue' ,NaN,'HeaderLines' ,startRow-1, 'ReturnOnError', false);

fclose(fileID);

dt = dataArray{:, 1};

motionvalue = dataArray{:, 2};

byte0 = dataArray{:, 3};

byte1 = dataArray{:, 4};

byte2 = dataArray{:, 5};

byte3 = dataArray{:, 6};

clearvars filename delimiter startRow formatSpec fileID dataArray ans;

% Aggregated Data 1 min

filename = 'C:\Temp\Bewegungstest_agg1min.csv';

delimiter = ',';

startRow = 2;

formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';

fileID = fopen(filename,'r');

dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);

fclose(fileID);

dt1min = dataArray{:, 1};

avg_motion1min = dataArray{:, 2};

std_motion1min = dataArray{:, 3};

var_motion1min = dataArray{:, 4};

clearvars filename delimiter startRow formatSpec fileID dataArray ans;

% Aggregated Data 5 min

filename = 'C:\Temp\Bewegungstest_agg5min.csv';

delimiter = ',';

startRow = 2;

formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';

fileID = fopen(filename,'r');

dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);

fclose(fileID);

dt5min = dataArray{:, 1};

avg_motion5min = dataArray{:, 2};

std_motion5min = dataArray{:, 3};

var_motion5min = dataArray{:, 4};

clearvars filename delimiter startRow formatSpec fileID dataArray ans;

% Aggregated Data 10 min

filename = 'C:\Temp\Bewegungstest_agg10min.csv';

delimiter = ',';

startRow = 2;

formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';

fileID = fopen(filename,'r');

dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);

fclose(fileID);

dt10min = dataArray{:, 1};

avg_motion10min = dataArray{:, 2};

std_motion10min = dataArray{:, 3};

var_motion10min = dataArray{:, 4};

clearvars filename delimiter startRow formatSpec fileID dataArray ans;

% Aggregated Data 20 min

filename = 'C:\Temp\Bewegungstest_agg20min.csv';

delimiter = ',';

startRow = 2;

formatSpec = '%{yyyy-MM-dd HH:mm:ss}D%f%f%f%f%[^\n\r]';

fileID = fopen(filename,'r');

dataArray = textscan(fileID, formatSpec, 'Delimiter', delimiter, 'HeaderLines' ,startRow-1, 'ReturnOnError', false);

fclose(fileID);

dt20min = dataArray{:, 1};

avg_motion20min = dataArray{:, 2};

std_motion20min = dataArray{:, 3};

var_motion20min = dataArray{:, 4};

clearvars filename delimiter startRow formatSpec fileID dataArray ans;

%% plot data

subplot(3,1,1);

plot(dt1min,avg_motion1min,dt5min,avg_motion5min,dt10min,avg_motion10min,dt20min,avg_motion20min);

title('Average');

ylim([5.5E5, 7E5]);

subplot(3,1,2);

plot(dt1min,std_motion1min,dt5min,std_motion5min,dt10min,std_motion10min,dt20min,std_motion20min);

title('Standard Deviation');

ylim([0, 1E5]);

subplot(3,1,3);

plot(dt1min,var_motion1min,dt5min,var_motion5min,dt10min,var_motion10min,dt20min,var_motion20min);

title ('Variance');

ylim([0, 1E10]);

The result makes me quite confident.

The data show a significant change in the movement value between 00:30 and 01:00. So the challenge will be to put this information in a reliable algorithm. Most properly I will have to get the neuronal network toolbox soon to make some trials.

Stay tuned!

Irrigation – Part 6: Fuzzy Control

The easiest way to control automatic irrigation would be using the soil moisture as threshold value and start a pump with that. But I don’t think that this is a suitable approach to control watering of plants. The measuring value coming from the soil probe is rather more a reference point than a value to be used for a controller. I also want to implement a real controller keeping my soil moisture rather constant because I think that will lead to a better yield. The standard controller everybody knows is the PI-Controller. It is an ideal solution for many situations but in my case the disadvantage is that it can only process one measuring value. For sure there are some ways to deal with additional values such as feedforward or cascading but I won’t do that. I will use a Fuzzy Controller instead.

The Fuzzy Controller is a multi-input-multi-output (MIMO) control algorithm working with indistinct (fuzzy) definitions. That sounds very creative but the history goes back to 1965. In the 1990s there was a real hype about Fuzzy Control but then this concept sank into oblivion. In my opinion this control concept is still quite underestimated and unknown today and that’s very unfortunate because it deals well with the most common problems in controller design: no exact model and inly empirical knowledge about the needed algorithm.

I want to use our existing webserver so I will implement the controller in PHP. I have found a very nice class from Wojtek Jarzecji. The idea is that later on an Arduino will call the PHP script. The script will return a change request for the water setpoint (-10%…+10%). The Arduino will add this to the actual pump setpoint (0….100%) and transfer it to a pwm signal.

For the parameters I do some measurements in wet (~400) and in dry soil (~800). Google tells me that in my hometown average humidity is between 50% and 90% and temperature in summer times is between 8°C and 36°C. I take this values to define my input membership functions as follows:

That’s my script:

<!doctype html>
<!--?php
    require_once ('./fuzzy-logic-class.php');
    
    /*----------------Aktuelle Messwerte aus Datenbank anfragen----*/
    // <span class="hiddenSpellError" pre="" data-mce-bogus="1"-->MariaDB Server
    $servername = "IP-SERVER";
    $username = "USER";
    $password = "PASSWORD";
    $dbname = "templogg";

    // Create connection
    $conn = new mysqli($servername, $username, $password, $dbname);
    // Check connection
    if ($conn->connect_error) {
    	die("Connection failed: " . $conn->connect_error);
    }

    // Actual Values
    $sql = "SELECT `temp`,`humidity`,`soil` FROM `tbllogging` ORDER BY dt desc LIMIT 1;";
    $actual = $conn->query($sql);
    if ($actual->num_rows > 0) {
	// output data of each row
	while($row = $actual->fetch_assoc()) {
		$acttemp = number_format($row["temp"],0);
		$acthum = number_format($row["humidity"],0);
		$actsoil = number_format($row["soil"],0);
	}
    } else {
	echo "0 results";
    }

    /*----------------Fuzzy Parameters----*/
    $x = new Fuzzy_Logic();
    $x->clearMembers();
    /* ---------- set input members ---------*/
    $x->setInputNames(array('TEMP','HUMIDITY', 'SOIL'));
    $x->addMember($x->getInputName(0),'COLD',  0,  8, 25   ,LINFINITY);
    $x->addMember($x->getInputName(0),'WARM', 20, 35, 100  ,RINFINITY);
    $x->addMember($x->getInputName(1),'LOW', 0  ,40 ,60    ,LINFINITY);
    $x->addMember($x->getInputName(1),'HIGH',50 ,70 ,100   ,RINFINITY);
    $x->addMember($x->getInputName(2),'WET', 0,   400 ,650  ,LINFINITY);
    $x->addMember($x->getInputName(2),'DRY',550, 800 ,1025 ,RINFINITY);

    /* ---------- set output members ---------*/
    $x->setOutputNames(array('OUT'));
    $x->addMember($x->getOutputName(0),'LOWER',-10, -5 ,0 ,LINFINITY);
    $x->addMember($x->getOutputName(0),'RAISE',0, 5 ,10 ,RINFINITY);

    /* ---------- set rule table ------------ */
    $x->clearRules();
    $x->addRule('IF TEMP.WARM OR SOIL.DRY OR HUMIDITY.LOW THEN OUT.RAISE');
    $x->addRule('IF TEMP.COLD OR SOIL.WET OR HUMIDITY.HIGH THEN OUT.LOWER');


    /*---------- Get values from database and calculate output ----*/
    $x->SetRealInput('TEMP',	$acttemp);
    $x->SetRealInput('HUMIDITY' ,$acthum);
    $x->SetRealInput('SOIL' ,	$actsoil);
    $fuzzy_arr = $x->calcFuzzy();
    $Fuzzy = $fuzzy_arr['OUT'];
    echo $Fuzzy;
?>

<!doctype html>

<!--?php

require_once ('./fuzzy-logic-class.php');

/*----------------Aktuelle Messwerte aus Datenbank anfragen----*/

// <span class="hiddenSpellError" pre="" data-mce-bogus="1"-->MariaDB Server

$servername = "IP-SERVER";

$username = "USER";

$password = "PASSWORD";

$dbname = "templogg";

// Create connection

$conn = new mysqli($servername, $username, $password, $dbname);

// Check connection

if ($conn->connect_error) {

die("Connection failed: " . $conn->connect_error);

}

// Actual Values

$sql = "SELECT `temp`,`humidity`,`soil` FROM `tbllogging` ORDER BY dt desc LIMIT 1;";

$actual = $conn->query($sql);

if ($actual->num_rows > 0) {

// output data of each row

while($row = $actual->fetch_assoc()) {

$acttemp = number_format($row["temp"],0);

$acthum = number_format($row["humidity"],0);

$actsoil = number_format($row["soil"],0);

}

} else {

echo "0 results";

}

/*----------------Fuzzy Parameters----*/

$x = new Fuzzy_Logic();

$x->clearMembers();

/* ---------- set input members ---------*/

$x->setInputNames(array('TEMP','HUMIDITY', 'SOIL'));

$x->addMember($x->getInputName(0),'COLD', 0, 8, 25 ,LINFINITY);

$x->addMember($x->getInputName(0),'WARM', 20, 35, 100 ,RINFINITY);

$x->addMember($x->getInputName(1),'LOW', 0 ,40 ,60 ,LINFINITY);

$x->addMember($x->getInputName(1),'HIGH',50 ,70 ,100 ,RINFINITY);

$x->addMember($x->getInputName(2),'WET', 0, 400 ,650 ,LINFINITY);

$x->addMember($x->getInputName(2),'DRY',550, 800 ,1025 ,RINFINITY);

/* ---------- set output members ---------*/

$x->setOutputNames(array('OUT'));

$x->addMember($x->getOutputName(0),'LOWER',-10, -5 ,0 ,LINFINITY);

$x->addMember($x->getOutputName(0),'RAISE',0, 5 ,10 ,RINFINITY);

/* ---------- set rule table ------------ */

$x->clearRules();

$x->addRule('IF TEMP.WARM OR SOIL.DRY OR HUMIDITY.LOW THEN OUT.RAISE');

$x->addRule('IF TEMP.COLD OR SOIL.WET OR HUMIDITY.HIGH THEN OUT.LOWER');

/*---------- Get values from database and calculate output ----*/

$x->SetRealInput('TEMP', $acttemp);

$x->SetRealInput('HUMIDITY' ,$acthum);

$x->SetRealInput('SOIL' , $actsoil);

$fuzzy_arr = $x->calcFuzzy();

$Fuzzy = $fuzzy_arr['OUT'];

echo $Fuzzy;

Irrigation – Part 5: Software Update

Having my first results in hand I have to modify my software a bit. The DHT11 sometimes give strange measuring values (0°C, 6°C) and I want to change my measuring procedure. I will measure 3 values for temperature and humidity and I will take the middle values. The soil moisture measurement is quite unstable so I will take the average of three measurements.

Additionally I have cleaned up the code structure.

I had troubles with two issues:

My measurement values are stored in arrays of struct. I learned that the typedef must be done in a header.
The ESP8266 does not support the std library. So I use a macro for the min function

That’s the result:

// Struct for measuring values
typedef struct {
 float temp;
 float hum;
 float soil;
} value_type;

// Struct for measuring values

typedef struct {

float temp;

float hum;

float soil;

} value_type;

#include 
#include "Logger.h"

// min macro for ESP
#define espmin(X, Y) (((X)<(Y))?(X):(Y))

// WiFi connection
const char* ssid = "SSID";
const char* password = "PASSWORD";
char server[] = "SERVERIP";
int port = 80;
WiFiClient client;
const unsigned long postingInterval = 1800L * 1000000L; // delay between updates, in microseconds

//DHT 
#include 
#define DHTPIN 4
#define DHTTYPE DHT11   // DHT 11 
DHT dht(DHTPIN, DHTTYPE,16);

// needed to avoid link error on ram check
extern "C" 
{
#include "user_interface.h"
}

void setup() {
  value_type values[3];
  // start serial
  pinMode(12, OUTPUT);
  pinMode(A0, INPUT);
  dht.begin();

  Serial.begin(115200);
  Serial.println("WLAN Greenhouse Data Logger - Electric Playground");
  
  // First measuring
  values[0]= domeasuring();
  delay(1000);
  // Second measuring
  values[1]= domeasuring();
  delay(1000);
  // Third measuring
  values[2]= domeasuring();
  
  // Finding the middle value
  float temp;
  float hum;
  float minmin = espmin(espmin(values[0].temp, values[1].temp), values[2].temp);
  if (values[0].temp = minmin)
  {
    temp=espmin(values[1].temp, values[2].temp);
    hum=espmin(values[1].hum, values[2].hum);
  }
  else if (values[1].temp = minmin)
  {
    temp=espmin(values[0].temp, values[2].temp);
    hum=espmin(values[0].hum, values[2].hum);
  }
  else
  {
    temp=espmin(values[0].temp, values[1].temp);
    hum=espmin(values[0].hum, values[1].hum);
  }
  float soil=(values[0].soil+values[1].soil+values[1].soil)/3.0;

  // send data

  // Connect to WIFI
  WiFi.mode(WIFI_STA);
  WiFiStart();

  // debug
  while (client.available()) {
    char c = client.read();
    Serial.write(c);
  }
  
  Serial.println("Humidity:"+String(hum,2)+"\tTemperature:"+String(temp,2)+"\tSoil:"+String(soil,2));
  httpRequest(hum,temp,soil);
  Serial.println("Good Night");
  ESP.deepSleep(postingInterval, WAKE_NO_RFCAL); //WAKE_DEFAULT, WAKE_RFCAL, WAKE_NO_RFCAL, WAKE_RF_DISABLED.
  delay(1000);
}

void loop() {
 // do nothing
}

// Measueing
value_type domeasuring() {
  digitalWrite(12, HIGH);
  delay(300);
  value_type retval;
  retval.hum = dht.readHumidity();
  if (isnan(retval.hum))
    retval.hum=999;
  
  retval.temp = dht.readTemperature();
  if (isnan(retval.temp))
    retval.temp=999;
    
  retval.soil = analogRead(A0);
  digitalWrite(12, LOW);
  Serial.println("Humidity:"+String(retval.hum,2)+"\tTemperature:"+String(retval.temp,2)+"\tSoil:"+String(retval.soil,2));
  return retval;
}

void httpRequest(float h, float t, float s) {
  // close any connection before send a new request.
  // This will free the socket on the WiFi shield
  client.stop();
  delay(100);
  // We now create a URI for the request
  String url = "/newrecord.php?";
  url += "temp=";
  url += String(t,2);
  url += "&humidity=";
  url += String(h,2);
  url += "&soil=";
  url += String(s,2);
  // if there's a successful connection:
  if (client.connect(server, port)) {
    Serial.println("connecting...");
    client.print(String("GET ") + url + " HTTP/1.1\r\n" +
               "Host: " + server + "\r\n" + 
               "Connection: close\r\n\r\n");
    Serial.println("data submitted.");
    delay(10);
  
  } else {
    // if you couldn't make a connection:
    Serial.println("connection failed");
  }
}

void WiFiStart()
{ 
  // Connect to WiFi network
  Serial.print("Connecting to ");
  Serial.println(ssid);

  
  WiFi.begin(ssid, password);
  
  while (WiFi.status() != WL_CONNECTED) 
  {
    delay(250);
    Serial.print(".");
  }

  Serial.println("");
  Serial.println("WiFi connected");
  // Print the IP address
  Serial.println(WiFi.localIP());
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

#include

#include "Logger.h"

// min macro for ESP

#define espmin(X, Y) (((X)<(Y))?(X):(Y))

// WiFi connection

const char* ssid = "SSID";

const char* password = "PASSWORD";

char server[] = "SERVERIP";

int port = 80;

WiFiClient client;

const unsigned long postingInterval = 1800L * 1000000L; // delay between updates, in microseconds

//DHT

#include

#define DHTPIN 4

#define DHTTYPE DHT11 // DHT 11

DHT dht(DHTPIN, DHTTYPE,16);

// needed to avoid link error on ram check

extern "C"

{

#include "user_interface.h"

}

void setup() {

value_type values[3];

// start serial

pinMode(12, OUTPUT);

pinMode(A0, INPUT);

dht.begin();

Serial.begin(115200);

Serial.println("WLAN Greenhouse Data Logger - Electric Playground");

// First measuring

values[0]= domeasuring();

delay(1000);

// Second measuring

values[1]= domeasuring();

delay(1000);

// Third measuring

values[2]= domeasuring();

// Finding the middle value

float temp;

float hum;

float minmin = espmin(espmin(values[0].temp, values[1].temp), values[2].temp);

if (values[0].temp = minmin)

{

temp=espmin(values[1].temp, values[2].temp);

hum=espmin(values[1].hum, values[2].hum);

}

else if (values[1].temp = minmin)

{

temp=espmin(values[0].temp, values[2].temp);

hum=espmin(values[0].hum, values[2].hum);

}

else

{

temp=espmin(values[0].temp, values[1].temp);

hum=espmin(values[0].hum, values[1].hum);

}

float soil=(values[0].soil+values[1].soil+values[1].soil)/3.0;

// send data

// Connect to WIFI

WiFi.mode(WIFI_STA);

WiFiStart();

// debug

while (client.available()) {

char c = client.read();

Serial.write(c);

}

Serial.println("Humidity:"+String(hum,2)+"\tTemperature:"+String(temp,2)+"\tSoil:"+String(soil,2));

httpRequest(hum,temp,soil);

Serial.println("Good Night");

ESP.deepSleep(postingInterval, WAKE_NO_RFCAL); //WAKE_DEFAULT, WAKE_RFCAL, WAKE_NO_RFCAL, WAKE_RF_DISABLED.

delay(1000);

}

void loop() {

// do nothing

}

// Measueing

value_type domeasuring() {

digitalWrite(12, HIGH);

delay(300);

value_type retval;

retval.hum = dht.readHumidity();

if (isnan(retval.hum))

retval.hum=999;

retval.temp = dht.readTemperature();

if (isnan(retval.temp))

retval.temp=999;

retval.soil = analogRead(A0);

digitalWrite(12, LOW);

Serial.println("Humidity:"+String(retval.hum,2)+"\tTemperature:"+String(retval.temp,2)+"\tSoil:"+String(retval.soil,2));

return retval;

}

void httpRequest(float h, float t, float s) {

// close any connection before send a new request.

// This will free the socket on the WiFi shield

client.stop();

delay(100);

// We now create a URI for the request

String url = "/newrecord.php?";

url += "temp=";

url += String(t,2);

url += "&humidity=";

url += String(h,2);

url += "&soil=";

url += String(s,2);

// if there's a successful connection:

if (client.connect(server, port)) {

Serial.println("connecting...");

client.print(String("GET ") + url + " HTTP/1.1\r\n" +

"Host: " + server + "\r\n" +

"Connection: close\r\n\r\n");

Serial.println("data submitted.");

delay(10);

} else {

// if you couldn't make a connection:

Serial.println("connection failed");

}

void WiFiStart()

{

// Connect to WiFi network

Serial.print("Connecting to ");

Serial.println(ssid);

WiFi.begin(ssid, password);

while (WiFi.status() != WL_CONNECTED)

{

delay(250);

Serial.print(".");

}

Serial.println("");

Serial.println("WiFi connected");

// Print the IP address

Serial.println(WiFi.localIP());

}

Share this:

Share this:

Share this:

Share this: