0% found this document useful (0 votes)

0 views

LAB1_3

The document outlines a lab experiment focused on interfacing buttons and matrix keyboards with an AVR microcontroller, including understanding key debouncing and LCD communication. It provides detailed instructions for connecting components, writing initialization and display programs for an LCD, and implementing a button press counter with debouncing features. The lab aims to enhance practical skills in embedded systems programming and hardware interfacing.

Uploaded by

longpham201105

Available Formats

Download as DOCX, PDF, TXT or read online on Scribd

0% found this document useful (0 votes)

0 views

LAB1_3

Uploaded by

longpham201105

Available Formats

Download as DOCX, PDF, TXT or read online on Scribd

You are on page 1/ 44

Lab 1-3

Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

MỤC TIÊU:
 Hiểu cách chống rung phím
 Hiểu cách giao tiếp LCD
 Hiểu cách giao tiếp phím đơn
 Hiểu cách giao tiếp bàn phím ma trận
THAM KHẢO:
 Tài liệu hướng dẫn thí nghiệm, chương 1, 2 , 3 ,6
BÀI 1
a) Kết nối một PORT của AVR vào J33 (Header điều khiển LCD) trên kit thí nghiệm.
b) Dùng các chương trình mẫu trong tài liệu hướng dẫn thí nghiệm, viết chương trình khởi
động LCD và xuất lên LCD như sau. (XX là số nhóm)
TN
VXL-
AVR
Nhom:
XX

.include "m324padef.inc" ; Include Atmega324pa definitions
.org 0x0000 ; interrupt vector table
rjmp reset_handler ; reset
.equ LCDPORT = PORTA
.equ LCDPORTDIR = DDRA
; Set signal port reg to PORTA
; Set signal port dir reg to PORTA
.equ LCDPORTPIN = PINA ; Set clear signal port pin reg to PORTA
.equ LCD_RS = PINA0
.equ LCD_RW = PINA1
.equ LCD_EN = PINA2
.equ LCD_D7 = PINA7
.equ LCD_D6 = PINA6
.equ LCD_D5 = PINA5
.equ LCD_D4 = PINA4
.def LCDData = r16
;***************************** Program ID *******************************
.org INT_VECTORS_SIZE
course_name:
.db "TN Vi Xu Ly-AVR",0
course_group:
.db "L2023",0
;********************************MAIN******************************
reset_handler:
call LCD_Init

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

; display the first line of information

ldi ZH, high(course_name) ; point to the information that is to be displayed
ldi ZL, low(course_name)
call LCD_Send_String
ldi r16,1
ldi r17,0
call LCD_Move_Cursor
ldi ZH, high(course_group) ; point to the information that is to be displayed
ldi ZL, low(course_group)
call
LCD_Send_String
start:
rjmp start
;*******************************FUNCTION*****************************
*********
;************INIT************;
LCD_Init:
; Set up data direction register for Port A
ldi r16, 0b11110111 ; set PA7-PA4 as outputs, PA2-PA0 as output
out LCDPORTDIR, r16
; Wait for LCD to power up
call DELAY_10MS
call DELAY_10MS
; Send initialization sequence
ldi r16, 0x02 ; Function Set: 4-bit interface
call LCD_Send_Command
ldi r16, 0x28 ; Function Set: enable 5x7 mode for chars call LCD_Send_Command
ldi r16, 0x0E ; Display Control: Display OFF, Cursor ON call LCD_Send_Command
ldi r16, 0x01 ; Clear Display call LCD_Send_Command
ldi r16, 0x80 ; Clear Display call LCD_Send_Command
ret
;*******************SEND CMD******************;
LCD_Send_Command:
push r17
call LCD_wait_busy ; check if LCD is busy
mov r17,r16 ;save the command
; Set RS low to select command register
; Set RW low to write to LCD
andi r17,0xF0
; Send command to LCD
out LCDPORT, r17
nop
nop
; Pulse enable pin

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

