#include <avr/io.h>
#define F_CPU 8000000UL //8MHz
#include <util/delay.h>
#include <avr/interrupt.h>
#include <string.h>

#define RX_BUFFER_SIZE 5
uint8_t received;
char rx_data [5];
volatile uint8_t rx_flag = 0;
volatile uint8_t indexchar = 0;

void UARTInit(void) {
   UBRRH = 0;
   UBRRL = 51; //baud rate 9600
   UCSRB = (1<<RXEN)|(1<<TXEN)|(1<<RXCIE);
   UCSRC = (1<<URSEL)|(1<<UCSZ1)|(1<<UCSZ0); //8 bit, 1 stop bit
}

void UARTSend(uint8_t data) {
   while(!(UCSRA & (1<<UDRE)));
   UDR = data;
}

unsigned char UARTGet() {
   while(!rx_flag);
   rx_flag = 0;
   indexchar = 0;
   rx_data[4] = '\0';
   return 1;
}

void Send_Uart_Str(char *s)
{
   while (*s != 0) UARTSend(*s++);
}
void send_Uart(unsigned char c)//   Отправка байта
{
   while(!(UCSRA&(1<<UDRE)))   //   Устанавливается, когда регистр свободен
   {}
   UDR = c;
}
void send_int_Uart(unsigned int c)//    Отправка числа от 0000 до 9999
{
   unsigned char temp;
   c=c%10000;
   temp=c/100;
   send_Uart(temp/10+'0');
   send_Uart(temp%10+'0');
   temp=c%100;;
   send_Uart(temp/10+'0');
   send_Uart(temp%10+'0');
}

void InitPWM()
{
   TCCR0|=(1<<WGM00)|(1<<WGM01)|(1<<COM01)|(1<<CS00);
   DDRB|=(1<<PB3);
}

void SetPWMOutput(uint8_t duty)
{
   OCR0=duty;
}

void Wait()
{
 _delay_loop_2(3200);
}

uint8_t brightness = 0;
int main(void) {

InitPWM();
   DDRC = 0b00000001;
   sei();
   UARTInit();
   while(1) {
      received = UARTGet();
      if (strcmp("1ON2", rx_data) == 0)
      {
                  SetPWMOutput(100);          
      }
      if (strcmp("1OF2", rx_data) == 0)
      {
                  SetPWMOutput(0);
      }

   }
}

ISR(USART_RXC_vect) {
   rx_data[indexchar] = UDR;
   if (rx_data[0] !='1')
   {
      indexchar = 0;
      return;
   }
   if ((rx_data[0]=='1') && (rx_data[indexchar]=='2'))
   {
      Send_Uart_Str(rx_data);
      rx_flag = 1;
      return;
   }
   if(++indexchar >= RX_BUFFER_SIZE)
   {
      
      indexchar = 0;
   }
}