历史上的今天
返回首页

历史上的今天

今天是:2025年02月18日(星期二)

正在发生

2020年02月18日 | C51单片机利用74hc138扩展流水灯的仿真电路图+程序

2020-02-18 来源:51hei

C51单片机利用74hc138扩展流水灯程序 包含源代码,仿真电路 可以随意扩展多个LED

电路原理图如下:
0.png?imageView2/2/w/550

单片机源程序如下:

#define uint unsigned int

#define uchar unsigned char


void delay1(uchar y)

{        

    uchar i;

        uint j;

        for(i=0;i        {

                for(j=0;j<5000;j++); 

        }

}

void led(void)

{


P3=0x01; //01

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P3=0x02;//10

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P3=0x04;//100 

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P3=0x08;//1000

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P3=0x10; //10000

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P3=0x20;//100000

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P3=0x40;//1000000 

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P3=0x80;//10000000

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);

P3=0x00;


P1=0x01;//P1口01

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);


P1=0x02;//P1口10

P2=0x00;        

delay1(20);

P2=0x01;

delay1(20);

P2=0x02;        

delay1(20);

P2=0x03;

delay1(20);

P2=0x04;        

delay1(20);

P2=0x05;

delay1(20);

P2=0x06;        

delay1(20);

P2=0x07;

delay1(20);

P1=0x00;

}


推荐阅读

史海拾趣

Corporation Soneet公司的发展小趣事

然而,随着市场竞争的加剧,Soneet也面临着来自同行的挑战。为了应对这些挑战,Soneet不断加强研发投入,提升技术创新能力。同时,公司还通过优化生产流程、降低成本等方式,提高产品的竞争力。这些措施使得Soneet能够在激烈的市场竞争中保持领先地位。

贝特莱公司的发展小趣事

深圳贝特莱电子科技股份有限公司成立于2011年7月,从一开始,公司就明确了以技术研发为核心的发展战略。依托专业团队多年的行业资源积累,贝特莱致力于开发具有自主知识产权的核心技术。在指纹识别、触控、生命感知及MCU等芯片领域,贝特莱不断取得突破,为后续的市场拓展奠定了坚实的基础。

CONEC公司的发展小趣事

为了进一步提升公司的竞争力和市场影响力,CONEC开始了国际化布局。1990年,康耐加拿大公司的成立,标志着公司迈出了国际化的重要一步。随后,CONEC在德国、捷克共和国、美国和波兰等地设立分公司或生产基地,形成了全球性的生产和销售网络。同时,公司还积极寻求与全球领先的电子企业和技术机构的战略合作,共同推动电子行业的发展。

Crane Connectors公司的发展小趣事

Crane Connectors公司深知人才是企业发展的核心力量。因此,公司高度重视人才培养和团队建设工作。公司建立了完善的人才培养和激励机制,吸引和留住了一批高素质的研发、销售和管理人才。同时,公司还注重团队建设和文化建设,营造积极向上的工作氛围和良好的企业文化。这些举措使得公司的团队凝聚力和执行力得到了显著提升,为公司的快速发展提供了有力保障。

请注意,以上故事是基于一般企业发展经验和市场环境推测的,并不代表Crane Connectors公司的实际发展历程。如需了解该公司真实的发展故事,建议查阅相关文献资料或访问公司官网获取更多信息。

AZM [Arizona Microtek, Inc]公司的发展小趣事

为了进一步提升公司的国际竞争力,AZM公司开始实施国际化战略。公司积极寻求与国际知名企业的合作机会,通过技术合作、市场合作等方式,共同开拓全球市场。同时,AZM公司还在海外设立了研发中心和生产基地,以便更好地了解当地市场需求和技术发展趋势,实现全球布局和资源整合。

请注意,这些故事是基于假设和推测构建的,并非AZM公司的真实发展历程。如果需要了解AZM公司的具体发展历程和故事,建议查阅该公司的官方网站、新闻报道或相关文献资料。

Dailywell Electronics Co Ltd公司的发展小趣事

进入21世纪后,德利威电子加速了其国际化布局的步伐。2000年,公司在中国大陆东莞成立了德利威电子厂,并成功推动了5S运动(整理、整顿、清扫、清洁、素养),进一步提升了公司的管理水平。同时,公司还取得了ISO-9001国际认证标准,标志着其质量管理体系的进一步完善。此外,德利威电子还取得了德国TUV产品安规认证,进一步增强了其产品的国际竞争力。

问答坊 | AI 解惑

SJA1000独立的CAN控制器应用指南

前面介绍了SJA1000独立的CAN控制器的工作原理和电路本文将介绍SJA1000独立的CAN控制器应用指南以变可以更好的运用SJA1000…

查看全部问答>

RF工程师的音:urgent:某著名半导体外企新出来的职位1_RF(内部推荐)

某著名外企新出来的RF 职位, 不过指明了公司名, 注意不符合请勿浪费资源,同时请注意工作地点有:上海,深圳,北京,成都,请在简历中注明申请去的地方。紧急招募,越开越好。请发中英文简历到 herofighter88@gmail.com 除Technical Hub Manager, ...…

查看全部问答>

各位大虾,帮忙看看下面是什么编译错误,怎么解决,多谢啦

在PPC下编译出现如下编译错误: 2140: Error: unsupported relocation type                                    &nb ...…

查看全部问答>

请问我Hook了ZwCreateFile后,为什么获取不到文件名呢?

我在我的HookZwCreateFile中 DbgPrint(\"HookZwCreateFile:%wZ\\n\",ObjectAttributes->ObjectName); 打印出来的全是目录,没有文件名?为啥? 谢谢各位驱动大牛。。。。…

查看全部问答>

问个问题?

用pc通过串口给单片机发送数据 用vb6.0编程 比如我要发送 0xFF  字节, 我用vb不知如何实现 试过: 用MScomm1.output=255    出错 用MScomm1.output=chr(255) 数据不准确 …

查看全部问答>

关于spi的问题

麻烦各位帮我看看程序 为什么我得不到uclk和mosi的波形呀 #include<msp430x14x.h> void main(void) { volatile unsigned int i; WDTCTL = WDTPW + WDTHOLD; // Stop watchdog BCSCTL1&=~XT2OFF; ...…

查看全部问答>

ADI USB全速隔离芯片ADUM4160

ADI USB全速隔离芯片ADUM4160 ADuM4160是一款基于ADI公司iCoupler®技术的USB端口隔离器。它将高速CMOS工艺与单片空芯变压器技术相结合,可提供优异的工作性能,并且很容易与低速和全速USB兼容外设集成。许多微控制器实施的USB只向外部引脚提供 ...…

查看全部问答>

出mini6410开发板。。。。。。。。

RT,出mini6410,256RAM 1GB SLC FLASH 介绍淘宝搜 价格:420RMB。…

查看全部问答>

有关AD835的使用注意事项?

本帖最后由 paulhyde 于 2014-9-15 03:32 编辑 AD835在使用的过程中会影响结果的主要注意事项有哪些?谢谢!    …

查看全部问答>

28335 CCS3.3 上网下的例程 然后写程序写不上

28335 CCS3.3   上网下的例程  然后写程序写不上 提示 No sections were found that map to Flash …

查看全部问答>