sbi LCDPORT, LCD_EN

nop
nop
cbi LCDPORT, LCD_EN
swap r16
andi r16,0xF0
; Send command to LCD
out LCDPORT, r16
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
pop r17
ret
;**************SEND DATA****************;
LCD_Send_Data:
push r17
call LCD_wait_busy ;check if LCD is busy
mov r17,r16 ;save the command
; Set RS high to select data register
; Set RW low to write to LCD
andi r17,0xF0
ori r17,0x01
; Send data to LCD
out LCDPORT, r17
nop
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
cbi LCDPORT, LCD_EN
; Delay for command execution
;send the lower nibble
nop
swap r16
andi r16,0xF0
; Set RS high to select data register
; Set RW low to write to LCD
andi r16,0xF0
ori r16,0x01
; Send command to LCD
out LCDPORT, r16
nop

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

; Pulse enable pin

sbi LCDPORT, LCD_EN
nop
cbi LCDPORT, LCD_EN
pop r17
ret
;*************************SET_CURSOR*******************;
LCD_Move_Cursor:
cpi r16,0 ;check if first row
brne LCD_Move_Cursor_Second
andi r17, 0x0F
ori r17,0x80
mov r16,r17
; Send command to LCD
call LCD_Send_Command
ret
LCD_Move_Cursor_Second:
cpi r16,1 ;check if second row
brne LCD_Move_Cursor_Exit ;else exit
andi r17, 0x0F
ori r17,0xC0
mov r16,r17
; Send command to LCD
call LCD_Send_Command
LCD_Move_Cursor_Exit:
; Return from function
ret
;*******************SEND STRING****************;
LCD_Send_String:
push ZH ; preserve pointer registers
push ZL
push LCDData
; fix up the pointers for use with the 'lpm' instruction
lsl ZL ; shift the pointer one bit left for the lpm
instruction
rol ZH
; write the string of characters
LCD_Send_String_01:
lpm LCDData, Z+ ; get a character
cpi LCDData, 0 ; check for end of string
breq LCD_Send_String_02 ; done
; arrive here if this is a valid character
call LCD_Send_Data ; display the character

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

rjmp LCD_Send_String_01 ; not done, send another character

; arrive here when all characters in the message have been sent to the LCD module
LCD_Send_String_02:
pop LCDData
pop ZL ; restore pointer registers
pop ZH
ret
;***************LCD_WAIT_BUSY****************;
LCD_wait_busy:
push r16
ldi r16, 0b00000111 ; set PA7-PA4 as input, PA2-PA0 as output
out LCDPORTDIR, r16
ldi r16,0b11110010 ; set RS=0, RW=1 for read the busy flag
out LCDPORT, r16
nop
LCD_wait_busy_loop:
sbi LCDPORT, LCD_EN
nop
nop
in r16, LCDPORTPIN
cbi LCDPORT, LCD_EN
nop
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
nop
andi r16,0x80
cpi r16,0x80
breq LCD_wait_busy_loop
ldi r16, 0b11110111 ; set PA7-PA4 as output, PA2-PA0 as output
out LCDPORTDIR, r16
ldi r16,0b00000000 ; set RS=0, RW=1 for read the busy flag
out LCDPORT, r16
pop r16
ret
;*******************DELAY10MS******************;
DELAY_10MS:
LDI R16,10
LOOP2:
LDI R17,250
LOOP1:
NOP

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

DEC R17
BRNE LOOP1
DEC R16
BRNE LOOP2
RET

