led.asm

51系列单片机的汇编程序包

;======================扫“8”自检程序=================
        ORG 0000H
        MOV R0,#0fCH    ;指向字形口
        MOV A,#80H      ;确定字形代码
        MOVX @R0,A      ;输出字形代码
        MOV R1,#0fDH    ;指向字位口
        MOV A,#20H      ;从最高位开始
LED8:   MOVX @R1,A      ;输出字位代码
        MOV R2,#18H     ;确定延时常数
        ACALL DELAY     ;调延时子程序
        RL A            ;左移一位
        SJMP LED8       ;循环演示
;========================
DELAY:  PUSH 02H        ;延时子程序
DELAY0: PUSH 02H
DELAY1: PUSH 02H
        DJNZ R2,$
        POP 02H
        DJNZ R2,DELAY1
        POP 02H
        DJNZ R2,DELAY0
        POP 02H
        DJNZ R2,DELAY
        RET             ;返回
        END