Reef Angel Forum

Code: Select all

void ReefAngelClass::PHControl(byte PHControlRelay, int LowPH, int HighPH)
{
	if (Params.PHExp <= LowPH) Relay.Off(PHControlRelay);  // If PHExp <= LowPH - turn Off PHControlRelay
	if (Params.PHExp >= HighPH) Relay.On(PHControlRelay);  // If sensor PHExp >= HighPH - turn On PHControlRelay

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 <ReefAngel.h>

////// Place global variable code below here


////// 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.AddPHExpansion();  // pH Expansion Module
    // Ports toggled in Feeding Mode
    ReefAngel.FeedingModePorts = Port5Bit | Port7Bit;
    // Ports toggled in Water Change Mode
    ReefAngel.WaterChangePorts = Port2Bit | Port3Bit | Port8Bit;
    // Ports toggled when Lights On / Off menu entry selected
    ReefAngel.LightsOnPorts = 0;
    // Ports turned off when Overheat temperature exceeded
    ReefAngel.OverheatShutoffPorts = Port4Bit | Port6Bit;
    // Use T1 probe as temperature and overheat functions
    ReefAngel.TempProbe = T1_PROBE;
    ReefAngel.OverheatProbe = T1_PROBE;


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

    ////// Place additional initialization code below here
    

    ////// Place additional initialization code above here
}

void loop()
{
    ReefAngel.CO2Control( Port1 );
    ReefAngel.SingleATOLow( Port3 );
    ReefAngel.StandardHeater( Port4 );
    ReefAngel.Relay.DelayedOn( Port5 );
    ReefAngel.MoonLights( Port6 );
    ////// Place your custom code below here

/// Custom Labels    
ReefAngel.CustomLabels[0]="CO2";  
ReefAngel.CustomLabels[1]="Reactor";  
ReefAngel.CustomLabels[2]="ATO";  
ReefAngel.CustomLabels[3]="Heater";  
ReefAngel.CustomLabels[4]="Power Heads";  
ReefAngel.CustomLabels[5]="Fuge Light";  
ReefAngel.CustomLabels[6]="Return";  
ReefAngel.CustomLabels[7]="Skimmer";

/// PHExp params to control Reactor feed pump 
if ( ReefAngel.Params.PHExp < 800 ) ReefAngel.Relay.Off( Port2 ); // Reactor Feed
if ( ReefAngel.Params.PHExp >= 840 ) ReefAngel.Relay.On( Port2 ); // Reactor Feed

/// DT Float switch to control Return in emergency overflow condition
if (ReefAngel.HighATO.IsActive()) // DT Float Switch

    ReefAngel.Relay.On(Port7); 
else
    ReefAngel.Relay.Off(Port7);    

/// Check for system uptime to delay ATO 
bool atoSpanReached;  //flag to determine if the controller has been running long enough to start ATO functionality

  if(!atoSpanReached) 
  {
     if(millis() >= 300000) //Has program been running for 5 minutes?
       atoSpanReached = true;  //It has so then set the flag
  }
  if(atoSpanReached) //Only run the ATO operations if the flag has been set
  {
     if (ReefAngel.LowATO.IsActive())
        ReefAngel.SingleATO( true,Port3,60,10 );
     else
        ReefAngel.Relay.Off( Port3 );
  }    
  
///// Defines custom variables to use for notifications on alerts in the app
  ReefAngel.ShowInterface();
if ( InternalMemory.read(ATO_Single_Exceed_Flag) == 1 )
{
ReefAngel.CustomVar[0]=1;
}
else
{
ReefAngel.CustomVar[0]=0;
}
if ( InternalMemory.read(Overheat_Exceed_Flag) == 1 )
{
ReefAngel.CustomVar[1]=1;
}
else
{
ReefAngel.CustomVar[1]=0;
}
if ( InternalMemory.read(BusLockFlag) == 1 )
{
ReefAngel.CustomVar[2]=1;
}
else
{
ReefAngel.CustomVar[2]=0;
}
  

    ////// Place your custom code above here

    // This should always be the last line
    ReefAngel.Portal( "mng777777" );
    ReefAngel.ShowInterface();
}

Code: Select all

/// PHExp params to control Reactor feed pump 
if ( ReefAngel.Params.PHExp < 800 ) ReefAngel.Relay.Off( Port2 ); // Reactor Feed
if ( ReefAngel.Params.PHExp >= 840 ) ReefAngel.Relay.On( Port2 ); // Reactor Feed

Code: Select all

ReefAngel.CO2Control(Port2, 800, 840, true);