FS2410开发板的测试键盘的ADS汇编代码

;汇编指令实验
;键盘扫描
; 4X4 矩阵键盘
;四个输入引脚： EINT0 -----( GPF0 )----INPUT
; EINT2 -----( GPF2 )----INPUT
; EINT11-----( GPG3 )----INPUT
; EINT19-----( GPG11 )----INPUT
;
;四个输出引脚： KEYSCAN0---( GPE11 )----OUTPUT
; KEYSCAN1---( GPG6 )----OUTPUT
; KEYSCAN2---( GPE13 )----OUTPUT
; KEYSCAN3---( GPG2 )----OUTPUT

;GPG2,6 GPE11,13 行控制线
;GPG11,3 GPF2,0 列控制线
;GPF4,5,6,7 控制led以二进制码显示键盘值

rGPECON equ 0x56000040 ;Port E control
rGPEDAT equ 0x56000044 ;Port E data
rGPEUP equ 0x56000048 ;Pull-up control E

rGPFCON equ 0x56000050 ;Port F control
rGPFDAT equ 0x56000054 ;Port F data
rGPFUP equ 0x56000058 ;Pull-up control F

rGPGCON equ 0x56000060 ;Port G control
rGPGDAT equ 0x56000064 ;Port G data
rGPGUP equ 0x56000068 ;Pull-up control G

area keydat,data,readonly
;第4行键值转换数据
keytrans dcb 13,0,0,14,0,0,15,0,0,16,0,0
;键值对应LED显示的二进制数据
keyledcode dcb 0,0x10,0x20,0x30,0x40,0x50,0x60,0x70,0x80,0x90,0xa0,0xb0,0xc0,0xd0,0xe0,0xf0,0,0,0,0,0,0,0

area kayasm,code,readonly
code32
entry

start
mov sp,#0x0c700000

;以下代码初始化GPIO
ldr r1,=0x5500 ;GPF4,5,6,7控制LED,设置为输出口,其他设置为输入
ldr r0,=rGPFCON
str r1,[r0]

;禁止内部上拉电阻
ldr r1,=0xff
ldr r0,=rGPFUP
str r1,[r0]

;输出1，使LED全灭
mov r1,#0xffffffff
ldr r0,=rGPFDAT
str r1,[r0]

;GPG6,2输出
ldr r0,=rGPGCON
ldr r1,[r0]
ldr r3,=0x2020
bic r1,r1,r3
ldr r3,=0x1010
orr r1,r1,r3
str r1,[r0]
;GPG6,2输出0
ldr r0,=rGPGDAT
mov r1,#0
str r1,[r0]

;GPE11,13输出
ldr r0,=rGPECON
ldr r1,[r0]
bic r1,r1,#0x08800000
orr r1,r1,#0x04400000
str r1,[r0]
ldr r0,=rGPEDAT
mov r1,#0
str r1,[r0]

;GPG3,11输入
ldr r0,=rGPGCON
ldr r1,[r0]
ldr r3,=0x00c000c0
bic r1,r1,r3
str r1,[r0]

;GPF2,0输入
ldr r0,=rGPFCON
ldr r1,[r0]
bic r1,r1,#0x33
str r1,[r0]

;以下代码扫描键盘
;逐行输出0,GPG6,2 GPE11,13
;读取列值GPF2,0 GPG3,11
keyscan
;第1行,GPG2=1,GPG6=1,GPE11=0,GPE13=1
ldr r0,=rGPGDAT
ldr r1,[r0]
orr r1,r1,#0x44 ;GPG2=GPG6=1
str r1,[r0]

ldr r0,=rGPEDAT
ldr r1,[r0]
orr r1,r1,#0x2000 ;GPE13=1
bic r1,r1,#0x800 ;GPE11=0
str r1,[r0]

mov r0,#1
bl genkey
cmp r0,#0
bne havekey

;第2行,GPG2=1,GPG6=0,GPE11=GPE13=1
ldr r0,=rGPGDAT
ldr r1,[r0]
bic r1,r1,#0x40 ;GPG6=0
orr r1,r1,#4 ;GPG2=1
str r1,[r0]

ldr r0,=rGPEDAT
ldr r1,[r0]
orr r1,r1,#0x2800 ;GPE11,13=1
str r1,[r0]

mov r0,#2
bl genkey
cmp r0,#0
bne havekey

;第3行,GPG2=1,GPG6=1,GPE11=1,GPE13=0
ldr r0,=rGPGDAT
ldr r1,[r0]
orr r1,r1,#0x44 ;GPG2=GPG6=1
str r1,[r0]

ldr r0,=rGPEDAT
ldr r1,[r0]
orr r1,r1,#0x800 ;GPE11=1
bic r1,r1,#0x2000 ;GPE13=0
str r1,[r0]

mov r0,#3
bl genkey
cmp r0,#0
bne havekey

;第4行,GPG2=0,GPG6=1,GPE11=GPE13=1
ldr r0,=rGPGDAT
ldr r1,[r0]
orr r1,r1,#0x40 ;GPG6=1
bic r1,r1,#4 ;GPG2=0
str r1,[r0]

ldr r0,=rGPEDAT
ldr r1,[r0]
orr r1,r1,#0x2800 ;GPE11,13=1
str r1,[r0]

mov r0,#4
bl genkey
cmp r0,#0
bne havekey
b keyscan

havekey
ldr r1,=rGPFDAT
mov r4,#0xff
str r4,[r1]
ldr r2,=keyledcode
ldrb r3,[r2,r0]
mvn r2,r3
str r2,[r1]

b keyscan

export genkey
;通过读取列值获取键值子程序
;入口参数: r0, 第几行1~4
;出口参数: r0, 所得到的键号(1~16), 0表示没有键按下
;读取列值，读取GPG11,GPG3 GPF2,GPF0
;内部使用r4-r7
genkey
;暂存行值
mov r7,r0
;读取列值
ldr r4,=rGPGDAT
ldr r5,[r4]
mov r6,r5
ands r6,r6,#0x800 ;GPG11
moveq r0,#0
beq keycac
mov r6,r5
ands r6,r6,#8 ;GPG3
moveq r0,#3
beq keycac
ldr r4,=rGPFDAT
ldr r5,[r4]
mov r6,r5
ands r6,r6,#4 ;GPF2
moveq r0,#6
beq keycac
mov r6,r5
ands r6,r6,#1 ;GPF0
moveq r0,#9
beq keycac
mov r0,#0
b keyret
keycac
cmp r7,#4
blo simplecac
ldr r4,=keytrans
ldrb r0,[r4,r0]
b keyret
simplecac
add r0,r0,r7
keyret
mov pc,lr

end