单片机实验报告1

时间：2020-11-09 12:38:15 来源：蒲公英阅读网 本文已影响人

相关热词搜索：单片机 实验 报告

　单片机实验报告 实验一

　数据传送 (RA Ｍ – 〉ＸＲＡ M)

　一、实验目得

　熟悉星研集成环境软件或熟悉 Keiｌ Ｃ5１集成环境软件得使用方法。

　熟悉 MＣS51 汇编指令,能自己编写简单得程序，掌握数据传输得方法。

　二、实验内容

　1、熟悉星研集成环境软件或熟悉Ｋｅｉl Ｃ51 集成环境软件得安装与使用方法。

　２、编写程序，实现内外部数据段得传送、校验。

　三、程序框图

　开始 堆栈指针初始化计数器、地址初始化内部RAM数据传送外部RAM一次地址指针+1

　 计数器-1=0？计数器、地址指针复位取内部RAM和对应的外部RAM比较是否相等地址指针+1

　计数器-1=0？传送正确传送错误结束NNYYYN数据传送程序框图 四、实验步骤

　MAR 据数部外测检，序程试调式方点断、步单用使;据数入输中ＨF３～ H03 MＡR 部内在ﻩ得 10０0H ~1０0FH 中得内容。熟悉查瞧特殊功能寄存器、内部数据 RＡM、外部数据空间得各种方法. 五、程序清单

　；将内部ＲAＭ Address1 开始得 1６个字节送到外部ＲAＭ从 Aｄdress２开始得单元里,再作比较。

　Adｄress1 ＤAＴＡ 30H

　Address2 XDATＡ １000H

　 ORＧ 00０0H

　 LJＭP STAＲ

　 OＲG 0100H

　STＡR: MOV SP,#6０H

　 ＭＯV Ｒ0，＃Ａddrｅss1

　 MOV DPTR，＃Addrｅss2

　 MＯV R7,#１0H

　STAＲ1: MOV A,R0 ;传送

　 ＭOVX DＰTＲ，A

　 IＮC R0

　 IＮC DPTR

　 DJNZ R7,STAR1

　 MOＶ R０,#Adｄreｓs１

　 MＯＶ DPTＲ,#Addｒeｓｓ２

　 ＭOV R7，＃１０H

　STAＲ2: MOV B，Ｒ0 ；比较

　MOＶX A，DPＴR

　 ＣJＮE A，Ｂ，STAR３

　 ＩNC Ｒ0

　 INC ＤPＴＲ

　 DＪNZ R7，STAR2

　 SJMP ＄ ;传送正确 ＳTAR3: SJＭP $ ;传送错误

　ENＤ

　 实验二

　双字节 D BCD 码( ( 十进制数) ) 加法

　一、实验目得

　熟悉５1 汇编指令,学会使用星研集成环境软件,能自己编写简单得程序,熟悉ＢCD 码,了解如何调用系统提供得子程序. 二、实验内容

　从键盘上输入４位被加数、加数,实现双字节 BCD 码（四位数）得加法,结果显示在数码管上；熟悉使用断点、单步进入、单步、运行到光标处、修改 PC 指针、全速运行等各种调试手段；熟悉查瞧特殊功能寄存器、内部数据ＲAM、外部数据空间得各种方法。

　三、实验框图

　开始初始化堆栈设定"先清LED,再接收键输入"标志通过键盘获得4位被加数(压缩BCD码）置位"接收到第一个键后才清除LED"标志通过键盘获得4位加数(压缩BCD码）被加数与加数的低位字节不带进位加法被加数与加数的高位字节带进位加法十进制调整十进制调整压缩BCD码(结果)转换为非压缩BCD码高位0消隐显示结果双字节BCD加法程序框图

　四、实验步骤

　、１ ：明说线连ﻩD3 区 :ＣLＫ －- B２区:２M D3 区 ：CS -- A3 区:CS5 Ｄ３区 :Ａ0 -— A３区:Ａ０ ２、在 F4 区得键盘上输入 4 位被加数、加数 3、结果显示在 F4 区得数码管上 五、程序清单

　EXＴＲN CＯDＥ（Diｓpｌay８， GｅtBCDKｅy)

　 Buffeｒ ＤAＴA 30H ;8 字节显示缓冲区 F１ BＩT 0Ｄ１H ;PSW、１

　ORG 00０0Ｈ

　 ＬＪMＰ STAＲT

　 ＯRG 0１00H

　START: MOＶ SP，＃6０Ｈ

　 CLR F1 ;先清除显示,再接收键输入 ＳTART1: ＭOＶ R0，＃buffeｒ

　 MOV Ａ，#4 ;按键次数

　LCALL GetＢＣDＫeｙ ;得到双字节十进制数（被加数)

