#include <avr/io.h>
#include <avr/interrupt.h>
#define  F_CPU 16000000UL
#include <util/delay.h>
//
#define OFF  0   //isr state compare value
#define ON   1   //isr state compare value
//
#define DO   0   // C(도) 523
#define RE   1   // D(레) 587
#define MI   2   // E(미) 659
#define FA   3   // F(파) 699
#define SO   4   // G(솔) 784
#define RA   5   // A(라) 880
#define SI   6   // B(시) 988
#define DO_H 7   // C_H(도)1047 
#define RE_H 8   // R_H(레)1245
#define EOS  255 //(End of song)
//
volatilechar cb[]={238,212,189,178,158,141,126,118};
volatileunsigned char mz[]={SO,RA,SO,MI,DO_H,RA,SO,SO,RA,SO,RA,SO,DO_H,SI,FA,SO,FA,RE,SI,RA,SO,SO,RA,SO,RA,SO,RA,MI,SO,RA,SO,MI,DO_H,RA,SO,SO,RA,SO,RA,SO,DO_H,SI,EOS}; 
volatile unsigned char tone; 
//
volatilechar fnd[]={0x00,0x00,0x00,0x3F,0x06,0x3F,0x40,0x5B,0x5B,0x66,0x6F,0x40,0x7D,0x7D,0x66,0x7F,0x00,0x00,0x00,0x00,0x00};
 //010-2249-6648 << 제 번호 입니다.
volatileunsigned char fnd_sel[4]={0x08,0x04,0x02,0x01}; //좌->우로 하고자 한다면 반대로 설정(08,04...)
//
ISR(TIMER0_COMP_vect){
  static unsigned char tone,i=0;
  OCR0=cb[tone];
  PORTB^=0x10; 
}
//
ISR(TIMER1_COMPA_vect){ // 300ms
  static char i=0;
  if(mz[i]==EOS)i=0;
  tone=mz[i++];
  PORTA=tone;
}
//
int main(){
  int sel,digit,del;
  DDRG=0x0F; DDRC=0xFF;
  DDRA=0xff; DDRB=0x10;
  TCCR0=(1<<WGM01)|(1<<COM00)|4; TIMSK=(1<<OCIE0);
  TCCR1B=0x0C; OCR1A=18749; TIMSK=0x10; //300ms
  sei();
  while(1){
    for(digit=0;digit<18;digit++){ // 500ms*18=9sec
      for(del=0;del<250;del++){    // 4ms*125=500ms
        for(sel=0;sel<4;sel++){ PORTC=fnd[digit+sel]; PORTG=fnd_sel[sel]; _delay_ms(1); } // 1.04ms*4=4.16ms
      }
    }
  }
  return 0;
}