#include <tiny2313.h>

bit o; // для ответв uart a0
bit l; // для ответв uart a1
bit m; // для ответв uart b7
char as=0;
char raz=1; // отображение сигмента (меняется от 1 до 4 по таймеру)


 
#define del 1
#define DATA_REGISTER_EMPTY (1<<UDRE)
#define RX_COMPLETE (1<<RXC)
#define FRAMING_ERROR (1<<FE)
#define PARITY_ERROR (1<<UPE)
#define DATA_OVERRUN (1<<DOR)


#define led_on 1 //1 port 1
#define led_off 0

#define seg_on 0
#define seg_off 1


// USART Receiver buffer
#define RX_BUFFER_SIZE 8

char rx_buffer[RX_BUFFER_SIZE];
unsigned char rx_wr_index=0;

// USART Transmitter buffer
#define TX_BUFFER_SIZE 3
char tx_buffer[TX_BUFFER_SIZE];
unsigned char tx_wr_index=0,tx_rd_index=0;
unsigned char tx_counter=0;



// USART Receiver interrupt service routine
interrupt [USART_RXC] void usart_rx_isr(void)
{
char status,data;
TCNT0=0x00;
status=UCSRA;
data=UDR;
if ((status & (FRAMING_ERROR | PARITY_ERROR | DATA_OVERRUN))==0)
   {
   rx_buffer[rx_wr_index++]=data;
   
   if (rx_wr_index == RX_BUFFER_SIZE) rx_wr_index=0;
   }
TCNT0=0xF8;
}




// timer 
interrupt [TIM0_OVF] void timer0_ovf_isr(void)
{
  TCNT0=0xF8;
  raz++;
  
}

// USART Transmitter interrupt service routine
interrupt [USART_TXC] void usart_tx_isr(void)
{
if (tx_counter)
   {
   --tx_counter;
   UDR=tx_buffer[tx_rd_index++];
#if TX_BUFFER_SIZE != 256
   if (tx_rd_index == TX_BUFFER_SIZE) tx_rd_index=0;
#endif
   }
}

void putchar(char c)
{
while (tx_counter == TX_BUFFER_SIZE);
#asm("cli")
if (tx_counter || ((UCSRA & DATA_REGISTER_EMPTY)==0))
   {
   tx_buffer[tx_wr_index++]=c;
#if TX_BUFFER_SIZE != 256
   if (tx_wr_index == TX_BUFFER_SIZE) tx_wr_index=0;
#endif
   ++tx_counter;
   }
else
   UDR=c;
#asm("sei")
}

void ser_off(char a){
       
        if(a!=as){
                PORTD.2=seg_off;  //1
                PORTD.3=seg_off;  //2
                PORTD.4=seg_off;  //3
                PORTD.5=seg_off;   //4
                as=a;
                }

}

void ser_out(char a,char b,int s){

// paint
            if(b=='.'){PORTD.6=led_on;} //dp
                else{PORTD.6=led_off;}
            
// отображение символа на сигменте 
           switch (a){
                
                case '1' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_off; //g
                 //   PORTD.6=led_off; //dp
                      
                
                break;
                
                 case '2' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_on; //g
                   // PORTD.6=led_off; //dp
                
                
                break;
                
                case '3' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                
                
                break;
                
                case '4' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                
                
                break;
                case 'S' :
                case 's' :
                case '5' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                
                
                break;
                
                case '6' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                
                
                break;
                
                case '7' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_off; //g
                  //  PORTD.6=led_off; //dp
                
                
                break;
                
                case '8' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                   // PORTD.6=led_off; //dp
                
                
                break;
                
                case '9' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                  case '0' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_off; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case '*' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_off; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                  
                  
                  ////////////////буквы//////////
                  case 'A' :
                  case 'a' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                   
                   case 'B' :
                   case 'b' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'D' :
                   case 'd' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'U' :
                   case 'u' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_off; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'V' :
                   case 'v' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_off; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'E' :
                   case 'e' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'P' :
                    case 'p' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'L' :
                   case 'l' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_off; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'H' :
                   case 'h' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_on; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'C' :
                    case 'c' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_off; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case 'F' :
                    case 'f' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_on;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                  //  PORTD.6=led_off; //dp
                  break;
                  
                   case '_' :
                    PORTB.0=led_off; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_on;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_off; //g
                 //   PORTD.6=led_off; //dp
                 break;
                 
                 case '°' :
                    PORTB.0=led_on; //a
                    PORTB.1=led_on; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_on; //f
                    PORTB.6=led_on; //g
                 //   PORTD.6=led_off; //dp
                 break;
                  
                 case '-' :
                default:
                    PORTB.0=led_off; //a
                    PORTB.1=led_off; //b
                    PORTB.2=led_off; //c
                    PORTB.3=led_off;  //d
                    PORTB.4=led_off;  //e
                    PORTB.5=led_off; //f
                    PORTB.6=led_on; //g
                    //PORTD.6=led_off; //dp
                  break;
                
              }

 //комутируем разряд
        switch (s){
                case 1 :
                PORTD.2=seg_on;  //1
                PORTD.3=seg_off;  //2
                PORTD.4=seg_off;  //3
                PORTD.5=seg_off;   //4
                
                break;
                
                case 2 :
                PORTD.2=seg_off;  //1
                PORTD.3=seg_on;  //2
                PORTD.4=seg_off;  //3
                PORTD.5=seg_off;   //4
                
                break;
                
                 case 3 :
                PORTD.2=seg_off;  //1
                PORTD.3=seg_off;  //2
                PORTD.4=seg_on;  //3
                PORTD.5=seg_off;   //4
                
                break;
                
                 case 4 :
                PORTD.2=seg_off;  //1
                PORTD.3=seg_off;  //2
                PORTD.4=seg_off;  //3
                PORTD.5=seg_on;   //4
                
                break;
                      
                
                
                
                default:
                PORTD.2=seg_off;  //1
                PORTD.3=seg_off;  //2
                PORTD.4=seg_off;  //3
                PORTD.5=seg_off;   //4
                break;
        
            }





 
 
 }





