Custom Main Screens

Would you like to help?
Share your walkthrough tutorial with others

Posts: 12306
Joined: Fri Mar 18, 2011 6:47 pm
PostPosted: Tue May 21, 2013 8:56 pm
Super cool!!!
Can you post the code?
Roberto.

Posts: 55
Joined: Wed May 08, 2013 6:23 pm
Location: North GA
PostPosted: Tue May 21, 2013 9:23 pm
Thanks!
Done :)
Barry

Current tank info: 150g mixed reef

"Some of the worst mistakes of my life were hair cuts" -Jim Morrison
User avatar
Posts: 2748
Joined: Fri Mar 18, 2011 6:20 pm
Location: Illinois
PostPosted: Wed May 22, 2013 6:39 am
ReeferBee wrote:Thanks!
Done :)

Very nice looking screen! Great job!

Posts: 180
Joined: Thu Apr 05, 2012 6:20 am
Location: JHB, South Africa
PostPosted: Wed May 22, 2013 10:04 am
binder wrote:
ReeferBee wrote:Thanks!
Done :)

Very nice looking screen! Great job!



Agreed! Good job ReeferBee

I'm gonna use the basic layout and change a few parameters
Image

Posts: 86
Joined: Sat Jan 04, 2014 10:26 am
PostPosted: Sat Mar 08, 2014 9:45 pm
IMAG0800.jpg
IMAG0800.jpg (54.87 KiB) Viewed 1896 times

Code: Select all
byte ActinicPWMValue=0;
byte DaylightPWMValue=0;
void DrawCustomMain()
{
  byte x = 6;
  byte y = 2;
  byte t;
  char text[7];
  //static byte vtechmode=0;

  ReefAngel.LCD.DrawDate(6, 2);
  ReefAngel.LCD.Clear(COLOR_BLACK, 1, 11, 132, 11);
  pingSerial();
 
  ReefAngel.LCD.DrawLargeText(3,255,8,16,"Redneck Reefin!", Font8x8);
  ReefAngel.LCD.DrawLargeText(3,255,8,56,"Jason & Sarah's", Font8x8);
  ReefAngel.LCD.DrawLargeText(3,255,32,65,"Money Pit", Font8x8);
  pingSerial();

  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 6, 90, "--------------------");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 6, 126, "--------------------");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 2, 93, "|");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 2, 103, "|");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 2, 113, "|");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 2, 123, "|");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 126, 93, "|");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 126, 103, "|");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 126, 113, "|");
  ReefAngel.LCD.DrawText(COLOR_BLACK,255, 126, 123, "|");


  ReefAngel.LCD.DrawText(0,255,10,30,"Display");
  ConvertNumToString(text, ReefAngel.Params.Temp[T1_PROBE], 10);
  ReefAngel.LCD.DrawLargeText(COLOR_BLACK, 255, 10, 40, text, Num8x16);
  pingSerial();

  ReefAngel.LCD.DrawText(0,255,100,30,"pH");
  ConvertNumToString(text, ReefAngel.Params.PH, 100);
  ReefAngel.LCD.DrawLargeText(COLOR_BLACK, 255, 85, 40, text, Num8x16);
  pingSerial();

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

  ReefAngel.LCD.DrawText(0,255,8,109, "CWLED"); 
  ReefAngel.LCD.DrawText(COLOR_BLACK,255,15,119, ReefAngel.PWM.GetDaylightValue());
  //ReefAngel.PWM.GetDaylightValue(),
  ReefAngel.LCD.DrawText(0,255,88,108, "RBLED"); 
  ReefAngel.LCD.DrawText(COLOR_BLACK,255,90,119, ReefAngel.PWM.GetActinicValue());
  //ReefAngel.PWM.GetActinicValue());
 
  //ReefAngel.LCD.DrawMonitor(15, 60, ReefAngel.Params,
                            //ReefAngel.PWM.GetDaylightValue(),
                            //ReefAngel.PWM.GetActinicValue());

}
void DrawCustomGraph()
{
}
Image

Posts: 12306
Joined: Fri Mar 18, 2011 6:47 pm
PostPosted: Sat Mar 08, 2014 11:12 pm
I like it :)
Roberto.

Posts: 86
Joined: Sat Jan 04, 2014 10:26 am
PostPosted: Tue Mar 11, 2014 8:32 pm
IMAG0801.jpg
IMAG0801.jpg (45.11 KiB) Viewed 1886 times


Well that didn't last long before I had to tinker would anyone have an idea on how I could have the temps change color if they are over a set limit?

Code: Select all
#define SIMPLE_MENU
#define NUMBERS_8x16
#define FONT_8x8

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

