lesson.asm

单片机实验

NAME    T1_1            ;P1口输实验
CSEG AT 0000H
        LJMP START
CSEG AT 4100H
START:  MOV A,#0FEH
LOOP:   RL  A           ; 左移一位，点亮下一个发光二极管
        MOV P1,A
        LCALL DELAY		;延时 0.1秒
        JMP   LOOP

DELAY:  MOV R1,#1000     ; 延时0.1秒
DEL1:   MOV R2,#3000
DEL2:   DJNZ  R2,DEL2
        DJNZ  R1,DEL1
        RET
    
        END