void setup(){
 // Declare your local variables here

// Crystal Oscillator division factor: 1
#pragma optsize-
CLKPR=(1<<CLKPCE);
CLKPR=(0<<CLKPCE) | (0<<CLKPS3) | (0<<CLKPS2) | (0<<CLKPS1) | (0<<CLKPS0);
#ifdef _OPTIMIZE_SIZE_
#pragma optsize+
#endif

// Input/Output Ports initialization
// Port A initialization
// Function: Bit2=In Bit1=In Bit0=In 
DDRA=(0<<DDA2) | (0<<DDA1) | (0<<DDA0);
// State: Bit2=T Bit1=T Bit0=T 
PORTA=(0<<PORTA2) | (1<<PORTA1) | (1<<PORTA0);

// Port B initialization
// Function: Bit7=In Bit6=Out Bit5=Out Bit4=Out Bit3=Out Bit2=Out Bit1=Out Bit0=Out 
DDRB=(0<<DDB7) | (1<<DDB6) | (1<<DDB5) | (1<<DDB4) | (1<<DDB3) | (1<<DDB2) | (1<<DDB1) | (1<<DDB0);
// State: Bit7=T Bit6=0 Bit5=0 Bit4=0 Bit3=0 Bit2=0 Bit1=0 Bit0=0 
PORTB=(1<<PORTB7) | (1<<PORTB6) | (1<<PORTB5) | (1<<PORTB4) | (1<<PORTB3) | (1<<PORTB2) | (1<<PORTB1) | (1<<PORTB0);

// Port D initialization
// Function: Bit6=In Bit5=In Bit4=In Bit3=In Bit2=In Bit1=In Bit0=In 
DDRD=(1<<DDD6) | (1<<DDD5) | (1<<DDD4) | (1<<DDD3) | (1<<DDD2) | (0<<DDD1) | (0<<DDD0);
// State: Bit6=T Bit5=T Bit4=T Bit3=T Bit2=T Bit1=T Bit0=T 
PORTD=(1<<PORTD6) | (0<<PORTD5) | (0<<PORTD4) | (0<<PORTD3) | (0<<PORTD2) | (0<<PORTD1) | (0<<PORTD0);
      // dp             //4            //3          //2         //1



// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: 7,813 kHz
// Mode: Normal top=0xFF
// OC0A output: Disconnected
// OC0B output: Disconnected
// Timer Period: 32,768 ms
TCCR0A=(0<<COM0A1) | (0<<COM0A0) | (0<<COM0B1) | (0<<COM0B0) | (0<<WGM01) | (0<<WGM00);
TCCR0B=(0<<WGM02) | (1<<CS02) | (0<<CS01) | (1<<CS00);
TCNT0=0xF8;
OCR0A=0x00;
OCR0B=0x00;



// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: Timer1 Stopped
// Mode: Normal top=0xFFFF
// OC1A output: Disconnected
// OC1B output: Disconnected
// Noise Canceler: Off
// Input Capture on Falling Edge
// Timer1 Overflow Interrupt: Off
// Input Capture Interrupt: Off
// Compare A Match Interrupt: Off
// Compare B Match Interrupt: Off
TCCR1A=(0<<COM1A1) | (0<<COM1A0) | (0<<COM1B1) | (0<<COM1B0) | (0<<WGM11) | (0<<WGM10);
TCCR1B=(0<<ICNC1) | (0<<ICES1) | (0<<WGM13) | (0<<WGM12) | (0<<CS12) | (0<<CS11) | (0<<CS10);
TCNT1H=0x00;
TCNT1L=0x00;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;

// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=(0<<TOIE1) | (0<<OCIE1A) | (0<<OCIE1B) | (0<<ICIE1) | (0<<OCIE0B) | (1<<TOIE0) | (0<<OCIE0A);

// External Interrupt(s) initialization
// INT0: Off
// INT1: Off
// Interrupt on any change on pins PCINT0-7: Off
GIMSK=(0<<INT1) | (0<<INT0) | (0<<PCIE);
MCUCR=(0<<ISC11) | (0<<ISC10) | (0<<ISC01) | (0<<ISC00);

// USI initialization
// Mode: Disabled
// Clock source: Register & Counter=no clk.
// USI Counter Overflow Interrupt: Off
USICR=(0<<USISIE) | (0<<USIOIE) | (0<<USIWM1) | (0<<USIWM0) | (0<<USICS1) | (0<<USICS0) | (0<<USICLK) | (0<<USITC);

// USART initialization
// Communication Parameters: 8 Data, 1 Stop, No Parity
// USART Receiver: On
// USART Transmitter: On
// USART Mode: Asynchronous
// USART Baud Rate: 9600
UCSRA=(0<<RXC) | (0<<TXC) | (0<<UDRE) | (0<<FE) | (0<<DOR) | (0<<UPE) | (0<<U2X) | (0<<MPCM);
UCSRB=(1<<RXCIE) | (1<<TXCIE) | (0<<UDRIE) | (1<<RXEN) | (1<<TXEN) | (0<<UCSZ2) | (0<<RXB8) | (0<<TXB8);
UCSRC=(0<<UMSEL) | (0<<UPM1) | (0<<UPM0) | (0<<USBS) | (1<<UCSZ1) | (1<<UCSZ0) | (0<<UCPOL);
UBRRH=0x00;
UBRRL=0x33;

// Analog Comparator initialization
// Analog Comparator: Off
// The Analog Comparator's positive input is
// connected to the AIN0 pin
// The Analog Comparator's negative input is
// connected to the AIN1 pin
ACSR=(1<<ACD) | (0<<ACBG) | (0<<ACO) | (0<<ACI) | (0<<ACIE) | (0<<ACIC) | (0<<ACIS1) | (0<<ACIS0);
// Digital input buffer on AIN0: On
// Digital input buffer on AIN1: On
DIDR=(0<<AIN0D) | (0<<AIN1D);





}