　SEＴＢ F1 ;接收到第一个键，才清除显示

　MOV R0,#buffer＋4

　 ＭOV A，#４ ；按键次数

　LCAＬL GｅtＢＣDKｅｙ ;得到双字节十进制数（加数)

　 MOV Ａ，bｕfｆer+1

　 AＤＤ A,bｕffｅr+5

　 DA A

　 MＯV ｂuffer+5,A

　 MOV Ａ，buffer

　 AＤＤC A，buｆfer+4

　 ＤA Ａ

　 MＯV ｂｕffeｒ+4，A

　 CＬＲ A

　 ＲLＣ A

　Dｉsplay: PUSH ACC ；显示结果

　ＭOＶ R0，#buffeｒ

　 MOＶ A，bｕｆｆｅｒ＋5 ;低位

　ACALL B１toＢ2 ；压缩 BＣD 码转换成非压缩 BCD 码

　MＯＶ A,ｂｕｆfer＋4 ；高位

　ACALL B1ｔoB２

　 POP ＡＣC ；进位

　ACAＬL B1toＢ２

　 MOV R０,#1０H ;最高二位消隐

　INC R0

　 MOV R0,#10H

　 MＯV R0,#bｕfｆeｒ+5

　 MOＶ R7,#5

　 ACALＬ BlaｃkDiｓｐlay ;将高位 0 消隐

　MOV R0,#ｂuｆfer

　 LＣALL Displaｙ8

　 ＳＪMP ＳTART1

　;将一个字节压缩 BＣD 码转换成二个字节非压缩 BCD 码 B１ｔｏB2: PUSH ＡCC

　 ANＬ A，＃0FＨ

　 ＭOＶ Ｒ0,A

　 INC R０

　 ＰOP ＡCＣ

　 ANL A,＃0F0H

　 SWAP A

　 MＯV R0,A

　 IＮC Ｒ0

　 REＴ

　 Bla ｃkDisplay: MOV A，R0 ;将高位０消隐

　JNZ Exit

　 ＭOＶ A,#１0H

　 ＭOＶ R0,A

　 ＤEC Ｒ0

　 DJＮＺ R7,BｌacｋDｉｓpｌａy

　Exit: RＥT

　ＥNＤ

　 实验三

　双字节 D BCD 码（十进制数）减法

　一、实验目得

　熟悉５1 汇编指令,学会使用星研集成环境软件，掌握汇编语言得设计与调试方法.能瞧懂程序流程框图,能自己设计程序，熟悉 BCD 码、补码，了解如何调用系统提供得子程序。

　二、实验内容

　从键盘上输入４位被减数、减数,实现双字节 BCD 码（四位数)得减法,结果显示在数码管上；进一步熟悉使用断点、单步进入、单步、运行到光标处、修改 PＣ指针、全速运行等各种调试手段;熟悉查瞧特殊功能寄存器、内部数据 RＡM、外部数据空间得各种方法。

　三、程序框图

　设定"先清LED,再接收键输入"标志堆栈初始化开始通过键盘获得双字节十进制被减数(压缩BCD码)置位"接收到第一个键后才清除LED"标志通过键盘获得双字节十进制减数(压缩BCD码)减数进行十进制取补双字节十进制加法操作C=1?C=0,有进位(结果为负),再执行一次求补运算,调整为正数高位0消隐,若结果为负,前面加上"-"显示结果YN双字节十进制减法程序框图

　四、实验步骤

　、１ :明说线连ﻩD3 区 :CＬK —— Ｂ２区:２M

　Ｄ3 区 :CS —— A3 区:CS5 D3 区 :Ａ0 —— A3 区：A0 2、在 F4 区得键盘上输入 4 位被减数、减数 ３、结果显示在 F４区得数码管上 五、程序清单

　EXTＲN CODＥ(Ｄｉsplａy8， ＧetBＣDKey)

　 Buｆfer DATA 30H ；8 字节显示缓冲区 F1 BIＴ 0D1H ；PSW、1

　ORG 0000Ｈ

　 LJＭP STARＴ

　 ORG 0100H

　START：

　MOV SP,＃6０H

　 CＬR F１ ;先清除显示,再接收键输入 SＴＡＲＴ1: ＭＯV R0，#buffer

　 MOV A,#4 ;按键次数

　LCALL ＧｅtＢCＤKｅy ;得到双字节十进制数(被减数)

　ＳETB Ｆ1 ；接收到第一个键,才清除显示

　MＯＶ R0，#buffｅｒ+4

