aqua illumination

wijigong · Post by **wijigong** » Sat Mar 17, 2012 4:50 pm

i try this code

i receive this error

Ai_Clouds.cpp: In function 'void CheckCloud()':
Ai_Clouds:168: error: 'ReversePWMSlope' was not declared in this scope
Ai_Clouds:205: error: a function-definition is not allowed here before '{' token
Ai_Clouds:231: error: a function-definition is not allowed here before '{' token
Ai_Clouds:265: error: expected `}' at end of input

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

byte WhiteValue=0;
byte BlueValue=0;
byte RoyalBlueValue=0;


//custom dysplay temp+on and off relay 
void DrawCustomMain()
{
   byte x = 6;
   byte y = 2;
   byte t;
   ReefAngel.LCD.DrawDate(6, 2);
   ReefAngel.LCD.Clear(COLOR_BLACK, 1, 11, 132, 11);
   x = 12;
   y += MENU_START_ROW+1;
    ReefAngel.LCD.DrawText(COLOR_BLUE, COLOR_WHITE, x, y+6, "TEMP        pH");
   char text[7];
   ConvertNumToString(text, ReefAngel.Params.PH, 100);
   ReefAngel.LCD.Clear(DefaultBGColor, x+16, y+65, x+65, y+16);
  ReefAngel.LCD.DrawLargeText(PHColor, DefaultBGColor, x+75, y+18, text, Font8x16); 

   ConvertNumToString(text, ReefAngel.Params.Temp[T1_PROBE], 10);
   y += MENU_START_ROW*2;
   x = 10;
   ReefAngel.LCD.Clear(DefaultBGColor,x,y,x+(16*4),y+16);
   ReefAngel.LCD.DrawHugeNumbers(T1TempColor, DefaultBGColor, x, y,text);
   
   

   byte TempRelay = ReefAngel.Relay.RelayData;
   TempRelay &= ReefAngel.Relay.RelayMaskOff;
   TempRelay |= ReefAngel.Relay.RelayMaskOn;
   ReefAngel.LCD.DrawOutletBox(12, 92, TempRelay);
}


void DrawCustomGraph()
{
}

//*********************************************************************************************************************************
// Random Cloud/Thunderstorm effects function
void CheckCloud()
{

// ------------------------------------------------------------
// Change the values below to customize your cloud/storm effect

// Frequency in days based on the day of the month - number 2 means every 2 days, for example (day 2,4,6 etc)
// For testing purposes, you can use 1 and cause the cloud to occur everyday
#define Clouds_Every_X_Days 1 

// Percentage chance of a cloud happening today
// For testing purposes, you can use 100 and cause the cloud to have 100% chance of happening
#define Cloud_Chance_per_Day 100

// Minimum number of minutes for cloud duration. Don't use max duration of less than 6
#define Min_Cloud_Duration 7

// Maximum number of minutes for the cloud duration. Don't use max duration of more than 255
#define Max_Cloud_Duration 15

// Minimum number of clouds that can happen per day
#define Min_Clouds_per_Day 3

// Maximum number of clouds that can happen per day
#define Max_Clouds_per_Day 5

// Only start the cloud effect after this setting
// In this example, start could after 11:30am
#define Start_Cloud_After NumMins(11,30)

// Always end the cloud effect before this setting
// In this example, end could before 8:00pm
#define End_Cloud_Before NumMins(18,30)

// Percentage chance of a lightning happen for every cloud
// For testing purposes, you can use 100 and cause the lightning to have 100% chance of happening
#define Lightning_Change_per_Cloud 100

// Note: Make sure to choose correct values that will work within your PWMSLope settings.
// For example, in our case, we could have a max of 5 clouds per day and they could last for 50 minutes.
// Which could mean 250 minutes of clouds. We need to make sure the PWMSlope can accomodate 250 minutes of effects or unforseen resul could happen.
// Also, make sure that you can fit double those minutes between Start_Cloud_After and End_Cloud_Before.
// In our example, we have 510 minutes between Start_Cloud_After and End_Cloud_Before, so double the 250 minutes (or 500 minutes) can fit in that 510 minutes window.
// It's a tight fit, but it did.

//#define printdebug // Uncomment this for debug print on Serial Monitor window
#define forcecloudcalculation // Uncomment this to force the cloud calculation to happen in the boot process. 


// Change the values above to customize your cloud/storm effect
// ------------------------------------------------------------
// Do not change anything below here

static byte cloudchance=255;
static byte cloudduration=0;
static int cloudstart=0;
static byte numclouds=0;
static byte lightningchance=0;
static byte cloudindex=0;
static byte lightningstatus=0;
static int LastNumMins=0;
// Every day at midnight, we check for chance of cloud happening today
if (hour()==0 && minute()==0 && second()==0) cloudchance=255;

#ifdef forcecloudcalculation
if (cloudchance==255)
#else
if (hour()==0 && minute()==0 && second()==1 && cloudchance==255) 
#endif
{
//Pick a random number between 0 and 99
cloudchance=random(100); 
// if picked number is greater than Cloud_Chance_per_Day, we will not have clouds today
if (cloudchance>Cloud_Chance_per_Day) cloudchance=0;
// Check if today is day for clouds. 
if ((day()%Clouds_Every_X_Days)!=0) cloudchance=0; 
// If we have cloud today
if (cloudchance)
{
// pick a random number for number of clouds between Min_Clouds_per_Day and Max_Clouds_per_Day
numclouds=random(Min_Clouds_per_Day,Max_Clouds_per_Day);
// pick the time that the first cloud will start
// the range is calculated between Start_Cloud_After and the even distribuition of clouds on this day. 
cloudstart=random(Start_Cloud_After,Start_Cloud_After+((End_Cloud_Before-Start_Cloud_After)/(numclouds*2)));
// pick a random number for the cloud duration of first cloud.
cloudduration=random(Min_Cloud_Duration,Max_Cloud_Duration);
//Pick a random number between 0 and 99
lightningchance=random(100);
// if picked number is greater than Lightning_Change_per_Cloud, we will not have lightning today
if (lightningchance>Lightning_Change_per_Cloud) lightningchance=0;
}
}
// Now that we have all the parameters for the cloud, let's create the effect

if (cloudchance)
{
//is it time for cloud yet?
if (NumMins(hour(),minute())>=cloudstart && NumMins(hour(),minute())<(cloudstart+cloudduration))
{
WhiteValue=ReversePWMSlope(cloudstart,cloudstart+cloudduration,WhiteValue,0,180);
if (lightningchance && (NumMins(hour(),minute())==(cloudstart+(cloudduration/2))) && second()<5) 
{
if (random(100)<20) lightningstatus=1; 
else lightningstatus=0;
if (lightningstatus)
{
WhiteValue=50; 
BlueValue=50;
RoyalBlueValue=50;
}
else 
{
WhiteValue=0; 
BlueValue=0;
RoyalBlueValue=0;
}
delay(1);
}
}
if (NumMins(hour(),minute())>(cloudstart+cloudduration))
{
cloudindex++;
if (cloudindex < numclouds)
{
cloudstart=random(Start_Cloud_After+(((End_Cloud_Before-Start_Cloud_After)/(numclouds*2))*cloudindex*2),(Start_Cloud_After+(((End_Cloud_Before-Start_Cloud_After)/(numclouds*2))*cloudindex*2))+((End_Cloud_Before-Start_Cloud_After)/(numclouds*2)));
// pick a random number for the cloud duration of first cloud.
cloudduration=random(Min_Cloud_Duration,Max_Cloud_Duration);
//Pick a random number between 0 and 99
lightningchance=random(100);
// if picked number is greater than Lightning_Change_per_Cloud, we will not have lightning today
if (lightningchance>Lightning_Change_per_Cloud) lightningchance=0;
}
}
}

void setup()
{
   ReefAngel.Init(); //Initialize controller
   
   randomSeed(analogRead(0));
   ReefAngel.Timer[1].SetInterval(random(10,InternalMemory.WM1Timer_read()));
   ReefAngel.Timer[1].Start();
   ReefAngel.Relay.On(Port6);
   
   ReefAngel.FeedingModePorts = B00110000;
   ReefAngel.OverheatShutoffPorts = B00001110;
   ReefAngel.WaterChangePorts = B11110001;

   // Ports that are always on
   ReefAngel.Relay.On(Port8);
   ReefAngel.Relay.On(Port7);
   ReefAngel.Relay.On(Port2);
   
    CheckCloud();
    ReefAngel.AI.SetChannel(White,WhiteValue);
    ReefAngel.AI.SetChannel(Blue,BlueValue);
    ReefAngel.AI.SetChannel(RoyalBlue,RoyalBlueValue);
  
  ReefAngel.AI.SetPort(lowATOPin);
}

void loop()
{
  ReefAngel.ShowInterface();
  ReefAngel.StandardHeater(Port4);
  ReefAngel.SingleATOHigh(Port1);
  
  //wave maker fonction with night mode 
   if ( (hour() >= 22) || (hour() <= 8) ) // from 10p - 8a
   {
      ReefAngel.Relay.Off(Port6);
      ReefAngel.Relay.On(Port5);
   }
   else
   {
      // during the day
      if ( ReefAngel.Timer[1].IsTriggered() )
      { 
         ReefAngel.Timer[1].SetInterval(random(25,50));
         ReefAngel.Timer[1].Start();
         ReefAngel.Relay.Toggle(Port6);
         ReefAngel.Relay.Toggle(Port5);
      }
    if (hour()>=22 || hour()<9)
    {
  ReefAngel.AI.SetChannel(White,0);
  ReefAngel.AI.SetChannel(Blue,MoonPhase()*0.06);
  ReefAngel.AI.SetChannel(RoyalBlue,MoonPhase()*0.06);
    }
    else
    {
  ReefAngel.AI.SetChannel(White,PWMSlope(9,0,21,0,3,30,200,3));
  ReefAngel.AI.SetChannel(Blue,PWMSlope(9,0,21,0,8,35,240,8));
  ReefAngel.AI.SetChannel(RoyalBlue,PWMSlope(9,0,21,0,8,35,240,8));
    } 
   }
}

rimai · Post by **rimai** » Sat Mar 17, 2012 5:30 pm

You forgot to add the ReversePWMSlope to your code.

Code: Select all

byte ReversePWMSlope(long cstart,long cend,byte PWMStart,byte PWMEnd, byte clength)
{
  long n=elapsedSecsToday(now());
  cstart*=60;
  cend*=60;
  if (n<cstart) return PWMStart;
  if (n>=cstart && n<=(cstart+clength)) return map(n,cstart,cstart+clength,PWMStart,PWMEnd);
  if (n>(cstart+clength) && n<(cend-clength)) return PWMEnd;
  if (n>=(cend-clength) && n<=cend) return map(n,cend-clength,cend,PWMEnd,PWMStart);
  if (n>cend) return PWMStart;
}

wijigong · Post by **wijigong** » Tue Mar 20, 2012 8:13 am

the prog for the aqua illumination work on 0 to 240 range

if rules of three work for find in %

and this ReefAngel.AI.SetChannel(White,PWMSlope(9,0,21,0,3,30,200,3));
is 9 am to 21 pm and 3,30,200,3????

rimai · Post by **rimai** » Tue Mar 20, 2012 8:56 am

yes, it is simple interpolation.
Here is the PWMSlope function description:
http://forum.reefangel.com/viewtopic.php?f=12&t=16

wijigong · Post by **wijigong** » Wed Mar 28, 2012 4:11 am

is that working on the low ato port or just on the high ato

rimai · Post by **rimai** » Wed Mar 28, 2012 8:06 am

You can do either.
Check this thread:
http://forum.reefangel.com/viewtopic.php?f=2&t=459
If using low you need to change the pin assignment:

Code: Select all

ReefAngel.AI.SetPort(lowATOPin);

Or

Code: Select all

ReefAngel.AI.SetPort(highATOPin);

Reef Angel Forum