void main(void)
{

setup();

// Global enable interrupts

#asm("sei")

while (1)
      {   
         if(raz==5)raz=1;    
       /////////// PA0 -out uart
            if(PINA.0==0){
                  if(o==0){  
                    o=1;
                    
                    putchar('A');
                    putchar('0');
                    putchar('1');
                           } 
                }
              else{
                if(o==1){putchar('A');putchar('0');putchar('0');o=0;}
              }  
            //////////
            
            //////////PA1     -out uart
            if(PINA.1==0){
                  if(l==0){  
                    l=1;
                    
                    putchar('A');
                    putchar('1');
                    putchar('1');
                           } 
                }
              else{
                if(l==1){putchar('A');putchar('1');putchar('0');l=0;}
              }  
            //////////        
            
            //////////PB7   -out uart         
            if(PINB.7==0){
                  if(m==0){  
                    m=1;
                    
                    putchar('B');
                    putchar('7');
                    putchar('1');
                           } 
                }
              else{
                if(m==1){putchar('B');putchar('7');putchar('0');m=0;}
              }  
            //////////                
                                  
          
          switch(raz){
                
                case 1:
                    ser_off(raz);  
                    ser_out(rx_buffer[0],rx_buffer[1],raz);                
                break;
                
                case 2:
                    ser_off(raz);
                    ser_out(rx_buffer[2],rx_buffer[3],raz);                
                break; 

                 case 3:
                    ser_off(raz);
                    ser_out(rx_buffer[4],rx_buffer[5],raz);                
                break;
                
                 case 4:
                    ser_off(raz);                 
                    ser_out(rx_buffer[6],rx_buffer[7],raz);                
                break;
                
                
                
                }
            
          
          
          

      }
}