text5.asm

汇编写的小程序初学很好的 是单片机ATM89C51用的开发工具是KEIL UV2

star:             ;开始
  mov acc,#0feh  ;ACC中先装入LED1熄灭的数据（即二进制的 1111 1110）
  mov p1,acc     ;将ACC的数据送P1口
  acall delay
  mov r0,#7      ;因上句送到 p1口的数据就熄灭了一位，
                 ;所以将数据再移动7次就完成一个8位流水过程      
loop:             ;数据移动循环
  rl a           ;将ACC中的数据左移一位
  mov p1,a       ;把ACC移动过的数据送p1口显示
  acall delay                ;调用延时
  djnz r0,loop   ;没有移动够7次继续移动
  ljmp star      ;移动完7次后跳到开始重来，以达到循环流动效果
delay:            ;延时子程序，就是上节课中的延时子程序
    mov r1,#50
del0: 
    mov r2,#100
del1:
    mov r3,#100
    djnz r3,$
    djnz r2,del1
    djnz r1,del0
   ret             ;延时子程序结束，返回到调用处的下一句
end                ;本汇编程序到此结束