Reef Angel Forum

Code: Select all

 // Autogenerated file by RAGen (v1.2.2.171), (04/05/2012 08:19)
// RA_033112_0819.ino
//
// This version designed for v0.9.0 or later

/* The following features are enabled for this File: 
 #define DisplayLEDPWM
 #define wifi
 #define WDT
 #define CUSTOM_MENU
 #define CUSTOM_MENU_ENTRIES 5
 */


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

#include <InternalEEPROM.h>

/*
Ports assignment:

Port8 - Daylight fixture - "http://www.reefangel.com/Support.Relay-function-StandardLights.ashx"
Port7 - Actinic fixture
*/

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



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

#include <avr/pgmspace.h>
prog_char menu0_label[] PROGMEM = "Feeding";
prog_char menu1_label[] PROGMEM = "Water Change";
prog_char menu2_label[] PROGMEM = "ATO Clear";
prog_char menu3_label[] PROGMEM = "Overheat Clear";
prog_char menu4_label[] PROGMEM = "PH Calibration";
PROGMEM const char *menu_items[] = {
  menu0_label, menu1_label, menu2_label, menu3_label, menu4_label  };

void MenuEntry1()
{
  ReefAngel.FeedingModeStart();

}
void MenuEntry2()
{
  ReefAngel.WaterChangeModeStart();

}
void MenuEntry3()
{
  ReefAngel.ATOClear();
  ReefAngel.DisplayMenuEntry("Clear ATO Timeout");
}
void MenuEntry4()
{
  ReefAngel.OverheatClear();
  ReefAngel.DisplayMenuEntry("Clear Overheat");
}
void MenuEntry5()
{
  ReefAngel.SetupCalibratePH();
  ReefAngel.DisplayedMenu = ALT_SCREEN_MODE;

}


void setup()
{
  // This must be the first line
  ReefAngel.Init();  //Initialize controller
  // Initialize the custom menu
  ReefAngel.InitMenu(pgm_read_word(&(menu_items[0])),SIZE(menu_items));

  // Ports toggled in Feeding Mode
  ReefAngel.FeedingModePorts = Port6Bit;
  // Ports toggled in Water Change Mode
  ReefAngel.WaterChangePorts = Port1Bit | Port2Bit | Port3Bit | Port4Bit | Port5Bit | Port6Bit;
  // Ports toggled when Lights On / Off menu entry selected
  ReefAngel.LightsOnPorts = Port7Bit | Port8Bit;

  // Ports that are always on
  ReefAngel.Relay.On(Port1);
  ReefAngel.Relay.On(Port6);
  
  ////// Place additional initialization code below here



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

void loop()
{
  // Specific functions that use Internal Memory values
  
  // ReefAngel.SingleATOLow(Port2); // commented out 27/11/11 advice of rimai re ATO shutdown like overheat
  
  ReefAngel.StandardHeater(Port3);
  ReefAngel.StandardFan(Port4);
  ReefAngel.Wavemaker1(Port5);
  ReefAngel.StandardLights(Port7);
  ReefAngel.StandardLights(Port8);

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

  // Activate Watch Dog Timer at 6am and 6pm

  if ((now()%86400)==21600) delay(1000);

  if ((now()%86400)==43200) delay(1000);

  // ATO available 6 times per day - 00:00 to 01:00, 04:00 to 05:00, 08:00 to 09:00, 12:00 to 13:00, 16:00 to 17:00, 20:00 to 21:00,


  if (hour() % 4 == 0 && ReefAngel.LowATO.IsActive()) //Rev made 19/11/11
  {

    ReefAngel.Relay.On(Port2);
  }
  else
  { 
    ReefAngel.Relay.Off(Port2);
  }


  // Kalk Reactor available 6 times per day - 01:30 to 2:00, 05:30 to 06:00, 09:30 to 10:00, 
  // 13:30 to 14:00, 17:30 to 18:00, 21:30 to 2:00.

  if (hour() % 4 == 1 && minute()>30) 
  {
    pinMode(highATOPin,OUTPUT);
    digitalWrite(highATOPin,HIGH); // Turn on Solid State Relay
  }
  else
  {
    pinMode(highATOPin,OUTPUT);
    digitalWrite(highATOPin,LOW); // Turn off Solid State Relay
  } 


  // Wavemaker not available 9 pm to 10 am

  if ( (hour() >= 20) || (hour() <= 9) ) 
  {

    ReefAngel.Relay.Off(Port5);

  }

  //********************************************************************************************************************************
   //LED SETUP
     
  ReefAngel.StandardLights(Port7,9,0,22,0); // Actinic LED Lights on at 9:00am and off at 10:00pm
  ReefAngel.StandardLights(Port8,10,0,21,0); // Daylight LED Lights on at 10:00am and off at 9:00pm


  // PWMParabola(byte startHour, byte startMinute, byte endHour, byte endMinute, byte startPWM, byte endPWM, byte oldValue)
  // startHour - Hour of the start the slope
  // startMinute - Minute of the start the slope
  // endHour - Hour of the end of the slope
  // endMinute - Minute of the end slope
  // startPWM - Beginning PWM value
  // endPWM - Ending PWM value
  // oldValue - Should be the startPWM value or the existing/current PWM value (ReefAngel.PWM.GetActinicValue() or GetDaylightValue())

  ReefAngel.PWM.SetActinic(PWMParabola(9,0,22,0,5,100,5)); 
  // Actinic PWM % starts raising from 5% to 100%  and back down to 5% from 9:00am to 10:00pm forming a parabola.
  ReefAngel.PWM.SetDaylight(PWMParabola(10,0,21,0,5,100,5)); 
  // Daylight PWM % starts raising from 5% to 100%  and back down to 5% from 10:00am to 9:00pm forming a parabola.

  /*
  
  If you get a compile error similar to this:
  'class ReefAngelClass' has no member named 'PWM'
  Please make sure that you enabled Display LED PWM on your features file.
  
  Open RAGen and make sure you have Display LED PWM checked under the Features tab.

  Or, you can manually edit the file.
  The file is located at "Documents\Arduino\libraries\ReefAngel_Features.h" file and has to include this line in it:
  #define DisplayLEDPWM
  
  */  
   

//*********************************************************************************************************************************
  ReefAngel.Portal("sebyte", "xxxx");  // invoke Portal

    ////// Place your custom code above here
  // This sends all the data to the portal
  // Do not add any custom code that changes any relay status after this line
  // The only code after this line should be the ShowInterface function


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

// End of void loop()

Code: Select all

  ReefAngel.PWM.SetActinic(PWMParabola(9,0,22,0,5,100,5)); 
  ReefAngel.PWM.SetDaylight(PWMParabola(10,0,21,0,5,100,5)); 

Code: Select all

  ReefAngel.PWM.SetActinic(PWMParabola(9,0,22,0,0,100,0)); 
  ReefAngel.PWM.SetDaylight(PWMParabola(10,0,21,0,0,100,0));