单片机C语言精确延时

奋斗者

(晶振12MHz,一个机器周期1us.)
    一. 500ms延时子程序
程序:
: I# C" {' ?3 P2 S0 r$ y$ M      void delay500ms(void)
         {
  Y; Z& H+ o! ]5 N+ M  H% l              unsigned char i,j,k;
! P# P8 N- X" K2 @/ ~+ N1 x7 `) Z
              for(i=15;i>0;i--)

              for(j=202;j>0;j--)
8 A* Q: U" d* E7 d( g! Q8 i+ b
              for(k=81;k>0;k--);
         }
3 k% |. A4 f, h, {  z( S4 I. s
$ s% a- ^. H5 b2 s6 M产生的汇编:
      C:0x0800      7F0F       MOV        R7,#0x0F

      C:0x0802      7ECA       MOV        R6,#0xCA

/ d1 T/ T  `' q4 Q      C:0x0804      7D51       MOV        R5,#0x51
9 O5 M: ~) e+ P  F: E' ~# J
0 V9 c4 b- I# O: [1 H      C:0x0806      DDFE       DJNZ       R5,C:0806

      C:0x0808      DEFA       DJNZ       R6,C:0804

      C:0x080A      DFF6       DJNZ       R7,C:0802
. r$ U$ ~0 I1 k% v- b2 b
6 j% Z6 M, b: K3 H# `      C:0x080C      22         RET      
计算分析:
    程序共有三层循环
; d7 ~8 A+ |% B$ j    一层循环n:R5*2 = 81*2 = 162us                    DJNZ    2us
    二层循环m:R6*(n+3) = 202*165 = 33330us            DJNZ    2us + R5赋值 1us = 3us
$ F+ y' A: k: p' d2 f    三层循环: R7*(m+3) = 15*33333 = 499995us          DJNZ    2us + R6赋值 1us = 3us
    循环外:     5us            子程序调用 2us + 子程序返回 2us + R7赋值 1us    = 5us
    延时总时间 = 三层循环 + 循环外 = 499995+5 = 500000us =500ms
# S6 \5 }" n: U/ h3 T计算公式:延时时间=[(2*R5+3)*R6+3]*R7+5

" w& k! A2 s4 @' ?: a+ I+ V: Z& D    二. 200ms延时子程序
7 q0 [4 J2 x4 T) r0 Z9 S, f! q程序:
void delay200ms(void)
{
- [0 f0 c0 L. O/ {6 _  n* u         unsigned char i,j,k;

          for(i=5;i>0;i--)

          for(j=132;j>0;j--)
) c- R  l8 @2 E% o9 p6 m' C
          for(k=150;k>0;k--);
. r, d' W5 w( Y, f5 c}
% K# m2 i. R9 V, t# Y2 p* }
- y, _" s9 L4 b2 B- @$ R产生的汇编
$ m1 O5 ]$ u( L: v( a# bC:0x0800      7F05       MOV        R7,#0x05
' v* d; X- s4 y' E" V/ k7 u/ N( ]C:0x0802      7E84       MOV        R6,#0x84
C:0x0804      7D96       MOV        R5,#0x96
6 `. v4 B; |9 Q  U4 RC:0x0806      DDFE       DJNZ       R5,C:0806
C:0x0808      DEFA       DJNZ       R6,C:0804
C:0x080A      DFF6       DJNZ       R7,C:0802
0 t* d0 V& v  H9 g! FC:0x080C      22         RET
5 P/ w" t5 d+ {4 r; ^( ~6 Y    三. 10ms延时子程序
! H. z/ c* ]: T4 ?1 v$ c程序:
4 R& \+ b/ g! D$ A& B" t& g; |void delay10ms(void)
1 k+ i; `3 _+ o; \! Y. H{
          unsigned char i,j,k;
+ H- L9 |$ Y1 H" ~) A% ], A0 ?! r# u          for(i=5;i>0;i--)
          for(j=4;j>0;j--)
. V# ~6 O" ^1 K& v$ r% q          for(k=248;k>0;k--);
: K  o6 z. y4 R2 q9 H# _' y4 ^}
! q4 m# F: a( V( \& {产生的汇编
; o5 ~/ U- _' ]# G: Q" n4 `. b7 T  P% ^C:0x0800      7F05       MOV        R7,#0x05
0 g) C8 @' u1 [5 AC:0x0802      7E04       MOV        R6,#0x04
: ~% H  Z& k; r8 u) v) G/ ZC:0x0804      7DF8       MOV        R5,#0xF8
2 M$ B4 X# a, G1 _5 |) @# mC:0x0806      DDFE       DJNZ       R5,C:0806
C:0x0808      DEFA       DJNZ       R6,C:0804
C:0x080A      DFF6       DJNZ       R7,C:0802
C:0x080C      22         RET      
1 w+ X+ @. r8 x    四. 1s延时子程序
+ F$ @9 ]7 C4 q  @' }9 f3 Q程序:
void delay1s(void)
/ E/ C& H1 E9 G( X+ I( ]{
; C$ m& Y: g: r5 y' ~7 U9 v3 G         unsigned char h,i,j,k;
4 r% H2 l, @0 B+ E9 h) C6 \: V# N) K
0 m4 U6 N% x8 K* x& g% c: h6 H          for(h=5;h>0;h--)

+ W$ h" O# y' O9 [          for(i=4;i>0;i--)

+ p: h+ X* v( s7 a" x8 m* p/ v+ A$ g$ O          for(j=116;j>0;j--)
! W9 E% N% p2 Y. _5 A" Y
          for(k=214;k>0;k--);
- S& r# n- u! z. O. z}

finastic

学习学习

mj19901002

学习学习

xiaoyigechaos

单片机小精灵就解决了
另外 永定时器 数溢出周期 也能达到精确的延时