描述

延时程序在单片机编程中使用非常广泛，但一些读者在学习中不知道延时程序怎么编程，不知道机器周期和指令周期的区别，不知道延时程序指令的用法

我们知道程序设计是单片机开发最重要的工作，而程序在执行过程中常常需要完成延时的功能。例如在交通灯的控制程序中，需要控制红灯亮的时间持续30秒，就可以通过延时程序来完成。

1 秒延时子程序程序总共所需时间：1+10+2560+330240+660480+5120+20+2=998433 μs≈1S.

在这里运行这段程序共需998433 μs，还差1567μs 才达到1S 的，所以想要达到完美的1S 延时，需要在返回指令RET 前再添加一些指令让它把1567μs 的延时完成。

1秒延时子程序：

DEL：MOV R7，#10 ①

DEL1：MOV R6，#200 ②

DEL2：MOV R5，#248 ③

DJNZ R5，$ ④

DJNZ R6，DEL2 ⑤

DJNZ R7，DEL1 ⑥

RET ⑦

对每条指令进行计算得出精确延时时间为：

1+(1*10)+(1*200*10)+(2*248*200*10)+(2*200*10)+(2*10)+2

=［(2*248+3)*200+3］*10+3 ⑧

=998033μs≈1s

小提示：循环转移指令(DJNZ )除了可以给定地址标号让其跳转外，还可以将地址标号改成$，这样程序就跳回本指令执行。例如：DJNZ R7，$ ；R7 内容减1 不为0，则再次执行本指令；为0 则往下执行，当R7 的值改为10时，则执行完该条程序所需的时间为2*10=20 μs。

MCS-51单片机的指令有单字节、双字节和三字节的，它们的指令周期不尽相同，一个单周期指令包含一个机器周期，即12个时钟周期，所以一条单周期指令被执行所占时间为12*(1/12000000)=1μs。

50ms 延时子程序：

DEL：MOV R7，#200 ①

DEL1：MOV R6，#125 ②

DEL2：DJNZ R6，DEL2 ③

DJNZ R7，DEL1 ④

RET ⑤

精确延时时间为：1+(1*200)+(2*125*200)+(2*200)+2

=(2*125+3)*200+3 ⑥

=50603μs

≈50ms

在论坛上看到不少不错的延时程序，整理如下共同分享：精确延时计算公式：延时时间=［(2*第一层循环+3)*第二层循环+3］*第三层循环+5

延时5秒左右

DELAY5S:PUSH 04H

PUSH 05H

PUSH 06H

MOV R4，#50

DELAY5S_0:MOV R5，#200

DELAY5S_1:MOV R6，#245

DJNZ R6，$

DJNZ R5，DELAY5S_1

DJNZ R4，DELAY5S_0

POP 06H

POP 05H

POP 04H

RET

513微秒延时程序

DELAY:MOV R2，#0FEH

DELAY1:DJNZ R2，DELAY1

RET

10毫秒延时程序

DL10MS:MOV R3，#14H

DL10MS1:LCALL DELAY

DJNZ R3，DL10MS1

RET

0.1s延时程序12mhz

DELAY:MOV R6，#250

DL1:MOV R7，#200

DL2:DJNZ R6，DL2

DJNZ R7，DL1

RET

延时1046549微秒(12mhz);

具体的计算公式是：

;((((r7*2+1)+2)*r6+1)+2)*r5+1+4=((r7*2+3)*r6+3)

*r5+5

DEL:MOV R5，#08H

DEL1:MOV R6，#0FFH

DEL2:MOV R7，#0FFH

DJNZ R7，$

DJNZ R6，DEL2

DJNZ R5，DEL1

RET

1秒延时子程序是以12MHz晶振

Delay1S:mov r1，#50

del0:mov r2，#91

del1:mov r3，#100

djnz r3，$

djnz r2，del1

djnz r1，del0

Ret

1秒延时子程序是以12MHz晶振为例算指令周期耗时

KK:MOVR5，#10;1指令周期1

K1:MOVR6，#0FFH;1指令周期10

K2:MOVR7，#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

DJNZR5，K1;2指令周期2*10=20

RET;2指令周期

21+10+2560+327680+655360+5120+20+2=990753;

约等于1秒1秒=1000000微秒

这个算下来也只有0.998抄

T_0:MOVR7，#10;

D1:MOVR6，#200;

D2:MOVR5，#248;

DJNZR5，$

DJNZR6，D2;

DJNZR7，D1;

RET

这样算下来应该是1.000011秒

T_0:MOVR7，#10;

D1:MOVR6，#200;

D2:NOP

MOVR5，#248;

DJNZR5，$

DJNZR6，D2;

DJNZR7，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：;500500MS

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

DELAY2:MOVR2，#0B2H

DJNZR2，$

DJNZR1，DELAY2

DJNZR0，DELAY1

RET

MOVR2，#10;延时1秒

LCALLDELAY

MOVR2，#50;延时5秒

LCALLDELAY

DELAY：;延时子程序

PUSHR2

PUSHR1

PUSHR0

DELAY1:MOVR1，#00H

DELAY2:MOVR0，#0B2H

DJNZR0，$

DJNZR1，DELAY2;延时100mS

DJNZR2，DELAY1

POPR0

POPR1

POPR2

RET

--------------------------------------------------------------------------------

1:DEL:MOVR7，#200

DEL1:MOVR6，#123

NOP

DEL2:DJNZR6，DEL2

DJNZR7，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

--------------------------------------------------------------------------------

ORG0

LJMPMAIN

ORG000BH

LJMP　CTC0

MAIN:MO

用汇编语言编写延时1小时的子程序

如果晶振是12M的话，一下方法可以实现延时1小时，精确度在秒级别。

DELAY1H：

MOV R7，#180 ;1/1000000

DLY1H：

LCALL DELAY_20S ;180*19.960603s +2*180

DJNZ R7，DLY1H ;2*180/1000000

RET 2/1000000

共延时时间：3592.9s误差为7.1秒，如果再精确的话，再加一点延时就可以了。

DELAY_20S： ;Total=19.960603s

MOV R2，# ;1

DLY1：

MOV R3，#200 ;1*200

DLY2： MOV R4，#248 ;1**200*200

DJNZ R4，$ ;2**248*200*200

DJNZ R3，DLY2 ;2*200*200

DJNZ R2，DLY1 ;2*200

RET ;2

打开APP精彩内容

点击阅读全文