　 MOV A，#4 ；按键次数

　LCALL GetBCDＫey ；得到双字节十进制数(减数)

　MOV A，＃9AＨ

　 CLR C

　 ＳUBB A,buffeｒ+5

　 MOV buｆｆeｒ+5，Ａ

　 MＯV A,#９９H

　 ＣLR C

　 SUＢB Ａ,buffｅr+4

　 ＭOV bｕffer＋4，A ；减数取补

　MOV Ａ，bufｆer+1

　 ADＤ A,buffer+5

　 DA Ａ

　 ＭOV bｕｆfｅr+5,A

　 MＯＶ A,buffeｒ

　 ADＤC A,buｆfer＋4

　 DＡ Ａ

　 MＯV buffer＋４，A

　 MOＶ Ｆ０,C ；借位标志

　JC Disｐlay

　 ＭOV A,＃９ＡＨ

　 SUＢB A,ｂuffer＋５

　 ＭOV ｂuｆfer+5,A

　 MOＶ A,＃99H

　 ＳUBB A,buffeｒ＋４

　 XＣH Ａ,buffｅr+５

　 ADD Ａ,＃０0H

　 DA A

　 XＣH A,bufｆer+5

　 ＡDDC A,#00H

　 ＤＡ A

　 ＭＯV buffeｒ＋4,A

　Ｄispｌay：

　ＭOV R0,＃bufｆｅr ；显示结果

　ＭOV A,ｂｕffeｒ＋5 ;低位

　ACALL B1toB2 ;压缩ＢCD 码转换成非压缩 BCD 码

　MOＶ A,bｕｆfer+4 ;高位

　ＡCALL B１toB2

　 MOV Ｒ０,#１0H ；最高四位消隐

　IＮC R0

　 MOV R0,＃10H

　 INＣ R0

　 MOV R0，#１0H

　 INC Ｒ０

　 ＭＯＶ R０,#10H

　 MＯV Ｒ0，＃buffｅr+３

　 ＭＯＶ R7,＃3

　 ACＡＬL ＢlaｃkDｉsplａy ;将高位 0 消隐

　MOV R０,#bｕｆfer

　 LＣAＬＬ Diｓpｌay８

　 SJMP SＴAＲT1

　BlackDi ｓplay：

　ＭＯＶ A,R0 ;将高位 0 消隐

　JNZ Eｘit

　 ＭOV A,＃10Ｈ

　 MOV R０,Ａ

　 ＤEＣ R0

　 DJNZ R7, Ｂ l ａ c ｋDisplａy

　Exiｔ: JB F0，Exit1

　 INC R0

　 ＭOV R0,＃11Ｈ ;负数标志 Ｅxit1: RET

　 B1toB2: PUSH ACC

　ＡNL A,#0FH

　 ＭOV R０,Ａ

　 ＩNC R0

　 ＰOP ACC

　 ＡNＬ A,＃0F0Ｈ

　 SＷAP A

　 MOV Ｒ０,A

　 INC R0

　 RET

　 BlackDispl ａy：

　MOＶ A,R0

　 JＮZ Ｅｘit

　 MOV A，#１0Ｈ

　 MOV R0，A

　 DEC R0

　 ＤＪNZ R7,ＢｌacｋＤisｐｌａy

　Exit：

　RET

　 EＮD

　四 实验四 数制进十转数制进六十节字四ﻩ 四字节十六进制数转十进制数

　一、实验目得

　进一步熟悉５1 汇编指令，了解十六进制数转十进制数得方法. 二、实验内容

　从键盘上输入 8 位十六进制数,实现四字节十六进制数转８位十进制数，并在数码管上显示。注意输入数据必须在０0000000H～0５F０0000H 范围,否则，结果超出８位十进制数，无法正确显示。

　三、程序框图

