led流水灯实验.txt

单片机的源程序

org  0000h  ;开始 

ajmp     loop 

org  0030h   ;到0030h处避开00-30的敏感地址 

loop: 

mov p3,#0ffh;关闭所有灯 

clr p3.0    ;点亮灯p1.0 

lcall delay  ;延时一段时间? 

clr p3.1   ;点亮灯p1.1 

lcall delay 

clr p3.2    ;点亮灯p1.2 

lcall delay 

clr p3.3    ;点亮灯p1.3 

lcall delay 

clr p3.4    ;点亮灯p1.4 

lcall delay 

clr p3.5   ;点亮灯p1.5 

lcall delay 

clr p3.6    ;点亮灯p1.6 

lcall delay 

clr p3.7    ;点亮灯p1.7 

lcall delay 

AJMP LOOP;到最开始loop处重新运行 

delay:   mov r5,#20    ;延时。 

d1: mov r6,#40 

d2:  mov r7,#248 

     djnz r7,$ 

     djnz r6,d2 

     djnz r5,d1 

     ret 

end