Page 1 of 1

Help!!!!Heater not kicking on

Posted: Sun May 05, 2013 7:26 pm
by SaltyGXP
For some reason my heater isn't kicking on. its set to kick on at 77.5 and off at 78 on port 5 here is my code. I'm using the wizard with the internal memory option and then putting my custom code in.


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

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

#define DateTextColor COLOR_CLAY


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

void DrawCustomMain()
{
// the graph is drawn/updated when we exit the main menu &
// when the parameters are saved

pingSerial();
#if defined DisplayLEDPWM && ! defined RemoveAllLights
ReefAngel.LCD.DrawMonitor(15, 60, ReefAngel.Params,
ReefAngel.PWM.GetDaylightValue(), ReefAngel.PWM.GetActinicValue());
#else // defined DisplayLEDPWM && ! defined RemoveAllLights
ReefAngel.LCD.DrawMonitor(15, 60, ReefAngel.Params);
#endif // defined DisplayLEDPWM && ! defined RemoveAllLights
pingSerial();
byte TempRelay = ReefAngel.Relay.RelayData;
TempRelay &= ReefAngel.Relay.RelayMaskOff;
TempRelay |= ReefAngel.Relay.RelayMaskOn;
ReefAngel.LCD.DrawOutletBox(12, 93, TempRelay);
}
void DrawCustomGraph()
{
ReefAngel.LCD.DrawGraph(5, 5);
ReefAngel.LCD.DrawText(COLOR_BLUE, COLOR_WHITE, 15, 4 , " Ratliff's Reef ");
ReefAngel.LCD.DrawDate( 6, 112);
ReefAngel.LCD.DrawMonitor(15, 60, ReefAngel.Params,
ReefAngel.PWM.GetDaylightValue(), ReefAngel.PWM.GetActinicValue());

}


void setup()
{
// This must be the first line
ReefAngel.Init(); //Initialize controller
// Ports toggled in Feeding Mode
ReefAngel.FeedingModePorts = Port8Bit;
// Ports toggled in Water Change Mode
ReefAngel.WaterChangePorts = Port5Bit | Port6Bit | Port7Bit | Port8Bit;
// Ports toggled when Lights On / Off menu entry selected
ReefAngel.LightsOnPorts = 0;
// Ports turned off when Overheat temperature exceeded
ReefAngel.OverheatShutoffPorts = Port1Bit | Port2Bit | Port3Bit | Port5Bit;
// Use T1 probe as temperature and overheat functions
ReefAngel.TempProbe = T1_PROBE;
ReefAngel.OverheatProbe = T1_PROBE;


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

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


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

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

if (hour()>=10 && hour()<16)
ReefAngel.PWM.SetDaylight( ReefCrestMode(50,20,true) ); // ReefCrest at 50% +/- 20% on sync mode
else if (hour()>=16 && hour()<19)
ReefAngel.PWM.SetDaylight( NutrientTransportMode(30,60,5000,true) );
else if (hour()>=19 && hour()<22)
ReefAngel.PWM.SetDaylight( SineMode(20,45,30,true) );
else
ReefAngel.PWM.SetDaylight( LongPulseMode(15,35,120,true) );



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



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

Re: Help!!!!Heater not kicking on

Posted: Sun May 05, 2013 7:40 pm
by rimai
Code looks good.
Have you tried hard code settings?

Re: Help!!!!Heater not kicking on

Posted: Sun May 05, 2013 7:45 pm
by SaltyGXP
rimai wrote:Code looks good.
Have you tried hard code settings?
no............I just hooked it up today its been sitting the past week because of work. I haven't had anytime to look anything else up and learn other than my jebao coding. anyway you can show me what i need to add?

Re: Help!!!!Heater not kicking on

Posted: Sun May 05, 2013 7:49 pm
by rimai
Replace this:

Code: Select all

ReefAngel.StandardHeater( Port5 );
With this:

Code: Select all

ReefAngel.StandardHeater( Port5,775,780 );

Re: Help!!!!Heater not kicking on

Posted: Sun May 05, 2013 7:57 pm
by SaltyGXP
rimai wrote:Replace this:

Code: Select all

ReefAngel.StandardHeater( Port5 );
With this:

Code: Select all

ReefAngel.StandardHeater( Port5,775,780 );

Thank you very much for the help sir. :mrgreen: