调试通过的灯闪程序

先是让第一个灯闪的程序：

start: SETB P0.0;(1)是让灯灭
LCALL DELAY;（2）是延时，调用延时子程序指令
CLR P0.0;（3）是让灯亮
LCALL DELAY;（4）和第二条一模一样，也是调用延时子程序指令

LJMP start;（5）跳转回去执行第一条指令
DELAY: MOV R7,#250;（6）让R7作为计数器，并装入一个常数
D1: MOV R6,#250;（7）让R6作为计数器，并装入一个常数
D2: DJNZ R6,D2;（8）让R6减1，并判断R6是否为0。若R6为0，向下执行指令。若R6不为0，跳转D2，继续让R6减1。
DJNZ R7,D1;（9）让R7减1，并判断R7是否为0。若R7为0，向下执行指令。若R7不为0，跳转D1，使R6完成新一轮计数。
RET;（10）返回指令。
END;（11）程序结束

再是挨着闪的程序：

;------------------主程序------------------
START: CLR P0.0;P0.0输出低电平，使LED1点亮
ACALL DELAY;调用延时子程序
SETB P0.0;P0.0输出高电平，使LED1熄灭
CLR P0.1;P0.1输出低电平，使LED2点亮
ACALL DELAY;调用延时子程序
SETB P0.1;P0.1输出高电平，使LED2熄灭
CLR P0.2;P0.2输出低电平，使LED3点亮
ACALL DELAY;调用延时子程序
SETB P0.2;P0.2输出高电平，使LED3熄灭
CLR P0.3;P0.3输出低电平，使LED4点亮
ACALL DELAY;调用延时子程序
SETB P0.3;P0.3输出高电平，使LED4熄灭
CLR P0.4;P0.4输出低电平，使LED5点亮
ACALL DELAY;调用延时子程序
SETB P0.4;P0.4输出高电平，使LED5熄灭
CLR P0.5;P0.5输出低电平，使LED6点亮
ACALL DELAY;调用延时子程序
SETB P0.5;P0.5输出高电平，使LED6熄灭
CLR P0.6;P0.6输出低电平，使LED7点亮
ACALL DELAY;调用延时子程序
SETB P0.6;P0.6输出高电平，使LED7熄灭
CLR P0.7;P0.7输出低电平，使LED8点亮
ACALL DELAY;调用延时子程序
SETB P0.7;P0.7输出高电平，使LED8熄灭
ACALL DELAY;调用延时子程序
AJMP START;八个灯一次亮了后返回开头再次循环
;------延时子程序-------
DELAY: MOV R0,#255;R0装入255
D1: MOV R1,#255;R1装入255
DJNZ R1,$;使R1自减为零后执行下一句指令
DJNZ R0,D1;R0自减1，如果为零执行下一句指令，如果不为零，跳转D1
RET;子程序返回
;==============================================================================;
END；程序结束