51汇编-跑马灯

本文完全免费，非VIP文章，如果您发现变为VIP文章，请邮箱联系我：openwebsite@foxmail.com

P1口接八只发光二极管，编写程序使发光二极管逐个循环点亮，形成跑马灯效果，要求编写延时子程序

代码

ORG 0000H
    LJMP MAIN
    ORG 0100H
MAIN:
    MOV A,#01H;暂且认为高电平点亮
LOOP:
    MOV P1,A
    RL A
    LCALL DELAY
    SJMP LOOP
;延时子程序
DELAY:
    MOV R7,#202;1T
DEL:
    MOV R6,#248;1T
    DJNZ R6,$;2T
    DJNZ R7,DEL;2T
    RET;2T
    END