　初始化堆栈开始设定"先清LED,再接收键输入"标志通过键盘获得4字节十六进制数置位"接收到第一个键后,才清除LED"标志十六进制转十进制子程序显示开始0→R4,R5,R6,R7(用于存放压缩BCD码)32→B(循环次数）CLR

　 C四字节十六进制数带进位左移一位(R4R5R6R7)×2+进位位C→(R4R5R6R7)，同时进行十进制调整主程序 十六进制转十进制子程序NY返回B-1=0？ 四、实验步骤

　、1

　:明说线连ﻩD３区 :CＬK -- B2 区:2M D3 区 ：CS -— A３区:CS5 D３区 :A0 —- A３区:A0 2、在 F４区得键盘上输入 8 位十六进制数 3、结果显示在 F4 区得数码管上 五、程序清单

　 ﻩEXTRＮ COＤE(Ｄｉｓplay８, GeｔKey) Ｂｕffｅr ＤATＡ 30H ；8 字节显示缓冲区 Ｆ１ BIＴ 0D1H ；PSＷ、1

　ORG 0０0０H

　 LJMP SＴARＴ

　 OＲG ０100H

　STARＴ: MＯＶ ＳP，#60Ｈ

　 ＣＬR F１ ；先清除显示,再接收键输入 STARＴ1: MＯＶ Ｒ0,#buffeｒ

　 MOV A,#8 ;按键次数

　LCALL GｅtKey ；得到４字节十六进制数

　SETＢ Ｆ1 ;接收到第一个键后，才清除显示

　MOＶ R0,bｕｆfer

　 ＭＯV R1,buffｅr+１

　 ＭOV R２，buffer＋2

　 ＭOV R3，ｂuffer＋3

　 ACALＬ B4tｏD4 ；转换成十进制数 Disｐlａy: MOV R0,＃buｆｆｅr ;显示结果

　ＭＯV A，Ｒ７ ;低位

　 ACＡLL Ｂ１ｔｏB２ ;压缩ＢCD 码转换成非压缩ＢCD 码

　ＭOV A,R6

　 ＡCAＬＬ B１tｏB2

　 MOV A, R5

　 ＡCALL Ｂ１toB２

　 ＭＯＶ A，R4 ;高位

　Ａ Ｃ Ａ ＬＬ B1tｏＢ2

　 ＭOV R0，#ｂuffｅr＋7

　 MOV R7，＃7

　 ＡＣAＬL ＢｌackＤisplay ；将高位０消隐

　MＯＶ R0,#buffer

　 LCAＬL Diｓｐlａy8

　 SJMP START1

　；四字节十六进制数转十进制数:Ｒ0Ｒ1R2Ｒ３为十六进制,R４R５Ｒ6R７为压缩 BCＤ码 B4ｔoD4:

　ＣLＲ A

　 MＯV R4，A

　 MOV R５，Ａ

　 MOV Ｒ6,A

　 MOＶ Ｒ7，A

　 ＭOＶ B，#32

　ＬOＯP：

　CLＲ C

　 ＭOV A，R3

　 RLＣ Ａ

　 ＭＯＶ R3,Ａ

　 MOＶ A,Ｒ2

　 ＲLＣ A

　 MOV R２，A

　 MOV A，R１

　 RＬC Ａ

　 MOV R1，Ａ

　 MOV Ａ,R0

　 RLC A

　 ＭOV R0,A

　 MＯV A,R7

　 AＤDC Ａ，R７

　 ＤＡ A

　 MOV R7,A

　 MOV A,R6

　 ＡDＤＣ A,Ｒ６

　 ＤＡ A

　 MＯＶ R６,Ａ

　 MOV A,R5

　 ＡDDC A，R５

　 DA A

　 MOV R5,Ａ

　 MＯＶ Ａ,R4

　 AＤDＣ A,R4

　 ＤA A

　 ＭOＶ R4,A

　 DＪNZ Ｂ，LＯOＰ

　 RET

　 B1toＢ2: PUSH ＡCC

　 AＮL A,#0FＨ

　 ＭOV R0，A

　 INC R0

　 POP ACC

　 ANL A，#0Ｆ0H

　 SWAP A

　 MＯV Ｒ0，Ａ

　 IＮC R０

　 RＥT

　 ＢlaｃkDispｌay: ＭOV A,Ｒ０ ；将高位 0 消隐

　JNＺ Exit

　 ＭＯV A,#10H

　 MＯＶ R0，A

　 DEC Ｒ0

　 DJNZ R7, Ｂ lac ｋDisplay

　Exit: RＥT

　 END

　五 实验五 节字双ﻩ 双字节 D BCD 码( ( 十 进制数) ) 乘法

　一、实验目得

　进一步熟悉５1 汇编指令,掌握汇编语言得设计与调试方法.根据程序流程图,自己设计程序,了解如何调用系统提供得子程序。

　二、实验内容

　从键盘上输入 4 位被乘数、乘数，实现四位十进制数得乘法,结果显示在数码管上。

　三、程序框图

　开始初始化堆栈设定"先清LED再接收键输入"标志通过键盘获得4位十进制被乘数转换成二进制数并压栈暂存置位"接收到第一个键后,才清除LED"标志通过键盘获得4位十进制乘数转换成二进制数(R2R3)被乘数出栈(R0R1)双字节十六进制乘法子程序十六进制结果转十进制压缩BCD码转非压缩BCD码将高位0消隐显示双字节BCD乘法程序框图

　(R0)(R1) × (R2)(R3)(R3R1H)(R3R1L)(R3R0H)(R3R0L)(R2R1H)(R2R1L)(R2R0H)(R2R0L)R0

　 R1

　 R2

　 R3+双字节十六进制乘法示意图

　四、实验步骤

　、１

　:明说线连ﻩＤ3 区 :CLK -— Ｂ２区：2M Ｄ3 区 :ＣS -— A３区:CS5 Ｄ３区 :A0 —— A3 区:A０ 2、在Ｆ4 区得键盘上输入 4 位被乘数、乘数 3、结果显示在 F4 区得数码管上 五、程序清单

　 EＸTRN CODE(Dｉsplay8， GｅtBCDＫeｙ）

　Ｂufｆｅr DATA ３０H ；８字节显示缓冲区 F1 BＩT 0Ｄ1H ;PSW、1

　ＯRＧ ０000H

　 LJMP START

　 ORG 010０H

　STAＲＴ: MOV SP,#60Ｈ

　 CLR F1 ;先清除显示，再接收键输入 STＡRＴ1: MOV R0，#buｆｆer

　 ＭOＶ A，#4 ;按键次数

　LＣALL ＧetＢＣＤＫey ;得到双字节十进制数(被乘数)

　ＭOＶ R0，#ｂuffer

　 AＣAＬＬ D4tｏＢ2 ;转换成二进制数

　PＵSＨ ０2H

　 PUＳH 03H

　 SEＴB F１ ；接收到第一个键,才清除显示

　ＭOV R0，#buffeｒ

　 MＯV A,＃４ ;按键次数

　ＬCALL GｅｔBCDKｅｙ ；得到双字节十进制数(乘数)

　MOV R0，#buffeｒ

　 ＡCＡＬL D4tｏB２ ;转换成二进制数

　POP 01H

　 POP 00H

　 ACＡLL WｏrdMｕl ;(Ｒ0R1）＊（R２R3)=R０R１R2R3

　AＣAＬＬ Ｂ4toD4 ;转换成十进制数 Disｐlaｙ: MOV R０，#buffer ；显示结果

　ＭOＶ A，Ｒ7 ；低位

　ACＡLＬ Ｂ1ｔoB２ ;压缩 BＣD 码转换成非压缩 BＣD 码

　MOV Ａ,Ｒ6

　 ACALL B1toB２

　 MOV A, Ｒ5

　 ACALL B1toB2

　 MOＶ A，R４ ；高位

　ACAＬL Ｂ1toB2

　 ＭOV R0，#buｆfeｒ＋7

　 ＭOV R7,#７

　 ACALL BlacｋDispｌａy ；将高位 0 消隐

　MOＶ R0，#buffer

　 ＬＣＡLL Display８

　 SJＭP STAＲＴ1

　;双字节十六进制数乘以双字节十六进制数子程序 WordMul：

　MＯV A,Ｒ3 ; （

　)1R()0Rﻩ MOV B，R１ ;

　×

　 （R2）(R3)

　MUL AＢ ;—- － ---—-———-—— －——————－--———

　ＸＣＨ A,R3 ；

　 (Ｒ3R１H)(Ｒ3Ｒ1L)

　MＯV Ｒ7,Ｂ ;

　 （R3Ｒ0H)(R3R0L)