BÀI 2
c) Kết nối 1 switch đến 1 chân port của AVR, kết nối module BAR LED đến 1 port của
AVR, kết nối LCD đến 1 port của AVR
d) Viết chương trình đếm số lần nhấn nút và xuất kết quả ra barled, đồng thời xuất ra LCD
(không chống rung)
e) Thêm tính năng chống rung phím vào chương trình
.include "m324padef.inc" ; Include Atmega324pa definitions
.org 0x0000 ; interrupt vector table
rjmp reset_handler ; reset
.equ LCDPORT =
; Set signal port reg to PORTA
PORTA
; Set signal port dir reg to
.equ LCDPORTDIR =
PORTA
DDRA
.equ LCDPORTPIN = PINA ; Set clear signal port pin reg to PORTA
.equ LCD_RS = PINA0
.equ LCD_RW = PINA1
.equ LCD_EN = PINA2
.equ LCD_D7 = PINA7
.equ LCD_D6 = PINA6
.equ LCD_D5 = PINA5
.equ LCD_D4 = PINA4
.def LCDData = r16
.def COUNTPress = R20
;button sw -> PB0
;bar_led -> PORTC
;******************************* Program ID
*********************************
;********************************MAIN******************************
reset_handler:
call LCD_Init
CLR R20
cbi DDRB, 0
SBI PORTB, 0
ldi r16,0xFF
out DDRC,R16
ldi r16, $30
mov r10, r16

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

;START UP DISPLAY LCD

LDI R16, $30
ldi ZL, $0
ldi ZH, $7
ST Z+, R16
ST Z+, R16
ST Z+, R16
ldi ZL, $0
ldi ZH, $7
CLR R16
LDI R17, 13
CALL LCD_Move_Cursor
CALL LCD_Send_String
; display the first line of information
start:
RCALL BUTTON
push R20
LDI R21, 10
CLR R22
L1: INC R22
SUB R20, R21
BRCC L1
DEC R22
ADD R20, R21
ADD r20, r10
MOV R19, R20
MOV R20, R22
CLR R22
L2: INC R22
SUB R20, R21
BRCC L2
DEC R22
ADD R20, R21
ADD r20, r10
ADD r22, r10
// 3 DIGIT IN DISPLAY R19, R20, R22
ST Z+, R22
ST Z+, R20
ST Z+, R19
clr R20
ST Z+, R20
ldi ZL, $0
ldi ZH, $7

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

CLR R16
LDI R17, 13
CALL LCD_Move_Cursor
call LCD_Send_String
POP R20
rjmp start
;*******************************LCD**********************************
****
BUTTON:
LDI R16, 50
DEBOUCING_0:
SBIC PINB, 0
RJMP BUTTON
DEC R16
BRNE DEBOUCING_0
INC R20
RELEASE:
LDI R16, 50
DEBOUCING_1:
SBIS PINB, 0
RJMP RELEASE
DEC R16
BRNE DEBOUCING_1
RET
;************INIT************;
LCD_Init:
; Set up data direction register for Port A
ldi r16, 0b11110111 ; set PA7-PA4 as outputs, PA2-PA0 as output
out LCDPORTDIR, r16
; Wait for LCD to power up
call DELAY_10MS
call DELAY_10MS
; Send initialization sequence
ldi r16, 0x02 ; Function Set: 4-bit interface
call LCD_Send_Command
ldi r16, 0x28 ; Function Set: enable 5x7 mode for chars
call LCD_Send_Command
ldi r16, 0x0C ; Display Control: Display OFF, Cursor OFF
call LCD_Send_Command
ldi r16, 0x01 ; Clear Display
call LCD_Send_Command
ldi r16, 0x80 ; Clear Display
call LCD_Send_Command

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

ret
;*******************SEND CMD******************;
LCD_Send_Command:
push r17
call LCD_wait_busy ; check if LCD is busy
mov r17,r16 ;save the command
; Set RS low to select command register
; Set RW low to write to LCD
andi r17,0xF0
; Send command to LCD
out LCDPORT, r17
nop
nop
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
swap r16
andi r16,0xF0
; Send command to LCD
out LCDPORT, r16
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
pop r17
ret
;**************SEND DATA****************;
LCD_Send_Data:
push r17
call LCD_wait_busy ;check if LCD is busy
mov r17,r16 ;save the command
; Set RS high to select data register
; Set RW low to write to LCD
andi r17,0xF0
ori r17,0x01
; Send data to LCD
out LCDPORT, r17
nop
; Pulse enable pin
sbi LCDPORT, LCD_EN

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

