HDLO2416_DHT1.ino

/*
 * // http://gorgusgfx.se/?page_id=62
 * kod för att styra en DLR3416-display från Siemens
 * Nicu FLORICA tests 5 module HDLO-2416 
 * for future projects see http://arduinotehniq.com
 * or http://www.tehnic.go.ro
 * ver.4 - use 74HC138 for control display module
 * ver.5 - use subroutines for display characters & clear
 * ver.6 - DHT termomether and higrometer
 */

#include "DHT.h"

#define DHTPIN 12     // what pin we're connected to

// Uncomment whatever type you're using!
//#define DHTTYPE DHT11   // DHT 11 
#define DHTTYPE DHT22   // DHT 22  (AM2302)
//#define DHTTYPE DHT21   // DHT 21 (AM2301)
// Connect pin 1 (on the left) of the sensor to +5V
// NOTE: If using a board with 3.3V logic like an Arduino Due connect pin 1
// to 3.3V instead of 5V!
// Connect pin 2 of the sensor to whatever your DHTPIN is
// Connect pin 4 (on the right) of the sensor to GROUND
// Connect a 10K resistor from pin 2 (data) to pin 1 (power) of the sensor

// Initialize DHT sensor for normal 16mhz Arduino
DHT dht(DHTPIN, DHTTYPE);
// NOTE: For working with a faster chip, like an Arduino Due or Teensy, you
// might need to increase the threshold for cycle counts considered a 1 or 0.
// You can do this by passing a 3rd parameter for this threshold.  It's a bit
// of fiddling to find the right value, but in general the faster the CPU the
// higher the value.  The default for a 16mhz AVR is a value of 6.  For an
// Arduino Due that runs at 84mhz a value of 30 works.
// Example to initialize DHT sensor for Arduino Due:
//DHT dht(DHTPIN, DHTTYPE, 30);


byte  a[2];      // Adresspinnar  
byte  d[7];      // Datapinnar
byte  bl;        // Blankingpinne
byte  wr;        // Writepinne   
byte  i;         // Temporär variabel
byte c[3];       // module selector
int timp = 250;
int timp2 = 2000;

float temperatura;
int umiditate;
int tzeci, tunit, tzecimi, trest;
int tsemn, ttot;
int hzeci, hunit;

 
void setup()
{
 dht.begin();
 
  wr=9;                  //Write = pin 9 på Arduinon
  pinMode(wr,OUTPUT);
  digitalWrite(wr,1);
 
  bl=12;                  // Blanking = Pin 12 på Arduinon
  pinMode(bl,OUTPUT);    
  digitalWrite(bl,1);
 
  a[0]=10;                // Adresspinnarna, 10 och 11 på Arduinon
  a[1]=11;
  pinMode(a[0],OUTPUT);
  pinMode(a[1],OUTPUT);
 
  d[0]=2;                  // Datapinnar från pin 2 - pin 8 på Arduinon
  d[1]=3;
  d[2]=4;
  d[3]=5;
  d[4]=6;
  d[5]=7;
  d[6]=8;

  c[0]=14;
  c[1]=15;
  c[2]=16; 
 
  for(i=0;i<7;i++) {
    pinMode(d[i],OUTPUT);
  }
  for(i=0;i<3;i++) {
    pinMode(c[i],OUTPUT);
  }

 for(i=0;i<5;i++) {
    digitalWrite(c[i],0);
  }

mop(); 
}
 
