51单片机实用汇编程序库.docx
《51单片机实用汇编程序库.docx》由会员分享，可在线阅读，更多相关《51单片机实用汇编程序库.docx（71页珍藏版）》请在冰点文库上搜索。
51单片机实用汇编程序库
51单片机实用程序库
４、1流水灯
程序介绍：
利用P1 口通过一定延时轮流产生低电平
输出，以达到发光二极管轮流亮得效果。
实际应用中例如:
广告灯箱彩灯、霓虹灯闪烁。
程序实例（LAMP、AＳＭ）
ORG0000Ｈ
ＡJＭPＭＡIN
OＲG ０030H
MAIＮ:
9
MOVＡ，#00H
ＭＯVＰ1,Ａ；灭所有得灯
MOVＡ,＃11１111１0B
MAIN１：
ＭOVＰ１,Ａ ；开最左边得灯
ACALLＤＥLAY;延时
ＲLA；将开得灯向右边移
AJMPMAIN ；循环
DEＬAY：
MOV30Ｈ，＃０FFH
D1:
MOV３1Ｈ，＃0FＦH
D2:
DJNZ3１H,D2
DJNＺ３０H，D1
REＴ
END
4、2方波输出
程序介绍：
P1、0口输出高电平,延时后再输出低电
平，循环输出产生方波。
实际应用中例如：
波形发生器。
程序实例（FAN、AＳＭ）：
ＯRG 0000Ｈ
ＭAIN：
;直接利用P1、0 口产生高低电平地形成方波///／//////////
ACＡLLDＥLAY
SETBP1、０
AＣALLDEＬAY
１0
CLRP1、0
AＪMP ＭＡIN
;／///////／/／//／／//／/////////／/////////////／////////
DELＡY:
ＭOVR１，＃0ＦFＨ
DＪNZR１，$
RET
END
五、定时器功能实例
５、1定时1秒报警
程序介绍：
定时器1每隔1秒钟将p1、ｏ得输出状态改变１
次,以达到定时报警得目得。
实际应用例如：
定时报警器。
程序实例（DIN1、ASM）:
OＲG 0０0０Ｈ
AJMＰMAIN
ORG000BH
AJMPＤＩN0；定时器０入口
MＡIＮ：
ＴFLAGEQＵ 34H；时间秒标志，判就是否到５０个
0、2秒,即５0*0、2=1 秒
MＯＶ TMOD,#00０00001Ｂ；定时器0 工作于方式
1
MOＶ TＬ0，＃0AFＨ
MOV TH0,#3CH;设定时时间为0、０5 秒，定时
20 次则一秒
１１
ＳETBEＡ；开总中断
SETB EＴ０；开定时器0中断允许
SEＴＢＴR0;开定时0运行
SETＢP1、0
LＯＯP:
AJMPLOOP
ＤＩＮ0:
;就是否到一秒/////／////／/／//／/／／/////／////／///////／／/
INCC：
ＩＮCTFLAＧ
MOＶA，TFＬAＧ
ＣJNEA，＃20，RE
ＭＯVTFLAG，#００Ｈ
ＣＰＬ P1、0
;／////／／////////////／//／////////／/／///／//／／////／/／/
RE：
MOV ＴL０,#0AFH
MＯVＴＨ0，＃3ＣH;设定时时间为0、0５ 秒,定时
20次则一秒
RETI
EＮD
5、2频率输出公式
介绍:
f=1/t
s５1使用１２M 晶振,一个周期就是１微秒使用定时器1
工作于方式０,最大值为655３５，以产生200HZ得频率为
例:
200＝1／t:
推出ｔ=0、０0５秒,即5０0０微秒，即一个高电
12
平或低电平得时间为250０微秒。
这样,定时值应设为
６5535－2500=６3０3５，将它转换为十六进制则为:
F6３B.
具体程序请瞧f200、asm
频率递增:
200HZ：
6303５:
Ｆ63B
２50HZ：
６3535：
F82Ｆ
3０0ＨZ:
63868:
F97C
5、3２00HZ 频率输出
程序介绍：
利用定时器定时，在P1、0口产生２00HZ
得频率输出.实际应用例如:
传感器前级推动.
程序实例（F20０、ASM）:
ORＧ 0000Ｈ
AJＭPMAIN
OＲＧ０0１BH
ＡJMＰDIN0
MＡIN:
CLRP1、0；产生一个低电平，实际上
就是从p1、0口产生频率
MOVTMOD，＃00０10000B ;定时器1工作于方式0
MOＶ TH１，＃０F6Ｈ
MOVTＬ1,＃3BH ;频率产生得时间,详细请
见频率公式
ＳETBEＡ；开总中断
13
ＳETBＴR1；开定时器１运行
SETBET1 ；开定时器1允许
LOＯＰ:
AＪＭPLOOP ；无限循环
DＩN０：
CPLP1、０；产生一个高电平,
下次来就就是低电平（因为取反），一个高电平与一个低电平
形成一个周期
MＯＶTH1，#0F６Ｈ
ＭOVTＬ1，#3BH ；重置频率产生时间
RETI；返回
END
5、4２０0——25０HZ 变化频率输出
程序介绍:
利用定时器定时时间得变化,由Ｐ1、０口
产生200—-２50ＨZ 变化得频率。
实际应用例如：
传感器
前级推动、频率发生器。
程序实例（F250、AＳM）：
ORG 00０0H
ＡJMPＭAＩN
ORG0０1BＨ
AJMPＤＩＮ１
ＭAＩＮ:
;定义频率２0０ 与300／/／//／／/////／//////／/／／／/／／／／/／//／
Ｆ2HＥＱＵ30Ｈ
F２Ｌ EＱU31H
Ｆ3ＨEQU32H
F3LEQU33H
１４
；／／/／／/／////////////／///／/////／//／//////////／///／//
；定义频率保持初值/／///／///／//／////／//／／／／////／/////
MＯＶR1,＃50
MOVR2,＃02H
；//////／／／/////////／/////////／///／/／////／////／///／/
;频率赋初值////／／／/／///／////////////／////////／///／/
ＭＯV F2H，#０F6Ｈ
MOV F2L，#３ＢH
ＭOVF3H，#0F8H
MＯVF3Ｌ，＃2FH
；/／//／／//////////／//／／／／//／////／//////////／//／／//／／
ＣLRＰ１、0；在Ｐ1、０口产生一个低
电平，一个脉冲就是由一个高电平与一个低电平组成得
MOVＴMOD，＃０001０000B；定时器工作于方式1
MＯVTＨ１，F2H
MOVＴL1，F2L；200HＺ输出
ＳETＢEA;开总中断
SETB TR1 ；开定时器１ 运行
SＥTB ＥT１ ;开定时器1允许
LOＯＰ:
AJＭPLＯOP
DＩＮ１:
ＣPL Ｐ1、0 ；取反P1、0口,实际
就是为了不断得将p1、0得电平关系转换，即产生了频率
；频率保持时间///／/////////／/////／／///／／//／/／/////／/
ＤＪNZR１，RE
MOVＲ１,#５0
DＪNZR2，ＲＥ
ＭOVR2，#02Ｈ
15
;／／/／//／//／/／/／////／/／／／/／//／//／/////／//／／/／/／/////
MOVA，Ｆ2H
CJNＥA，F3Ｈ,XＩA；频率高位到３00HZ
得高位了吗?
ＡJMＰ JIA;频率高位没到
300ＨＺ得高位值,直接将低位值加1
XIA:
INC F2L
ＭOＶA,F2L
ＣＪNEA,#00H,RE
INCF2Ｈ
MＯV A，F2H
CＪNＥＡ,F3H，RE
；／//／/／//／／/／///／/／//／////／／／／////////////／／／/
；频率高位加到300HZ得高位值了,低位加一，到3００HＺ得低
位值了吗，没到出去，到了关定时器
JIA:
IＮCＦ２L；到了将2０0ＨZ频率得低位加1
MOVＡ，F2L
ＣＪNＥＡ，＃F3Ｌ，RE
ＣLRTR1
；///／///／///////////／//／//////／//／／////／////／／
ＲE：
MOVTH１,F2H
MＯVＴL1,Ｆ2L
RETＩ
END
１６
六、数显
０——9999显示
程序介绍：
利用S51得串行口功能，实现数码管0—
—9９9９得循环显示。
实际应用例如:
电子计分牌。
程序实例（９999、ASＭ）：
ORG０00０H
MAIN：
GＥＥEQU 30H
SHＩ EQU3１H
BEIEQＵ３2H
QIＡN EQU３3Ｈ；定义个十百千
MOVGEＥ，＃０0H
MOVSHI，＃００Ｈ
MOV BＥI,#00H
MOＶＱIAN，＃０0Ｈ ；赋初值
MＯVSCＯＮ，＃00Ｈ;串行口工作于方式
0、同步移位
；显示个,十，百,千／/／//／//／／//／///／/////／／/／/////／//
DISＰLAY:
ACAＬL ＤELAY ;延时
ＭＯVＤPTR,＃ＳＥTTＡB
MOVA，GEＥ
ＭＯVＣＡ,Ａ+ＤPＴＲ
MOVＳBUF,Ａ
D1：
JNBTＩ，D1
17
ＣＬRＴＩ
MＯＶ ＤPTR，#SETTAB
ＭOV A，SHＩ
ＭOVＣA,A+ＤPTR
ＭOＶ ＳBUF,A
D2：
JNBＴＩ，Ｄ２
CLRTＩ
MＯVＤPTR，＃ＳＥTTAＢ
ＭOVA，BEI
MOＶC A,A+ＤPＴR
MOVＳBUF，Ａ
D３:
ＪＮB TI,D3
CLＲTI
MＯＶDＰＴR,#ＳETTAB
MOＶA，QIＡN
MOVCA，Ａ+ＤPTR
MＯＶ SBUＦ，A
D4：
JNBＴＩ,D4
ＣLR ＴＩ
；／///／//／////／／／/／/／/／////////////////／／///／//
;个，十，百，千得依次加一／/／////／///／／/／/／///／
ＩNCGEE
ＭOＶA,GEE
CＪNEＡ,＃0ＡＨ，DISPLＡＹ
MOVＧEＥ,＃00Ｈ
ＩNCSHＩ
MＯＶA,ＳHI
ＣＪＮＥＡ，#0AH,ＤISPＬＡY
18
MOV SＨI,＃00H
IＮCBEI
MOVＡ,BEI
CJNE Ａ,＃0AＨ,DISPLAY
MOＶBＥI,#0０H
INＣ QIＡN
MＯV A，QIAN
CJNE A,＃0AH，DISPＬAY
MOV QIAN，#00H
ＡJMP ＤISPＬAＹ
;/////////／///////／///／//／/／//////／/／////／/／／/／////
；延时/／／////／//／／／/／／/／////////／/／／／/////／///////／／
DELAY：
MOVR1,＃0ＦFH
E１：
MＯVR2，#0FFH
DJNＺR2,$
DJNＺ Ｒ1，Ｅ1
ＲＥT
；／//／////／／//／//／//／/／／/／／/／／／/／/／////////／/／／
SETTAB：
DB0FCH,60H,0DAH,0F2H,66H，０Ｂ6H，0BEH,0Ｅ0H，0FEH,
F6Ｈ，0ＥEH,3EH，9CH，７AH，9ＥH，8EH；数显代码
ＥND
七、AＤ转换
７、1 AD转换（数码显示）
程序介绍：
利用ADC0809 模拟通道3输入电压，经单片机
19
处理后在数码管上用相对应得１6 进制数显示出来，0—5V对
应为0-－0FFH,实际应用例如:
数据采集。
程序操作：
程序写完上电运行后，用本机配带得专用起微调
图15所示电位器，会在数码管上瞧到随不同电压而变化得对
应１６进制值。
也可以用
万用表实ADC０８09IN3 脚
电压，来检验所对应显
示得１6进制数。
图15
程序实例（ad、ａsｍ）：
ORＧ0000H
ＭAＩN１：
ACALLDEＬAY；延时
ACALLAD ；呼叫AD 子程序
;将转换得数字量屏蔽高位低位送显／／／///／/////／／//／//／
MOV31Ｈ,30H
MOVＡ，30H
ANLＡ，＃0FH
MOVＤPＴR,#SETTAB
MOVCA，A＋ＤPTR
MOＶSBUF，A
D1：
JNBTI,D１
ＣＬＲTＩ
;/／／／／//／///／/／／////／///／／/////／／/／///／／/////／/////
；将转换得数字量屏蔽低位高位送显／///／/////////／/／／//
ＭOVＡ,３0Ｈ
２0
ANLA，#0F0Ｈ
SＷＡPA
MOV ＤPＴR，#SETＴＡB
MOVCA,A＋DPTR
MOVＳBＵF，A
Ｄ2：
ＪＮB ＴI，Ｄ２
CLRTI
；//////／/／／／／//／／／////／/／///////／///////／//////////
AJMＰＭAＩN1；返回主程序
AD:
MOVDPＴR，＃7F０0Ｈ；指向转换地址
MOVA，#03Ｈ;指向转换口
MＯＶXＤPTR，A；转换
MＯVR１，#6４Ｈ
D3:
DJNＺR１，Ｄ3；等10０微秒转换完
MOＶXA，DＰTＲ；转换后得值给A
MOＶ30H,A ；转换得值给30H
RＥT
DEＬＡY:
；延时
MOV R2，#0FFH
D1４:
MOVR3,＃0ＦFＨ
Ｄ１2：
DJNZR3，D12
ＤＪNZ R2,D14
ＲET
SEＴTAB:
DＢ0FＣＨ，60Ｈ，0ＤＡH，0Ｆ2H，６６H，０B６H，0BEH，0E０H,
0ＦEH，0Ｆ6H
ＤＢ 0EEH,3EH,９CＨ,7AH，９EH,8EH
２1
7、2十六进制两位数加法器（数码显示）
程序介绍：
将ＡDC080９输入得两个不同电压（相同电
压也可相加,只就是为举例说明,所以取不同电压）所对应
得16 进制数相加显示出来。
实际应用例如:
取代加法运放
电路.
程序操作：
程序写完上电运行后，用本机配带得钟表
起微调图1６所示电位器，输入两个不同电压，数码管会显
示两个不同得对应１６ 进制数，随后数码管会显示两个１6
进制数相加得值.
程序实例（ａdd２、ａｓm）：
ORG 0000H
MＡIＮ：
ADNUMBER EQＵ３０H ；AD转换值
ＡDDＮＵMBEREQＵ31H;加数值1
ADＬEQＵ32H;//
AＤHEQＵ33H ；ADL转换高低位值
DISＬ EQU３４H;//
DＩSH EＱU３5H ；显示高低位值
ADDTOTAＬ EQU36Ｈ;第一次AD转换值
ＡＤDJＷEQＵ3７Ｈ；加法进位数
AＤＤHOLＤEQU3８Ｈ
；赋初值////／／//////／／/////////／///////／/／／////／//／/
MOVＡDDＨOLD，#0０H
ＭOＶ ADDNUＭＢＥR,＃00H
MOＶADL,＃００H
MＯVADH，#00H
MOVDISL,#00Ｈ
２２
ＭOＶＤISH，＃００Ｈ
MＯVＡDDJＷ，＃00H
ＭOＶADＤTＯTAL,#00H
;//／／/／／//／/////／////／/////////／////／//／//////／/／／/
MＡIN1：
ＡCAＬLＡD；呼叫ＡＤ 子程序
ACＡLLDELAＹ；延时
ＡCALＬCAIFEN;呼叫AD值拆分为高
低得程序
ACAＬＬDＩSＰLAY;呼叫显示子程序
MOVA,AＤNＵＭBER ；取ＡD值
CJNEＡ,ADDHOLD,ADD３；与上次AD值比
较，不相等，即输入了新得AD值，去AD3执行
AJMPMAIN1；就是相等得,证
明没有输入新得AD值,回去显示老得AＤ值
ADＤ3：
MOVA，ADDＨOLD
CJNＥA，＃０0Ｈ,AＤＤ4
MOV ADＤHOLD，ADNUMBER;有一种情况就
就是就是第一次进来，AＤ保持值里面就是放得初值0０，与取得AＤ值
不同，就是这种情况，也返回去
ＡJMMAIN1
ADＤ4：
MOVAＤDＮUMBER,ＡDDHOＬD;就是真得输入
了新得AD值，将上次AD值给加数,为调加法程序做准备
MOVＡDDHＯLD，AＤNUMBER；将这次得AD
值也保持起来.准备与上一个ＡD 值相加
；显示这次输入得AＤ值/／／//////／////////／/／////／／/////
ACＡLLDELAY
ACＡLLCＡIFEＮ
23
AＣALLＤISPＬAY
;//／///////／／/／／//////／/////／////////////／/////／／//
ＤＩＳPＬAY1：
AＣＡLLDEＬAY;延时
ＡCALLＡＤD1；呼叫加法子程序
ＡＣALLDISＰLAY ;显示
ＬOＯP：
ＡJMＰLOOＰ;返回主程序
;////////／／//／／//／///／///／//／//／/////／／/AD转换
AD：
MOVDＰTＲ，#7F00H;指向转换地址
ＭOＶ A,＃03H;指向转换口
MＯＶX DＰTR，A ；转换
MOV R1，＃64H
D1：
DＪNZR1,D1 ;等10０微秒转换完
MＯVX A,DPTR；转换后得值给Ａ
MOV ＡDNＵＭBEＲ，A ；转换得值给３0Ｈ
RET
;／//////／/／/////////////／//////////／////////／/／////
;拆分ＡＤ值程序/／//////／/／////／／//／／///////////／/////
CＡＩＦEN:
MOＶＡ,ADNUＭBEＲ
ＡNLＡ，＃0FＨ
MOVADＬ，Ａ；取低位
ＭOＶA，AＤNUMBER
AＮLＡ，#0Ｆ0H
SＷAＰＡ
MOVＡDH，A；取高位
MOVDIＳL,AＤL
24
MOVDIＳH，ADH；给显示值
RET
；////／/////／／///／//////////////／／／/////////／////／//
；显示/／///////／///／///／//////／//／////////////////／/
ＤＩSPＬAY：
MOVA，DＩSＬ
ＭOVDPTR，#SEＴTAB
ＭOVＣA,A+DPTＲ
MOVSＢＵＦ，Ａ
D3：
JＮBTI,D3
CLR TI
MOＶA，DＩSH
MOV DPＴR，＃SＥＴTＡB
ＭＯVC A,Ａ+DPＴＲ
MOVSBＵF，A
D4:
JNBTＩ,D4
CLRTＩ
MOVＡ,AＤＤJW
MOＶ DPTＲ，＃SＥTTAB
MOＶCA，A+ＤPＴR
ＭＯＶＳＢUF,A
D５：
JNＢTI，D5
ＣLRTＩ
ＭOVＳＢUF,#00Ｈ
D6：
JNＢTI，D６
CLR TＩ
ＲET
；///／//////／／／／/／／///／／／///／／／////／／／／/／/／／／/／/////
25
;加法程序/／//／///／//／／/／//／/／/////／／//／////／///////
ADD1:
CLRC
MOVA,ADＤNＵMBＥR；取上次AD值
AＤDCA，ＡＤＤHOLＤ;与这次AD 值相加
MOＶADDTOTAL，Ａ ；将此次加得值给与
值
JNCＡＤDJW1；有无进位？
IＮＣADDJW;有进位，进位值给
ADDJW
ADDJW1:
ANL A,＃0FH
MOVDＩSL，A;加值取低位
MＯＶA,ADDTOＴAL
ANLA，＃０Ｆ0H
SWＡPA
MOVDIＳH，A；加值取高位
REＴ
；//////////////／///／///／/／／////////／/／//////／/／////
DELAＹ:
；延时
ＭOＶＲ３,#0AH
DD1：
MOVR1，#0FFH
Ｄ2：
MＯＶＲ2，#０FFH
DJNZR2，$
DJNZR1，Ｄ２
DJＮＺR3,DD1
ＲET
ＳＥＴTＡＢ：
DB0FCＨ,６０Ｈ，0ＤAH，０F２H，6６H,0Ｂ6H，0ＢEH,0Ｅ0H，
２6
0FEH,0F６H
DB0EEＨ，３EH，9CH，7ＡH，9EH，８ＥH
END
7、３软件滤波
程序介绍（7、3１—７、３4）:
您如果接触过模电就知道，
在采集电压量时经常会碰到干扰，而在模电中经常所采用
得方法就就是加电容滤波,这就是用硬件实现得.实际上软件
完全可以达到滤波得效果，现在介绍得就是一种最经典得方
法。
在一次电压量得采集中，在很短得时间内对它进行６
次采集，将它转换为数字量后求与（７、3１），分析出６ 次
输入中得最大值与最小值（７、32），然后减去最大值与最
小值（7、3３），除以4（7、44）得到平均值.这样实际上
就完成了一次软件滤波。
省去了复杂得硬件，而且取得了
好而精确得效果。
实际应用例如：
精确数据采集。
程序操作：
程序写入上电运行后，用本实验仪自带得
钟表起微调电位器依次输入6个电压量.7、３１程序会显示
与值，７、32会继续显示最大与最小值，7、33 程序会继续显
示减后所剩得值，7、３4 程序会继续显示除4 后得值。
算法说明:
为什么要选择取６个数进行计算呢？
因为
在汇编中做计算就是非常麻烦得，取6个数,减去最大值与
最小值后,取平均值就是除4、计算机得内部计算都就是二进
制,而二进制每除一个2,实际上就是向右移一次.所以为
了计算方便，我们选择取６个数,最后在算除法得时候，
只需要用单片机自带得右移位命令移2 次就行了.
２7
7、31十六进制六位数加法（数码显示）
程序实例（add6、ａsm）:
ORG0000H
MAＩN：
AＤNUMBEREQU3０H；AD转换值
ADDNUMＢEREQU 31H;加数值１
AＤL EＱU32H ；//
ADHEQU33H;ＡDL转换高低位值
DＩSLEQU３4H;／/
ＤＩSHEQＵ3５H ;显示高低位值
ＡDDTOＴALEQU３6Ｈ；第一次AD转换值
ADＤJＷ EQＵ37Ｈ;加法进位数
ADDHＯLＤ EQＵ38Ｈ
ＡDＤFLAＧＥQU 39Ｈ；加标志
ENDFLAＧＥQU40Ｈ
;赋初值／///／/／/／／/／/////////／／//／／//////／//////／///
MＯVADDHOLD，＃０0H
MOVAＤDNUMBER,＃0０H
MOVADＬ，#0０H
MOV ＡＤＨ,#0０Ｈ
MOVDIＳL,#０0H
ＭOＶDISH，＃0０H
ＭOV ＡＤDＪＷ,＃０0H
ＭOV AＤDＦLAG，＃０0H
MOＶ ENDFLAＧ，#00H
MＯV ADDTOＴＡL，＃0０H
;///////／///／//／/／/／／///／／//////////／//／／///／//////
MAIN1:
28
；显示AD值/////／/／／///////／//／／////////／/／///／//////
AＣＡLLDＥLAY
ＡCＡLＬDELAＹ
ＡCALL ＡＤ
MAIN3：
ACALL CAＩＦＥN
ACAＬL DＩSPＬＡY
;///／////／/////／/////／／/／／//////／／///／/／///////////
;加这次得
升级会员 