nop
cbi LCDPORT, LCD_EN
; Delay for command execution
;send the lower nibble
nop
swap r16
andi r16,0xF0
; Set RS high to select data register
; Set RW low to write to LCD
andi r16,0xF0
ori r16,0x01
; Send command to LCD
out LCDPORT, r16
nop
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
cbi LCDPORT, LCD_EN
pop r17
ret
;*************************SET_CURSOR*******************;
LCD_Move_Cursor:
cpi r16,0 ;check if first row
brne LCD_Move_Cursor_Second
andi r17, 0x0F
ori r17,0x80
mov r16,r17
; Send command to LCD
call LCD_Send_Command
ret
LCD_Move_Cursor_Second:
cpi r16,1 ;check if second row
brne LCD_Move_Cursor_Exit ;else exit
andi r17, 0x0F
ori r17,0xC0
mov r16,r17
; Send command to LCD
call LCD_Send_Command
LCD_Move_Cursor_Exit:
; Return from function
ret
;*******************SEND STRING****************;
LCD_Send_String:

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

push ZH ; preserve pointer registers

push ZL
push LCDData
; fix up the pointers for use with the 'lpm' instruction
// lsl ZL ; shift the pointer one bit left for the
lpm instruction
// rol ZH
; write the string of characters
LCD_Send_String_01:
LD LCDData, Z+ ; get a character
cpi LCDData, 0 ; check for end of string
breq LCD_Send_String_02 ; done
; arrive here if this is a valid character
call LCD_Send_Data ; display the character
rjmp LCD_Send_String_01 ; not done, send another character
; arrive here when all characters in the message have been sent to the LCD module
LCD_Send_String_02:
pop LCDData
pop ZL ; restore pointer registers
pop ZH
ret
;***************LCD_WAIT_BUSY****************;
LCD_wait_busy:
push r16
ldi r16, 0b00000111 ; set PA7-PA4 as input, PA2-PA0 as output
out LCDPORTDIR, r16
ldi r16,0b11110010 ; set RS=0, RW=1 for read the busy flag
out LCDPORT, r16
nop
LCD_wait_busy_loop:
sbi LCDPORT, LCD_EN
nop
nop
in r16, LCDPORTPIN
cbi LCDPORT, LCD_EN
nop
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
nop
andi r16,0x80
cpi r16,0x80

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

breq LCD_wait_busy_loop
ldi r16, 0b11110111 ; set PA7-PA4 as output, PA2-PA0 as output
out LCDPORTDIR, r16
ldi r16,0b00000000 ; set RS=0, RW=1 for read the busy flag
out LCDPORT, r16
pop r16
ret
;*******************DELAY10MS******************;
DELAY_10MS:
LDI R16,10
LOOP2:
LDI R17,250
LOOP1:
NOP
DEC R17
BRNE LOOP1
DEC R16
BRNE LOOP2
RET

f) Thực hiện chương trình, nhấn/nhả nút và quan sát kết quả

BÀI 3
a) Kết nối tín hiệu từ một port của AVR đến module bàn phím ma trận , kết nối module
BAR LED và LCD đến 2 port khác của AVR.

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

b) Viết chương trình con SCANKEY để quét bàn phím ma trận và trả về giá trị từ 0x0 đến
0xF ứng với mã của phím được nhấn. Nếu không có phím nào được nhấn trả về giá trị
0xFF. Giá trị trả về chứa trong R24

KEY_PAD_SCAN:
;PD_0 -> PD_3: OUTPUT, COL
;PD_4 -> PD_7: INPUT, ROW
LDI R16, $0F
OUT DDRD, R16
LDI R16, $F0
OUT PORTD, R16
CALL BUTTON

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

