延時程序在單片機編程中使用非常廣泛，但一些讀者在學習中不知道延時程序怎么編程，不知道機器周期和指令周期的區別，不知道延時程序指令的用法

　　我們知道程序設計是單片機開發最重要的工作，而程序在執行過程中常常需要完成延時的功能。例如在交通燈的控制程序中，需要控制紅燈亮的時間持續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