Reef Angel Forum

Code: Select all

// Define Custom Memory Locations
#define Mem_B_MoonSlope       100
#define Mem_B_Vacation        101
#define Mem_I_Latitude        108
#define Mem_I_Longitude       110
#define Mem_B_AcclRiseOffset  112
#define Mem_B_AcclSetOffset   113
#define Mem_B_AcclDay         114

#define Mem_B_PrintDebug      198
#define Mem_B_ResetMemory     199

void init_memory() {
  // Initialize Custom Memory Locations
  InternalMemory.write(Mem_B_MoonSlope,60);
  InternalMemory.write_int(Mem_I_Latitude,19.611544);
  InternalMemory.write_int(Mem_I_Longitude,-155.436402);
  InternalMemory.write(Mem_B_AcclRiseOffset,4);
  InternalMemory.write(Mem_B_AcclSetOffset,2);
  InternalMemory.write(Mem_B_AcclDay,0);
  InternalMemory.write(Mem_B_ResetMemory,false);
}

// define globals here
#define NUMBERS_8x16

// Define Portal Variables
#define Var_AcclDay      3

// Define Relay Ports by Name
#define WhiteLEDs          3
#define BlueLEDs           4
#define Refugium           7

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

// Custom classes
SunLocation sun;

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

// Setup on controller startup/reset
void setup()
{
  // This must be the first line
  ReefAngel.Init();  //Initialize controller
 
  ////// Place additional initialization code below here    
  if (InternalMemory.read(Mem_B_ResetMemory)) 
    init_memory();
  ////// Place additional initialization code above here
}

void loop()
{
  ReefAngel.MoonLights(Refugium);
  ReefAngel.ActinicLights(BlueLEDs);
  ReefAngel.StandardLights(WhiteLEDs); 
  
    ////// Place your custom code below here
  SetSun();               // Setup Sun rise/set lighting
  SetMoon();              // Setup Moon rise/set lighting
/*  // This part I'm not going to worry about for now if I'm not using the portal correct?
  // This should always be the last line
  ReefAngel.Portal("InPandaWeTrust");
  ReefAngel.ShowInterface();
*/
}

void SetSun() {
  // Start acclimation routine
  int acclRiseOffset=InternalMemory.read(Mem_B_AcclRiseOffset)*60;
  int acclSetOffset=InternalMemory.read(Mem_B_AcclSetOffset)*60;
  byte acclDay=InternalMemory.read(Mem_B_AcclDay);
  ReefAngel.CustomVar[Var_AcclDay]=acclDay;

  // See if we are acclimating corals and decrease the countdown each day
  static boolean acclCounterReady=false;
  if (now()%SECS_PER_DAY!=0) acclCounterReady=true;
  if (now()%SECS_PER_DAY==0 && acclCounterReady && acclDay>0) {
    acclDay--;
    acclCounterReady=false;
    InternalMemory.write(Mem_B_AcclDay,acclDay);
  } 
  // End acclimation

  sun.Init(InternalMemory.read_int(Mem_I_Latitude), InternalMemory.read_int(Mem_I_Longitude));
  sun.SetOffset(2,(acclDay*acclRiseOffset),2,(-acclDay*acclSetOffset)); // rise_hour, rise_seconds, set_hour, set_seconds
  sun.CheckAndUpdate(); // Calculate today's Sunrise / Sunset
}

void SetMoon() {
// rfi
  byte offset=InternalMemory.read(Mem_B_MoonSlope);
  
  byte startD=InternalMemory.read(Mem_B_PWMSlopeStartD);
  byte endD=InternalMemory.read(Mem_B_PWMSlopeEndD);
  byte timeD=InternalMemory.read(Mem_B_PWMSlopeDurationD);

  byte startA=InternalMemory.read(Mem_B_PWMSlopeStartA);
  byte endA=InternalMemory.read(Mem_B_PWMSlopeEndA);
  byte timeA=InternalMemory.read(Mem_B_PWMSlopeDurationA);

  static byte mp=MoonPhase();
  
  if (mp!=MoonPhase()) {
    InternalMemory.write(Mem_B_PWMSlopeEndD,mp);
    InternalMemory.write(Mem_B_PWMSlopeEndA,mp);
    mp=MoonPhase();
  }
  
  moon_init(InternalMemory.read_int(Mem_I_Latitude), InternalMemory.read_int(Mem_I_Longitude));
  
  ReefAngel.PWM.SetDaylight(PWMSlope(Moon.riseH,Moon.riseM,Moon.setH,Moon.setM, startD,endD,timeD,0));
  ReefAngel.PWM.SetActinic(PWMSlope(Moon.riseH,Moon.riseM,Moon.setH,Moon.setM, startA,endA,timeA,0));
}