Power Control Expansion
Re: Power Control Expansion
Here you go.
Code: Select all
#include <ReefAngel_Features.h>
#include <Globals.h>
#include <RA_Wifi.h>
#include <Wire.h>
#include <OneWire.h>
#include <Time.h>
#include <DS1307RTC.h>
#include <InternalEEPROM.h>
#include <RA_NokiaLCD.h>
#include <RA_ATO.h>
#include <RA_Joystick.h>
#include <LED.h>
#include <RA_TempSensor.h>
#include <Relay.h>
#include <RA_PWM.h>
#include <Timer.h>
#include <Memory.h>
#include <InternalEEPROM.h>
#include <RA_Colors.h>
#include <RA_CustomColors.h>
#include <Salinity.h>
#include <RF.h>
#include <IO.h>
#include <ORP.h>
#include <AI.h>
#include <PH.h>
#include <WaterLevel.h>
#include <Humidity.h>
#include <DCPump.h>
#include <PAR.h>
#include <ReefAngel.h>
////// Place global variable code below here
// Define Relay Ports by Name
#define Return_Pump 1
#define Extra1 2
#define Skimmer 3
#define Heater 4
#define Fuge_Light 5
#define GFO_Pump 6
#define SaltMixPump 7
#define PowerCtlExp 8
//Define Relay 1 Ports by Name
#define FragHeater Box1_Port1
#define FragPowerhead Box1_Port2
#define FragLED1 Box1_Port3
#define WaterChange Box1_Port4
#define FragLED2 Box1_Port5
#define FragFilter Box1_Port6
#define BrutePump Box1_Port7
#define SaltUV Box1_Port8
//Define Power Control Expansion Ports by Name
////// Place global variable code above here
void setup()
{
// This must be the first line
ReefAngel.Init(); //Initialize controller
ReefAngel.Use2014Screen(); // Let's use 2014 Screen
ReefAngel.AddSalinityExpansion(); // Salinity Expansion Module
// Ports toggled in Feeding Mode
ReefAngel.FeedingModePorts = Port1Bit | Port3Bit;
// Ports toggled in Water Change Mode
ReefAngel.WaterChangePorts = Port1Bit | Port3Bit;
// Ports toggled when Lights On / Off menu entry selected
ReefAngel.LightsOnPorts = 0;
// Ports turned off when Overheat temperature exceeded
ReefAngel.OverheatShutoffPorts = Port4Bit;
// Use T1 probe as temperature and overheat functions
ReefAngel.TempProbe = T1_PROBE;
ReefAngel.OverheatProbe = T1_PROBE;
// Set the Overheat temperature setting
InternalMemory.OverheatTemp_write( 869 );
// Ports that are always on
ReefAngel.Relay.On( Return_Pump );
ReefAngel.Relay.On( FragPowerhead);
ReefAngel.Relay.On( WaterChange);
ReefAngel.Relay.On( BrutePump);
ReefAngel.Relay.On( FragFilter);
ReefAngel.Relay.On( GFO_Pump);
ReefAngel.Relay.On( SaltMixPump);
ReefAngel.Relay.On( Extra1);
ReefAngel.Relay.On( PowerCtlExp);
ReefAngel.Relay.On( SaltUV);
////// Place additional initialization code below here
////// Place additional initialization code above here
}
void loop()
{
ReefAngel.Relay.DelayedOn( Skimmer,10 );
ReefAngel.StandardHeater( Heater,750,790 );
ReefAngel.StandardLights( Fuge_Light,21,0,11,0 );
ReefAngel.StandardLights( FragLED1,12,0,21,0);
ReefAngel.StandardLights( FragLED2,15,0,18,0);
////// Place your custom code below here
//if Display Water Level Sensor Active, then turn off Return pump
if (!ReefAngel.HighATO.IsActive()) ReefAngel.Relay.Off(Return_Pump);
else ReefAngel.Relay.On(Return_Pump);
//If Skimmate Water Level Sensor Active, then turn of Skimmer pump
if (!ReefAngel.LowATO.IsActive()) ReefAngel.Relay.Off(Skimmer);
else ReefAngel.Relay.On(Skimmer);
//frag tank heater control with T2 probe
if (ReefAngel.Params.Temp[T2_PROBE]>790) ReefAngel.Relay.Off( FragHeater );
if (ReefAngel.Params.Temp[T2_PROBE]<750) ReefAngel.Relay.On( FragHeater );
//Enter feeding mode to correspond with automatic feeder at 11AM and 2PM
if(hour()==11 && minute()==0 && second()==0) ReefAngel.FeedingModeStart();
if(hour()==14 && minute()==0 && second()==0) ReefAngel.FeedingModeStart();
////// Place your custom code above here
// This should always be the last line
ReefAngel.Portal( "XXXXXXXXXXX" );
ReefAngel.DDNS( "Reef" ); // Your DDNS is XXXXXXXXXXXXX
ReefAngel.ShowInterface();
}
Re: Power Control Expansion
I added a test line, but still not working. What am I missing? Still not showing up in head unit either.
#define Dose1 Box2_Port1
ReefAngel.Relay.On( Dose1);
#define Dose1 Box2_Port1
ReefAngel.Relay.On( Dose1);
Code: Select all
#include <ReefAngel_Features.h>
#include <Globals.h>
#include <RA_Wifi.h>
#include <Wire.h>
#include <OneWire.h>
#include <Time.h>
#include <DS1307RTC.h>
#include <InternalEEPROM.h>
#include <RA_NokiaLCD.h>
#include <RA_ATO.h>
#include <RA_Joystick.h>
#include <LED.h>
#include <RA_TempSensor.h>
#include <Relay.h>
#include <RA_PWM.h>
#include <Timer.h>
#include <Memory.h>
#include <InternalEEPROM.h>
#include <RA_Colors.h>
#include <RA_CustomColors.h>
#include <Salinity.h>
#include <RF.h>
#include <IO.h>
#include <ORP.h>
#include <AI.h>
#include <PH.h>
#include <WaterLevel.h>
#include <Humidity.h>
#include <DCPump.h>
#include <PAR.h>
#include <ReefAngel.h>
////// Place global variable code below here
// Define Relay Ports by Name
#define Return_Pump 1
#define Extra1 2
#define Skimmer 3
#define Heater 4
#define Fuge_Light 5
#define GFO_Pump 6
#define SaltMixPump 7
#define PowerCtlExp 8
//Define Relay 1 Ports by Name
#define FragHeater Box1_Port1
#define FragPowerhead Box1_Port2
#define FragLED1 Box1_Port3
#define WaterChange Box1_Port4
#define FragLED2 Box1_Port5
#define FragFilter Box1_Port6
#define BrutePump Box1_Port7
#define SaltUV Box1_Port8
//Define Power Control Expansion Ports by Name
#define Dose1 Box2_Port1
#define Dose2 Box2_Port2
#define Dose3 Box2_Port3
#define Dose4 Box2_Port4
////// Place global variable code above here
void setup()
{
// This must be the first line
ReefAngel.Init(); //Initialize controller
ReefAngel.Use2014Screen(); // Let's use 2014 Screen
ReefAngel.AddSalinityExpansion(); // Salinity Expansion Module
// Ports toggled in Feeding Mode
ReefAngel.FeedingModePorts = Port1Bit | Port3Bit;
// Ports toggled in Water Change Mode
ReefAngel.WaterChangePorts = Port1Bit | Port3Bit;
// Ports toggled when Lights On / Off menu entry selected
ReefAngel.LightsOnPorts = 0;
// Ports turned off when Overheat temperature exceeded
ReefAngel.OverheatShutoffPorts = Port4Bit;
// Use T1 probe as temperature and overheat functions
ReefAngel.TempProbe = T1_PROBE;
ReefAngel.OverheatProbe = T1_PROBE;
// Set the Overheat temperature setting
InternalMemory.OverheatTemp_write( 869 );
// Ports that are always on
ReefAngel.Relay.On( Return_Pump );
ReefAngel.Relay.On( FragPowerhead);
ReefAngel.Relay.On( WaterChange);
ReefAngel.Relay.On( BrutePump);
ReefAngel.Relay.On( FragFilter);
ReefAngel.Relay.On( GFO_Pump);
ReefAngel.Relay.On( SaltMixPump);
ReefAngel.Relay.On( Extra1);
ReefAngel.Relay.On( PowerCtlExp);
ReefAngel.Relay.On( SaltUV);
ReefAngel.Relay.On( Dose1);
////// Place additional initialization code below here
////// Place additional initialization code above here
}
void loop()
{
ReefAngel.Relay.DelayedOn( Skimmer,10 );
ReefAngel.StandardHeater( Heater,750,790 );
ReefAngel.StandardLights( Fuge_Light,21,0,11,0 );
ReefAngel.StandardLights( FragLED1,12,0,21,0);
ReefAngel.StandardLights( FragLED2,15,0,18,0);
////// Place your custom code below here
//if Display Water Level Sensor Active, then turn off Return pump
if (!ReefAngel.HighATO.IsActive()) ReefAngel.Relay.Off(Return_Pump);
else ReefAngel.Relay.On(Return_Pump);
//If Skimmate Water Level Sensor Active, then turn of Skimmer pump
if (!ReefAngel.LowATO.IsActive()) ReefAngel.Relay.Off(Skimmer);
else ReefAngel.Relay.On(Skimmer);
//frag tank heater control with T2 probe
if (ReefAngel.Params.Temp[T2_PROBE]>790) ReefAngel.Relay.Off( FragHeater );
if (ReefAngel.Params.Temp[T2_PROBE]<750) ReefAngel.Relay.On( FragHeater );
//Enter feeding mode to correspond with automatic feeder at 11AM and 2PM
if(hour()==11 && minute()==0 && second()==0) ReefAngel.FeedingModeStart();
if(hour()==14 && minute()==0 && second()==0) ReefAngel.FeedingModeStart();
////// Place your custom code above here
// This should always be the last line
ReefAngel.Portal( "" );
ReefAngel.DDNS( "Reef" ); // Your DDNS is .myreefangel.com
ReefAngel.ShowInterface();
}
Re: Power Control Expansion
When I load this code, I get the 3 relay screens on the head unit.
One thing I noticed is the DDNS line. Remove that. The server is not working with that feature anymore and that may be why the portal is not accepting your requests.
One thing I noticed is the DDNS line. Remove that. The server is not working with that feature anymore and that may be why the portal is not accepting your requests.
Roberto.
Re: Power Control Expansion
here's an alternate way to do the dynamic dns for your controller.
https://r.tapatalk.com/shareLink?url=ht ... are_type=t
Sent from my XT1585 using Tapatalk
https://r.tapatalk.com/shareLink?url=ht ... are_type=t
Sent from my XT1585 using Tapatalk
Re: Power Control Expansion
The dynamic DNS allows you to control via the universal app? However, the data on the universal app is still correct?
Re: Power Control Expansion
Yes it should be.ucez wrote:The dynamic DNS allows you to control via the universal app? However, the data on the universal app is still correct?
I'm not sure you will need to use the dynamic dns with the universal app. I was sharing it in case you needed it (since you had been using the reefangel dynamic dns).