de10ms.asm

共有 45 个程序源码

         MOV  P1,#00H
        MOV  B,#01H
         lcall  DE10MS
         lcall  g
         LCALL  H
          SJMP  $
H:  SETB  P1.7
    MOV  B,#8
    LCALL  BR
    CLR  P1.7
    MOV  B,#12
    LCALL  BR
    RET


br: mov  r2,b
be: NOP
    djnz  R2,be
    ret
g:     mov  b,#150
 gh:   lcall  de10ms
       djnz  b,gh
       ret
        
DE10MS: mov  R7,#86h
    D1: MOV  R6,#49h
    D2: DJNZ  R6,D2
        DJNZ  R7,D1
        RET