键盘按键与数码管显示

实验目的：

熟悉星研集成开发环境，掌握微机接口程序编写调试的基本方法。

掌握矩阵式键盘的工作原理及识别键盘按键的方法。

掌握8段数码管显示数字或字符的工作原理和它的使用方法。

掌握用8255扫描键盘及用8255刷新数码管显示的方法。

实验：

      在（2行*8列）小键盘上任意按下某个按键，该键的键值将同时显示在8个数码管上。按键松开时显示上一次的按键值。

(2行*8列)小键盘：

     实验箱上2行*8列小键盘上当某个按键被按下时，该键所在行的行线值为0、所在列的列线值也为0。根据这个特点结合上述原理图采用“列扫描法”可以识别出当前被按下的按键。

8个数码管：

     实验箱上8个8段数码管。每个数码管有8个笔段，按逆时针方向依次称为a段、b段、c段、d段、e段、f段、g段、dp段，8个段接收来自外部的一个8位二进制数(D7—D0)，并且笔段a 对应数据位D0……..笔段dp 对应数据位D7 ，由于数码管是共阳的，当段码端接收低电平时相应的笔段就会点亮，段码端接收的数据决定了数码管显示的具体内容。（例：要显示数字0，则笔段a、b、c、d、e、f  都必须点亮，笔段g、h不应该点亮，8个段接收的值应该是11000000，数据D0--D7就应该是11000000（0C0H），让段码端接收11000000它就会显示0）。

     数码管的位码控制GND端，当它接收低电平时该数码管会被选中有效工作：即这时只要段码端有有效的数据数码管就会显示数据，当它接收高电平时数码管不工作，这时即使段码端有有效数据数码管也不会显示任何数据。

8255各端口的分工：

      8255的A口工作在方式0输出状态控制数码管的段码；B端口工作在方式0输出状态控制数码管的位码，并且同时控制键盘列线的扫描；C端口工作在方式0输入状态，其中的PC0、PC1控制键盘的第一、第二行行值的读入。

实验代码：

.MODEL	TINY		
PA_8255		EQU	0270H           
PB_8255		EQU	0271H
PC_8255		EQU	0272H
CTRL_8255	EQU	0273H
.STACK	100
.DATA    
buffer          DB      ?               
SEG_TAB		DB	0C0H, 0F9H,0A4H,0B0H, 99H, 92H, 82H,0F8H    DB	080H, 90H, 88H, 83H,  0C6H,0A1H,86H,8EH,0FFH .CODE
START:  	MOV     AX,@DATAMOV     DS,AXMOV	ES,AXNOP		MOV	DX,CTRL_8255	;8255初始化MOV	AL,89HOUT	DX,AL		LEA	SI,bufferMOV	AL,10H          ;默认数码管不显示MOV     [SI],ALCALL	DIR             ;调用显示子程序MAIN2:		LEA	DI,buffer       CALL	Getkey          ;得到按键在SEG_TAB中的值放入ALSTOSB                   ;将AL赋值给DI指向的地址CALL	DIR            		JMP	MAIN2DIR		PROC	NEAR            PUSH	AXPUSH	BXPUSH	DXLEA	SI,buffer	;置显示缓冲器初值	MOV	AL,[SI]LEA	BX,SEG_TAB				XLAT			;查表取显示数据->ALMOV	DX,PA_8255OUT	DX,AL		;AL段数据->8255 PA口		MOV     DX,PB_8255MOV     AL,0		;位码控制GND端低电平有效, 显示8位数据管OUT     DX,AL           CALL	DL1ms				POP	DXPOP	BXPOP	AXRET
DIR		ENDPDL1ms		PROC	NEAR		PUSH	CXMOV	CX,500LOOP	$POP	CXRET
DL1ms		ENDPGETKEY		PROC	NEAR	       PUSH	BXPUSH	DX
LK:		CALL	AllKey		;调用判有无闭合键子程序		JNE	LK1             CALL	DIR		;调用显示子程序JMP	LK             ;补充程序完成列扫描,得到按键在SEG_TAB中的值放入AL
LK1:		MOV BL, 0FEH	;0FEH-->BL 第0列开始扫描,用BL保存列线扫描口数值,从PB0开始MOV BH, 0	;0-->BH   用BH保存列线值,从第0列开始
LK2:		MOV DX, PB_8255	;写B口位码控制端  MOV AL, BL	;OUT DX, AL	;将BL写入B口列线控制端MOV DX, PC_8255	;读C口IN  AL, DX	;TEST AL, 1	;PC0不等于0转向LONE继续判断PC1JNZ  LONE	;MOV AL, 0	;0行有键闭合，0-〉AL  PC0等于0表示0行有键闭合,用BH存放按键值JMP	LKP             LONE:		TEST AL, 2          JNZ NEXT	;PC1不等于0则转向NEXT列计算器+1MOV AL, 08	;1行有键闭合，08H-->AL	        LKP:		ADD BH, AL	;用BH保存键值LK3:		CALL	AllKey         JNE	LK3     ;判断释放否MOV AL, BH	;BH键号->AL		JMP EXITNEXT:		INC BH		;列计数器加1		TEST BL, 80H	;JZ EXIT		;判是否已扫到最后一列则转向KENDROL BL, 1	;将BL循环左移一位JMP	LK2
EXIT:		POP	DXPOP	BXRET                     
GETKEY		ENDPAllKey		PROC	NEAR            ;判断键盘是否有按键闭合        MOV	DX,PB_8255                                                XOR	AL,AL                                      OUT	DX,AL		;全"0"->扫描口,列线控制端低电平有效MOV     DX,PC_8255      ;读C口数据                                     IN	AL,DX		;读键状态		 AND	AL,03H		;取低二位	CMP     AL,3            ;取C口低二位和00000011b比较RET
AllKey		ENDPEND	START