LDI R22, 0B11110111 ;INITIAL COLUMN MASK

LDI R24, 0 ;INITIAL PRESSED ROW VALUE
LDI R23, 3 ;SCANNING COLUMN INDEX
KEYPAD_SCAN_LOOP:
OUT PORTD, R22
SBIC PIND, 4 ;CHECK ROW 0
RJMP KEYPAD_SCAN_CHECK_COL2
RJMP KEYPAD_SCAN_FOUND ;ROW 0 IS PRESSED
KEYPAD_SCAN_CHECK_COL2:
SBIC PIND, 5 ;CHECK ROW 1
RJMP KEYPAD_SCAN_CHECK_COL3
LDI R24, 1 ;ROW 1 IS PRESSED
RJMP KEYPAD_SCAN_FOUND
KEYPAD_SCAN_CHECK_COL3:
SBIC PIND, 6 ;CHECK ROW 2
RJMP KEYPAD_SCAN_CHECK_COL4
LDI R24, 2 ;ROW 2 IS PRESSED
RJMP KEYPAD_SCAN_FOUND
KEYPAD_SCAN_CHECK_COL4:
SBIC PIND, 7 ;CHECK ROW 3
RJMP KEYPAD_SCAN_NEXT_ROW
LDI R24, 3 ;ROW 3 IS PRESSED
RJMP KEYPAD_SCAN_FOUND
KEYPAD_SCAN_NEXT_ROW:
CPI R23, 0
BREQ KEYPAD_SCAN_NOT_FOUND
ROR R22
DEC R23
RJMP KEYPAD_SCAN_LOOP
KEYPAD_SCAN_FOUND:
; combine row and column to get key value (0-15)
;key code = row*4 + col
LSL R24 ; shift row value 4 bits to the left
LSL R24
ADD R24, R23 ; add row value to column value
RET
KEYPAD_SCAN_NOT_FOUND:
LDI R24, 0XFF ;NO KEY PRESSED

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

RET
BUTTON:
LDI R17, 50
DEBOUNCING_1:
IN R16, PIND
CPI R16, $FF ;DETECTE STATUS OF BUTTON
BREQ BUTTON
DEC R17
BRNE DEBOUNCING_1
RET

c) Dùng chương trình con này, viết chương trình thực hiện việc quét phím và xuất giá trị
đọc được lên bar led và LCD.
.include "m324padef.inc" ; Include Atmega324pa definitions
.org 0x0000 ; interrupt vector table
rjmp reset_handler ; reset
.equ LCDPORT = ; Set signal port reg to
PORTA PORTA
.equ LCDPORTDIR = ; Set signal port dir reg
DDRA to PORTA
.equ LCDPORTPIN = PINA ; Set clear signal port pin reg to PORTA
.equ LCD_RS = PINA0
.equ LCD_RW = PINA1
.equ LCD_EN = PINA2
.equ LCD_D7 = PINA7
.equ LCD_D6 = PINA6
.equ LCD_D5 = PINA5
.equ LCD_D4 = PINA4
.def LCDData = r16
;******************************* Program ID
********************************
;PORTD -> CONTROL KEYPAD
;PORTC -> BAR LED
;********************************MAIN******************************
reset_handler:
CALL LCD_Init
SER R16
OUT DDRC, R16
LDI ZL, 0
LDI ZH, 7
LDI R16, $30
MOV R10, R16 ;DIGIT -> ASCII
LDI R16, $37
MOV R11, R16 ;ALPHA -> ASCII

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