　MOV B,R0 ;

　 (Ｒ2R1H）(Ｒ２R1L）

　MUL AB ;（Ｒ2R0H)（R2R0L)

　ADD A，R7 ； — － － --——-— －————-—-—----－－————-－——

　MＯV Ｒ7,A ；

　R0

　 R１

　 R2

　 R3

　CLＲ A

　 ADDC A,B

　 XＣH Ａ,R1

　 MOV B，Ｒ２

　 ＭＵＬ AB

　 ＡDD A，R７

　 XCH A,Ｒ2

　 ＰＵSH AＣC

　 MOＶ A,B

　 ADDＣ A,R1

　 MOV Ｒ１，A

　 ＣLR A

　 RLC A

　 XＣH Ａ,R0

　 ＰOP B

　 MUL ＡB

　 AＤD A,Ｒ1

　 ＭOV R1,A

　 MOＶ Ａ,R０

　 ＡＤＤC A,Ｂ

　 MOＶ R０，Ａ

　 REＴ

　 ;双字节十进制数转二进制数 ,R０-—指向双字节十进制数，结果在 R2Ｒ3 中 Ｄ4toＢ２: MOV A,R0

　 ANL A,＃0FH

　 XＣＨ Ａ，R0

　 ANL Ａ,＃0F0H

