#define __SFR_OFFSET 0 #include "avr/io.h" .global main .global __do_copy_data .data seq_index: .byte 0 sequence: .space 32 .text gpio_init: ser r18 out DDRB, r18 ; set pins 8...13 to output out PORTD, r18 ; set pins 0...7 to input ret timer_init: ldi r18, 1 << CS01 out TCCR0B, r18 ret ; delay for the given number of millis (given in r25:24) delay_ms: ldi r26, lo8(4000) ldi r27, hi8(4000) .wait_loop: sbiw r26, 1 brne .wait_loop sbiw r24, 1 brne delay_ms ret read_key: in r18, PIND com r18 andi r18, (1 << PB2) | (1 << PB3) | (1 << PB4) | (1 << PB5) breq read_key clr r24 sbrc r18, PB2 jmp 1f inc r24 sbrc r18, PB3 jmp 1f inc r24 sbrc r18, PB4 jmp 1f inc r24 1: ret extend_sequence: lds r18, seq_index ldi r30, lo8(sequence) ldi r31, hi8(sequence) add r30, r18 adc r31, r1 in r19, TCNT0 andi r19, 0x3 st Z, r19 inc r18 sts seq_index, r18 ret ; led index in r24 (0..3) light_led: cpi r24, 0 brne .+2 sbi PORTB, PB1 cpi r24, 1 brne .+2 sbi PORTB, PB2 cpi r24, 2 brne .+2 sbi PORTB, PB3 cpi r24, 3 brne .+2 sbi PORTB, PB4 ldi r24, lo8(300) ldi r25, hi8(300) call delay_ms out PORTB, r1 ret play_sequence: push r15 clr r15 ldi r30, lo8(sequence) ldi r31, hi8(sequence) 1: lds r18, seq_index cp r18, r15 breq 2f ld r24, Z+ call light_led ldi r24, 100 clr r25 call delay_ms inc r15 jmp 1b 2: pop r15 ret test_sequence: push r15 push r14 clr r15 ldi r30, lo8(sequence) ldi r31, hi8(sequence) 1: lds r18, seq_index cp r18, r15 breq 2f call read_key mov r14, r24 call light_led ld r24, Z+ cp r14, r24 brne game_over inc r15 jmp 1b game_over: sts seq_index, r1 2: pop r14 pop r15 ret game_loop: call extend_sequence call play_sequence call test_sequence ldi r24, lo8(500) ldi r25, hi8(500) call delay_ms jmp game_loop main: call gpio_init call timer_init call read_key call game_loop 1: jmp 1b