流水灯.asm

AT89S52单片机程序50例（00-50）

;流水灯
;

      ORG 0000H  ;程序开始地址
      AJMP MAIN  ;跳转至MAIN
      ORG 0030H  ;MAIN的起始地址

 MAIN:MOV A,#00H  ;A清零
      MOV P1,A  ;熄灭所有的灯
      MOV A,#11111110B  ;A=254
MAIN1:MOV P1,A  ;开最左边的灯
      ACALL DELAY ;调用延时子程序
      RL A  ;将开的灯向右边移
      AJMP MAIN1  ;无限循环

;延时子程序
DELAY:MOV R1,#0FFH
   D1:MOV R2,#0FFH
   D2:DJNZ R2,D2
      DJNZ R1,D1
  RET
END  ;程序结束