void loop()
{
temperatura = 10*dht.readTemperature();
umiditate = dht.readHumidity();
//temperatura = random(-150, 350);
//temperatura = temperatura/10;
//umiditate = random (10, 90);

if (temperatura >= 0) 
{
  tsemn = 1;
  ttot = temperatura;
}
if (temperatura < 0) 
{
  tsemn = -1;
  ttot = -temperatura;
}

tzeci = ttot/100;
trest = ttot%100;
tunit = trest/10;
tzecimi = trest%10;

hzeci = umiditate/10;
hunit = umiditate%10;

zona1(19);
numar(116);  //t - http://www.binaryhexconverter.com/binary-to-decimal-converter
zona1(18);
numar(101);  //e
zona1(17);
numar(109);  //m
zona1(16);
numar(112);  //p
zona1(15);
numar(101);  //e
zona1(14);
numar(114);  //r
zona1(13);
numar(97);  //a
zona1(12);
numar(116);  //t
zona1(11);
numar(117);  //u
zona1(10);
numar(114);  //r
zona1(9);
//numar(101);  //e
numar(97);  //a
zona1(8);
numar(58);  //:
zona1(7);
numar(32);  //empty
if (tzeci == 0)
{
zona1(6);
numar(32);  //empty
zona1(5);
if (tsemn == 1) numar(43);  //+
else numar(45);  //-
}
else
{
zona1(6);  
if (tsemn == 1) numar(43);  //+
else numar(45);  //-
zona1(5);
numar(tzeci+48);  //cifra
}
zona1(4);
numar(tunit+48);  //cifra
zona1(3);
//numar(46);  //.
numar(44);  //,
zona1(2);
numar(tzecimi+48);  //cifra
zona1(1);
numar(34);  //grad
zona1(0);
numar(67);  //C
//zona1(1);
//numar(27);  //grad Celsius

delay(timp2);

mop();  // clear the screen;

// romana
zona1(19);
numar(117);  //u - http://www.binaryhexconverter.com/binary-to-decimal-converter
zona1(18);
numar(109);  //m
zona1(17);
numar(105);  //i
zona1(16);
numar(100);  //d
zona1(15);
numar(105);  //i
zona1(14);
numar(116);  //t
zona1(13);
numar(97);  //a
zona1(12);
numar(116);  //t
zona1(11);
numar(101);  //e
zona1(10);
numar(58);  //:

/*
// english
zona1(19);
numar(104);  //h - http://www.binaryhexconverter.com/binary-to-decimal-converter
zona1(18);
numar(117);  //u - http://www.binaryhexconverter.com/binary-to-decimal-converter
zona1(17);
numar(109);  //m
zona1(16);
numar(105);  //i
zona1(15);
numar(100);  //d
zona1(14);
numar(105);  //i
zona1(13);
numar(116);  //t
zona1(12);
numar(121);  //y
zona1(12);
zona1(11);
numar(58);  //:
*/

zona1(4);
numar(hzeci+48);  //cifra
zona1(3);
numar(hunit+48);  //cifra
zona1(2);
numar(37);  //procent
zona1(1);
numar(82);  //R
zona1(0);
numar(72);  //H


delay(timp2);
 
}  // end main program
 
void wrt()
{
  digitalWrite(wr,0);
  delay(5);
  digitalWrite(wr,1);
}


void mop()
{
  for (byte i=0; i < 5; i++)  // number of modules
  {
  byte c2 = i/4;
  byte restc = i%4;
  byte c1 = restc/2;
  byte c0 = restc%2;
  digitalWrite(c[0],c0);   //
  digitalWrite(c[1],c1);
  digitalWrite(c[2],c2);   
  
  for (byte j=0; j < 4; j++)  // character in module
  {
  byte a1 = j/2;
  byte a0 = j%2;
  digitalWrite(a[0],a0);    //adress =1
  digitalWrite(a[1],a1);
  
// empty character
  digitalWrite(d[0],0);  // empty
  digitalWrite(d[1],0); 
  digitalWrite(d[2],0); 
  digitalWrite(d[3],0);
  digitalWrite(d[4],0); 
  digitalWrite(d[5],1); 
  digitalWrite(d[6],0); 

  digitalWrite(wr,0);
  delay(1);
  digitalWrite(wr,1);
  } // end characters in module (0 to 3)
  } // end modules (0 to 5)
}  // end 'mop'subroutine     

