delay.asm

来自「基于16F877A的路灯控制系统的设计」· 汇编 代码 · 共 61 行

;******************************
;*DELAY.ASM
;******************************
;*延时函数
;*使用RAM 3个字节
;*程序包括LONGDELAY(长延时),DELAY两个
;*入口参数 无 出口参数 无
;******************************
#INCLUDE P16F877A.INC
;******************************
DELAY_GROUP  UDATA        ;数据区
;******************************
COUNT    RES    1
COUNT1   RES    1
COUNT2   RES    1
COUNT3   RES    1
;******************************
DELAY_PROG  CODE          ;程序区
;******************************
;DELAY延时子程序
;******************************
DELAY
    GLOBAL   DELAY
    CLRF     COUNT
DLOOP
    DECFSZ   COUNT,F
    GOTO     DLOOP
    RETURN
;******************************
;*LONGDELAY  长延时子程序
;******************************
LONGDELAY
    GLOBAL   LONGDELAY
    CLRF     COUNT
    CLRF     COUNT1
    MOVLW    0X03
    MOVWF    COUNT2
LDLOOP
    DECFSZ   COUNT,F
    GOTO     LDLOOP
    DECFSZ   COUNT1,F
    GOTO     LDLOOP
    DECFSZ   COUNT2,F
    GOTO     LDLOOP
    RETURN
MIDDELAY
    GLOBAL   MIDDELAY
    CLRF     COUNT
    MOVLW    0F0H
    MOVWF    COUNT3
MDLOOP
    DECFSZ   COUNT,F
    GOTO     MDLOOP
    DECFSZ   COUNT3
    GOTO     MDLOOP
    RETURN
    
;*****************************
    END
;*****************************