AWC Code

Ismaclst · Post by **Ismaclst** » Sun Feb 14, 2016 9:02 am

I need help coding for my automatic water change pump. I want to turn on port 2 every 6 hours for 18 min. I also want to use the two float switches in the saltwater container to have port 2 turn off when it reaches the low float switch and have it turn back on when the high is activated. This would act as a fail safe so when the saltwater bin gets too low it won't pump water out of the tank when there is no more water in the saltwater container. Here is my current code.

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


////// 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.DDNS("Damien"); 
  ReefAngel.AddMultiChannelWaterLevelExpansion();  // Multi-Channel Water Level Expanion Module
  // Ports toggled in Feeding Mode
  ReefAngel.FeedingModePorts = Port1Bit | Port6Bit;
  // Ports toggled in Water Change Mode
  ReefAngel.WaterChangePorts = Port1Bit | Port2Bit | Port3Bit | Port4Bit | Port6Bit | Port7Bit | Port8Bit;
  // Ports toggled when Lights On / Off menu entry selected
  ReefAngel.LightsOnPorts = Port5Bit;
  // Ports turned off when Overheat temperature exceeded
  ReefAngel.OverheatShutoffPorts = Port3Bit;
  // Use T1 probe as temperature and overheat functions
  ReefAngel.TempProbe = T1_PROBE;
  ReefAngel.OverheatProbe = T1_PROBE;
  // Set the Overheat temperature setting
  InternalMemory.OverheatTemp_write( 800 );
  InternalMemory.WaterLevelMax_write(1800);

  // Feeeding and Water Change mode speed


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

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


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

