pic18系列單片機(jī)應(yīng)用實(shí)例匯編語(yǔ)言程序keyboard check

;本程序用于鍵盤(pán)的識(shí)別，通過(guò)編程，使按下K1鍵時(shí)第一個(gè)數(shù)碼管顯示1，按下K2鍵時(shí)第一

;個(gè)數(shù)碼管上顯示2，按下K3鍵時(shí)第一個(gè)數(shù)碼管上顯示3，按下K4鍵時(shí)第一個(gè)數(shù)碼管上顯示4，

;對(duì)鍵盤(pán)的掃描采用查詢方式

LIST P=18F458INCLUDE "P18F458.INC"

;所用的寄存器

JIANR

EQU

0X20

FLAG

EQU

JIANR+1

;標(biāo)志寄存器

DEYH

EQU

JIANR+2

DEYL

EQU

JIANR+3

F0

EQU

0

;FLAG的第0位定義為F0

ORG

0X00

GOTO

MAIN

ORG

0X30

;*************以下為碼值轉(zhuǎn)換表******************

CONVERT ADDWF

PCL，1

RETLW

0XC0

;0，顯示段碼與具體的硬件連接有關(guān)

RETLW

0XF9

;1

RETLW

0XA4

;2

RETLW

0XB0

;3

RETLW

0X99

;4

RETLW

0X92

;5

RETLW

0X82

;6

RETLW

0XD8

;7

RETLW

0X80

;8

RETLW

0X90

;9

RETLW

0X88

;A

RETLW

0X83

;B

RETLW

0XC6

;C

RETLW

0XA1

;D

RETLW

0X86

;E

RETLW

0X8E

;F

RETLW

0X7F

;"."

RETLW

0XBF

;"-"

RETLW

0X89

;H

RETLW 0XFF ;DARKRETURN

;***************初始化子程序*****************INITIAL

BCF

TRISA，5

;置RA5為輸出方式，以輸出鎖存信號(hào)

BCF

TRISB，1

BCF

TRISA，3

BCF

TRISE，0

BCF

TRISE，1

BSF

TRISB，4

;設(shè)置與鍵盤(pán)有關(guān)的各口的輸入輸出方式

BCF

TRISC，5

BCF

TRISC，3

;設(shè)置SCK與SDO為輸出方式

BCF

INTCON，GIE

;關(guān)閉所有中斷

MOVLW

0XC0

MOVWF

SSPSTAT

;設(shè)置SSPSTAT寄存器

MOVLW

0X30

MOVWF

SSPCON1

;設(shè)置SPI的控制方式，允許SSP方式，并且時(shí)鐘下降

;沿發(fā)送數(shù)據(jù)，與"74HC595當(dāng)其SCLK從低到高電平

;跳變時(shí)，串行輸入數(shù)據(jù)(DI)移入寄存器"的特點(diǎn)相對(duì)應(yīng)

MOVLW

0X01

MOVWF

JIANR

;顯示值寄存器（復(fù)用為鍵值寄存器）賦初值

CLRF

FLAG

;清除標(biāo)志寄存器

RETURN

;返回

;**************顯示子程序*****************

DIS Y

AGAIN

CLRF PORTA

MOVWF SSPBUF

BTFSS PIR1，SSPIF

GOTO AGAINNOP

BCF PIR1，SSPIF

BSF PORTA，5 ;詳細(xì)的程序語(yǔ)句請(qǐng)參考3.1.3節(jié)

RETURN

;**************查鍵子程序*****************KEYSCAN

BCF PORTB，1

BCF

PORTA，3

BCF

PORTE，0

BCF

PORTE，1

;K1，K2，K3，K4四條列線置0

NOP

NOP

;延時(shí)，使引腳的電平穩(wěn)定

BTFSC

PORTB，4

BCF

FLAG，F(xiàn)0

;RB4為1，表示沒(méi)鍵按下，清除標(biāo)志F0

NOP

BTFSS

PORTB，4

BSF

FLAG，F(xiàn)0

;RB4為0，表示有鍵按下，建立標(biāo)志F0

RETURN

;**********鍵盤(pán)去抖子程序(約8ms的延時(shí))*****************KEYDELAY

MOVLW 0X0A

MOVWF DEYH

AGAIN2MOVLW 0XFF

MOVWF DEYLAGAIN1DECFSZ DEYL，1

GOTO AGAIN1

DECFSZ DEYH，1

GOTO AGAIN2RETURN

;***************鍵服務(wù)子程序****************

;確定鍵值的子程序KEYSERVE

JIANZHI

BCF

PORTB，1

BCF

PORTA，3

MOVLW

0X03

MOVWFNOPNOP

BTFSS

PORTE

PORTB，4

;K1，K2置低電平，K3，K4置高電平

;使引腳電平穩(wěn)定

GOTO

K1K2

;RB4為0，表示按鍵為K1，K2中的一個(gè)

GOTO

K3K4

;RB4為1，表示按鍵為K3，K4中的一個(gè)

K1K2

BCF

PORTB，1

BSF

PORTA，3

;K1置低電平，K2置高電平

NOP

NOP

;使引腳電平穩(wěn)定

BTFSS

PORTB，4

GOTO

K1

;RB4為0，表示按鍵為K1

GOTO

K2

;RB4為1，表示按鍵為K2

K3K4

BCF

PORTE，0

BSFNOPNOP

BTFSS

PORTE，1

PORTB，4

;K3置低電平，K4置高電平

;使引腳電平穩(wěn)定

GOTO

K3

;RB4為0，表示按鍵為K3

GOTO

K4

;RB4為1，表示按鍵為K4

K1

MOVLW

0X03

MOVWF

JIANR

GOTO

JIANW

K2

MOVLW

0X05

MOVWF

JIANR

BCF

PORTA，3

GOTO

JIANW

K3

MOVLW

0X07

MOVWF

JIANR

GOTO

JIANW

K4

MOVLW

0X09

MOVWF

JIANR

;以上根據(jù)按下的鍵把相應(yīng)的值送給JIANR

BCF

PORTE，1

JIANW

BTFSS

PORTB，4

GOTO

RETURN

JIANW

;為了防止一次按鍵多次識(shí)別，等鍵松開(kāi)才返回

;****************************************MAIN NOP

CALL INITIAL ;調(diào)用初始化子程序

LOOP

CALL KEYSCAN ;查鍵

BTFSC FLAG，F(xiàn)0

CALL KEYDELAY ;若檢測(cè)到有鍵按下，則調(diào)用軟件延時(shí)子程序去抖動(dòng)

BTFSCCALL

FLAG，F(xiàn)0

KEYSCAN

;若第一次掃描到有鍵按下，則經(jīng)過(guò)前面的延時(shí)去抖后

;再次進(jìn)行鍵掃描

BTFSC

FLAG，F(xiàn)0

CALL

KEYSERVE

;