计算机硬件上机实验参考程序7

实验7内容
一、必做题目
1、P157 ①、②题
2、补充：从键盘上输入一个0~9的数字，在LED的最右边一位显示出来你所输入的数字；按下“Q”键则退出程序；按下其他非数字键，屏幕显示“error！”，并且LED上显示的数据不变
二、思考题
在键盘上输入数字，在LED上显示出来，完成类似计算器输入数据的功能。

三、练习
P155 例3.9
1）P157 ①
CODE SEGMENT
ASSUME CS:CODE
START: MOV AL , 80H
MOV DX , 20BH
OUT DX , AL
NEXT1: MOV BL , 20H ；位选信号初始值
NEXT2: MOV AH , 1
INT 16H
JZ NEXT3
MOV AH,0 :修改的部分（清除键盘缓冲区）
INT 16H
AND AL , 11011111B ;;把读进来ASCII码转换为大写
CMP AL ,’Q’；如果是“Q”键则程序结束
JZ DONE
NEXT3: MOV AL , 80H ；；送“8”的段代码
MOV DX , 208H
OUT DX , AL
MOV AL , BL ；；送位选信息
MOV DX, 209H
OUT DX , AL
CALL DELAY ；；延时
SHR BL,1 ；；位信号右移一位
JC NEXT1 ；；如果移到最右端，则重新从左边开始
JMP NEXT2
DONE: MOV AL , 0FFH ；；熄灭所有LED，结束主程序MOV DX , 208H
OUT DX, , AL
MOV AH , 4CH
INT 21H
;
DELAY PROC NEAR ;;延时子程序
MOV CX , 0FFFFH
LP1: MOV BP , 0FF00H
LP2: DEC BP
JNZ LP2
LOOP LP1
RET
DELAY ENDP
CODE ENDS
END START
2）P157②
DA TA SEGMENT
LEDTB DB 0F9H,0A4H,0B0H,19H,92H,82H; ‘4.’的段码要自己找DA TA ENDS
CODE SEGMENT
ASSUME CS:CODE , DS:DA TA
START: MOV AX , DA TA
MOV DS , AX
MOV AL , 91H ;;A口和B口输出，C口输入，方式0
MOV DX , 20BH
OUT DX , AL
NEXT1: MOV BL , 20H ；位选信号初始值
LEA SI, LEDTB
NEXT2: MOV AL，0 ：修改的部分
MOV DX，209H
OUT DX，AL
MOV AL , [SI]
MOV DX , 208H；送段码
OUT DX , AL
MOV AL , BL
MOV DX , 209H；送位码
OUT DX , AL
CALL DELAY ；延时
MOV DX , 20AH ；读入C口状态
IN AL , DX
TEST AL , 1 ；如果PC0=1，结束程序
JNZ DONE
SHR BL , 1；位选信号右移一位
JC NEXT1
INC SI
JMP NEXT2
DONE: MOV AL , 0FFH
MOV DX , 208H
OUT DX , AL
MOV AH , 4CH
INT 21H
DELAY PROC NEAR ;延时子程序
MOV CX , 0FFFFH
LP: NOP
LOOP LP
RET
DELAY ENDP
CODE ENDS
END START
3）补充
DA TA SEGMENT
LEDTB DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,98H ERROR DB ‘ERROR!’ ,0DH,0AH, ‘$’
DA TA ENDS
CODE SEGMENT
ASSUME CS:CODE , DS:DA TA
START: MOV AX , DA TA
MOV DS , AX
NEXT: AH , 1
INT 16H
JZ NEXT ;无键按下则等待
MOV AH，0 ；
INT 16H
CMP AL , ‘0’；非数字键，则跳
JB OTHER
CMP AL , ‘9’
JA OTHER
AND AL , 0FH ；若数字键，则把ASCII转化成二进制数
MOV BX , LEDTB
XLA T ；查表得到相应段码
MOV DX ,208H ；送出段码和位码
OUT DX , AL
MOV AL , 1
MOV DX , 209H
OUT DX , AL
JMP NEXT
OTHER: AND AL , 11011111B；非数字键时
CMP AL , ‘Q’；若是‘Q’键则结束程序
JZ DONE
LEA DX , ERROR ；若是其他键，提示错误
MOV AH , 9
INT 21H
JMP NEXT
DONE: MOV AH , 4CH
INT 21H
CODE ENDS
END START。