/*****************************************************
This program was produced by the
CodeWizardAVR V2.05.0 Evaluation
Automatic Program Generator
© Copyright 1998-2010 Pavel Haiduc, HP InfoTech s.r.l.
http://www.hpinfotech.com

Project : 
Version : 
Date    : 07.01.2011
Author  : Freeware, for evaluation and non-commercial use only
Company : 
Comments: 


Chip type               : ATmega8
Program type            : Application
AVR Core Clock frequency: 12,000000 MHz
Memory model            : Small
External RAM size       : 0
Data Stack size         : 256
*****************************************************/

#include <mega8.h>
#include <delay.h>
#include <math.h>
#include <stdlib.h>

flash float wave[] = {
0, 0.0003, 0.0006, 0.0012, 0.0019, 0.0027, 0.0037, 0.0048, 0.0061, 0.0075, 0.0091, 0.0109, 0.0128, 0.0148, 0.0170, 
0.0193, 0.0218, 0.0244, 0.0272, 0.0301, 0.0332, 0.0364, 0.0397, 0.0432, 0.0468, 0.0506, 0.0544, 0.0585, 0.0626, 0.0669, 0.0714, 
0.0759, 0.0806, 0.0854, 0.0904, 0.0954, 0.1006, 0.1059, 0.1114, 0.1169, 0.1226, 0.1284, 0.1343, 0.1403, 0.1464, 0.1526, 0.1590, 
0.1654, 0.1719, 0.1786, 0.1853, 0.1921, 0.1990, 0.2061, 0.2132, 0.2204, 0.2276, 0.2350, 0.2424, 0.25, 0.2575, 0.2652, 0.2730, 
0.2808, 0.2886, 0.2966, 0.3046, 0.3126, 0.3208, 0.3289, 0.3372, 0.3454, 0.3538, 0.3621, 0.3705, 0.3790, 0.3875, 0.3960, 0.4045, 
0.4131, 0.4217, 0.4304, 0.4390, 0.4477, 0.4564, 0.4651, 0.4738, 0.4825, 0.4912, 0.5, 0.5087, 0.5174, 0.5261, 0.5348, 0.5435, 
0.5522, 0.5609, 0.5695, 0.5782, 0.5868, 0.5954, 0.6039, 0.6124, 0.6209, 0.6294, 0.6378, 0.6461, 0.6545, 0.6627, 0.6710, 0.6791, 
0.6873, 0.6953, 0.7033, 0.7113, 0.7191, 0.7269, 0.7347, 0.7424, 0.75, 0.7575, 0.7649, 0.7723, 0.7795, 0.7867, 0.7938, 0.8009, 
0.8078, 0.8146, 0.8213, 0.8280, 0.8345, 0.8409, 0.8473, 0.8535, 0.8596, 0.8656, 0.8715, 0.8773, 0.8830, 0.8885, 0.8940, 0.8993, 
0.9045, 0.9095, 0.9145, 0.9193, 0.9240, 0.9285, 0.9330, 0.9373, 0.9414, 0.9455, 0.9493, 0.9531, 0.9567, 0.9602, 0.9635, 0.9667, 
0.9698, 0.9727, 0.9755, 0.9781, 0.9806, 0.9829, 0.9851, 0.9871, 0.9890, 0.9908, 0.9924, 0.9938, 0.9951, 0.9962, 0.9972, 0.9980, 
0.9987, 0.9993, 0.9996, 0.9999, 1 
}; 





// Declare your global variables here
// набор цветов: ргб от которого уходим и ргб к которому переходим
unsigned char red, green, blue, new_red, new_green, new_blue;

// функция трапеции цвета.
// принимает параметр от 0 до 1535 и возвращает значение графика в этой точке.
// более подробно - смотрите цветовую модель HSV и её преобразование в RGB 
int get_bright_by_degree(unsigned int deg)
{
    // 0 256 512 768 1024 1280 1536
    /*
    0-511 top
    512-767 falling
    768-1279 bottom
    1280-1535 rising
    */
    while(deg >= 1536) deg -= 1536; 
    
    if(deg < 512)
        return 255;
    else
    if(deg < 768)
        return 767 - deg;
    else
    if(deg < 1280)
        return 0;
    else
        return deg - 1280;
}

// генерирует новый целевой цвет, заполняет переменные. тут все понятно
void generate_new_target_color()
{
    unsigned int color;
    color = rand() % 1536;
    new_green = get_bright_by_degree(color + 512);  // green
    new_blue  = get_bright_by_degree(color);        // blue
    new_red   = get_bright_by_degree(color + 1024); // red   
}

// перемещает значения целевого цвета в переменные текущего цвета 
void set_new_color_as_curent()
{
    red = new_red;
    green = new_green;
    blue = new_blue;
}

void main(void)
{
    unsigned int counter = 0;

// Declare your local variables here

// Input/Output Ports initialization
// Port B initialization
// Func7=In Func6=In Func5=In Func4=In Func3=Out Func2=Out Func1=Out Func0=In 
// State7=T State6=T State5=T State4=T State3=0 State2=0 State1=0 State0=T 
PORTB=0x00;
DDRB=0x0E;

// Port C initialization
// Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTC=0x00;
DDRC=0x00;

// Port D initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTD=0x00;
DDRD=0x00;

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: Timer 0 Stopped
TCCR0=0x00;
TCNT0=0x00;

// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: 8000,000 kHz
// Mode: Fast PWM top=00FFh
// OC1A output: Non-Inv.
// OC1B output: Non-Inv.
// Noise Canceler: Off
// Input Capture on Falling Edge
// Timer 1 Overflow Interrupt: Off
// Input Capture Interrupt: Off
// Compare A Match Interrupt: Off
// Compare B Match Interrupt: Off
TCCR1A=0xA1;
TCCR1B=0x09;
TCNT1H=0x00;
TCNT1L=0x00;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;

// Timer/Counter 2 initialization
// Clock source: System Clock
// Clock value: 8000,000 kHz
// Mode: Fast PWM top=FFh
// OC2 output: Non-Inverted PWM
ASSR=0x00;
TCCR2=0x69;
TCNT2=0x00;
OCR2=0x00;

// External Interrupt(s) initialization
// INT0: Off
// INT1: Off
MCUCR=0x00;

// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=0x00;

// USART initialization
// USART disabled
UCSRB=0x00;

// Analog Comparator initialization
// Analog Comparator: Off
// Analog Comparator Input Capture by Timer/Counter 1: Off
ACSR=0x80;
SFIOR=0x00;

// ADC initialization
// ADC disabled
ADCSRA=0x00;

// SPI initialization
// SPI disabled
SPCR=0x00;

// TWI initialization
// TWI disabled
TWCR=0x00;

  
srand(1);

generate_new_target_color();
set_new_color_as_curent();
generate_new_target_color();

while (1)
      {                     
        OCR1A = ceil( ( (signed int)new_blue - (signed int)blue) * wave[counter] + blue);
        OCR1B = ceil( ( (signed int)new_green - (signed int)green) * wave[counter] + green);
        OCR2 = ceil( ( (signed int)new_red - (signed int)red) * wave[counter] + red);

           counter++;
           if(counter >= 180) {
            counter = 0;
            set_new_color_as_curent();
            generate_new_target_color();
            delay_ms(1000);
           }
           
           delay_ms(40);
      }
}