////// Place global variable code below here
byte ActinicPWMValue=0;
byte DaylightPWMValue=0;
void DrawCustomMain()
{
  byte x = 6;
  byte y = 2;
  byte t;
  char text[7];
  //static byte vtechmode=0;

  ReefAngel.LCD.DrawDate(6, 2);
  ReefAngel.LCD.Clear(COLOR_BLACK, 1, 11, 132, 11);
  pingSerial();
 
  ReefAngel.LCD.DrawLargeText(3,255,8,14,"Redneck Reefin!", Font8x8);
  ReefAngel.LCD.DrawLargeText(3,255,8,55,"Jason & Sarah's", Font8x8);
  ReefAngel.LCD.DrawLargeText(3,255,32,64,"Money Pit", Font8x8);
  pingSerial();

  ReefAngel.LCD.DrawText(COLOR_RED,255, 6, 88, "--------------------");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 6, 125, "--------------------");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 2, 93, "|");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 2, 103, "|");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 2, 113, "|");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 2, 123, "|");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 126, 93, "|");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 126, 103, "|");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 126, 113, "|");
  ReefAngel.LCD.DrawText(COLOR_RED,255, 126, 123, "|");

  ReefAngel.LCD.DrawLargeText(0,255,8,25,"TANK", Font8x8);
  ConvertNumToString(text, ReefAngel.Params.Temp[T1_PROBE], 10);
  ReefAngel.LCD.DrawLargeText(224, 255, 42, 25, text, Font8x8);
  pingSerial();
 
  ReefAngel.LCD.DrawLargeText(0,255,8,35,"HOOD", Font8x8);
  ConvertNumToString(text, ReefAngel.Params.Temp[T2_PROBE], 10);
  ReefAngel.LCD.DrawLargeText(153, 255, 42, 35, text, Font8x8);
  pingSerial();
 
  ReefAngel.LCD.DrawLargeText(0,255,8,45,"ROOM", Font8x8);
  ConvertNumToString(text, ReefAngel.Params.Temp[T3_PROBE], 10);
  ReefAngel.LCD.DrawLargeText(66, 255, 42, 45, text, Font8x8);

  ReefAngel.LCD.DrawText(0,255,100,25,"pH");
  ConvertNumToString(text, ReefAngel.Params.PH, 100);
  ReefAngel.LCD.DrawLargeText(COLOR_BLACK, 255, 85, 35, text, Num8x16);
  pingSerial();

  byte TempRelay = ReefAngel.Relay.RelayData;
  TempRelay &= ReefAngel.Relay.RelayMaskOff;
  TempRelay |= ReefAngel.Relay.RelayMaskOn;
  ReefAngel.LCD.DrawOutletBox(12, 75, TempRelay);
  pingSerial();
 
    ReefAngel.LCD.DrawText(0,255,8,96, "White="); 
  ReefAngel.LCD.DrawText(197,255,46,96, ReefAngel.PWM.GetDaylightValue());
  //ReefAngel.PWM.GetDaylightValue()),
  ReefAngel.LCD.DrawText(0,255,72,96, "Blue=");   
  ReefAngel.LCD.DrawText(3,255,106,96, ReefAngel.PWM.GetActinicValue());
  //ReefAngel.PWM.GetActinicValue());


}
void DrawCustomGraph()
{
}


////// 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
    // Ports toggled in Feeding Mode
    ReefAngel.FeedingModePorts = Port5Bit | Port6Bit;
    // Ports toggled in Water Change Mode
    ReefAngel.WaterChangePorts = Port1Bit | Port5Bit | Port6Bit | Port8Bit;
    // Ports toggled when Lights On / Off menu entry selected
    ReefAngel.LightsOnPorts = Port3Bit | Port4Bit;
    // Ports turned off when Overheat temperature exceeded
    ReefAngel.OverheatShutoffPorts = Port3Bit | Port4Bit;
    // Use T1 probe as temperature and overheat functions
    ReefAngel.TempProbe = T1_PROBE;
    ReefAngel.OverheatProbe = T1_PROBE;
 
    ////// Place additional initialization code below here
   

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

