X-Git-Url: https://oss.titaniummirror.com/gitweb?a=blobdiff_plain;f=main.c;h=e98dd0474b6a05b6e26f73c936899f3a82fc9728;hb=4f58810d846981a1c180c60aa617fdcaba44d1a7;hp=f2987998841d0315f00a47114e7fcaae42d5fdee;hpb=fcf61ef3e7a1012c67f14096d0bbf47279297398;p=rgblamp.git diff --git a/main.c b/main.c index f298799..e98dd04 100644 --- a/main.c +++ b/main.c @@ -1,135 +1,274 @@ /* * File: main.c * - * Created on August 16, 2010, 12:09 PM + * PWM test program + * + * PIC resources in use, 18-pin DIP, by pin: + * - ( 1) RA2 - unused + * - ( 2) RA3 - CCP3 PWM for blu LED + * - ( 3) RA4 - CCP4 PWM for wht LED. ICSP pin 6, PGM/LVP. + * - ( 4) RA5 - ICSP pin 1, MCLR#/Vpp + * - ( 5) Vss + * - ( 6) RB0 - pushbutton + * - ( 7) RB1 - unused + * - ( 8) RB2 - unused + * - ( 9) RB3 - CCP1 PWM for red LED + * - (10) RB4 - rocker switch position B (right) + * - (11) RB5 - rocker switch position A (left) + * - (12) RB6 - unused (future crystal) + * - (13) RB7 - unused (future crystal) + * - (14) Vdd + * - (15) RA6 - unused + * - (16) RA7 - CCP2 PWM for grn LED + * - (17) RA0 - unused + * - (18) RA1 - unused + * */ -#define RUNAT32MHZ /* else 16 MHz */ - #include #include #include "picinit.h" -#include "buttons.h" +#include "unused.h" +#include "btn.h" #include "rgb.h" +#include "tmr.h" +#include "task.h" +#include "adc_random.h" -#define STEP_SIZE 32 /* ms */ -#define reset_steps() do { incolor_steps = 1; fade_steps = 0; } \ - while (0) +#if 0 +#define AUTO_OFF_COUNT 549316UL /* 5 hrs in 32.768 ms units */ +#define AUTO_ON_COUNT 2087402UL /* 19 hrs in 32.768 ms units */ +#else +#define AUTO_OFF_COUNT 1831 /* 1 minute in 32.768 ms units */ +#define AUTO_ON_COUNT 3662 /* 2 minutes in 32.768 ms units */ +#endif #define rand_u8() (rand() & 0xff) #define rand_u16() ((rand() << 8) + rand_u8()) -#define rand_incolor_steps(f) (min_incolor_steps[f] + \ - (rand() % range_incolor_steps[f])) -#define rand_fade_steps(f) (min_fade_steps[f] + \ - (rand() % range_fade_steps[f])) +#define rand_incolor_steps(s) (min_incolor_steps[s & 3] + \ + (rand() % range_incolor_steps[s & 3])) +#define rand_fade_steps(s) (min_fade_steps[s & 3] + \ + (rand() % range_fade_steps[s & 3])) #define leds_set(r,g,b,w) rgb_set((r).value >> 7, \ - (g).value >> 7, \ - (b).value >> 7, 0) -// (w).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_high() (RA2 = 1) +#define dbgpin_low() (RA2 = 0) +#define dbgpin_toggle() (RA2 = (LATA2 == 0) ? 1 : 0) typedef struct { int value; int increment; - char remainder; + signed char remainder; } led_t; -#define INIT_LED { 0, 0, 0 } -/* The index of all step arrays is the fast variable, 0=slow, 1=fast. */ -#if 0 -const static unsigned min_incolor_steps[2] = { 320, 32 }; -const static unsigned range_incolor_steps[2] = { 32768, 128 }; -const static int min_fade_steps[2] = { 64, 32 }; -const static int range_fade_steps[2] = { 416, 128 }; -#else -const static unsigned min_incolor_steps[2] = { 64, 64 }; -const static unsigned range_incolor_steps[2] = { 1, 1 }; -const static int min_fade_steps[2] = { 32, 32 }; -const static int range_fade_steps[2] = { 1, 1 }; +/* The index of all step arrays is the speed variable */ +#if 1 +const static unsigned min_incolor_steps[4] = { 320, 32, 32, 1 }; +const static unsigned range_incolor_steps[4] = { 32768, 128, 32, 8 }; +const static int min_fade_steps[4] = { 64, 32, 32, 1 }; +const static int range_fade_steps[4] = { 416, 128, 32, 8 }; +#else /* for debugging */ +const static unsigned min_incolor_steps[4] = { 64, 32, 16, 8 }; +const static unsigned range_incolor_steps[4] = { 1, 1, 1, 1 }; +const static int min_fade_steps[4] = { 64, 32, 16, 8 }; +const static int range_fade_steps[4] = { 1, 1, 1, 1 }; #endif -int main(void) +led_t red; +led_t grn; +led_t blu; +led_t wht; +bit on; +unsigned char speed; +int fade_steps; + +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. + */ + 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); + + /* Random # of steps to reach the new color */ + fade_steps = rand_fade_steps(speed); + + /* Compute increment per fade step, and remainder, for each led */ + red.increment = (newr - red.value) / fade_steps; + red.remainder = newr - (red.value + red.increment * fade_steps); + grn.increment = (newg - grn.value) / fade_steps; + grn.remainder = newg - (grn.value + grn.increment * fade_steps); + blu.increment = (newb - blu.value) / fade_steps; + blu.remainder = newb - (blu.value + blu.increment * fade_steps); + wht.increment = (neww - wht.value) / fade_steps; + wht.remainder = neww - (wht.value + wht.increment * fade_steps); + + /* Start the fade timer */ + tmr_startPeriodic(TMR_FADE, 1); /* 32.768 msec */ +} + +void turnOn() +{ + 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(); +} + +void turnOff() +{ + /* Event on to off, either by switch or auto-off timer */ + tmr_stop(TMR_INCOLOR); + tmr_stop(TMR_FADE); + rgb_off(); + dbgpin_low(); + on = 0; +} + +void pb_task() +{ + if (btn_pb() == BTN_PB_UP) { + speed = (speed + 1) & ~4; + tmr_stop(TMR_INCOLOR); + start_fade(); + } + btn_pben(); +} + +void rs_task() +{ + switch (btn_rs()) { + case BTN_RS_OFF: + tmr_stop(TMR_AUTO_OFFON); + turnOff(); + break; + case BTN_RS_RIGHT: + tmr_start(TMR_AUTO_OFFON, AUTO_OFF_COUNT); + /* fall through */ + case BTN_RS_LEFT: + turnOn(); + break; + } + btn_rsen(); +} + +void fade_task() +{ + red.value += red.increment; + grn.value += grn.increment; + blu.value += blu.increment; + wht.value += wht.increment; + if (--fade_steps == 0) { + /* This is the last fade step. Finalize the RGB led states and decide how + * long to stay in this color. + */ + red.value += red.remainder; + grn.value += grn.remainder; + blu.value += blu.remainder; + wht.value += wht.remainder; + tmr_stop(TMR_FADE); + tmr_start(TMR_INCOLOR, rand_incolor_steps(speed)); + } + leds_set(red, grn, blu, wht); +} + +void auto_offon_task() +{ + if (on) { + turnOff(); + if (btn_rs() == BTN_RS_RIGHT) + tmr_start(TMR_AUTO_OFFON, AUTO_ON_COUNT); + } else /* off */ { + turnOn(); + if (btn_rs() == BTN_RS_RIGHT) + tmr_start(TMR_AUTO_OFFON, AUTO_OFF_COUNT); + } +} + +void user_boot() { - led_t red = INIT_LED; - led_t grn = INIT_LED; - led_t blu = INIT_LED; - led_t wht = INIT_LED; - unsigned char fast = 0; - unsigned incolor_steps; - int fade_steps; - - pic_init(); - buttons_init(); - rgb_init(); - reset_steps(); - - if (buttons_on()) - rgb_on(); - - while (1) { - unsigned char buttons = buttons_read(); - - if ((buttons & (IN_ROCKERA | IN_ROCKERB))) { - if (buttons & IN_PUSHBTN) { - if (!fast) { - fast = 1; - reset_steps(); - } else - fast = 0; - } - - if (fade_steps) { - fade_steps--; - /* Continue the in-progress fade */ - red.value += red.increment; - grn.value += grn.increment; - blu.value += blu.increment; - wht.value += wht.increment; - if (fade_steps == 0) { - red.value += red.remainder; - grn.value += grn.remainder; - blu.value += blu.remainder; - wht.value += wht.remainder; - } - leds_set(red, grn, blu, wht); - } else if (--incolor_steps == 0) { - int newr, newg, newb, neww, tmp; - - /* Next led color. All off is not a valid option. - * RGB values are stored and processed as 15-bit non-negative - * integers. Since the RGB pwm values are 8 bits in width, - * leds_set() uses >> 7 to convert each color's value. - */ - do { - newr = rand(); - newg = rand(); - newb = rand(); - neww = rand(); - } while (newr == 0 && newg == 0 && newb == 0 && neww == 0); - - /* Next incolor and fade steps */ - incolor_steps = rand_incolor_steps(fast); - fade_steps = (buttons & IN_ROCKERA) ? 1 : rand_fade_steps(fast); - - /* Compute increment and remainder for each led */ - red.increment = (newr - red.value) / fade_steps; - red.remainder = newr - (red.value + red.increment * fade_steps); - grn.increment = (newg - grn.value) / fade_steps; - grn.remainder = newg - (grn.value + grn.increment * fade_steps); - blu.increment = (newb - blu.value) / fade_steps; - blu.remainder = newb - (blu.value + blu.increment * fade_steps); - wht.increment = (neww - wht.value) / fade_steps; - wht.remainder = neww - (wht.value + wht.increment * fade_steps); - } - __delay_ms(STEP_SIZE); /* step should be start to start... */ - } else { - rgb_off(); - buttons_sleep(); - reset_steps(); - rgb_on(); - red.value = 0; - grn.value = 0; - blu.value = 0; - wht.value = 0; - } + dbgpin_high(); + srand((adc_random() << 8) + adc_random()); + pb_task(); + rs_task(); +} + +void user_tasks(unsigned char block) +{ + task_id_t tid; + + while ((tid = task_get(block)) >= 0) { + switch (tid) { + case TASK_BTN_PB: /* pushbutton state change */ + pb_task(); + break; + case TASK_BTN_RS: /* rocker switch state change */ + rs_task(); + break; + case TASK_FADE: /* fade timer has fired */ + fade_task(); + break; + case TASK_INCOLOR: /* in-color timer has fired */ + start_fade(); + break; + case TASK_AUTO_OFFON: /* auto on/off timer has fired */ + auto_offon_task(); + break; } - return 0; + } +} + +int main(void) +{ + /* Platform initialization */ + pic_init(); + unused_init(); + btn_init(); + rgb_init(); + tmr_init(); + task_init(); + dbgpin_init(); + +#if 0 + /* Execute tasks until the queue empties */ + user_tasks(0); +#endif + +#if 0 + /* Software initialization */ +#endif + +#if 0 + /* Execute tasks until the queue empties */ + user_tasks(0); +#endif + + /* Run user boot code */ + user_boot(); + + /* Process tasks forever */ + user_tasks(1); + + /* Prevent return from main, which causes a device reset */ + while (1); } +