//
//
// hello.RGB.44.c
//
// modified from Neil Gershenfeld's RGB LED software PWM hello-world
//
// (c) Massachusetts Institute of Technology 2010
// This work may be reproduced, modified, distributed,
// performed, and displayed for any purpose. Copyright is
// retained and must be preserved. The work is provided
// as is; no warranty is provided, and users accept all 
// liability.
//

#include <avr/io.h>
#include <util/delay.h>

#define output(directions,pin) (directions |= pin) // set port direction for output
#define set(port,pin) (port |= pin) // set port pin
#define clear(port,pin) (port &= (~pin)) // clear port pin
#define pin_test(pins,pin) (pins & pin) // test for port pin
#define bit_test(byte,bit) (byte & (1 << bit)) // test for bit set
#define PWM_delay() _delay_us(25) // PWM delay

// output: RGBLEDs 
#define led1_port PORTA
#define led1_direction DDRA 
#define led1_red (1 << PA0)
#define led1_green (1 << PA1)
#define led1_blue (1 << PA4)

#define led2_port PORTB
#define led2_direction DDRB 
#define led2_red (1 << PB2)
#define led2_green (1 << PB1)
#define led2_blue (1 << PB0)

int main(void) {
   //
   // main
   //
   unsigned char count, pwm;
   //
   // set clock divider to /1
   //
   CLKPR = (1 << CLKPCE);
   CLKPR = (0 << CLKPS3) | (0 << CLKPS2) | (0 << CLKPS1) | (0 << CLKPS0);
   //
   // init LED pins 
   set(led1_port, led1_red); 
   output(led1_direction, led1_red); 
   set(led1_port, led1_green); 
   output(led1_direction, led1_green); 
   set(led1_port, led1_blue); 
   output(led1_direction, led1_blue); 

   set(led2_port, led2_red); 
   output(led2_direction, led2_red); 
   set(led2_port, led2_green); 
   output(led2_direction, led2_green); 
   set(led2_port, led2_blue); 
   output(led2_direction, led2_blue); 
   //
   // main loop
   //
   while (1) {
      for (count = 0; count < 255; ++count) {
         clear(led1_port,led1_red);
         clear(led2_port,led2_red);
         //clear(led2_port,led2_green);
         for (pwm = count; pwm < 255; ++pwm)
            PWM_delay();
         set(led1_port,led1_red);
         set(led2_port,led2_red);
         //set(led2_port,led2_green);
         //set(led2_port,led2_green);
         for (pwm = 0; pwm < count; ++pwm)
            PWM_delay();
         }
      // //
      // // off -> red
      // //
      // for (count = 0; count < 255; ++count) {
      //    clear(led1_port,led1_red);
      //    clear(led2_port,led2_red);
      //    for (pwm = count; pwm < 255; ++pwm)
      //       PWM_delay();
      //    set(led1_port,led1_red);
      //    set(led2_port,led2_red);
      //    for (pwm = 0; pwm < count; ++pwm)
      //       PWM_delay();
      //    }
      // //
      // // red -> green
      // //
      // for (count = 0; count < 255; ++count) {
      //    set(led1_port,led1_red);
      //    set(led2_port,led2_red);
      //    clear(led1_port,led1_green);
      //    clear(led2_port,led2_green);
      //    for (pwm = count; pwm < 255; ++pwm)
      //       PWM_delay();
      //    clear(led1_port,led1_red);
      //    clear(led2_port,led2_red);
      //    set(led1_port,led1_green);
      //    set(led2_port,led2_green);
      //    for (pwm = 0; pwm < count; ++pwm)
      //       PWM_delay();
      //    }
      // //
      // // green -> blue
      // //
      // for (count = 0; count < 255; ++count) {
      //    set(led1_port,led1_green);
      //    set(led2_port,led2_green);
      //    clear(led1_port,led1_blue);
      //    clear(led2_port,led2_blue);
      //    for (pwm = count; pwm < 255; ++pwm)
      //       PWM_delay();
      //    clear(led1_port,led1_green);
      //    clear(led2_port,led2_green);
      //    set(led1_port,led1_blue);
      //    set(led2_port,led2_blue);
      //    for (pwm = 0; pwm < count; ++pwm)
      //       PWM_delay();
      //    }
      // //
      // // blue -> on
      // //
      // for (count = 0; count < 255; ++count) {
      //    set(led1_port,led1_blue);
      //    set(led2_port,led2_blue);
      //    clear(led1_port,led1_green);
      //    clear(led2_port,led2_green);
      //    clear(led1_port,led1_red);
      //    clear(led2_port,led2_red);
      //    for (pwm = count; pwm < 255; ++pwm)
      //       PWM_delay();
      //    set(led1_port,led1_blue);
      //    set(led2_port,led2_blue);
      //    set(led1_port,led1_green);
      //    set(led2_port,led2_green);
      //    set(led1_port,led1_red);
      //    set(led2_port,led2_red);
      //    for (pwm = 0; pwm < count; ++pwm)
      //       PWM_delay();
      //    }

      // //
      // // on -> off
      // //
      // for (count = 0; count < 255; ++count) {
      //    set(led1_port,led1_blue);
      //    set(led2_port,led2_blue);
      //    set(led1_port,led1_green);
      //    set(led2_port,led2_green);
      //    set(led1_port,led1_red);
      //    set(led2_port,led2_red);
      //    for (pwm = count; pwm < 255; ++pwm)
      //       PWM_delay();
      //    clear(led1_port,led1_green);
      //    clear(led2_port,led2_green);
      //    clear(led1_port,led1_red);
      //    clear(led2_port,led2_red);
      //    clear(led1_port,led1_blue);
      //    clear(led2_port,led2_blue);
      //    for (pwm = 0; pwm < count; ++pwm)
      //       PWM_delay();
      //    }
      }
   }