#include <io.h>
#include <delay.h>
                
#define E1 12134
#define G1 10204
#define A1 9090 
#define A1d 8580
#define H1 8099
#define C2 7648
#define C2d 7220 
#define D2 6814
#define D2d 6430
#define E2 6069 
#define F2 5730 
#define G2 5102 
#define A2 4545 
#define G2d 4815 
#define A2d 4291
#define C3 3822 
#define P 0
#define End 1

// Timer1 output compare A interrupt service routine
interrupt [TIM1_COMPA] void timer1_compa_isr(void)
{
PORTD.3=!PORTD.3;
}

int fadestate = 0;
int triggered = 0;
int ontimer = 0;

int Bit=0x00;
int i=0;
flash int tanki[31]={C2,D2,D2d,C2,D2,D2d,D2d,F2,G2,D2d,F2,G2,F2,G2,A2,F2,G2,A2,G2d,A2d,C3,G2d,A2d,C3,C3,P,C3,C3,C3,C3,End}; //мелодия танчиков

void play()
{
         OCR1AH = (char)(Bit>>8); //записываем текущую ноту в OCR1A
         OCR1AL = (char)Bit;      
         delay_ms(130); 
         #asm("cli")              //запрещаем прерывание чтобы оборвать ноту
         delay_ms(40);
         #asm("sei")
         i++;
}
void pause()
{      
         #asm("cli")        //пауза между нотами
         delay_ms(200);
         #asm("sei")
         i++;
} 

void stop()
{ 
  #asm("cli")
  PORTD.3=0x00;
  i=0;
}

void main(void)
{
// Port B initialization
DDRB=(0<<DDB7) | (0<<DDB6) | (0<<DDB5) | (0<<DDB4) | (0<<DDB3) | (0<<DDB2) | (0<<DDB1) | (0<<DDB0);
PORTB=(0<<PORTB7) | (0<<PORTB6) | (0<<PORTB5) | (0<<PORTB4) | (0<<PORTB3) | (0<<PORTB2) | (0<<PORTB1) | (0<<PORTB0);

// Port D initialization
DDRD=(0<<DDD6) | (1<<DDD5) | (0<<DDD4) | (1<<DDD3) | (0<<DDD2) | (0<<DDD1) | (0<<DDD0);
PORTD=(0<<PORTD6) | (0<<PORTD5) | (0<<PORTD4) | (0<<PORTD3) | (0<<PORTD2) | (0<<PORTD1) | (0<<PORTD0);

// Timer/Counter 0 initialization
TCCR0A=(0<<COM0A1) | (0<<COM0A0) | (1<<COM0B1) | (0<<COM0B0) | (1<<WGM01) | (1<<WGM00);
TCCR0B=(0<<WGM02) | (0<<CS02) | (0<<CS01) | (1<<CS00);
TCNT0=0x00;
OCR0A=0x00;
OCR0B=0x00;

// Timer/Counter 1 initialization
TCCR1A=(0<<COM1A1) | (0<<COM1A0) | (0<<COM1B1) | (0<<COM1B0) | (0<<WGM11) | (0<<WGM10);
TCCR1B=(0<<ICNC1) | (0<<ICES1) | (0<<WGM13) | (1<<WGM12) | (0<<CS12) | (0<<CS11) | (1<<CS10);
TCNT1H=0x00;
TCNT1L=0x00;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x00;
OCR1AL=0xFB;
OCR1BH=0x00;
OCR1BL=0x00;

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

// Analog Comparator initialization
ACSR=(0<<ACD) | (0<<ACBG) | (0<<ACO) | (0<<ACI) | (0<<ACIE) | (0<<ACIC) | (0<<ACIS1) | (1<<ACIS0);
DIDR=(0<<AIN0D) | (0<<AIN1D);


// Global enable interrupts
#asm("sei")

while (1)
      {
      if ((ACSR&0x20)==0x20) {
            triggered=1;
            ontimer=6000;
        }
        
        if (ontimer>0) {
            ontimer--;
        } else {
            triggered=0;
        }
        
        if (triggered) {
            if (fadestate<255) {
                fadestate++;
                Bit=tanki[i]; //массив с нотами
                if(Bit==1)
                    {
                    stop();
                    }
                if(Bit==0)
                    {
                    pause();
                    }
                else
                    {
                    play();
                    }
            }
        } else {
            if (fadestate>0) {
                fadestate--;
            }
        }

        if (fadestate > 0) {
            TCCR0B|=(1<<COM0B1);
            OCR0B=fadestate;
        } else {
            TCCR0B&=~(1<<COM0B1);
        }

        delay_ms(10);
      }
}