#include "adc_random.h"
#if 1
-#define AUTO_OFF_COUNT 1800U /* 1 hr in 2 sec units */
-#define AUTO_ON_COUNT 19800U /* 11 hrs in 2 sec units */
+#define AUTO_OFF_COUNT 450 /* 15 mins on*/
+#define AUTO_ON_COUNT 1350 /* 45 mins off */
#else
-#define AUTO_OFF_COUNT 9000U /* 5 hrs in 2 sec units */
-#define AUTO_ON_COUNT 34200U /* 19 hrs in 2 sec units */
+#define AUTO_OFF_COUNT 9000U /* 5 hrs in 2 sec units */
+#define AUTO_ON_COUNT 34200U /* 19 hrs in 2 sec units */
#endif
-#define leds_set(r,g,b,w) rgb_set((r).value >> 7, (g).value >> 7, \
- (b).value >> 7, 0)
-#define dbgpin_init() do { \
- /* Set RA2 as output low */ \
- RA2 = 0; \
- TRISA2 = 0; \
- } while (0)
+#define dbgpin_init() do { \
+ /* Set RA2 as output low */ \
+ RA2 = 0; \
+ TRISA2 = 0; \
+ } while (0)
#define dbgpin_high() (RA2 = 1)
#define dbgpin_low() (RA2 = 0)
#define dbgpin_toggle() (RA2 = (LATA2 == 0) ? 1 : 0)
+enum {
+ /* Operating modes */
+ MODE_SOLID = 0, /* Cycle through colors[][] before next mode */
+ //MODE_CANDLE,
+ MODE_FADE, /* Auto cycle through colors */
+ MODE_PARTY, /* Random yet fast incolor and fade */
+ MODE_COUNT,
+
+ /* Indexes in colors[][] for LEDs */
+ LED_RED = 0,
+ LED_GRN,
+ LED_BLU,
+ LED_WHT,
+ LED_COUNT,
+
+ HELD_TMR_PERIODS = 1, /* Held timer fires every 32.768 msec */
+ HELD_PERIODS = 16, /* Held this long before held events fire */
+ COLOR_WHITE = 0, /* Color index for white */
+ COLOR_COUNT = 19,
+ BRIGHT_TOP = 100, /* Bright ramps up to top ... */
+ BRIGHT_BOTTOM = -5, /* ... then down to bottom */
+ BRIGHT_MAX = 85, /* Bright values are constrained for computations */
+ BRIGHT_MIN = 1, /* ... by min and max. */
+ BRIGHT_INIT = 42, /* later, get from eeprom */
+ STD_FADE = 16, /* Fade time in 32.768 ms units */
+ STD_INCOLOR = 29491, /* Time in color when MODE_FADE, in 32.768 ms units */
+ PARTY_MIN = 8, /* Min party fade and incolor units */
+ PARTY_RANGE = 8, /* Party fade/incolor range (max = min+range) */
+};
+
typedef struct {
int value;
int increment;
signed char remainder;
} led_t;
-/* The index of all step arrays is the speed variable. min values must be
- * at least one. range values are bit-ANDed with rand() to generate a range, so
- * ensure they are one less than a power of 2 and at least 1.
- */
-const static unsigned min_incolor_steps[4] = { 320, 32, 32, 1 };
-const static unsigned range_incolor_steps[4] = { 32767, 127, 31, 7 };
-const static int min_fade_steps[4] = { 64, 32, 32, 8 };
-const static int range_fade_steps[4] = { 511, 127, 31, 7 };
+/* 18 available colors plus white, 2 bits per color, no white mix */
+const unsigned char colors[COLOR_COUNT][LED_COUNT] = {
+ { 3, 0, 0, 0 },
+ { 3, 1, 0, 0 },
+ { 3, 2, 0, 0 },
+ { 3, 3, 0, 0 },
+ { 2, 3, 0, 0 },
+ { 1, 3, 0, 0 },
+ { 0, 3, 0, 0 },
+ { 0, 3, 1, 0 },
+ { 0, 3, 2, 0 },
+ { 0, 3, 3, 0 },
+ { 0, 2, 3, 0 },
+ { 0, 1, 3, 0 },
+ { 0, 0, 3, 0 },
+ { 1, 0, 3, 0 },
+ { 2, 0, 3, 0 },
+ { 3, 0, 3, 0 },
+ { 3, 0, 2, 0 },
+ { 3, 0, 1, 0 },
+ { 3, 3, 3, 3 },
+};
+unsigned char mode = MODE_SOLID;
+unsigned char color = COLOR_WHITE;
led_t red;
led_t grn;
led_t blu;
led_t wht;
bit on;
-unsigned char speed;
int fade_steps;
+signed char bright = BRIGHT_INIT;
+bit bright_up;
+signed char pbHeldCount;
+
+/* Return the constrained brightness level for use in computing RGB values */
+unsigned char bright_get()
+{
+ if (bright > BRIGHT_MAX)
+ return BRIGHT_MAX;
+ else if (bright < BRIGHT_MIN)
+ return BRIGHT_MIN;
+ else
+ return bright;
+}
+
+/* RGB values will not illuminate the LED */
+unsigned char led_get(unsigned value)
+{
+ value = (value * bright_get()) >> 8;
+#ifdef CEIL256
+ if (value && value < 0x26)
+ return 0x26;
+#else
+ if (value && value < 4)
+ return 4;
+#endif
+ return value;
+}
+
+/* Set the LEDs using both color and brightness values. */
+void leds_set()
+{
+ rgb_set(led_get((red).value),
+ led_get((grn).value), led_get((blu).value),
+ led_get((wht).value));
+}
void start_fade()
{
/* RGB PWM values are 8 bits, but computations are done in 15
- * (leaving room for a sign bit), so leds_set() uses >>7 to convert
- * to PWM values.
- */
+ * (leaving room for a sign bit), so leds_set() uses >>7 to convert
+ * to PWM values.
+ */
int newr, newg, newb, neww;
- /* New RGB values; all zero is not a valid option */
- do {
- newr = rand();
- newg = rand();
- newb = rand();
- neww = rand();
- } while (newr == 0 && newg == 0 && newb == 0 && neww == 0);
+ /* Select the destination color and fade-to time depending upon mode. */
+ fade_steps = STD_FADE;
+ if (mode == MODE_PARTY) {
+ color = rand() % COLOR_COUNT;
+ fade_steps = PARTY_MIN + (rand() % PARTY_RANGE);
+ } else if (mode == MODE_FADE) {
+ if (++color == COLOR_COUNT)
+ color = 0;
+ }
- /* Random # of steps to reach the new color */
- fade_steps = min_fade_steps[speed & 3] +
- (rand() & range_fade_steps[speed & 3]);
+ /* Retrieve the destination color */
+ newr = colors[color][LED_RED] << 8;
+ newg = colors[color][LED_GRN] << 8;
+ newb = colors[color][LED_BLU] << 8;
+ neww = colors[color][LED_WHT] << 8;
/* Compute increment per fade step, and remainder, for each led */
red.increment = (newr - red.value) / fade_steps;
{
dbgpin_high();
on = 1;
- red.value = 0;
- grn.value = 0;
- blu.value = 0;
- wht.value = 0;
- leds_set(red, grn, blu, wht);
rgb_on();
start_fade();
btn_pben();
tmr_stop(TMR_INCOLOR);
tmr_stop(TMR_FADE);
rgb_off();
+ red.value = grn.value = blu.value = wht.value = 0;
+ on = 0;
dbgpin_low();
SLEEP();
- on = 0;
}
-void pb_task()
+void pb_clicked()
{
- /* Is this task running nearly continuously? */
if (on) {
- if (btn_pb() == BTN_PB_UP) {
- speed = (speed + 1) & 3;
- start_fade();
+ if (mode == MODE_SOLID) {
+ if (++color == COLOR_COUNT) {
+ color = 0;
+ if (++mode == MODE_COUNT)
+ mode = 0;
+ }
+ } else if (++mode == MODE_COUNT) {
+ mode = 0;
+ color = 0;
}
- btn_pben();
+ start_fade();
}
}
+void pb_held()
+{
+ /* The button has been held. Change the color magnitude. */
+ if (bright_up) {
+ if (bright == BRIGHT_TOP)
+ bright_up = 0;
+ else
+ bright++;
+ } else {
+ if (bright == BRIGHT_BOTTOM)
+ bright_up = 1;
+ else
+ bright--;
+ }
+ leds_set();
+}
+
+void pb_held_task()
+{
+ pbHeldCount++;
+ if (pbHeldCount >= 0) {
+ pbHeldCount = 0;
+ pb_held();
+ }
+}
+
+void pb_task()
+{
+ static unsigned char pbPrev = BTN_PB_UP;
+ unsigned char pb;
+
+ pb = btn_pb();
+ if (pbPrev == BTN_PB_UP) {
+ if (pb == BTN_PB_UP)
+ pb_clicked();
+ else /* (pb == BTN_PB_DOWN) */ {
+ tmr_startPeriodic(TMR_BTN_PB_HELD, HELD_TMR_PERIODS);
+ pbHeldCount = -HELD_PERIODS;
+ }
+ } else /* if (pbPrev == BTN_PB_DOWN) */ {
+ if (pb == BTN_PB_UP) {
+ tmr_stop(TMR_BTN_PB_HELD);
+ if (pbHeldCount < 0)
+ pb_clicked();
+ } /* nothing to do if button is down */
+ }
+ pbPrev = pb;
+ btn_pben();
+}
+
void rs_task()
{
btn_rsen();
blu.value += blu.remainder;
wht.value += wht.remainder;
tmr_stop(TMR_FADE);
- tmr_start(TMR_INCOLOR, min_incolor_steps[speed & 3] +
- (rand() & range_incolor_steps[speed & 3]));
+ if (mode == MODE_FADE)
+ tmr_start(TMR_INCOLOR, STD_INCOLOR);
+ else if (mode == MODE_PARTY)
+ tmr_start(TMR_INCOLOR, PARTY_MIN + (rand() % PARTY_RANGE));
}
- leds_set(red, grn, blu, wht);
+ leds_set();
}
void auto_offon_task()
}
}
+void config_read()
+{
+ /* Read configuration fields from eeprom, notably current mode and
+ * brightness level.
+ */
+ /* FIXME: implement this */
+}
+
void user_boot()
{
dbgpin_high();
srand((adc_random() << 8) + adc_random());
+ config_read();
rs_task();
}
case TASK_BTN_RS: /* rocker switch state change */
rs_task();
break;
+ case TASK_BTN_PB_HELD: /* pushbutton is being held down */
+ pb_held_task();
+ break;
case TASK_FADE: /* fade timer has fired */
fade_task();
break;