void loop()
{
    ReefAngel.SingleATOLow( Port1 );
    ReefAngel.Relay.Set( Port2, !ReefAngel.Relay.Status( Port3 ) );
    ReefAngel.ActinicLights( Port3 );
    ReefAngel.DayLights( Port4 );
    ReefAngel.Wavemaker1( Port5 );
    ReefAngel.Wavemaker2( Port6 );
    ReefAngel.DosingPumpRepeat1( Port7 );
    ReefAngel.StandardFan( Port8 );
    ReefAngel.PWM.DaylightPWMSlope();
    ReefAngel.PWM.ActinicPWMSlope();
   
    // Calculate your regular sunrise/sunset PWM value
    ActinicPWMValue=PWMSlope(12,15,22,45,15,100,60,ActinicPWMValue);
    DaylightPWMValue=PWMSlope(13,0,22,0,15,100,60,DaylightPWMValue);
    CheckCloud();
    ReefAngel.PWM.SetActinic(ActinicPWMValue);
    ReefAngel.PWM.SetDaylight(DaylightPWMValue);

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

    // This should always be the last line
    ReefAngel.Portal( "jegillis" );
    ReefAngel.ShowInterface();
}
//*********************************************************************************************************************************
// 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(15,00)

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

  // 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))
    {
      DaylightPWMValue=ReversePWMSlope(cloudstart,cloudstart+cloudduration,DaylightPWMValue,15,180);
      if (lightningchance && (NumMins(hour(),minute())==(cloudstart+(cloudduration/2))) && second()<5)
      {
        if (random(100)<20) lightningstatus=1;
        else lightningstatus=0;
        if (lightningstatus)
        {
          DaylightPWMValue=100;
          ActinicPWMValue=100;
        }
        else
        {
          DaylightPWMValue=0;
          ActinicPWMValue=15;
        }
        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;
      }
    }
  }
 
  if (LastNumMins!=NumMins(hour(),minute()))
  {
    LastNumMins=NumMins(hour(),minute());
    ReefAngel.LCD.Clear(255,0,120,132,132);
    ReefAngel.LCD.DrawText(0,255,8,108,"Cloud");
    ReefAngel.LCD.DrawText(0,255,8,118,"00:00");
    ReefAngel.LCD.DrawText(0,255,90,108,"Storm");
    ReefAngel.LCD.DrawText(0,255,48,108,"Length");
    ReefAngel.LCD.DrawText(0,255,90,118,"00:00");
    if (cloudchance && (NumMins(hour(),minute())<cloudstart))
    {
      int x=0;
      if ((cloudstart/60)>=10) x=8; else x=14;
      ReefAngel.LCD.DrawText(37,255,x,118,(cloudstart/60));
      if ((cloudstart%60)>=10) x=58; else x=64;
      ReefAngel.LCD.DrawText(37,255,x,118,(cloudstart%60));
    }
    if (lightningchance)
    {
      int x=0;
      if (((cloudstart+(cloudduration/2))/60)>=10) x=90; else x=96;
      ReefAngel.LCD.DrawText(37,255,x,118,((cloudstart+(cloudduration/2))/60));
      if (((cloudstart+(cloudduration/2))%60)>=10) x=108; else x=114;
      ReefAngel.LCD.DrawText(37,255,x,118,((cloudstart+(cloudduration/2))%60));
    }
  }   
}

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;
}
Image
User avatar
Posts: 5362
Joined: Fri Jul 20, 2012 9:42 am
PostPosted: Wed Mar 12, 2014 4:45 am
I know someone did some code to base their temp color off the value, but I can't find it at the moment.

I did help add a function to the library so that if you go over a certain limit it will flash. Take a look at this thread:

viewtopic.php?f=9&t=1803&hilit=drawsinglemonitoralarm

Oh and here is the post in this thread where someone changed the temp colors to be based on range

viewtopic.php?p=23651#p23651

Posts: 86
Joined: Sat Jan 04, 2014 10:26 am
PostPosted: Wed Mar 12, 2014 4:23 pm
Thanks, I used the color change the flashing is cool but I had no idea what I was looking at on that code
Image
User avatar
Posts: 378
Joined: Mon Oct 24, 2011 7:52 pm
Location: Saint Louis
PostPosted: Thu Mar 13, 2014 8:11 am
Here is the code I used. I don't know if it ever went into the libraries...

Code: Select all
//function to flash warning (parameter, high limt, low limit, x, y, decimal)
void Warningflash(int param, int high, int low, byte x, byte y, byte z)
{
  int mod=second()%2;
  if (param > high || param < low)
 {
     if (mod==0) ReefAngel.LCD.Clear(DefaultBGColor,x,y,x+40,y+10);
     else ReefAngel.LCD.DrawSingleMonitor(param, COLOR_RED, x, y, z);
 }
 else ReefAngel.LCD.DrawSingleMonitor(param, DefaultFGColor, x, y, z);
}
PreviousNext

Return to Tutorials

Who is online

Users browsing this forum: No registered users and 2 guests

cron