　 ＳWＡＰ A

　 MOＶ B,＃１0

　 MUL AＢ

　 ADD A，Ｒ０

　 ＩＮC R0

　 MOV B,#10

　 MUL AB

　 ＭＯV R2，B

　 MOＶ R3,A

　 MOV A，R０

　 ＡNL A，#０FH

　 ＸＣＨ A,R0

　 ＡＮL A，#0F０Ｈ

　 SWＡP A

　 ADD A，R3

　 ＸCH Ａ,R2

　 ADDC A，#0

　 MOV B，＃10

　 MUL AB

　 XCH A,Ｒ２

　 MOV B,＃1０

　 MUL ＡＢ

　 ADD A,R０

　 MＯV R３,A

　 ＭOV A，R２

　 ADDC Ａ,B

　 MＯV R2，A

　 ＲET

　 B１toＢ2：

　PUＳＨ ＡCC

　 AＮL Ａ，#0FＨ

　 MOV R0,Ａ

　 IＮC Ｒ0

　 ＰOP ACC

　 ANL Ａ，＃0F０H

　 SＷAP A

　 ＭOV R0，A

　 INC R0

　 RET

　 BlackDisplay: MOＶ A,R０ ;将高位 0 消隐

　JNZ Exｉt

　 MOV A,＃10Ｈ

　 MOV R０，A

　 DＥC R０

　 DJNZ Ｒ７,BlaｃkDｉｓpｌay

　B4ｔoD４：

　ﻩ CLR A

　 MOV R4,A

　 ＭOV R５，A

　 MOV R６,A

　 MOV R7,A

　 MOV B,＃３2

　Eｘｉt: REＴ EＮD 实验六

　双字节ＢC C Ｄ码除于单字节 D BCD 码

　一、实验目得

　进一步熟悉 51 汇编指令,掌握汇编语言得设计与调试方法.自己设计程序，了解如何调用系统提供得子程序。

　二、实验内容

　从键盘上输入 4 位被除数、二位除数，实现双字节 BCＤ码除于单字节ＢＣD 码,结果显示在数码管上。

　三、程序框图

　开始初始化堆栈设定"先清LED,再接收键输入"标志通过键盘获得4位被除数,转换为十六进制数并暂存通过键盘获得单字节除数，转换为16进制数显示子程序置位"接收到第一个键后,才清除LED"标志单字节除法:被除数的高字节除以除数,结果为最终商的高8位双字节除以单字节（商为16位）双字节除以单字节(商只有8位)子程序最终获得结果（16位的商，8位余数）双字节除以单字节(商为16位)子程序循环次数8→R716位被除数(R2,R3)带进位左移一位(最低位补0， C →F0)R2-除数(B)F0=1？C=1？差→R2，R3自加1R7-1=0?双字节除以单字节(商为8位)子程序开始 开始返回返回主程序YYYNNN双字节BCD除法程序框图 四、实验步骤

　 1、连线说明：

　D3 区 :CLＫ —— B2 区：2Ｍ D3 区 ：ＣS -- A３区:ＣＳ5 Ｄ3 区 ：A0 —— A3 区:Ａ0 2、在 F4 区得键盘上输入 4 位被乘数、乘数 3、使用各种手段调试程序 4、结果显示在 F4 区得数码管上 单 五、程序清单 ﻩﻩ

　 ﻩEXＴRＮ ﻩ CODE(Diｓplay８, GetBCDKｅy) Buffｅr DＡTA ３0Ｈ ;8 字节显示缓冲区 F1 BIT 0D１Ｈ ;PSW、1

　ＯRＧ 0000H

　 LJＭP STARＴ

　 OＲG 0１0０Ｈ

　SＴＡRT: MOＶ ﻩ SP,＃60H

　 CLR F1 ;先清除显示,再接收键输入 ＳTAＲT1: MOV R0,＃bｕffer

　 ＭOV A,#4 ;按键次数

　LCALL ＧｅtBＣDＫey ;得到双字节十进制数(被除数)

　SETB F1 ；接收到第一个键,才清除显示

　MＯＶ R0,＃buffer

　 ACＡＬL Ｄ4tｏB２ ;转换成二进制数

　ＭOＶ R0，#ｂuffer

　 MOＶ A,#2

　 LCALL GｅtBCDKey ；得到 1 字节十进制数（除数)

　MＯＶ R0,#bｕfｆｅr

　 ACＡLL D２toB２ ;转换成二进制数

　JNＺ SＴＡRＴ２

　 ACALL DｉsplayＥrrｏr ;除数为０,出错

　SJＭP ＳTARＴ

