PROTEUS实验——笔段式液晶.docVIP

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
PROTEUS实验——笔段式液晶

实验图(电阻是模拟10K,电容是10nF)接的是P1口和P2口。 程序效果是:三个数码管显示123,后隔一段时间显示加1(124)到999归000. 还有些笔段自己可以做实验得出来。 程序: #include reg51.h #define u8 unsigned char #define u16 unsigned int #define time 60 u8 code seg[]={0x3f,6,0x5b,0x4f,0x66,0x6d,0x7d,7,0x7f,0x6f}; u8 scan[]={0xd1,0xd2,0xd4,0xd8}; u8 dseg[]={0,0,0,0}; u16 dsvalue=123; dsc() {u8 a,b,c; c=seg[dsvalue/100]; b=seg[dsvalue/10%10]; a=seg[dsvalue%10]; if(a0x80)dseg[1]|=0x80;else dseg[1]=0x7f; if(a0x40)dseg[3]|=0x80;else dseg[3]=0x7f; if(a0x20)dseg[3]|=0x40;else dseg[3]=0xbf; if(a0x10)dseg[2]|=0x40;else dseg[2]=0xbf; if(a0x08)dseg[1]|=0x40;else dseg[1]=0xbf; if(a0x04)dseg[2]|=0x80;else dseg[2]=0x7f; if(a0x02)dseg[0]|=0x80;else dseg[0]=0x7f; if(a0x01)dseg[0]|=0x40;else dseg[0]=0xbf; if(b0x80)dseg[1]|=0x20;else dseg[1]=0xdf; if(b0x40)dseg[3]|=0x20;else dseg[3]=0xdf; if(b0x20)dseg[3]|=0x10;else dseg[3]=0xef; if(b0x10)dseg[2]|=0x10;else dseg[2]=0xef; if(b0x08)dseg[1]|=0x10;else dseg[1]=0xef; if(b0x04)dseg[2]|=0x20;else dseg[2]=0xdf; if(b0x02)dseg[0]|=0x20;else dseg[0]=0xdf; if(b0x01)dseg[0]|=0x10;else dseg[0]=0xef; if(c0x80)dseg[1]|=0x08;else dseg[1]=0xf7; if(c0x40)dseg[3]|=0x08;else dseg[3]=0xf7; if(c0x20)dseg[3]|=0x04;else dseg[3]=0xfb; if(c0x10)dseg[2]|=0x04;else dseg[2]=0xfb; if(c0x08)dseg[1]|=0x04;else dseg[1]=0xfb; if(c0x04)dseg[2]|=0x08;else dseg[2]=0xf7; if(c0x02)dseg[0]|=0x08;else dseg[0]=0xf7; if(c0x01)dseg[0]|=0x04;else dseg[0]=0xfb; } disp() {u8 i,j; for(j=0;j4;j++) {P1=scan[j];P2=~dseg[j]; for(i=0;itime;i++); P1=~scan[j];P2=dseg[j]; for(i=0;itime;i++); P1=0xf0; } } main() {u8 i; dsc(); while(1) {for(i=0;i100;i++)disp(); dsvalue++;dsvalue%=1000; dsc(); } }

文档评论(0)

xxj1658888 + 关注
实名认证
文档贡献者

教师资格证持证人

该用户很懒,什么也没介绍

领域认证 该用户于2024年04月12日上传了教师资格证

1亿VIP精品文档

相关文档