CLR R15
; display the first line of information
start:
CALL KEY_PAD_SCAN
MOV R23, R24
OUT PORTC, R23
CPI R23, 0XFF
BREQ CLEAR
CPI R23, 10
BRCC ALPHA
ADD R23, R10 ;ASCII -> DIGIT
ST Z+, R23 ;DATA
ST Z, R15 ;END LINE
LDI ZL, 0
LDI ZH, 7
CLR R16
CLR R17
CALL LCD_Move_Cursor
CALL LCD_Send_String
RJMP start
ALPHA:
ADD R23, R11 ;ASCII -> ALPHA
ST Z+, R23 ;DATA
ST Z, R15 ;END LINE
LDI ZL, 0
LDI ZH, 7
CLR R16
CLR R17
CALL LCD_Move_Cursor
CALL LCD_Send_String
rjmp start
CLEAR:
ldi r16, 0x01 ; Clear Display
call LCD_Send_Command
rjmp start
;*******************************FUNCTION****************************
**********
;************INIT************;
LCD_Init:
; Set up data direction register for Port A
ldi r16, 0b11110111 ; set PA7-PA4 as outputs, PA2-PA0 as output
out LCDPORTDIR, r16
; Wait for LCD to power up

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

call DELAY_10MS
call DELAY_10MS
; Send initialization sequence
ldi r16, 0x02 ; Function Set: 4-bit interface
call LCD_Send_Command
ldi r16, 0x28 ; Function Set: enable 5x7 mode for chars
call LCD_Send_Command
ldi r16, 0x0C ; Display Control: Display OFF, Cursor OFF
call LCD_Send_Command
ldi r16, 0x01 ; Clear Display
call LCD_Send_Command
ldi r16, 0x80 ; Clear Display
call LCD_Send_Command
ret
;*******************SEND CMD******************;
LCD_Send_Command:
push r17
call LCD_wait_busy ; check if LCD is busy
mov r17,r16 ;save the command
; Set RS low to select command register
; Set RW low to write to LCD
andi r17,0xF0
; Send command to LCD
out LCDPORT, r17
nop
nop
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
swap r16
andi r16,0xF0
; Send command to LCD
out LCDPORT, r16
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
pop r17
ret
;**************SEND DATA****************;

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

LCD_Send_Data:
push r17
call LCD_wait_busy ;check if LCD is busy
mov r17,r16 ;save the command
; Set RS high to select data register
; Set RW low to write to LCD
andi r17,0xF0
ori r17,0x01
; Send data to LCD
out LCDPORT, r17
nop
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
cbi LCDPORT, LCD_EN
; Delay for command execution
;send the lower nibble
nop
swap r16
andi r16,0xF0
; Set RS high to select data register
; Set RW low to write to LCD
andi r16,0xF0
ori r16,0x01
; Send command to LCD
out LCDPORT, r16
nop
; Pulse enable pin
sbi LCDPORT, LCD_EN
nop
cbi LCDPORT, LCD_EN
pop r17
ret
;*************************SET_CURSOR*******************;
LCD_Move_Cursor:
cpi r16,0 ;check if first row
brne LCD_Move_Cursor_Second
andi r17, 0x0F
ori r17,0x80
mov r16,r17
; Send command to LCD
call LCD_Send_Command
ret

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

LCD_Move_Cursor_Second:
cpi r16,1 ;check if second row
brne LCD_Move_Cursor_Exit ;else exit
andi r17, 0x0F
ori r17,0xC0
mov r16,r17
; Send command to LCD
call LCD_Send_Command
LCD_Move_Cursor_Exit:
; Return from function
ret
;*******************SEND STRING****************;
LCD_Send_String:
push ZH ; preserve pointer registers
push ZL
push LCDData
; fix up the pointers for use with the 'lpm' instruction
// lsl ZL ; shift the pointer one bit left for the
lpm instruction
// rol ZH
; write the string of characters
LCD_Send_String_01:
LD LCDData, Z+ ; get a character
cpi LCDData, 0 ; check for end of string
breq LCD_Send_String_02 ; done
; arrive here if this is a valid character
call LCD_Send_Data ; display the character
rjmp LCD_Send_String_01 ; not done, send another character
; arrive here when all characters in the message have been sent to the LCD module
LCD_Send_String_02:
pop LCDData
pop ZL ; restore pointer registers
pop ZH
ret
;***************LCD_WAIT_BUSY****************;
LCD_wait_busy:
push r16
ldi r16, 0b00000111 ; set PA7-PA4 as input, PA2-PA0 as output
out LCDPORTDIR, r16
ldi r16,0b11110010 ; set RS=0, RW=1 for read the busy flag
out LCDPORT, r16
nop
LCD_wait_busy_loop:

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