　ＳＴARＴ２：

　ACALL B2_DIＶ_B1 ;被除数 / 除数

　ACAＬL Dispｌaｙ ；显示商与被除数

　SJＭP STＡRT1

　； 双字节除于单字节,R2R３为 1６位二进制数,B 为除数,商在 R2R３中, 余数在 A 中 B2_DIV_B1：

　PUSＨ B

　 MＯV A,R2

　 ＤＩＶ AB

　 MＯV R2，B

　 ＰOP Ｂ

　 PUＳＨ ＡCC

　 CＡLL ＤIV_B２_Ｂ１

　 ＰOP AＣＣ

　 ＸCH Ａ,R2

　 ＲET

　 ;双字节除于单字节,R2R3 为被除数,Ｂ为除数,结果:商 R3 中，余数在 R２中 DIV_B2＿B1: MＯV Ｒ7，#８ ;双字节除于单字节 DＩV2: CLＲ Ｃ ;R2R3 为被除数,B 为除数,

　MOＶ A，R３ ;结果：商Ｒ3 中，余数在 R2 中

　ＲLC ﻩ A

　 MＯＶ R3,A

　 ＭOＶ A,Ｒ2

　 RLC A

　 MＯV R2,A

　 MＯV F0,Ｃ

　 CLR Ｃ

　 ＳＵBB A,B

　 ＪB F０，ＤIV3

　 JC DＩＶ4

　DIV３: ＭOV R2,A

　 ＩＮＣ ﻩ R3

　DIV4: DＪNZ R７，DＩＶ2

　 RET

　 ;4 字节二进制数转十进制数,R2R3 为 1６位二进制数,R4R５R６为压缩ＢＣD 码 B２toD5：

　CLＲ

　Ａ

　 MOV R４,A ;

　MOV Ｒ5,A

　 ＭOＶ Ｒ6，A

　 ＭOＶ R7，＃16

　LOOP：

　ＣLR ﻩ C

　 MOV A,R３

　 RLC ﻩ A

　 MOV R3,A

　 MＯＶ A，R2

　 RＬＣ ﻩ A

　 MＯV Ｒ２，Ａ

　 MＯＶ A,R6

　 ADDC A,R6

　 DA ﻩ Ａ

　 ＭOV R6，A

　 MOV A,R5

　 ADＤＣ A，Ｒ5

　 DA ﻩ Ａ

　 ＭOV R５,A

　 MOV Ａ，R4

　 ＡDDC

　Ａ,R4

　 DＡ ﻩ A

　 MＯV R4，A

　 DＪNＺ Ｒ７,ＬOＯP

　 ＲET

　 Ｄ2toB2: MOV A,Ｒ0 ；1 字节十进制数转二进制数

　ANＬ A,#０FH ；Ｒ０——指向 1 字节十进制数,结果在Ｂ中

　XCH A，R０

　 ANL A，＃0F0Ｈ

　 ＳＷAP Ａ

　 MＯV B,#1０

　 MUL AB

　 ＡDD A，R０ ；转换成二进制数

　MＯＶ B,A

　 RＥT

　 Ｄｉsplaｙ：

　ＰUSH ACＣ ;商在低四位,余数在高三位

　AＣＡLL B2toD５ ;二进制数转十进制数

　MＯV R0,＃buffer

　 MOV Ａ，R６

　 ACALＬ B1toB2 ;压缩ＢCＤ码转换成非压缩 BCD 码

　ＭＯV A，R5

　 ＡCALL B１toＢ2

　 ＤＥC R０

　 MOV R７,＃3

　 ACALＬ BlaｃkＤｉsplａy ;将高位０消隐

　MOV bｕffｅr＋4,#10H ；消隐

　 MOV R0，＃buffｅｒ＋7

　 POＰ ﻩ ＡCC

　 MOＶ

　B,＃１00

　 ＤIV ﻩ AＢ

　 MOＶ R0，Ａ

　 DＥC R0

　 MＯV Ａ,B

　 MOＶ Ｂ，#1０

　 DIV ﻩ AB

　 ＭOＶ R0，A

　 DEC R0

　 MOＶ Ｒ０，B

　 MOＶ R0，#ｂuｆfer+7

　 MOV R7，＃2

　 ACＡLL BｌａckDispｌay ；将高位 0 消隐

　ＭＯV R0,#bｕｆfeｒ

　 LＣALL Ｄisplay８

　 ＲET

　 Displa ｙ E ｒror：

　MOV

　R0,#buffｅr

　 MOV Ｒ7，＃8

　 MＯＶ A,#0ＦH

　DisｐlayEｒrｏr1：

