;***************************************************************************
;*  程序功能：P1口接的8个发光二极管不段闪亮                                                                  *
;*  雨飞电子科技资讯网  www.yufik.com  E-mail: yufik@163.com                                        *
;*  程序编写:飞奔  更多例程请关注我们的网站                                                                      *
;***************************************************************************
                ORG 0000H
                AJMP MAIN
                ORG 0030H

MAIN:    MOV A,#00H
                MOV P1,A               ;数据送P1口点亮8个发光二极管 
                ACALL DELAY      ;延时
                MOV A,#0FFH
                MOV P1,A              ;数据送P1口灭掉8个发光二极管
                ACALL DELAY      ;延时
                AJMP MAIN          ;返回主程序循环执行

DELAY:  MOV R7,#255         ;延时子程序
D1:          MOV R6,#255
D2:          DJNZ R6,D2
                DJNZ R7,D1
                RET                           ;子程序返回
                END                          ;程序结束