单片机实验报告1
单片机实验报告 实验一
数据传送 (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