　MＯV ﻩ R０，A

　 INC ﻩ R0

　 DJＮZ R７，ＤｉｓｐlayＥrrｏr1

　 MOV Ｒ0，＃buffｅr

　 ＬCALL Dispｌａy8

　 RＥT

　 D4ｔoB2：

　MOＶ A，R0

　 ANL A,＃０ＦH

　 ＸＣH A，R０

　 ANＬ A，＃０F0H

　 SWAP A

　 MOV B，#10

　 ＭＵL AＢ

　 ADD A,R0

　 ＩNC Ｒ０

　 MＯV Ｂ,#1０

　 MUＬ AB

　 MOV R2,B

　 MOV R3,A

　 MＯV A,R0

　 ＡNL A,#0FH

　 XCH Ａ,R０

　 ＡNL A,#0F０H

　 SＷAP Ａ

　 ADD A,R３

　 ＸCH A,R2

　 ＡDＤC Ａ，#０

　 MOV Ｂ，＃10

　 MUL AB

　 XＣH A,R2

　 MOＶ Ｂ,#10

　 MUＬ AB

　 ADD A,R0

　 MOV R3，A

　 MOV A,R2

　 AＤDC A,B

　 ＭOV R２,Ａ

　 RET

　 B1toＢ２：

　PUSＨ ＡCC

　 AＮＬ Ａ,＃0ＦH

　 MOV Ｒ0,A

　 IＮＣ Ｒ0

　 PＯP ACＣ

　 ANL A,#０Ｆ0H

　 SWAＰ A

　 MOV R0,A

　 IＮＣ R0

　 REＴ

　 Blac ｋ Ｄ i ｓplay：

　MOＶ A，R0 ；将高位０消隐

　JNZ Exit

　 MOＶ A，#10H

　 MＯＶ R０,Ａ

　 DEC R0

　 DＪＮＺ Ｒ 7 ， Bl ａ ckD ｉsplaｙ

　END

　实验八

　冒泡排序

　一、实验目得

　熟悉使用 MCS51 指令,掌握汇编语言得设计与调试方法,了解如何使用高效方法对数据排序． 二、实验内容

　。列排新重大到小从据数组一将法泡冒用使求要,序程序排个一试调并写编ﻩ

　三、程 序框图

　开始初始化堆栈将待排序数组转移到内部30H开始的RAM中数据数-1→R7，数据交换标志bSort=0

　PUSH

　07H被比较数地址R0=30H比较数地址R1=R0+1DEC

　 R7@R0>@R1?@R0与@R1互换1→bSortINC R0INC R1POP R7R7=R7-1 R7=0?bSort=0?结束NNNYYY冒泡排序程序框图 四、实验步骤

　 。列排序顺得大到小从按否是就据数中 HF3~H03 ＭAＲ部内查检,序程试调式方点断用使ﻩ单 五、程序清单 ﻩ ﻩbSｏrｔ BIＴ F0

　 OＲＧ 0000Ｈ

　 LＪMＰ ＳTAR

　 ＯRG 010０H

　STＡR: MOV SP,＃60H ；堆栈

　MOV R0,#30H ；存放待排序数据得首地址

　MＯV R7，＃16 ；数据个数

　MOV DPTR，#TAＢ＿１

　ＳTAR1：

　ＣLR A

　 ＭOVＣ A，A＋DＰＴR

　 ＭOＶ Ｒ０，Ａ ;将数据移入内部 RAＭ中

　INC R0

　 IＮC DPTR

　 DＪNＺ R7,SＴAR1

　 MＯＶ R７，＃１６-1 ;存放比较次数 STAR2: PUSH ０７Ｈ

　 ＭOＶ R0,＃３0H ；存放启始地址

　CLR bSort

　 MOV R1，00H

　 INＣ R１

　 MＯV A，R0

　STＡR3：

　ＭOＶ Ｂ，A

　 MOV A,R1

　 CJNE A，B，$+3

　 JNＣ

　SＴＡR5

　 XＣH A，R0

　 ＭＯＶ R1，Ａ

　 SEＴB ｂＳorｔ

　ＳＴＡR５: INC R０

　 INＣ R1

　 DJNZ R7,STAＲ3

　 POP 07Ｈ

　 ＪNB bSorｔ,Ｅｘiｔ

　 ＤEＣ R7

　 ＳJMP SＴAR２

　Exit:

　SJMP $

　TAB＿1：

　DB 0Ｈ，5Ｈ，6Ｈ,3H,8H，９2H，0４H，57Ｈ,４6H，０1H,０FＦH,0A0H,45H，99H,55H，66H

　END