void loop()
{
  ReefAngel.StandardHeater( Port3,780,785 );
  ReefAngel.WaterLevelATO(4,Port4,240,36,38); 

  ////// Place your custom code below here

  if (ReefAngel.WaterLevel.GetLevel(1)>45) ReefAngel.PWM.SetActinic(50);
  else
    ReefAngel.PWM.SetActinic(100);

  if (ReefAngel.WaterLevel.GetLevel(2)>85)
    ReefAngel.Relay.Off(Port1);
  else
    ReefAngel.Relay.On(Port1);

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

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

lnevo · Post by **lnevo** » Sun Feb 14, 2016 11:52 am

So first let's code Port2..

Code: Select all

ReefAngel.Relay.Set(Port2, now()%6*SECS_PER_HOUR<18*SECS_PER_MINUTE);

This tells Port2 to turn on if the condition is met. The condition breaks down the current time into 6 hour chunks. If that time is less than 18 minutes then the port will be on. You can adjust the runtime by changing 18*SECS_PER_MINUTE and the repeat interval by changing the 6*SECS_PER_HOUR.

Now, let's focus on the float switches.

Code: Select all

if (ReefAngel.LowATO.IsActive()) ReefAngel.Relay.Override(Port2,0); // Disable the port until overriden manually
if (ReefAngel.HighATO.IsActive()) ReefAngel.Relay.Override(Port2,2); // Set port back to auto

Pretty straight forward

Ismaclst · Post by **Ismaclst** » Sun Feb 14, 2016 11:54 am

Great, thanks! I'm obviously not very good at coding! So does the first line go in the void setup and the other goes in the void loop? Can't wait to have this automated to reduce tank maintenance.

lnevo · Post by **lnevo** » Sun Feb 14, 2016 11:56 am

Best thing I've ever done!!! Can't believe it took me so long to get the tubing run and everything mounted. Was sitting on all the equipment for almost 2 years...

Ismaclst · Post by **Ismaclst** » Sun Feb 14, 2016 11:59 am

I had a SECS_PER_MINUTE not declared in this scope, error.

lnevo · Post by **lnevo** » Sun Feb 14, 2016 12:11 pm

Sorry, use SECS_PER_MIN you could also just use 60

my bad..

Ismaclst · Post by **Ismaclst** » Sun Feb 14, 2016 12:21 pm

Thanks, compiled fine.

Ismaclst · Post by **Ismaclst** » Sat Feb 20, 2016 6:22 am

Code: Select all

if (ReefAngel.LowATO.IsActive()) ReefAngel.Relay.Override(Port2,0); // Disable the port until overriden manually
if (ReefAngel.HighATO.IsActive()) ReefAngel.Relay.Override(Port2,2); // Set port back to auto

What would I need to change this to if I was going to use channel 1 of the multi channel water expansion? I was going to use the float switches but it would require a fancy bracket. Since I had one channel left, I figured this would make it a lot easier to setup.

lnevo · Post by **lnevo** » Sat Feb 20, 2016 8:33 am

ReefAngel.WaterLevel.GetChannel(1)<X

ReefAngel.WaterLevel.GetLevel(1)>Y

Where X and Y are the values you want to use to trigger

Ismaclst · Post by **Ismaclst** » Sat Feb 20, 2016 9:07 am

Would it be something like this

Code: Select all

if (ReefAngel.WaterLevel.GetLevel(1)<5)
    ReefAngel.Relay.Override(Port2,0); 
  if (ReefAngel.WaterLevel.GetLevel(1)>90)
    ReefAngel.Relay.Override(Port2,2);

lnevo · Post by **lnevo** » Sat Feb 20, 2016 9:15 am

Ismaclst · Post by **Ismaclst** » Sat Feb 20, 2016 9:17 am

Thanks

Ismaclst · Post by **Ismaclst** » Fri Mar 11, 2016 2:17 pm

I finally got my pump and plumbing hooked up for my AWC last night. I put a bucket at the discharge tubing end to see if it was actually pumping water from the sump. I got home from work today to find that there was no water in the bucket when there should have been about a gallon. I checked the portal to see if that port turned on but it hadn't all day. Not sure if something is wrong with by code or not. Here is my most recent one.

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 <Tide.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


////// Place global variable code above here

Tide tide;

void setup()
{
  // This must be the first line
  ReefAngel.Init();  //Initialize controller
  ReefAngel.Use2014Screen();  // Let's use 2014 Screen
  ReefAngel.DDNS("Damien"); 
  ReefAngel.AddMultiChannelWaterLevelExpansion();  // Multi-Channel Water Level Expanion Module
  // Ports toggled in Feeding Mode
  ReefAngel.FeedingModePorts = Port1Bit | Port6Bit;
  // Ports toggled in Water Change Mode
  ReefAngel.WaterChangePorts = Port1Bit | Port2Bit | Port3Bit | Port4Bit | Port6Bit | Port7Bit | Port8Bit;
  // Ports toggled when Lights On / Off menu entry selected
  ReefAngel.LightsOnPorts = Port5Bit;
  // Ports turned off when Overheat temperature exceeded
  ReefAngel.OverheatShutoffPorts = Port3Bit;
  // Use T1 probe as temperature and overheat functions
  ReefAngel.TempProbe = T1_PROBE;
  ReefAngel.OverheatProbe = T1_PROBE;
  ReefAngel.Relay.Set(Port8, now()%6*SECS_PER_HOUR<30*SECS_PER_MIN);
  // Set the Overheat temperature setting
  InternalMemory.OverheatTemp_write( 800 );
  InternalMemory.WaterLevelMax_write(1800);        


  // Feeeding and Water Change mode speed


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

  tide.Init(55,10,30);
  tide.SetWaveLength(12+SECS_PER_HOUR);
  ////// Place additional initialization code below here


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

void loop()
{
  ReefAngel.StandardHeater( Port3,780,785 );
  ReefAngel.WaterLevelATO(4,Port4,240,28,31); 



  ////// Place your custom code below here

  if (ReefAngel.WaterLevel.GetLevel(1)<5) //Disable the port until overriden manually
    ReefAngel.Relay.Override(Port8,0);    //Saltwater Reservoir
  if (ReefAngel.WaterLevel.GetLevel(1)>80)   // Set port back to auto
    ReefAngel.Relay.Override(Port8,2); 

  if (ReefAngel.WaterLevel.GetLevel(2)>80) //Overflow
    ReefAngel.Relay.Off(Port1);
  else
    ReefAngel.Relay.On(Port1);

  if (ReefAngel.WaterLevel.GetLevel(3)>87) //ATO Reservoir
    ReefAngel.Relay.Off(Port5);
  if (ReefAngel.WaterLevel.GetLevel(3)<1)
    ReefAngel.Relay.On(Port5);

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

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



byte setMaxspect(byte minSpeed, byte maxSpeed, boolean PulseSync)
{
  int reverse_speed=0;
  int forward_speed=45;
  
   // swap between forward and reverse every X seconds 
   reverse_speed = ShortPulseMode(0,100,ReefAngel.DCPump.Duration*2,true); 
   if (reverse_speed == 100) {
     //
     // while we are going in reverse increase the speed by 10 
     forward_speed = ShortPulseMode(35+10, 60+10,ReefAngel.DCPump.Duration,true);
   } else {
     //
     // while we are going forward set speed to 25-40 to keep
     // from blowing corals off the rocks
     forward_speed = ShortPulseMode(35,70, ReefAngel.DCPump.Duration, true);
  }

  if (PulseSync) {
    return forward_speed;
  } else {
    return reverse_speed;
  }
}

Ismaclst · Post by **Ismaclst** » Fri Mar 11, 2016 2:19 pm

I'm using port 8 for the AWC pump.

Ismaclst · Post by **Ismaclst** » Sat Mar 12, 2016 9:45 am

Anyone?

rimai · Post by **rimai** » Sun Mar 13, 2016 4:55 pm

Why would you expect water in the bucket?
There is nothing that triggers anything in your code.
What is your trigger?

Ismaclst · Post by **Ismaclst** » Sun Mar 13, 2016 5:03 pm

I thought this triggered port 8?

Code: Select all

  ReefAngel.Relay.Set(Port8, now()%6*SECS_PER_HOUR<30*SECS_PER_MIN);

Ismaclst · Post by **Ismaclst** » Sun Mar 13, 2016 5:07 pm

I put that line in the void setup but should it go in the void loop instead?

rimai · Post by **rimai** » Sun Mar 13, 2016 5:07 pm

Sorry. Didn't see that because it was in the wrong section.
setup() only runs at the initialization of the controller.
It should be in the loop() section.

Ismaclst · Post by **Ismaclst** » Sun Mar 13, 2016 5:09 pm

Thanks, hopefully that fixes it.

Ismaclst · Post by **Ismaclst** » Sun Mar 13, 2016 5:15 pm

I think something is wrong with that line of code. I needed it to run for 30 minutes every 6 hours. Right now its turning off and on about every 6 seconds.

rimai · Post by **rimai** » Sun Mar 13, 2016 5:21 pm

I think you need to some parenthesis to isolate the math.
You have to think it just like you would interpret it. If you have doubts, so does the controller.
So, now()%6*SECS_PER_HOUR<30*SECS_PER_MIN would be read like this:
now() modulo 6 * 3600 < 30 * 60
the first calculation is now() modulo 6. The result is multiplied by 3600. The result is checked if it is less than 30 and then the result is multiplied by 60.
Definitely not what you want.
Just like regular math, parenthesis is very important.
You math should be:
(now()%(6*SECS_PER_HOUR))<(30*SECS_PER_MIN)

Ismaclst · Post by **Ismaclst** » Sun Mar 13, 2016 5:23 pm

Thanks, Roberto. I have a hard time understanding the code.

Ismaclst · Post by **Ismaclst** » Sun Mar 13, 2016 5:31 pm

Sorry to keep asking questions but when I went to verify the new code it had some errors. Not sure if I missed something or what.

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 <Tide.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


////// Place global variable code above here

Tide tide;

void setup()
{
  // This must be the first line
  ReefAngel.Init();  //Initialize controller
  ReefAngel.Use2014Screen();  // Let's use 2014 Screen
  ReefAngel.DDNS("Damien"); 
  ReefAngel.AddMultiChannelWaterLevelExpansion();  // Multi-Channel Water Level Expanion Module
  // Ports toggled in Feeding Mode
  ReefAngel.FeedingModePorts = Port1Bit | Port6Bit;
  // Ports toggled in Water Change Mode
  ReefAngel.WaterChangePorts = Port1Bit | Port2Bit | Port3Bit | Port4Bit | Port6Bit | Port7Bit | Port8Bit;
  // Ports toggled when Lights On / Off menu entry selected
  ReefAngel.LightsOnPorts = Port5Bit;
  // Ports turned off when Overheat temperature exceeded
  ReefAngel.OverheatShutoffPorts = Port3Bit;
  // Use T1 probe as temperature and overheat functions
  ReefAngel.TempProbe = T1_PROBE;
  ReefAngel.OverheatProbe = T1_PROBE;
  // Set the Overheat temperature setting
  InternalMemory.OverheatTemp_write( 800 );
  InternalMemory.WaterLevelMax_write(1800);        


  // Feeeding and Water Change mode speed


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

  tide.Init(55,10,30);
  tide.SetWaveLength(12+SECS_PER_HOUR);
  ////// Place additional initialization code below here


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

void loop()
{
  ReefAngel.StandardHeater( Port3,780,785 );
  ReefAngel.WaterLevelATO(4,Port4,240,28,31); 
  ReefAngel.Relay.Set(Port8, (now()%(6*SECS_PER_HOUR))<(30*SECS_PER_MIN);

  ////// Place your custom code below here

  if (ReefAngel.WaterLevel.GetLevel(1)<5) //Disable the port until overriden manually
    ReefAngel.Relay.Override(Port8,0);    //Saltwater Reservoir
  if (ReefAngel.WaterLevel.GetLevel(1)>80)   // Set port back to auto
    ReefAngel.Relay.Override(Port8,2); 

  if (ReefAngel.WaterLevel.GetLevel(2)>80) //Overflow
    ReefAngel.Relay.Off(Port1);
  else
    ReefAngel.Relay.On(Port1);

  if (ReefAngel.WaterLevel.GetLevel(3)>87) //ATO Reservoir
    ReefAngel.Relay.Off(Port5);
  if (ReefAngel.WaterLevel.GetLevel(3)<1)
    ReefAngel.Relay.On(Port5);

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

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



byte setMaxspect(byte minSpeed, byte maxSpeed, boolean PulseSync)
{
  int reverse_speed=0;
  int forward_speed=45;
  
   // swap between forward and reverse every X seconds 
   reverse_speed = ShortPulseMode(0,100,ReefAngel.DCPump.Duration*2,true); 
   if (reverse_speed == 100) {
     //
     // while we are going in reverse increase the speed by 10 
     forward_speed = ShortPulseMode(35+10, 60+10,ReefAngel.DCPump.Duration,true);
   } else {
     //
     // while we are going forward set speed to 25-40 to keep
     // from blowing corals off the rocks
     forward_speed = ShortPulseMode(35,70, ReefAngel.DCPump.Duration, true);
  }

  if (PulseSync) {
    return forward_speed;
  } else {
    return reverse_speed;
  }
}

rimai · Post by **rimai** » Sun Mar 13, 2016 5:39 pm

Copy and paste in place of the other one. You are missing one parenthesis.
It's just like when you did math in high school. One opening parenthesis needs to have its corresponding closing parenthesis to complete the formula.

Ismaclst · Post by **Ismaclst** » Sun Mar 13, 2016 6:09 pm

Ok, I see. I forgot the second parenthesis at the end.

Reef Angel Forum

AWC Code

AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Re: AWC Code

Login • Register