延时子程序.doc

汇编延时程序大集合
2009-05-31 19:24
各种汇编延时程序大集合
;513微秒延时程序
DELAY:   MOV      R2,#0FEH
DELAY1: DJNZ     R2,DELAY1
RET
;10毫秒延时程序
DL10MS: MOV      R3,#14H
DL10MS1:LCALL    DELAY
         DJNZ     R3,DL10MS1
         RET
;
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: 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秒1秒=1000000微秒
;
T_0:   MOV    R7,#10;
D1:   MOV    R6,#200;
D2:   MOV    R5,#248;
   DJNZ    R5,$
   DJNZ    R6,D2;
   DJNZ    R7,D1;
   RET
;
T_0:   MOV    R7,#10;
D1:   MOV    R6,#200;
D2:   NOP
   MOV    R5,#248;
   DJNZ    R5,$
   DJNZ    R6,D2;
   DJNZ    R7,