已驗證 ORG 0000H
SJMP _START
ORG 0050H
_START:
MOV P1, #0xFE
CALL DL10S
MOV P1, #0xFD
CALL DL10S
MOV P1, #0xFB
CALL DL10S
MOV P1, #0xF7
CALL DL10S
MOV P1, #0xEF
CALL DL10S
MOV P1, #0xDF
CALL DL10S
SJMP _START
DL10S:
MOV R5, #100
_DELAY100MS:
MOV R6, #200 ;1T
DL250T:
MOV R7, #250 ;1T
D2:
DJNZ R7, D2 ;2T, 原地轉移250遍, 共用500T
DJNZ R6, DL250T ;2T, 轉移200遍
DJNZ R5, _DELAY100MS
RET ;2T
END
|