51单片机比较精确延时程序大集合.docx
《51单片机比较精确延时程序大集合.docx》由会员分享，可在线阅读，更多相关《51单片机比较精确延时程序大集合.docx（8页珍藏版）》请在冰点文库上搜索。
51单片机比较精确延时程序大集合
51单片机比较精确延时程序大集合
以下程序说是精确延时，实际上都不对。
调用一次差个几微秒、几百微秒，一天下来差好几分钟。
精确延时计算公式:
延时时间=[（2*第一层循环+3）*第二层循环+3]*第三层循环+5
延时5秒左右
DELAY5S:
PUSH 04H;2个机器周期
PUSH 05H;2个机器周期
PUSH 06H;2个机器周期
MOV R4,#50;1个机器周期
DELAY5S_0:
MOVR5,#200;1个机器周期
DELAY5S_1:
MOVR6,#245;1个机器周期
DJNZ R6,$;2×245=490个机器周期
DJNZ R5,DELAY5S_1;这条2个机器周期，这层循环包含R5×（490+1）+2×R5=98600个机器周期
DJNZ R4,DELAY5S_0;这条2个机器周期，这层循环包含R4×（98600+1）+2×R4=4930150个机器周期
POP 06H;2个机器周期
POP 05H;2个机器周期
POP 04H;2个机器周期
RET;2个机器周期
;（共2+2+2+1+4930150+2+2+2+2=4930165个机器周期）
513微秒延时程序
DELAY:
MOV R2,#0FEH;1个机器周期
JUZINAIYOU:
DJNZ R2,JUZINAIYOU;2×R21即2×245
RET;2个机器周期
;（实际上是493个机器周期）
10毫秒延时程序
DL10MS:
MOV R3,#14H
DL10MS1:
LCALL DELAY
DJNZ R3,DL10MS1
RET
;（缺DELAY）
0.1s延时程序12MHz
DELAY:
MOVR6,#250
DL1:
MOVR7,#200
DL2:
DJNZR6,DL2
DJNZR7,DL1
RET
延时1046549微秒（12MHz）
;具体的计算公式是:
;（（（（r7*2+1）+2）*r6+1）+2）*r5+1+4=（（r7*2+3）*r6+3）*r5+5
DEL:
MOVR5,#08H
DEL1:
MOVR6,#0FFH
DEL2:
MOVR7,#0FFH
DJNZR7,$
DJNZR6,DEL2
DJNZR5,DEL1
RET
1秒延时子程序是以12MHz晶振
Delay1S:
movr1,#50
del0:
movr2,#91
del1:
movr3,#100
djnzr3,$
djnzr2,del1
djnzr1,del0
Ret
1秒延时子程序是以12MHz晶振为例算指令周期耗时
KK:
MOV R5,#10 ;1指令周期×1
K1:
MOV R6,#0FFH ;1指令周期×10
K2:
MOV R7,#80H ;1指令周期256×10=2560
K3:
NOP ;1指令周期
;128*256*10=327680
DJNZ R7,K3 ;2指令周期
2*128*256*10=655360
DJNZ R6,K2 ;2指令周期
2*256*10=5120
DJNZ R5,K1 ;2指令周期2*10=20
RET;2指令周期
;21+10+2560+327680+655360+5120+20+2=990753
;约等于1秒=1000000微秒
这个算下来也只有0.998秒
T_0:
MOV R7,#10;
D1:
MOV R6,#200;
D2:
MOV R5,#248;
DJNZ R5,$
DJNZ R6,D2;
DJNZ R7,D1;
RET
这样算下来应该是1.000011秒
T_0:
MOV R7,#10;
D1:
MOV R6,#200;
D2:
NOP
MOV R5,#248;
DJNZ R5,$
DJNZ R6,D2;
DJNZ R7,D1;
RET
DELAY_2S:
;10MS（11.0592mhz）
MOVR3,#200
JMPDELAY10MS
DELAY_100MS:
;100MS（11.0592mhz）
MOVR3,#10
JMPDELAY10MS
DELAY_10MS:
MOVR3,#1
DELAY10MS:
;去抖动10MS
（11.0592mhz）
MOVR4,#20
DELAY10MSA:
MOVR5,#247
DJNZR5,$
DJNZR4,DELAY10MSA
DJNZR3,DELAY10MS
RET
DELAY_500MS:
;500MS
MOVR2,#208
JMPDELAY_MS
DELAY_175MS:
;175MS
MOVR2,#73
JMPDELAY_MS
delaY_120MS:
;120MS
MOVR2,#50
JMPDELAY_MS
delay_60ms:
;60ms
MOVR2,#25
JMPDELAY_MS
delay_30ms:
;30ms
MOVR2,#12
JMPDELAY_MS
DELAY_5MS:
;5MS
MOVR2,#2
DELAY_MS:
CALLDELAY2400
DJNZR2,DELAY_MS
RET
DELAY2400:
;10x244+4=2447/1.024=2390
MOVR0,#244;1
DELAY24001:
MULAB;4
MULAB;4
DJNZR0,DELAY24001;2
RET
DELAY:
;延时子程序（1秒）
MOVR0,#0AH
DELAY1:
MOVR1,#00H
JUZINAIYOU:
MOVR2,#0B2H
DJNZR2,$
DJNZR1,JUZINAIYOU
DJNZR0,DELAY1
RET
MOVR2,#10;延时1秒
LCALLDELAY
MOVR2,#50;延时5秒
LCALLDELAY
DELAY:
;延时子程序
PUSHR2
PUSHR1
PUSHR0
DELAY1:
MOVR1,#00H
JUZINAIYOU:
MOVR0,#0B2H
DJNZR0,$
DJNZR1,JUZINAIYOU;延时100mS
DJNZR2,DELAY1
POPR0
POPR1
POPR2
RET
1:
DEL:
MOV R7, #200
DEL1:
MOV R6, #123
NOP
DEL2:
DJNZ R6, DEL2
DJNZ R7, DEL1
RET
是50.001ms算法是:
0.001ms+200*0.001ms+200*0.001ms+200*123*0.002ms+200*0.002ms
;（123*2+4）*200+1
2:
DEL:
MOVR7,#200
DEL1:
MOVR6,#123
DEL2:
NOP
DJNZR6,DEL2
DJNZR7,DEL1
RET
D500MS:
PUSHPSW
SETBRS0
MOVR7,#200
D51:
MOVR6,#250
D52:
NOP
NOP
NOP
NOP
DJNZR6,D52
DJNZR7,D51
POPPSW
RET
DELAY:
;延时1毫秒
PUSHPSW
SETBRS0
MOVR7,#50
D1:
MOVR6,#10
D2:
DJNZR6,$
DJNZR7,D1
POPPSW
RET
ORG 0
LJMP MAIN
ORG 000BH
LJMP CTC0
MAIN:
MOV SP,#50H
CLR EA
MOV TMOD,#01H
MOV TH0,#3CH
MOV TL0,#0B0H
MOV R4,#10
SETB ET0
SETB EA
SETB TR0
SJMP$;
CTC0:
MOVTH0,#3CH
MOVTL0,#0B0H
DJNZR4,LP
CPL P1.0
MOV R4,#10
LP:
RETI
END
定时器中断延时
TMOD=0x01;/*定时器0工作在模式1下（16位计数器）*/
TH0=0xfd;
TL0=0x83;
TR0=1;/*启动定时器*/
TF0==0;
TR0=0;
等待中断；
100ms定时，11.0592晶振
他定时准确啊又不影响程序运行
下面几个是单片机的延时程序（包括asm和C程序，都是我在学单片机的过程中用到的）,在单片机延时程序中应考虑所使用的晶振的频率，在51系列的单片机中我们常用的是11.0592MHz和12.0000MHz的晶振，而在AVR单片机上常用的有8.000MHz和4.000MH的晶振所以在网上查找程序时如果涉及到精确延时则应该注意晶振的频率是多大。
软件延时：
（asm）
晶振12MHZ,延时1秒
程序如下：
DELAY:
MOV72H,#100
LOOP3:
MOV71H,#100
LOOP1:
MOV70H,#47
LOOP0:
DJNZ70H,LOOP0
NOP
DJNZ71H,LOOP1
MOV70H,#46
LOOP2:
DJNZ70H,LOOP2
NOP
DJNZ72H,LOOP3
MOV70H,#48
LOOP4:
DJNZ70H,LOOP4
定时器延时：
晶振12MHZ,延时1s，定时器0工作方式为方式1
DELAY1:
MOVR7,#0AH;;晶振12MHZ，延时0.5秒
AJMPDELAY
DELAY2:
MOVR7,#14H;;晶振12MHZ，延时1秒
DELAY:
CLREX0
MOVTMOD,#01H;设置定时器的工作方式为方式1
MOVTL0,#0B0H;给定时器设置计数初始值
MOVTH0,#3CH
SETBTR0;开启定时器
HERE:
JBCTF0,NEXT1
SJMPHERE
NEXT1:
MOVTL0,#0B0H
MOVTH0,#3CH
DJNZR7,HERE
CLRTR0;定时器要软件清零
SETBEX0
RET
C语言延时程序：
10ms延时子程序（12MHZ）
voiddelay10ms（void）
{
unsignedchari,j,k;
for（i=5;i>0;i--）
for（j=4;j>0;j--）
for（k=248;k>0;k--）;
}
1s延时子程序（12MHZ）
voiddelay1s（void）
{
unsignedcharh,i,j,k;
for（h=5;h>0;h--）
for（i=4;i>0;i--）
for（j=116;j>0;j--）
for（k=214;k>0;k--）;
}
200ms延时子程序（12MHZ）
voiddelay200ms（void）
{
unsignedchari,j,k;
for（i=5;i>0;i--）
for（j=132;j>0;j--）
for（k=150;k>0;k--）;
}
500ms延时子程序程序:
（12MHZ）
voiddelay500ms（void）
{
unsignedchari,j,k;
for（i=15;i>0;i--）
for（j=202;j>0;j--）
for（k=81;k>0;k--）;
}
下面是用了8.0000MHZ的晶振的几个延时程序（用定时0的工作模式1）：
（1）延时0.9MS
voiddelay_0_9ms（void）
{
TMOD=0x01;/*定时器0工作在模式1下（16位计数器）*/
TH0=0xfd;
TL0=0xa8;
TR0=1;/*启动定时器*/
while（TF0==0）;
TR0=0;
}
（2）延时1MS
voiddelay_1ms（void）
{
TMOD=0x01;/*定时器0工作在模式1下（16位计数器）*/
TH0=0xfd;
TL0=0x65;
TR0=1;/*启动定时器*/
while（TF0==0）;
TR0=0;
}
（3）延时4.5ms
voiddelay_4_5ms（void）
{
TMOD=0x01;/*定时器0工作在模式1下（16位计数器）*/
TH0=0xf4;
TL0=0x48;
TR0=1;/*启动定时器*/
while（TF0==0）;
TR0=0;
}
在用定时器做延时程序时如果懒得计算定时器计数的初始值可以在网上找一个专门用来做延时的小软件。
升级会员 