Reef Angel - Pagina 47 - AcquaPortal Forum Acquario Dolce e Acquario Marino

micos_1972 · 23-06-2011, 10:52

ragazzi come è finita?
intendo ritardo skimmer.....
chi puo testare questo?
// Autogenerated file by RAGen (v1.0.4.92), (04/10/2011 18:17)
// RA_041011_1817.pde
//
// This version designed for v0.8.5 Beta 12 or later

/* The following features are enabled for this PDE File:
#define DosingPumpIntervalSetup
#define OverheatSetup
#define DateTimeSetup
#define VersionMenu
#define DisplayLEDPWM
#define wifi
#define RelayExp
#define RemoveAllLights
#define SaveRelayState
*/

#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 setup()
{
ReefAngel.Init(); //Initialize controller
ReefAngel.SetTemperatureUnit(1); // set to Celsius Temperature

ReefAngel.FeedingModePorts = B11111001;
ReefAngel.WaterChangePorts = B00000000;
ReefAngel.OverheatShutoffPorts = B00000000;
ReefAngel.LightsOnPorts = B00000000;

// Ports that are always on
ReefAngel.Relay.On(Port1);
ReefAngel.Relay.On(Port2);
ReefAngel.Relay.On(Port3);
ReefAngel.Relay.On(Port8);

ReefAngel.Init(); //Initialize controller
if ( RAStart == 0 ) RAStart = now();
}

void loop()
{
ReefAngel.ShowInterface();
// accensione pompa dx
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(Port2);

// accensione pompa sx
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(Port3);
// Specific functions
ReefAngel.DosingPumpRepeat1(Port4);
ReefAngel.DosingPumpRepeat2(Port5);
ReefAngel.StandardFan(Port6);
ReefAngel.StandardHeater(Port7);
}
void RitardoSkimmer(byte SKPort, byte SKDelay)
{
unsigned long d = SKDelay;
d *= SECS_PER_MIN;
if (now()-RAStart > d) ReefAngel.Relay.On(SKPort);

ReefAngel.ShowInterface();
RitardoSkimmer(Port8, 1); // 2 minute delayed on
}

LukeLuke · 23-06-2011, 11:35

funziona l'ultimo postato da me....

baghyyy · 23-06-2011, 21:23

Originariamente inviata da LukeLuke

funziona l'ultimo postato da me....

confermo...!!!

micos_1972 · 25-06-2011, 18:50

ragazzi a me non va
provato ma nulla, dopo che lo carico non riesco a settare nulla.. il pde è quello presente nella pag 46

baghyyy · 25-06-2011, 20:01

e forse perche la porta8 che è per il ritardo ce l'hai anche messa tra le porte sempre on e quindi per questo che va in blocco! la porta8 cancellala dalle porte sempre on

ma tu le porte sempre on ce l'hai anche messe sulle pompe ecc...
ecco perche non capisce piu un cavolo...o gli dai una funzione oppure un'altra insieme non vanno bene!

micos_1972 · 26-06-2011, 00:01

ragazzi ricordate che le macchine sono dette anche stupide, ma io le batto sono piu stupido di loro... non ho ancora provato domani vi faccio sapere

micos_1972 · 26-06-2011, 16:44

nulla non funonzia...
questo è il mio pde funzionante con il ritardo pompe, aggiungetemi voi il ritardo skimmer vediamo se cambia il risultato....
// Autogenerated file by RAGen (v1.0.4.92), (04/10/2011 18:17)
// RA_041011_1817.pde
//
// This version designed for v0.8.5 Beta 12 or later

/* The following features are enabled for this PDE File:
#define DosingPumpIntervalSetup
#define OverheatSetup
#define DateTimeSetup
#define VersionMenu
#define DisplayLEDPWM
#define wifi
#define RelayExp
#define RemoveAllLights
#define SaveRelayState
*/

