Discussione: Reef Angel
Visualizza un messaggio singolo
Vecchio 24-05-2011, 16:45   #418
LukeLuke
Imperator
 
L'avatar di LukeLuke
 
Registrato: Nov 2003
Cittā: roma
Acquariofilo: Marino
N° Acquari: 1
Etā : 45
Messaggi: 5.164
Foto: 0 Albums: 1
Post "Grazie" / "Mi Piace"
Grazie (Dati):
Grazie (Ricev.):
Mi piace (Dati):
Mi piace (Ricev.):
Mentioned: 2 Post(s)
Feedback 2/100%

Annunci Mercatino: 0
allora ecco il tuo vecchio PDE...

codice:
// RAMenus.pde
//
// This version designed for v0.8.5 Beta 10 and later

#include <ReefAngel_Features.h>
#include <ReefAngel_Globals.h>
#include <ReefAngel_Wifi.h>
#include <Wire.h>
#include <OneWire.h>
#include <Time.h>
#include <DS1307RTC.h>
#include <ReefAngel_EEPROM.h>
#include <ReefAngel_NokiaLCD.h>
#include <ReefAngel_ATO.h>
#include <ReefAngel_Joystick.h>
#include <ReefAngel_LED.h>
#include <ReefAngel_TempSensor.h>
#include <ReefAngel_Relay.h>
#include <ReefAngel_PWM.h>
#include <ReefAngel_Timer.h>
#include <ReefAngel_Memory.h>
#include <ReefAngel.h>

void RitardoSkimmer(byte SKPort, byte SKDelay)
{
if (now()-RAStart < SKDelay) ReefAngel.Relay.On(SKPort);
}

void setup()
{
ReefAngel.Init(); //Initialize controller

// Set the ports that get toggled on & off during the following modes
// To enable a port to be toggled, place a 1 in the appropriate position
// Uncomment and update as needed
// Port 87654321
//ReefAngel.FeedingModePorts = B10011100;
//ReefAngel.WaterChangePorts = B10011100;
//ReefAngel.OverheatShutoffPorts = B00001100;
ReefAngel.LightsOnPorts = B01000000;

// Ports that are always on
//ReefAngel.Relay.On(Port8);
}

void loop()
{
ReefAngel.ShowInterface();
ReefAngel.SetTemperatureUnit(1); 

// Specific functions
ReefAngel.SingleATOHigh(Port1); // Rabbocco con un gallegiante su porta 1

// accensione pompa dx   porta 4
if (((NumMins(hour(),minute()) >= NumMins(0,00)) && (NumMins(hour(),minute()) <= NumMins(6,13))) || (NumMins(hour(),minute()) >= NumMins(12,00)) && (NumMins(hour(),minute()) <= NumMins(18,13))) ReefAngel.Relay.On(Port4);
else ReefAngel.Relay.Off(Port4);


// accensione pompa sx  porta 5
if (((NumMins(hour(),minute()) >= NumMins(6,00)) && (NumMins(hour(),minute()) <= NumMins(12,13))) || (NumMins(hour(),minute()) >= NumMins(18,00)) && (NumMins(hour(),minute()) <= NumMins(23,59))) ReefAngel.Relay.On(Port5);
else ReefAngel.Relay.Off(Port5);

ReefAngel.StandardFan(Port6);
ReefAngel.MHLights(Port7);  // Accensione HQI su porta 7
RitardoSkimmer(Port8,120); //Accensione schiumatoio dopo 120 secondi

//porte 2 e 3 sono vuote per eventuali dosometriche 
ReefAngel.DosingPump(Port2, 1, InternalMemory.DP1OnHour_read(), InternalMemory.DP1OnMinute_read(), InternalMemory.DP1Timer_read());
ReefAngel.DosingPump(Port3, 2, InternalMemory.DP2OnHour_read(), InternalMemory.DP2OnMinute_read(), InternalMemory.DP2Timer_read());

}
LukeLuke non č in linea   Rispondi quotando
 
Page generated in 0,09896 seconds with 13 queries