/**********************************************************************\
*Mikrocontroller: ATTINY 13a
* Kurzbeschreibung:
*Steuerprogram für RGB Platine
*
*
* Datum:            Autor:                  Grund der Aenderung:
* 20.11.2016        Tobias Kärner           Neuerstellung
*
\**********************************************************************/


/*--- #defines -------------------------------------------------------*/
#define F_CPU 1000000UL						//Taktfrequenz
#define RED_ON PORTB |= (1 << PB0)			//turn red led on
#define RED_OFF PORTB &= ~(1 << PB0)		//turn red led off
#define GREEN_ON PORTB |= (1 << PB1)		//turn green led on
#define GREEN_OFF PORTB &= ~(1 << PB1)		//turn green led off
#define BLUE_ON PORTB |= (1 << PB2)			//turn blue led on
#define BLUE_OFF PORTB &= ~(1 << PB2)		//turn blue led off
#define BUTTON_ON !(PINB & (1 << PINB3))	//checks if Button is pressed. If pressed BUTTON_ON = 1

/*--- #includes ------------------------------------------------------*/
#include <avr/io.h>             //Standardregister
#include <avr/interrupt.h>      //Interupts
#include <util/delay.h>         //warte_Funktion

/*--- typedef-Datentypen ---------------------------------------------*/
uint16_t counter_pwm = 0;
volatile uint32_t counter_colorchange = 0;
uint8_t pwm =0;
uint8_t red = 255;
uint8_t green = 0;
uint8_t blue = 0;

/*--- Funktionen -----------------------------------------------------*/

/*--------------------------------------------------------------------*/

int main(void)
{
	DDRB |= (1 << PB0) | (1 << PB1) | (1 << PB2);
	cli();
	//prescale timer to 64
	TCCR0B |= (0<<CS02) | (0<<CS01) | (1<<CS00);
	//enable timer overflow interrupt
	TIMSK0 |= (1<<TOIE0);
	sei();
	
	uint8_t brightness = 255;
	uint8_t color = 1;
	uint8_t color_change = 1;
	uint32_t time_colorchange = 500;	//45000 = 15min 53sec from red to green to blue to red again
	uint8_t button_pushed = 0;
	uint8_t mode_change = 0;

	while (1)
	{
		while ( counter_colorchange < time_colorchange )
		{
			if ( BUTTON_ON && (button_pushed == 0) )
			{
				button_pushed = 1;
				mode_change++;
			}
			if ( !BUTTON_ON && (button_pushed == 1) )
				button_pushed = 0;
			
			if ( mode_change == 1 )
			{
				cli();
				time_colorchange = 1500;
				RED_OFF;
				GREEN_OFF;
				BLUE_OFF;
				GREEN_ON;
				_delay_ms(2000);
				GREEN_OFF;
				_delay_ms(2000);
				mode_change = 2;
				sei();
			}
			if ( mode_change == 3 )
			{
				cli();
				color_change = 0;
				RED_OFF;
				GREEN_OFF;
				BLUE_OFF;
				GREEN_ON;
				_delay_ms(2000);
				GREEN_OFF;
				_delay_ms(2000);
				GREEN_ON;
				_delay_ms(2000);
				GREEN_OFF;
				_delay_ms(2000);
				mode_change = 4;
				sei();
			}
			if ( mode_change == 5 )
			{
				cli();
				RED_OFF;
				GREEN_OFF;
				BLUE_OFF;
				mode_change = 6;
				_delay_ms(100);
			}
			if ( mode_change == 7 )
			{
				time_colorchange = 500;
				color_change = 1;
				color = 1;
				red = 255;
				green = 0;
				blue = 0;
				mode_change = 0;
				sei();
				_delay_ms(100);
			}
		}
			
		if ( color_change == 1)
		{
			if ( color == 1 )
			{
				green++;
				red--;
				if ( green == brightness )
				{
					red = 0;
					color = 2;
				}
			}
			if ( color == 2 )
			{
				blue++;
				green--;
				if ( blue == brightness )
				{
					green = 0;
					color = 3;
				}
			}
			if ( color == 3 )
			{
				red++;
				blue--;
				if ( red == brightness )
				{
					if (mode_change == 0)
						time_colorchange = 45000;
					blue = 0;
					color = 1;
				}
			}
		}
		_delay_us(1);
		counter_colorchange = 0;
	}
}

ISR(TIM0_OVF_vect)
{
	counter_colorchange++;
	
	if ( pwm == 0 )
	{
		RED_OFF;
		GREEN_OFF;
		BLUE_OFF;
	}
	if ( ( pwm == (255 - red) ) && (red != 0) )
		RED_ON;
	if ( ( pwm == (255 - green) ) && (green != 0) )
		GREEN_ON;
	if ( ( pwm == (255 - blue) ) && (blue != 0) )
		BLUE_ON;
	if (pwm == 255)
		pwm = 0;
	else
		pwm++;
}