476 lines
10 KiB
NASM

;
; Project name: memory-led-game
; Description: Simple memory game using leds
; Source code: https://github.com/sergeyyarkov/attiny24a_memory-led-game
; Device: ATtiny24A
; Package: 14-pin-PDIP_SOIC
; Assembler: AVR macro assembler 2.2.7
; Clock frequency: 8MHz with CKDIV8
; Fuses: lfuse: 0x42, hfuse: 0xDF, efuse: 0xFF, lock:0xFF
;
; Written by Sergey Yarkov 27.09.2021
.include "def.inc" ; Include type definitions of MCU
.list ; Enable listing
;
; Registers
.def temp_r = r16 ; Temp general register A
.def temp_r_b = r23 ; Temp general register B
.def temp_r_c = r26 ; Temp general register C
.def mcu_state_r = r17 ; Current state of MCU. This register will be compared in an main loop
.def delay_counter_r = r19 ; Register for storing delay counter
;
; LEDS constants
.equ LED_DIR = DDRA
.equ LED_PORT = PORTA
.equ LED_PIN = PINA
.equ LED_PIN_0 = PINA0
.equ LED_PIN_1 = PINA1
.equ LED_PIN_2 = PINA2
.equ LED_PIN_3 = PINA3
;
; Buttons constants
.equ SW_DIR = DDRA
.equ SW_PORT = PORTA
.equ SW_PIN = PINA
.equ SW_PIN_4 = PINA4
.equ SW_PIN_5 = PINA5
.equ SW_PIN_6 = PINA6
.equ SW_PIN_7 = PINA7
;
; Buzzer constants
.equ BUZZ_DIR = DDRB
.equ BUZZ_PORT = PORTB
.equ BUZZ_PIN = PINB2
;
; States constants
.equ INIT_STATE = 0x01
.equ SHOWING_STATE = 0x02
.equ POLLING_STATE = 0x03
.equ COMPLETION_STATE = 0x04
;
; SW Flags states constants
.equ SW_FLAG_1 = 0xe0
.equ SW_FLAG_2 = 0xd0
.equ SW_FLAG_3 = 0xb0
.equ SW_FLAG_4 = 0x70
.equ SEQ_LENGTH = 4
; Value that stored in OCR0A for each tone
; 880Hz = 71
; 785Hz = 80
; 590Hz = 105
; 440Hz = 142
.include "macros.asm" ; Include macros
.dseg ; Data segment
.org SRAM_START
;
; MCU Global states addresses
CURRENT_STATE_ADDRESS: .byte 0x01
PREVIOUS_STATE_ADDRESS: .byte 0x01
;
; Button flags
SW_FLAGS_ADDRESS: .byte 0x01
.cseg ; Code segment
.org 0x00
;
; Setup vectors
rjmp start ; Program start at RESET vector
reti ; External Interrupt Request 0 / inactive
rjmp PCINT0_vect ; Pin Change Interrupt Request 0 / active
reti ; Pin Change Interrupt Request 1 / inactive
reti ; Watchdog Time-out / inactive
reti ; Timer/Counter1 Capture Event / inactive
reti ; Timer/Counter1 Compare Match A / inactive
reti ; Timer/Counter1 Compare Match B / inactive
reti ; Timer/Counter1 Overflow / inactive
reti ; Timer/Counter0 Compare Match A / inactive
reti ; Timer/Counter0 Compare Match B / inactive
rjmp TIM0_OVF_vect ; Timer/Counter0 Overflow / active
reti ; Analog Comparator / inactive
reti ; ADC Conversion Complete / inactive
reti ; EEPROM Ready / inactive
reti ; USI START / inactive
reti ; USI Overflow / inactive
;
; Interrupt service routines
PCINT0_vect: ; Button handler
push r17
push r18
in r18, SREG ; Save status register
lds mcu_state_r, CURRENT_STATE_ADDRESS
cpi mcu_state_r, POLLING_STATE
brne quit ; Do not change button flags unless in POLLING state of mcu
in r17, PINA ; Load current pins status of PINA
andi r17, 0xf0 ; Get pins status of only buttons
rcall delay_50ms ; Delay for button
sts SW_FLAGS_ADDRESS, r17 ; Update flag status in SRAM
out SREG, r18
quit:
pop r18
pop r17
reti
TIM0_OVF_vect: ; Random byte generator
push temp_r_b
in temp_r_b, SREG
rjmp gen_start
ldi temp_r, 168
in r21, TCNT0
gen_start:
eor temp_r, r21
swap temp_r
add r21, temp_r
out SREG, temp_r_b
pop temp_r_b
reti
MCU_Init: ; This function executes once on start the main program
rcall init_ports
rcall init_interrupts
rcall init_buzzer
ldi delay_counter_r, 0xff
;rcall MCU_Delay ; Wait 1 sec before start main program
sei ; Enable Global Interrupts
ret
MCU_Delay:
ldi temp_r, 6
_init_loop_loading:
rcall effect_1
dec temp_r
brne _init_loop_loading
rcall delay_1s
clr temp_r
ret
;
; Program start at reset
start:
init_stack_p temp_r, RAMEND
set_state INIT_STATE
loop: ; Program loop
lds mcu_state_r, CURRENT_STATE_ADDRESS
init: ; Init state
cpi mcu_state_r, INIT_STATE
brne showing
rcall MCU_Init
set_state SHOWING_STATE
showing: ; Showing state
cpi mcu_state_r, SHOWING_STATE
brne polling
rcall show_sequence ; Generate sequence and save answer to SRAM
set_state POLLING_STATE
polling: ; Polling state
cpi mcu_state_r, POLLING_STATE
brne completion
led_1:
lds r18, SW_FLAGS_ADDRESS
cpi r18, SW_FLAG_1
brne led_off_1
led_on_1:
outi OCR0A, 142
sbi LED_PORT, 0
sbi BUZZ_DIR, BUZZ_PIN
rjmp led_1
led_off_1:
cbi LED_PORT, 0
cbi BUZZ_DIR, BUZZ_PIN
led_2:
lds r18, SW_FLAGS_ADDRESS
cpi r18, SW_FLAG_2
brne led_off_2
led_on_2:
sbi LED_PORT, 1
sbi BUZZ_DIR, BUZZ_PIN
outi OCR0A, 71
rjmp led_2
led_off_2:
cbi LED_PORT, 1
cbi BUZZ_DIR, BUZZ_PIN
led_3:
lds r18, SW_FLAGS_ADDRESS
cpi r18, SW_FLAG_3
brne led_off_3
led_on_3:
sbi LED_PORT, 2
sbi BUZZ_DIR, BUZZ_PIN
outi OCR0A, 105
rjmp led_3
led_off_3:
cbi LED_PORT, 2
cbi BUZZ_DIR, BUZZ_PIN
led_4:
lds r18, SW_FLAGS_ADDRESS
cpi r18, SW_FLAG_4
brne led_off_4
led_on_4:
sbi LED_PORT, 3
sbi BUZZ_DIR, BUZZ_PIN
outi OCR0A, 80
rjmp led_4
led_off_4:
cbi LED_PORT, 3
cbi BUZZ_DIR, BUZZ_PIN
completion: ; Reset delay counter, set MCU state to SHOWING
cpi mcu_state_r, COMPLETION_STATE
brne default
default: ; Do nothing
rjmp loop
gen_ran_seq: ; Generate random sequence of bytes for leds and save answer to SRAM
ldi temp_r_b, SEQ_LENGTH
clr YH
ldi YL, $80
_gen_ran_loop:
rcall delay_50ms ; Delay is required!
mov r22, r21
cpi r22, 70
brlo _gen_answ_1
cpi r22, 140
brlo _gen_answ_2
cpi r22, 200
brlo _gen_answ_3
cpi r22, 255
brlo _gen_answ_4
_gen_answ_1:
ldi temp_r_c, 0x01
rjmp _gen_ran_write
_gen_answ_2:
ldi temp_r_c, 0x02
rjmp _gen_ran_write
_gen_answ_3:
ldi temp_r_c, 0x04
rjmp _gen_ran_write
_gen_answ_4:
ldi temp_r_c, 0x08
_gen_ran_write:
st Y+, temp_r_c
dec temp_r_b
cpi temp_r_b, 0
brne _gen_ran_loop
nop
ret
show_sequence:
rcall gen_ran_seq ; Answer stored in SRAM in addr $80:{SEQ_LENGTH}
show_start:
ldi temp_r_b, SEQ_LENGTH
clr YH
ldi YL, $80
_sequence_loop:
cpi temp_r_b, 0
breq _seq_quit
ld temp_r_c, Y+
cpi temp_r_c, 0x01
breq beep_1
cpi temp_r_c, 0x02
breq beep_2
cpi temp_r_c, 0x04
breq beep_3
cpi temp_r_c, 0x08
breq beep_4
beep_1:
beep_led_1
rcall OCR0A_reset
rjmp beep_quit
beep_2:
beep_led_2
rcall OCR0A_reset
rjmp beep_quit
beep_3:
beep_led_3
rcall OCR0A_reset
rjmp beep_quit
beep_4:
beep_led_4
rcall OCR0A_reset
beep_quit:
rcall delay
dec temp_r_b
cpi temp_r_b, 0
brne _sequence_loop
_seq_quit:
rcall dec_delay_counter
rcall delay_1s
rjmp show_sequence
ret
OCR0A_reset: ; This function need to set the OCR0A register to 0xff for overflow interrupt
push temp_r_b
ldi temp_r_b, 0xff
out OCR0A, temp_r_b
pop temp_r_b
ret
dec_delay_counter:
subi delay_counter_r, 10
cpi delay_counter_r, 40
brlo _reset_counter
ret
_reset_counter:
ldi delay_counter_r, 0xff
ret
effect_1: ; Shift bits of an leds in port every 50ms
in r20, LED_PORT
outi LED_PORT, 0xf1
rcall delay_50ms
ldi r17, 0x01
ldi r19, 3
_eff_1_shift_l: ; Shift bits to left loop
ldi r18, 0xf0
lsl r17
add r18, r17
out LED_PORT, r18
rcall delay_50ms
dec r19
brne _eff_1_shift_l
outi LED_PORT, 0xf8
rcall delay_50ms
ldi r17, 0x08
ldi r19, 3
_eff_1_shift_r: ; Shift bits to right loop
ldi r18, 0xf0
lsr r17
add r18, r17
out LED_PORT, r18
rcall delay_50ms
dec r19
brne _eff_1_shift_r
;
; Out saved PORT values
out LED_PORT, r20
ret
init_interrupts:
;
; Enable Port Change Interrupt
ldi temp_r, (1<<PCIE0)
out GIMSK, temp_r
;
; Set Pin Change Mask Register
ldi temp_r, (1<<PCINT4) | (1<<PCINT5)| (1<<PCINT6) | (1<<PCINT7)
out PCMSK0, temp_r
clr temp_r
ret
init_buzzer:
cbi BUZZ_DIR, BUZZ_PIN
; Setup timer
ldi temp_r, (1<<COM0A0) | (1<<WGM01) ; Set CTC timer mode and toggle OC0A pin on Compare Match
out TCCR0A, temp_r
ldi temp_r, 255
out OCR0A, temp_r
ldi temp_r, (1<<CS01) ; Prescale on 8
out TCCR0B, temp_r
ldi temp_r, (1<<TOIE0) ; Enable Timer/Counter0 Overflow Interrupt
out TIMSK0, temp_r
ret
init_ports: ; Init MCU ports
ldi temp_r, 0x0f ; Setup PORTA
out DDRA, temp_r ; Set directions of leds and buttons
swap temp_r
out PORTA, temp_r ; Set low signal on leds and pull-up on buttons
; Setup PORTB
sbi DDRB, BUZZ_PIN ; Set direction of buzzer pin to output
cbi PORTB, BUZZ_PIN ; Set low signal on buzzer
ret
delay: ; For 1MHz frequency
push r18
push r20
ldi r18, 255
mov r20, delay_counter_r
_delay_loop:
nop
dec r18
brne _delay_loop
nop
dec r20
brne _delay_loop
nop
pop r20
pop r18
ret
delay_50ms: ; For 1MHz frequency
push r18
push r19
ldi r18, 65
ldi r19, 239
_loop_d_50ms:
dec r19
brne _loop_d_50ms
dec r18
brne _loop_d_50ms
nop
pop r19
pop r18
ret
delay_1s: ; For 1MHz frequency
.equ outer_count = 100
.equ inner_count = 2499
ldi r18, outer_count
_reset:
ldi r24, low(inner_count)
ldi r25, high(inner_count)
_loop:
sbiw r24, 1
brne _loop
dec r18
brne _reset
ldi r18, outer_count
ret
info: .db "Memory led game. Written by Sergey Yarkov 27.09.2021"