用51hei板子做三路流水燈實(shí)驗(yàn)

/***********************************************************
實(shí)驗(yàn)名稱：三路跑馬燈示例程序
跳線設(shè)置:默認(rèn).
***********************************************************/

    ORG 0000H ;      
     LJMP MAIN ;
     ORG 030H ;
MAIN: setb p2.6
        mov P0,#00
        clr  p2.6             ;關(guān)掉數(shù)碼管

        clr p1.4              ;打開led發(fā)光管使能
        MOV P0,#0DBH   ;11011011--零為亮
     ACALL DELay ;
     MOV P0,#06DH       ;化為二進(jìn)制01101101
     ACALL DELay ;
     MOV P0,#0B6H       ;化為二進(jìn)制10110110
     ACALL DELay ;
    AJMP MAIN ;
delay:  mov r7, #255    ;延時(shí)子程序
d1: mov r6,#255
d2: djnz r6,d2
    djnz r7,d1
    ret
    end