#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 setup()
{
ReefAngel.Init(); //Initialize controller
ReefAngel.SetTemperatureUnit(1); // set to Celsius Temperature

ReefAngel.FeedingModePorts = B11111001;
ReefAngel.WaterChangePorts = B00000000;
ReefAngel.OverheatShutoffPorts = B00000000;
ReefAngel.LightsOnPorts = B00000000;

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

void loop()
{
ReefAngel.ShowInterface();
// accensione pompa dx
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(Port2);
else ReefAngel.Relay.Off(Port2);

// accensione pompa sx
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(Port3);
else ReefAngel.Relay.Off(Port3);
// Specific functions
ReefAngel.DosingPumpRepeat1(Port4);
ReefAngel.DosingPumpRepeat2(Port5);
ReefAngel.StandardFan(Port6);
ReefAngel.StandardHeater(Port7);
}

LukeLuke · 26-06-2011, 17:34

codice:

#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)
{
unsigned long d = SKDelay;
d *= SECS_PER_MIN;
if (now()-RAStart > d) ReefAngel.Relay.On(SKPort);
}

void setup()
{
    ReefAngel.Init();  //Initialize controller
    ReefAngel.SetTemperatureUnit(1);  // set to Celsius Temperature

    ReefAngel.FeedingModePorts = B11111001;
    ReefAngel.WaterChangePorts = B00000000;
    ReefAngel.OverheatShutoffPorts = B00000000;
    ReefAngel.LightsOnPorts = B00000000;

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

if ( RAStart == 0 ) RAStart = now();

}

void loop()
{
    ReefAngel.ShowInterface();
// accensione pompa dx
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(Port2);
else ReefAngel.Relay.Off(Port2);


// accensione pompa sx
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(Port3);
else ReefAngel.Relay.Off(Port3);
    // Specific functions
    ReefAngel.DosingPumpRepeat1(Port4);
    ReefAngel.DosingPumpRepeat2(Port5);
    ReefAngel.StandardFan(Port6);
    ReefAngel.StandardHeater(Port7);

RitardoSkimmer(Port8, 1); // 2 minute delayed on


}

baghyyy · 26-06-2011, 23:14

Senti LukeLuke ma la stringa per i led:

ReefAngel.PWM.SetActinic(PWMSlope(12,00,23,30,0,In ternalMemory.LEDPWMActinic_read(),30,ReefAngel.PWM .GetActinicValue()));
ReefAngel.PWM.SetDaylight(PWMSlope(13,00,22,30,0,I nternalMemory.LEDPWMDaylight_read(),30,ReefAngel.P WM.GetDaylightValue()));

analizzando la prima stringa ovvero in particolare i numeri:
12,00,23,30,0 sta ad indicare che si accende alle 12 e si spegne alle 23.30, poi lo 0 cosa è?
poi continuando a leggere l'altro valore 30 cosa sta ad indicare?

a me interessa modificare la rampa di accensione e quella di spegnimento!

LukeLuke · 27-06-2011, 00:30

Originariamente inviata da baghyyy

Senti LukeLuke ma la stringa per i led:

ReefAngel.PWM.SetActinic(PWMSlope(12,00,23,30,0,In ternalMemory.LEDPWMActinic_read(),30,ReefAngel.PWM .GetActinicValue()));
ReefAngel.PWM.SetDaylight(PWMSlope(13,00,22,30,0,I nternalMemory.LEDPWMDaylight_read(),30,ReefAngel.P WM.GetDaylightValue()));

analizzando la prima stringa ovvero in particolare i numeri:
12,00,23,30,0 sta ad indicare che si accende alle 12 e si spegne alle 23.30, poi lo 0 cosa è?
poi continuando a leggere l'altro valore 30 cosa sta ad indicare?

a me interessa modificare la rampa di accensione e quella di spegnimento!

si ... lo ZERO è il valore minimo da cui parte la rampa.... 30 sono i minuti che deve impiegarci a fare la rampa.... OK ?

Registrazione