问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

51单片机 跑马灯程序

发布网友 发布时间:2022-04-23 14:03

我来回答

4个回答

热心网友 时间:2023-10-17 05:43

org 0000h

    jmp start

    org 0030h

start:

    mov p0,#11111110b  ;  此时第一个灯亮

    call t10s

    mov p0,#11111101b  ;此时第二个灯亮

    call t10s

    mov p0,#11111011b

    call t10s

    mov p0,#11110111b

    call t10s

    mov p0,#11101111b

    call t10s

    mov p0,#11011111b

    call t10s

    jmp start        ;此处跳到开始 即 循环

;延时子程序10秒=250usX2X200X100

t10s:mov r5,#100

lpr5:mov r6,#200

lpr6:mov r7,#250

    djnz r7,$

    djnz r6,lpr6

    djnz r5,lpr5

  ret

  end

把灯的正极接电源正极 即vcc 负极分别接p0.0-p0.5

此时  给p0  送0灯就亮 1灯就不亮

程序已经过调试 可用

仿真如下:

热心网友 时间:2023-10-17 05:43

用汇编语言实现的程序如下。
本程序已经经过在Proteus上验证、仿真成功。

ORG 0000H
SJMP _START
ORG 0050H
_START:
MOV P1, #0xFE
CALL DL10S
MOV P1, #0xFD
CALL DL10S
MOV P1, #0xFB
CALL DL10S
MOV P1, #0xF7
CALL DL10S
MOV P1, #0xEF
CALL DL10S
MOV P1, #0xDF
CALL DL10S
SJMP _START

DL10S:
MOV R5, #100
_DELAY100MS:
MOV R6, #200 ;1T
DL250T:
MOV R7, #250 ;1T
D2:
DJNZ R7, D2 ;2T, 原地转移250遍, 共用500T
DJNZ R6, DL250T ;2T, 转移200遍
DJNZ R5, _DELAY100MS
RET ;2T
END

热心网友 时间:2023-10-17 05:43

#include <reg51.h>

void main()
{
unsigned char ch[10]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};/*0--9*/
unsigned char i,j;
j=1;
P2=P2&0x00;
P1=0xef;
P0=0xa4;
while(1)
{
i=P1;
i=i;
if(i==0xee)
{
P0=0xb0;

}
}

}

热心网友 时间:2023-10-17 05:44

c还是汇编呀?

#include<reg51.h>

void delay(void);
void main()
{
do{
P1=0xFE;
delay();
P1=0xFD;
delay();
P1=0xFB;
delay();
P1=0xF7;
delay();
P1=0xEF;
delay();
P1=0xDF;
delay();
P1=0xBF;
delay();
P1=0x7F;
delay();
}while(1);
}

void delay()
{
unsigned int x=60000;
do{ x--;
}while(x>1);
}

热心网友 时间:2023-10-17 05:43

org 0000h

    jmp start

    org 0030h

start:

    mov p0,#11111110b  ;  此时第一个灯亮

    call t10s

    mov p0,#11111101b  ;此时第二个灯亮

    call t10s

    mov p0,#11111011b

    call t10s

    mov p0,#11110111b

    call t10s

    mov p0,#11101111b

    call t10s

    mov p0,#11011111b

    call t10s

    jmp start        ;此处跳到开始 即 循环

;延时子程序10秒=250usX2X200X100

t10s:mov r5,#100

lpr5:mov r6,#200

lpr6:mov r7,#250

    djnz r7,$

    djnz r6,lpr6

    djnz r5,lpr5

  ret

  end

把灯的正极接电源正极 即vcc 负极分别接p0.0-p0.5

此时  给p0  送0灯就亮 1灯就不亮

程序已经过调试 可用

仿真如下:

热心网友 时间:2023-10-17 05:43

用汇编语言实现的程序如下。
本程序已经经过在Proteus上验证、仿真成功。

ORG 0000H
SJMP _START
ORG 0050H
_START:
MOV P1, #0xFE
CALL DL10S
MOV P1, #0xFD
CALL DL10S
MOV P1, #0xFB
CALL DL10S
MOV P1, #0xF7
CALL DL10S
MOV P1, #0xEF
CALL DL10S
MOV P1, #0xDF
CALL DL10S
SJMP _START

