微机习题课(键盘-8255A行扫描法)课件.ppt

8255A并行接口(实验一);STEP2:读键码（行扫描法） 1）行扫描； 逐行输出‘0’ 2）读列状态。 被扫描到得行有键按下，列状态才会改变 STEP3:键分析 1）行值送（AL） 2）列值送（AH） 3）（AX）取反，得键码 ;STEP4:键处理 1）查表 拿键值与键值表比较，相同则记录下对应的字符码 2）显示字符;主程序： ;键扫描子程序流程图（行扫描法）：;第1行输出低电平;与表无任一键相同; PA55 EQU 218H PB55 EQU 219H P55CTL EQU 21BH DATA SEGMENT TABLE DW 0101H,0102H,0104H,0108H ;键码表 DW 0110H,0120H,0140H,0180H DW 0201H,0202H,0204H,0208H DW 0210H,0220H,0240H,0280H DW 0401H,0402H,0404H,0408H DW 0410H,0420H,0440H,0480H CHAR DB ‘CDEF’ ;字符码表; DB ‘BA98’ DB ‘4567’ DB ‘3210’ DB ‘ ’ ;四个空格 DB ‘RPMG’ MES DB ‘INPUT ANY KEY IN THE’ DB ‘SMALL KEYBOARD.’ DB 0AH,0DH ;回车换行 DB ‘IT WILL BE DISPLAY’ DB ‘ON THE SCREEN!’ DB ‘END WITH ‘R’’ ; DB 0AH,0DH, ‘$’ DATA ENDS CODE SEGMENT MAIN PROC FAR ASSUME CS:CODE,DS:DATA START: MOV AX,DATA MOV DS,AX ;DS指向数据段 MOV DX,OFFSET MES MOV AH,09 ;显示提示信息 INT 21H KY: CALL KEY ;调键盘扫描子程序; CMP DL,’R’ ;键入字符不是‘R’，转KY JNZ KY MOV AX,4C00H INT 21H RET MAIN ENDP KEY PROC NEAR ;键盘扫描子程序 MOV AL,82H ;设置8255A控制字 MOV DX,P55CTL ;工作在方式0，端 OUT DX,AL ;口A输出，端口B输入 BEGIN: MOV BL,00H ;标识位清零; WAIT1: MOV AL,00H ;端口A输出全0 MOV DX,PA55 OUT DX,AL MOV DX,PB55 IN AL,DX ;端口B读入列值 AND AL,07H CMP AL,07H JZ BEGIN ;若为07H，无键按下 CMP BL,01H JZ KPRESS ;若为1，已消抖动 MOV CX,1000H; DLY: LOOP DLY ;延时去抖 MOV BL,01H ;标识位置1 JMP WAIT1 KPRESS: MOV AL,0FEH ;第一行输出0 RSCAN: MOV DX,PA55 OUT DX,AL PUSH AX ;保存行值 MOV DX,PB55 IN AL,DX ;读???列值 AND AL,07H CMP AL,07H ; JZ NEXTR ;列值全为1，跳转 MOV AH,AL ;列值送(AH) POP BX ;弹出行值 MOV AL,BL NOT AX ;取反，得出键码 MOV SI,OFFSET TABLE ;键码表首址 MOV DI,OFFSET CHAR ;字符码表首址 MOV CX,24 TT: CMP AX,[SI] ;键码相符转NN JZ NN DEC CX ; JZ BEGIN ;比较完仍不相符跳转 ADD SI,2 INC DI JMP TT ;继续比较 NN: MOV DL,[DI] MOV AH,02 ;显示该键码对应字符 INT 21H PUSH DX ;字符ASCII码入栈 WAIT2: MOV AL