tidly.asm

在单片机上实现250ms延时程序欢迎大家使用

;250ms 延时程序，36H为定时器中断计数器
         RED   BIT  P1.2
         BLUE  BIT  P1.3
         ORG   0000H
         AJMP  MAIN
         ORG   000BH
         AJMP  TTTT
MAIN:    MOV   36H,#5
         SETB  ET0
         SETB  TR0
         SETB  EA
         SJMP  $         
          
           
TTTT:    PUSH  PSW
         PUSH  ACC
         CLR   TR0
         DEC   36H
         MOV   A, 36H
         JZ    XIAN
         SETB  TR0
         POP   ACC
         POP   PSW
         RETI
XIAN:    MOV   A,  35H
         JNB    ACC.2, BATTER
         CLR   BLUE
         MOV   36H, #5
         SETB  RED
         SETB  TR0
         POP   ACC
         POP   PSW
         RETI
BATTER:  JNB    ACC.1, CMUNI
         CLR   BLUE
         CPL   RED
         MOV   36H, #5
         SETB  TR0
         POP   ACC
         POP   PSW
         RETI
CMUNI:   JNB    ACC.0, OUT
         CLR   RED
         CPL   BLUE
         MOV   36H, #5
         SETB  TR0
         POP   ACC
         POP   PSW
         RETI
OUT:     CLR   RED
         SETB  BLUE
         MOV   36H, #5
         SETB  TR0
         POP   ACC
         POP   PSW
         RETI