ORL A, 7BH MOV 21H, A CJNE A, #60H,LE15 LE15: JNC LE24 MOV A, 7EH SWAP A ORL A, 7DH MOV 20H, A CJNE A, #24H,LE21 LE21: JNC LE24 RET
;--------------------------------- LE24: CLR 8CH LJMP CHK00
;-------------------------------- END
实验十一 二进制转换到BCD
一、实验目的
将给定的一个二进制数，转换成二进制编码的十进制（BCD）码。
二、实验内容
掌握简单的数值转换算法，基本了解数值的各种表达方法。
三、程序框图
四、实验过程
本程序中需要转换的二进制数为F4H。由于八位内存存储的最大数据为FFH即十进制
-21-
的255，故所转换的十进制数只有百位、十位和个位。百位的BCD码即待转换二进制数除以100得到的商，余数保存；用余数除以10得到十位BCD码，所得余数即为个位BCD码。将转换后BCD码三位装入20H-22H内存即可。
五、实验结果及分析
0020H-0022H单元中中存放的244即为二进制数F4H转换后得到的BCD码。
六、实验源程序
;待调整数A=0F4H
ORG 0000H LJMP MAIN ORG 100H
MAIN:CLR A
MOV R5,A MOV R6,A MOV A,#0F4H MOV B,#64H DIV AB MOV 20H,A MOV A,B MOV B,#0AH DIV AB MOV 21H,A MOV 22H,B SJMP $ END
实验十四 键盘扫描显示实验
一、实验要求
在上一个实验的基础上，利用实验系统提供的键盘扫描电路和显示电路，做一个扫描键盘和数码显示实验，把按键输入的键码在六位数码管上显示出来。
实验程序可分成三个模块。
-22-
①键输入模块：扫描键盘、读取一次键盘并将键值存入键值缓冲单元。 ②显示模块：将显示单元的内容在显示器上动态显示。 ③主程序：调用键输入模块和显示模块。
二、实验目的
⑴掌握键盘和显示器的接口方法和编程方法。 ⑵掌握键盘扫描和LED八段码显示器的工作原理。
三、实验说明
本实验系统自带一个8×4的键盘，在判断有键按下后，要有一定的延时，防止键盘抖动。
四、程序框图
五、实验步骤
1、在联机状态下，编译、连接、下载、连续运行PH51\\se14.asm，利用实验系统的显示设备、键盘实现按键的输入并送至显示设备输出。
2、按“暂停图标”，系统无条件退出该程序运行返回监控状态。
六、实验源程序
********************************************** ; MCS-51系列单片机仿真实验系统 软件实验项目 ; 键盘扫描显示实验
;********************************************** OUTBIT equ 0ffddh ;位控制口/键扫口 OUTSEG equ 0ffdch ;段控制口 IN equ 0ffdeh ;键盘读入口 LedBuf equ 60h ;显示缓冲
org 0 Start:
-23-
mov sp,#40h
mov LedBuf+0,#0c2h ;显示\ mov LedBuf+1,#0a3h mov LedBuf+2,#0a3h mov LedBuf+3,#0a1h mov LedBuf+4,#0ffh mov LedBuf+5,#0ffh MLoop:
call DisplayLED call GetKey jb acc.5,MLoop jb acc.4,MLoop
anl a,#00001111b mov dptr,#LedMap movc a,@a+dptr mov LedBuf+5,a sjmp MLoop
Delay: mov r7,#0 DelayLoop:
djnz r7,DelayLoop djnz r6,DelayLoop ret
DisplayLED:
mov r0,#LedBuf
mov r1,#6 mov r2,#00100000b Loop:
mov dptr,#OUTBIT mov a,#0
movx @dptr,a
mov a,@r0 mov dptr,#OUTSEG movx @dptr,a
;显示
;扫描键盘并读取键值;显示键码 ;延时子程序 ;共6个八段管 ;从左边开始显示 ;关所有八段管 -24-
mov dptr,#OUTBIT mov a,r2
movx @dptr,a ;显示一位八段管
mov r6,#1 call Delay
mov a,r2 rr a mov r2,a
inc r0
djnz r1,Loop
ret GetKey:
call ScanKey mov r4,a mov r1,#48h mov a,@r1 mov r2,a inc r1 mov a,@r1 mov r3,a mov a,r4 xrl a,r3 mov r3,04h mov r4,02h jz Key1 mov r2,#88h mov r4,#88h Key1: dec r4 mov a,r4 xrl a,#82h jz Key2
;显示下一位 -25-