跑马

51单片机实验用的程序 希望对你能有所帮助 包括跑马 十进制显 电子琴

DLED：MOV R0，#0
WE：MOV A，#01
NEXT：MOV B，A
MOV  P1，A
MOV  DPTR，#TAB0
MOV  A，R0
MOV C  A，·A+DPTR
MOV  P2，A
MOV  R3，#0
LOP：MOV R4，?0
LOP1：NOP
    NOP
    DJNZ  R4，LOP1
    DJNZ  R3，LOP
    MOV  A，B
    RL A
    CJNE  A，#10H，NEXT
    INC  R0；
    CJNE  R0，#10H，WE
    SJMP  DLED
    TAB0：DB  3FH，06H，5BH，4FH，66H，6DH，7DH，07H，6FH，77H，7CH，39H，5EH，79H，71H