资源描述：
《单片机双字节BCD码乘法.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、集美大学计算机工程学院实验报告课程名称单片机应用技术实验名称双字节BCD码乘法以及数据排序实验实验类型设计型学号日期地点成绩教师评语：1.实验目的与要求1.进一步熟悉51汇编指令，掌握汇编语言的设计和调试方法。2.设计十进制乘法程序，了解如何调用系统提供的置数码显示，键盘输入子程序。3.熟悉如何高效方法对数据排序2.实验设备STAR系列实验仪、PC机、星研集成软件环境3.实验容1.从键盘上输入4位被乘数，乘数，实现4位十进制数的乘法，结果显示在数码管上。2.调试状态下借助星研集成软件直接修改RAM30H-3
2、FH的单元，数值任意，然后对其排序，检查排序结果。4.实验硬件电路及接线E5区：A0——A3区：A0E5区：A、B、C、D——G5区：A、B、C、D5，程序流程图6，程序源代码EXTRNCODE(DISPLAY8,GETBCDKEY)BUFFER1DATA30H;键盘输入缓冲区BUFFER2DATA40H;8字节显示缓冲区BUFFER3DATA50H;结果地址BUFFER4DATA60H;栈缓冲区ORG0000HLJMPMAINORG0100HMAIN:CLRPSW.1MOVR0,#BUFFER1MOVA,
3、#04HLCALLGetBCDKeyMOVR0,#BUFFER4+3MOVA,BUFFER1LCALLDECOMPDECR0MOVA,BUFFER1+1LCALLDECOMPMOVR0,#BUFFER4+3LCALLBCD2BMOVR6,BUFFER3;BUFFER3为低4位MOVR7,BUFFER3+1;BUFFER3+1为高4位CLRPSW.1MOVR0,#BUFFER1MOVA,#04HLCALLGetBCDKeyMOVR0,#BUFFER4+3MOVA,BUFFER1LCALLDECOMPDECR0
4、MOVA,BUFFER1+1LCALLDECOMPMOVR0,#BUFFER4+3LCALLBCD2BMOVR5,BUFFER3+1MOVR4,BUFFER3MOVR0,#BUFFER3LCALLMLTYMOVR3,BUFFER3MOVR2,BUFFER3+1MOVR1,BUFFER3+2MOVR0,BUFFER3+3LCALLB2BCDMOVR0,#BUFFER2+7MOVA,R4LCALLDECOMPDECR0MOVA,R5LCALLDECOMPDECR0MOVA,R6LCALLDECOMPDECR0M
5、OVA,R7LCALLDECOMPMOVR0,#BUFFER2+7CLRCMOVA,R0SUBBA,#00JNZSHOWMOVBUFFER2+7,#10HSHOW:MOVR0,#BUFFER2LCALLDISPLAY8SJMP$DECOMP:;A中压缩BCD码转化成非压缩BCD码，结果存放在R0结束的两个字节，高位放H位BCD低位放L位BCDPUSHACCSWAPAANLA,#0FHMOVR0,APOPACCANLA,#0FHDECR0MOVR0,ARETBCD2B:;R0结束的4位BCD码转化成二进制存在
6、BUFFER3开始的两个字节MOVBUFFER3,#00HMOVBUFFER3+1,#00HMOVR3,#4;四个字节LOOP:CLRCMOVA,BUFFER3RLCAMOVBUFFER3,AMOVBUFFER3+2,AMOVA,BUFFER3+1RLCAMOVBUFFER3+1,A;结果左移一位MOVBUFFER3+3,AMOVR2,#2LOOP1:CLRCMOVA,BUFFER3RLCAMOVBUFFER3,AMOVA,BUFFER3+1RLCAMOVBUFFER3+1,A;结果左移一位DJNZR2,L
7、OOP1;整体左移2位CLRCMOVA,BUFFER3+2;取移一位的值ADDA,BUFFER3MOVBUFFER3,AMOVA,BUFFER3+3ADDCA,BUFFER3+1MOVBUFFER3+1,A;结果*10MOVA,R0;先取12的1后取2DECR0CLRCADDA,BUFFER3MOVBUFFER3,AMOVA,#00HADDCA,BUFFER3+1MOVBUFFER3+1,A;结果*10+1DJNZR3,LOOPRETMLTY:MOVA,R6MOVB,R4MULABMOVR0,AMOVR3,
8、BMOVA,R7MOVB,R4MULABADDA,R3MOVR3,AMOVA,BADDCA,#00HMOVR2,AMOVA,R6MOVB,R5MULABADDA,R3INCR0MOVR0,AMOVA,R2ADDCA,BMOVR2,AMOVR1,#00HJNCNEXTINCR1NEXT:MOVA,R7MOVB,R5MULABADDA,R2INCR0MOVR0,AMOVA,BADDCA,R1INCR0MOVR0,AR
