;
;         "hint_nota.txt" ;  -
;
;------------------------------------------------------
;   .org (irq_res+int_vectors_size) ;    
	 .cseg
  init:                    ;    
     ldi tmp0,0x80
     out acsr,tmp0  ;   (sbi acsr,acd)
     ;    , -   
     ;     spl  low (RAMEND)    
;      ldi tmp0,low(RAMEND)
;      out spl,tmp0 ;   
;        (   )
    rcall WDT_off ;   WDT
		 clr tmp0 ;   
		 out PORTB,tmp0
		 ser tmp0
		 cbr tmp0,(1<<nota_5)
		 out PORTD,tmp0
     ser tmp0
     out DDRB,tmp0 ; PINB=0xFF
     ldi tmp0,(1<<nota_5)
     out DDRD,tmp0 ; portd6=0=out=nota_5
; portd6=0=out=nota_5, PORTB=0=out,    " "
;----------------------------------------------------------------------------------
;   
;  CTC   ICR1
;  ICR1      kod2:kod1:kod0, 
;     
		 ldiw z,noda ;       
		 in tmp0,PIND ;    tmp0
		 andi tmp0,(1<<kod2 | 1<<kod1 | 1<<kod0) ;   
		 add zl,tmp0
		 clr tmp0
		 adc zh,tmp0
     lsl zl
		 rol zh ;        
		 lpm tmp0,z+
		 lpm tmp1,z ;     tmp1:tmp0
		 out ICR1H,tmp1
		 out ICR1L,tmp0 ;   
		 clr tmp0
		 out OCR1AH,tmp0
		 out OCR1AL,tmp0
		 out OCR1BH,tmp0
		 out OCR1BL,tmp0
		 out TCNT1H,tmp0
		 out TCNT1L,tmp0 ;    /1
		 mov tmp1,tmp0
		 movw gridl,tmp0 ;     
		 ser pdbuf ;         PORTD6
;------------------------------------------------------
;    
		 out TCCR1A,tmp0 ; TCCR1A=0
		 ldi tmp0,(1<<WGM13 | 1<<WGM12)
		 out TCCR1B,tmp0 ; mode 12 (CTC on ICR1) stop
		 out TCCR1C,tmp1 ; TCCR1C=0
		 in tmp0,TIFR
		 out TIFR,tmp0 ;    
		 ldi tmp0,(1<<ICIE1)
		 out TIMSK,tmp0
;------------------------------------------------------
;     
		 ldi tmp0,(1<<CLKPCE)
		 out CLKPR,tmp0
		 out CLKPR,tmp1 ;   = 0,000000125S/
;------------------------------------------------------
;  ,    "  "
		 sei
		 in tmp0,TCCR1B
		 sbr tmp0,(1<<CS10)
		 out TCCR1B,tmp0
;------------------------------------------------------
 wait_stop:
			nop
			rjmp wait_stop
;------------------------------------------------------
noda:
 do_6:  .db low(955), high(955) ;  8372,0  8376,96  +4 Hz   kod = 000
 re_6:  .db low(851), high(851) ;  9397,3  9400,7   +3 Hz   kod = 001
 mi_6:  .db low(758), high(758) ;  10548   10554,08 +6 Hz   kod = 010
 fa_6:  .db low(716), high(716) ;  11175   11173,18 -2 Hz   kod = 011
 sol_6: .db low(638), high(638) ;  12544   12539,18 -5 Hz   kod = 100
 la_6:  .db low(568), high(568) ;  14080   14084,5  +4.5 Hz kod = 101
 si_6:  .db low(507), high(507) ;  15804   15779,09 -5 Hz   kod = 110




   