汇编语言实现跑马灯 8051单片机

转自： http://blog.csdn.net/Code_star_one/article/details/52999079

通过一位 F 的16进制 转换为 2进制的 1111 然后移动一位 有三极管开关所改变。0的时候发光，1的时候变暗。所以一开始0FFH表示高8位为0； 
低8位为1111 1111，表示全暗，然后右移变为1111 1110亮第一个等。 
之后类推。实现了跑马灯。

    ORG     0000H
    AJMP    MAIN
    ORG     0030H        //因为 0003H是外部中断0入口地址... 0002B 是定时器中断 T2入口地址 ，故一般都是从0030H开始写
MAIN:
    MOV     A,#0FFH 
    CLR     C       
    MOV     R2,#08H 

LOOP1:  
    RLC     A       /*左移一位*/
    MOV     P0,A    
    ACALL   DEL     
    DJNZ    R2,LOOP1    
    MOV     R2,#08H 

LOOP2:  
    RRC     A       /*右移一位*/
    MOV     P0,A    
    ACALL   DEL 
    DJNZ    R2,LOOP2    
    JMP     MAIN    


DEL:    MOV R5,#05H    /*这是一个延时函数*/
DEL1:   MOV R6,#0F0H
DEL2:   MOV R7,#0F0H
DEL3:   DJNZ R7, DEL3
    DJNZ R6, DEL2
    DJNZ R5, DEL1
    RET
END