在keil中，怎么用汇编编写流水灯，先左移再右移，用汇编？

左移

star: mov r3,#8 设置流水位数

mov p0,#11111110b 从p0.0开始

loop: acall d01s

mov a,p0 读取p0当前数据到acc

rl a 左移一位

mov p0,a 将左移的数据再送到p1

djnz r3,loop 没有完成8位继续

******************

mov p0,#0ffh 熄灭所有灯

******************

右或搏移

mov r3,#8 设置流水位数

mov p0,#01111111b 从p0.7开始

loop1: acall d01s

mov a,p0 读取p0当前数据到acc

rr a 右移一位

mov p0,a 将左模拆移的数据再送到p1

djnz r3,loop1 没有完衫码祥成8位继续

ljmp star 完成后返回到开始再来

延时子程序

d01s: mov r0,#255

d01l1: mov r1,#198

djnz r1,$

djnz r0,d01l1

ret

end

流水灯就是51单片机控制led灯依次点亮的控制方式。具体程序如下：

ORG 0000H复位启动

AJMP START

ORG 001BHT1中断

AJMP T1INT

定义变量========================

YSJSEQU 30H延时计数燃蠢器

LEDEQU 31HLED控制缓冲器

主程序==========================

START:MOV LED,#0FEH初始化数据

MOV YSJS,#0

MOV TMOD,#10H定时器1工作于方式1,16位定时器

MOV TL1,#0B0H设置定时初值

MOV TH1,#3CH定时时间=50mS

SETB ET1使能定时器1中断

SETB TR1启动定时器1

SETB EA开总中断

MOV P1,LED初始化流水灯

LOOP:JMP LOOP循环等待中断

T1INT:PUSH PSW定时器1中断程序

PUSH ACC保护现场

MOV TH1,#3CH定时时间=50mS

MOV TL1,#0B0H

INC YSJS

PUSH ACC保护ACC

MOV A,YSJI

CJNE A,#2,QT150mS*2=100mS

MOV P1,LED

MOV A,LED

RL A累加器A的值循环左移1位

MOV LED,A

MOV YSJS,#0

QT1:POP ACC恢复现场

POP PSW

RETI返回主程序

END汇编程序结束

扩展资料：

实现流水灯的三个方法：

第一种，总线方法实现流水灯。这是一种比较笨但又最易理解的方法，采用顺序程序结构，用位指令控制P1口的每一个位输出高低电平，加上延祥空时函数，即皮宴陪可控制每个LED灯的亮灭。

第二种，移位方法实现流水灯采用循环程序结构编程。首先在程序开始给P1.0口送一个低电平，其它位为高。然后延时一段时间再让低电平往高位移动，这样就实现“流水”的效果了。

第三种，库函数实现流水灯。利用左移函数进行。