.include "m128def.inc"
.cseg
.org 0
jmp RESET        ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' n~a'?i^n~a`
jmp EXT_INT0     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ0
jmp EXT_INT1     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ1
jmp EXT_INT2     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ2
jmp EXT_INT3     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ3
jmp EXT_INT4     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ4
jmp EXT_INT5     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ5
jmp EXT_INT6     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ6
jmp EXT_INT7     ; I"a*?a*o~i^a" i'a`  i^a'?a`a'i^o`e^o' c,a`i"?i^n~a` IRQ7
jmp TIM2_COMP    ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` a^u^i"i^e"i'a*i'e`e` o'n~e"i^a^e`y" n~?a`a^i'a*i'e`y" o`a`e'i`a*?a` 2
jmp TIM2_OVF     ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` i"a*?a*i"i^e"i'a*i'e`e`  o`a`e'i`a*?a` 2
jmp TIM1_CAPT    ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` c,a`o~a^a`o`a* o^?i^i'o`a` o`a`e'i`a*?i^i`  1
jmp TIM1_COMPA   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` n~?a`a'a`o`u^a^a`i'e`e` e^i^i`i"a`?a`o`i^?a` A` o`a`e'i`a*?a` 1
jmp TIM1_COMPB   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` n~?a`a'a`o`u^a^a`i'e`e` e^i^i`i"a`?a`o`i^?a` A^ o`a`e'i`a*?a` 1
jmp TIM1_OVF     ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` i"a*?a*i"i^e"i'a*i'e`e` o`a`e'i`a*?a` 1
jmp TIM0_COMP    ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` a^u^i"i^e"i'a*i'e`y" o'n~e"i^a^e`y" n~?a`a^i'a*i'e`y" o`a`e'i`a*?a` 0
jmp TIM0_OVF     ;I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` i"a*?a*i"i^e"i'a*i'e`e` o`a`e'i`a*?a` 0
jmp SPI_STC      ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` c,a`a^a*??a*i'e`e` i"a*?a*a"a`?e` SPI
jmp USART0_RXC   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` c,a`a^a*??a*i'e`e` i"?e`a*i`a` O'N~A`I"I"0
jmp USART0_DRE   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` i^n~a^i^a'i^?a"a*i'e`e` ?a*a~e`n~o`?a` a"a`i'i'u^o~ UDR O'N~A`I"I"0
jmp USART0_TXC   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` c,a`a^a*??a*i'e`e` i"a*?a*a"a`?e` O'N~A`I"I"0
;jmp ADC          ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` c,a`a^a*??a*i'e`e` i"?a*i^a'?a`c,i^a^a`i'e`y" A`O"I"
jmp EE_RDY       ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` a~i^o`i^a^i'i^n~o`e` Y'N~I"I"C,O'
jmp ANA_COMP     ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` n~?a`a'a`o`u^a^a`i'e`e` a`i'a`e"i^a~i^a^i^a~i^ e^i^i`i"a`?a`o`i^?a`
jmp TIM1_COMPC   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` n~?a`a'a`o`u^a^a`i'e`e` e^i^i`i"a`?a`o`i^?a` N~ o`a`e'i`a*?a` 1
jmp TIM3_CAPT    ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` c,a`o~a^a`o`a* o^?i^i'o`a` o`a`e'i`a*?i^i` 3
jmp TIM3_COMPA   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` n~?a`a'a`o`u^a^a`i'e`e` e^i^i`i"a`?a`o`i^?a` A` o`a`e'i`a*?a` 3
jmp TIM3_COMPB   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` n~?a`a'a`o`u^a^a`i'e`e` e^i^i`i"a`?a`o`i^?a` A^ o`a`e'i`a*?a` 3
jmp TIM3_COMPC   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` n~?a`a'a`o`u^a^a`i'e`e` e^i^i`i"a`?a`o`i^?a` N~ o`a`e'i`a*?a` 3
jmp TIM3_OVF     ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` i"a*?a*i"i^e"i'a*i'e`e` o`a`e'i`a*?a` 3
jmp USART1_RXC   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"i^ c,a`a^a*??a*i'e`e` i"?e`a*i`a` O'N~A`I"I"1
jmp USART1_DRE   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` i^n~a^i^a'i^?a"a*i'e`e` ?a*a~e`n~o`?a` a"a`i'i'u^o~ UDR O'N~A`I"I"1
jmp USART1_TXC   ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?e` c,a`a^a*??a*i'e`e` i"a*?a*a"a`?e` O'N~A`I"I"1
jmp TWI          ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?a*?u^a^a`i'e`y" i"i^ a"a^o'o~i"?i^a^i^a"i'i^i`o' i"i^n~e"a*a"i^a^a`o`a*e"u"i'i^i`o' e`i'o`a*?o^a*e'n~o'
jmp SPM_RDY      ; I"a*?a*o~i^a" i'a` i^a'?a`a'i^o`e^o' i"?a*?u^a^a`i'e`y" i"?e` a~i^o`i^a^i'i^n~o`e` a^u^i"i^e"i'a*i'e`y" e^i^i`a`i'a"u^ SPM

EXT_INT0:
EXT_INT1:
EXT_INT2:
EXT_INT3:
EXT_INT4:
EXT_INT5:
EXT_INT6:
EXT_INT7:
TIM2_COMP:
TIM2_OVF:
TIM1_CAPT:
TIM1_COMPB:
TIM1_OVF:
TIM0_COMP:
TIM0_OVF:
SPI_STC:
USART0_RXC:
USART0_DRE:
USART0_TXC:
DC:
EE_RDY:
ANA_COMP:
TIM1_COMPC:
TIM3_CAPT:
TIM3_COMPA:
TIM3_COMPB:
TIM3_COMPC:
TIM3_OVF:
USART1_RXC:
USART1_DRE:
USART1_TXC:
TWI:
SPM_RDY:
    RETI

RESET:
    ldi R16,0xFF
    out DDRD,R16
    ldi R16,0b00010000
    out TIMSK,R16
;    ldi R16,0b00000011
;    out TCCR1B,R16
    ldi R16,0x7A
    out OCR1AH,R16
    ldi R16,0x12
    out OCR1AL,R16
    ; e`i'e`o"e`a`e"e`c,a`o"e`y" n~o`a*e^a`
    ldi R16,low(RAMEND)
    out SPL,R16
    ldi R16,high(RAMEND)
    out SPH,R16
    ; e^i^i'a*o" e`i'e`o"e`a`e"e`c,a`o"e`e` n~o`a*e^a`
;    ldi R17,0b00000001
    ldi R16,0
    out TCNT1H,R16
    out TCNT1L,R16
    sei

;    main: rjmp main

array: .db 0b00000001,0b00100001,0b00010001,0b10010101,0b10110000,0b10010100,0b00010011,0b10011000,0b10000110,0b00010010

TIM1_COMPA:
    ldi R16,0
    out TCNT1H,R16
    cpi R17,0b10000000
    breq init
    rjmp ReadArray
    ldi R16, 0

init:
    ldi R17,0b00000001
 

ReadArray:
ldi ZH,High (array*2)
ldi ZL,Low (array*2)
ldi R17, 0
add ZL,R16
adc ZH,R17
lpm
mov R18,R0
out PORTD,R18
inc R16
rjmp ReadArray