实现8个LED流水灯汇编语言程.docVIP

START:　MOV　　 ACC,#0FEH 　　;ACC中先装入LED1亮的数据（二进制 　　　　MOV　　 P1,ACC 　　　 ;将ACC的数据送P1口 　　　　MOV　　 R0,#7 　　　　;将数据再移动7次就完成一个8位流水过程 LOOP: 　RL　　　A 　　　　　　;将ACC中的数据左移一位　　　　MOV　　 P1,A 　　　　 ;把ACC移动过的数据送p1口显示　　　　ACALL　 DELAY 　　　　;调用延时子程序　　　　DJNZ　　R0,LOOP 　　　;没有移动够7次继续移动 　　　　AJMP　　START 　　　　;移动完7次后跳到开始重来，以达到循环流动效果 　　　　;----- 延时子程序 -----DELAY:　MOV　　 R0,#255　　　 ;延时一段时间D1:　　 MOV　　 R1,#255　　　　DJNZ　　R1,$　　　　DJNZ　　R0,D1　　　　RET　　　　　 　　　　;子程序返回 　　　　END　　　　　　　　　 ;程序结束 START:　CLR　　 P1.0 　　　　　　;P1.0输出低电平,使LED1点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.0　　　　　　 ;P1.0输出高电平,使LED1熄灭　　　　CLR　　 P1.1　　　　　　 ;P1.1输出低电平,使LED2点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.1　　　　　　 ;P1.1输出高电平,使LED2熄灭　　　　CLR　　 P1.2　　　　　　 ;P1.2输出低电平,使LED3点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.2　　　　　　 ;P1.2输出高电平,使LED3熄灭　　　　CLR　　 P1.3　　　　　　 ;P1.3输出低电平,使LED4点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.3　　　　　　 ;P1.3输出高电平,使LED4熄灭　　　　CLR　　 P1.4　　　　　　 ;P1.4输出低电平,使LED5点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.4　　　　　　 ;P1.4输出高电平,使LED5熄灭　　　　CLR　　 P1.5　　　　　　 ;P1.5输出低电平,使LED6点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.5　　　　　　 ;P1.5输出高电平,使LED6熄灭　　　　CLR　　 P1.6　　　　　　 ;P1.6输出低电平,使LED7点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.6　　　　　　 ;P1.6输出高电平,使LED7熄灭　　　　CLR　　 P1.7　　　　　　 ;P1.7输出低电平,使LED8点亮　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　SETB　　P1.7　　　　　　 ;P1.7输出高电平,使LED8熄灭　　　　ACALL　 DELAY　　　　　　;调用延时子程序　　　　AJMP　　START　　　　　　;8个LED流了一遍后返回到标号START处再循环 　　　　;----- 延时子程序 -----DELAY:　MOV　　 R0,#255　　　　　;延时一段时间D1:　　 MOV　　 R1,#255　　　　DJNZ　　R1,$　　　　DJNZ　　R0,D1　　　　RET　　　　　 　　　　　 ;子程序返回 　　　　END　　　　　　　　　　　;程序结束 ORG　　 0000H　　　　　　 ;上电复位，程序从0000H开始执行START:　MOV　　 SP,#60H　　　　　 ;堆栈初始化为60H　　　　MOV　　 DPTR,#LIU_TAB　　 ;流水花样表首地址送DPTRLOOP: 　CLR　　 A　　　　MOVC　　A,@A+DPTR　　　　CJNE　　A,#0FFH,SHOW　　　;检查流水结束标志　　　　AJMP　　START　　　　　　 ;所有花样流完,则从头开始重复流SHOW: 　MOV　　 P1,A　　　　　　　;将数据送到P1口　　　　ACALL　 DELAY　　　　INC　　 DPTR　　　　AJMP　　LOOP 　　　　;----- 延时子程序 -----DELAY:　MOV　　 R0,#255　　　　　;延时一段时间D1:　　 MOV　　 R1,#255　　　　DJNZ　　R1,$　　　　DJNZ