DL10S:
MOV R5, #100
_DELAY100MS:
MOV R6, #200 ;1T
DL250T:
MOV R7, #250 ;1T
D2:
DJNZ R7, D2 ;2T, 原地转移250遍, 共用500T
DJNZ R6, DL250T ;2T, 转移200遍
DJNZ R5, _DELAY100MS
RET ;2T
END

热心网友 时间:2023-10-17 05:43

#include <reg51.h>

void main()
{
unsigned char ch[10]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};/*0--9*/
unsigned char i,j;
j=1;
P2=P2&0x00;
P1=0xef;
P0=0xa4;
while(1)
{
i=P1;
i=i;
if(i==0xee)
{
P0=0xb0;

}
}

}

热心网友 时间:2023-10-17 05:44

c还是汇编呀?

#include<reg51.h>

void delay(void);
void main()
{
do{
P1=0xFE;
delay();
P1=0xFD;
delay();
P1=0xFB;
delay();
P1=0xF7;
delay();
P1=0xEF;
delay();
P1=0xDF;
delay();
P1=0xBF;
delay();
P1=0x7F;
delay();
}while(1);
}

void delay()
{
unsigned int x=60000;
do{ x--;
}while(x>1);
}
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
黑鱼身上有寄生虫吗 寄生虫是否可能存在于鱼的身体里? 取保候审没拘留怎么办 支付宝开通快捷支付后,能在支付宝查银行卡余额吗? 秋天,正是吃板栗的季节,分享7种经典吃法别错过,老少皆宜! CHOW TAI SENG 周大生 P0PC0078 桃花Pt950铂金项链 购买最佳价格 周大生的钻戒PT950 0.27ct I-J VS 7892元贵吗? 周大生铂950项链J1909011916 重量:4.69g 和Pt950吊坠J191000191967 重量... CHOW TAI SENG/周大生 P0PC0078 桃花Pt950铂金项链 45cm 3.63g-详细介... 白金多少钱一克PT950 求单片机跑马灯c语言程序! 51单片机跑马灯程序 单片机跑马灯程序 单片机汇编语言跑马灯 单片机的跑马灯C程序如何编写八个LED灯依次点亮而且速度渐变的代码 怎么用单片机按键控制循环跑马灯??? 51单片机跑马灯程序c 单片机跑马灯如何编程! 51单片机设计跑马灯的程序用(c语言)编写 电子邮件什么格式 注册Apple ID的电子邮件地址应该怎么写? 手指背上长很多小痘痘 ID密码里填哪种格式的电子邮件? 怎么去掉背上的痘印啊? 我背上长那种小痘痘,不知道是不是传说中的“搭背疮”呀?求有效的治疗方法。 去痘痘小窍门 海尔热水器EC8002排污口怎么拆 电子邮件id地址怎样来填写 前胸后背老长小痘痘抹药膏都不见长了好几年不会痒 有没有别的可医治的办法? 海尔热水器fcd-jthqa40-iii排污口 mcs51系列单片机编程 (跑马灯) 用汇编语言编写跑马灯程序 单片机的跑马灯程序 求注释 尽量每行都注释 我几乎看不懂啊! 谢谢= =!!明天就要答辩啦!!快的话加分加 c51编程 四个灯跑马灯 请问以下有关单片机跑马灯的C语言程序各语句的含义(详细) 用51单片机(汇编语言写)写一个跑马灯程序??知道的帮个忙写写。 如何用一个STC单片机做一个跑马灯,菜鸟一只,最好用详细的过程 求一段51单片机控制ws2812灯条的跑马灯程序 电脑的中央处理器指的是什么呀? 中央处理器是什么? 中央处理器的主要功能? 中央处理器主要由哪两部分组成简述它们的功? 如何消灭国字脸? 国字脸的女生如何变好看? 国字脸的矫正 怎样改变国字脸,国字脸太难看了 国字脸怎么办? 体现气质 国字脸MM如何用发型修脸型(组图) 国字脸太大了,怎么让脸更好看 国字脸适合修怎样的眉型?