void numar(byte nr)
{
  byte d6 = nr/64;
  byte restd = nr%64;
  byte d5 = restd/32;
  restd = restd%32;
  byte d4 = restd/16;
  restd = restd%16;
  byte d3 = restd/8;
  restd = restd%8;
  byte d2 = restd/4;
  restd = restd%4;
  byte d1 = restd/2;
  byte d0 = restd%2;

  digitalWrite(d[0],d0);  // empty
  digitalWrite(d[1],d1); 
  digitalWrite(d[2],d2); 
  digitalWrite(d[3],d3);
  digitalWrite(d[4],d4); 
  digitalWrite(d[5],d5); 
  digitalWrite(d[6],d6); 
   wrt();
}  

void zona(byte modul, byte cifra)  // 0..19
{
  byte c2 = modul/4;
  byte restc = modul%4;
  byte c1 = restc/2;
  byte c0 = restc%2;
  digitalWrite(c[0],c0);   //
  digitalWrite(c[1],c1);
  digitalWrite(c[2],c2);   
  
  byte a1 = cifra/2;
  byte a0 = cifra%2;
  digitalWrite(a[0],a0);    //adress =1
  digitalWrite(a[1],a1);
}

void zona1(byte pus)  // 0..19
{
  byte modul = pus/4;
  byte c2 = modul/4;
  byte restc = modul%4;
  byte c1 = restc/2;
  byte c0 = restc%2;
  digitalWrite(c[0],c0);   //
  digitalWrite(c[1],c1);
  digitalWrite(c[2],c2);   
  
  byte cifra = pus - 4*modul;
//  cifra = -cifra;
  byte a1 = cifra/2;
  byte a0 = cifra%2;
  digitalWrite(a[0],a0);    //adress =1
  digitalWrite(a[1],a1);
}


void mop1(byte timpi)
{
  for (byte i=0; i < 5; i++)  // number of modules
  {
  byte c2 = i/4;
  byte restc = i%4;
  byte c1 = restc/2;
  byte c0 = restc%2;
  digitalWrite(c[0],c0);   //
  digitalWrite(c[1],c1);
  digitalWrite(c[2],c2);   
  
  for (byte j=0; j < 4; j++)  // character in module
  {
  byte a1 = j/2;
  byte a0 = j%2;
  digitalWrite(a[0],a0);    //adress =1
  digitalWrite(a[1],a1);
  
// empty character
  digitalWrite(d[0],0);  // empty
  digitalWrite(d[1],0); 
  digitalWrite(d[2],0); 
  digitalWrite(d[3],0);
  digitalWrite(d[4],0); 
  digitalWrite(d[5],1); 
  digitalWrite(d[6],0); 

  digitalWrite(wr,0);
  delay(5);
  digitalWrite(wr,1);
  
  delay(timpi);
  } // end characters in module (0 to 3)
  } // end modules (0 to 5)
}  // end 'mop'subroutine     

void mop2(byte timpi)
{
  for (int i=4; i >= 0; i--)  // number of modules
  {
  byte c2 = i/4;
  byte restc = i%4;
  byte c1 = restc/2;
  byte c0 = restc%2;
  digitalWrite(c[0],c0);   //
  digitalWrite(c[1],c1);
  digitalWrite(c[2],c2);   
  
  for (int j=3; j >= 0; j--)  // character in module
  {
  byte a1 = j/2;
  byte a0 = j%2;
  digitalWrite(a[0],a0);    //adress =1
  digitalWrite(a[1],a1);
  
// empty character
  digitalWrite(d[0],0);  // empty
  digitalWrite(d[1],0); 
  digitalWrite(d[2],0); 
  digitalWrite(d[3],0);
  digitalWrite(d[4],0); 
  digitalWrite(d[5],1); 
  digitalWrite(d[6],0); 

  digitalWrite(wr,0);
  delay(2);
  digitalWrite(wr,1);
  
  delay(timpi);
  } // end characters in module (0 to 3)
  } // end modules (0 to 5)
}  // end 'mop'subroutine