P1口接八只发光二极管,编写程序使发光二极管逐个循环点亮,形成跑马灯效果,要求编写延时子程序
代码
ORG 0000H
LJMP MAIN
ORG 0100H
MAIN:
MOV A,#01H;暂且认为高电平点亮
LOOP:
MOV P1,A
RL A
LCALL DELAY
SJMP LOOP
;延时子程序
DELAY:
MOV R7,#202;1T
DEL:
MOV R6,#248;1T
DJNZ R6,$;2T
DJNZ R7,DEL;2T
RET;2T
END