sbi LCDPORT, LCD_EN

nop
nop
in r16, LCDPORTPIN
cbi LCDPORT, LCD_EN
nop
sbi LCDPORT, LCD_EN
nop
nop
cbi LCDPORT, LCD_EN
nop
andi r16,0x80
cpi r16,0x80
breq LCD_wait_busy_loop
ldi r16, 0b11110111 ; set PA7-PA4 as output, PA2-PA0 as output
out LCDPORTDIR, r16
ldi r16,0b00000000 ; set RS=0, RW=1 for read the busy flag
out LCDPORT, r16
pop r16
ret
;*******************DELAY10MS******************;
DELAY_10MS:
LDI R16,10
LOOP2:
LDI R17,250
LOOP1:
NOP
DEC R17
BRNE LOOP1
DEC R16
BRNE LOOP2
RET
KEY_PAD_SCAN:
;PD_0 -> PD_3: OUTPUT, COL
;PD_4 -> PD_7: INPUT, ROW
LDI R16, $0F
OUT DDRD, R16
LDI R16, $F0
OUT PORTD, R16
CALL BUTTON
LDI R22, 0B11110111 ;INITIAL COLUMN MASK
LDI R24, 0 ;INITIAL PRESSED ROW VALUE
LDI R23, 3 ;SCANNING COLUMN INDEX

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

KEYPAD_SCAN_LOOP:
OUT PORTD, R22
SBIC PIND, 4 ;CHECK ROW 0
RJMP KEYPAD_SCAN_CHECK_COL2
RJMP KEYPAD_SCAN_FOUND ;ROW 0 IS PRESSED
KEYPAD_SCAN_CHECK_COL2:
SBIC PIND, 5 ;CHECK ROW 1
RJMP KEYPAD_SCAN_CHECK_COL3
LDI R24, 1 ;ROW 1 IS PRESSED
RJMP KEYPAD_SCAN_FOUND
KEYPAD_SCAN_CHECK_COL3:
SBIC PIND, 6 ;CHECK ROW 2
RJMP KEYPAD_SCAN_CHECK_COL4
LDI R24, 2 ;ROW 2 IS PRESSED
RJMP KEYPAD_SCAN_FOUND
KEYPAD_SCAN_CHECK_COL4:
SBIC PIND, 7 ;CHECK ROW 3
RJMP KEYPAD_SCAN_NEXT_ROW
LDI R24, 3 ;ROW 3 IS PRESSED
RJMP KEYPAD_SCAN_FOUND
KEYPAD_SCAN_NEXT_ROW:
CPI R23, 0
BREQ KEYPAD_SCAN_NOT_FOUND
ROR R22
DEC R23
RJMP KEYPAD_SCAN_LOOP
KEYPAD_SCAN_FOUND:
; combine row and column to get key value (0-15)
;key code = row*4 + col
LSL R24 ; shift row value 4 bits to the left
LSL R24
ADD R24, R23 ; add row value to column value
RET
KEYPAD_SCAN_NOT_FOUND:
LDI R24, 0XFF ;NO KEY PRESSED
RET
BUTTON:
LDI R17, 50
DEBOUNCING_1:
IN R16, PIND
CPI R16, $FF ;DETECT STATUS OF BUTTON
BREQ BUTTON
DEC R17

https://doe.dee.hcmut.edu.vn/
Lab 1-3
Giao tiếp nút nhấn, BÀN PHÍM MA TRẬN

BRNE DEBOUNCING_1
RET