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

START: MOV MOV MOV ACC,#0FEH ;ACC 中先装入 LED1 亮的数据（二进制的 P1,ACC ;将 ACC 的数据送 P1 口 R0,#7 ;将数据再移动 7 次就完成一个 8 位流水过程 1 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 ;程序结束 2 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 ; 程 序 结 束 3 ORG 0000H ;上电复位，程序从 0000H 开始执行 START: MOV MOV LOOP: CLR SP,#60H ; 堆 栈 初 始 化 为 60H DPTR,#LIU_TAB ;流水花样表首地址送 DPTR 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