找回密码
 注册
关于网站域名变更的通知
查看: 569|回复: 3
打印 上一主题 下一主题

单片机光照显示电路proteus仿真 源程序 原理图 课题题目

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2019-1-15 11:02 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
单片机光照显示电路proteus仿真 源程序 原理图 课题题目
4 H9 v/ ~+ l, X5 L
( {9 d, O0 V5 g: f! c6 r
0 H# _2 _, q& v7 L: {6 S) W
做的单片机光照显示电路! O3 X" x; e: h/ a2 B( ^: y+ `
用了一个星期的时间/ p; a0 [9 z  D' I/ M
附件里包含源程序 原理图 课程设计的要求
( ]$ b8 T1 e: X9 @; t) j( l) s0 q原理图用proteus画的- m* b$ I4 j% O8 R0 D
里面的放大电路不知道哪里用的上所以随便添加了一个,放大倍数设成一倍
1 T6 j2 Z! @& y- `6 V8 U; ^) o这只是个简单的电路 适合刚做单片机课设的新手' `3 N7 A" A  `* ^1 h! `  D1 c6 {

7 B* v: s* d) A" S' `% d
% r% d/ ^) S& J7 ~3 N- M) M7 j
6 t9 [6 A* M% I4 I
单片机源程序:% }2 {1 |; L3 L5 M
#include
, Z+ H1 \$ ~& u, y* S8 A3 U, h( ^#define uint unsigned int' m/ C1 G" p& H# u) w- U
#define uchar unsigned char
, a: [+ t" x; b8 w9 Y: Wsbit st=P3^3;. g3 J6 Y+ u1 R: I% O: C) s( c
sbit eoc=P3^5;5 z# i6 ^1 Q  X0 O$ N
sbit OE=P3^4;
# l4 Y4 I1 n4 rsbit dian=P1^7;9 h! r5 k! ]4 W; }; o0 V+ |7 K, I
uchar code dt[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};- r' m+ T$ k* h- Z# [1 P7 f+ A
uint data1,disi,disan,dier,diyi;
  H% i3 D3 P1 _+ Y" Y8 g( x' h. X% g
/*********延时函数************/
# P2 ]9 w+ F, [% V* G8 m3 }: {# H- L6 ]
void delay(uint ms). h% f. B5 S, T; h
{
2 u- A2 ?  |+ Z0 S% U    uint i,j;# i! f0 U! C  ]3 {. C/ B6 \3 C
    for(i=ms;i>0;i--)4 o& w  X- m* ?- b4 ~" h
        for(j=120;j>0;j--);
/ N$ t$ W: ~; {3 n6 w3 R& [}
7 }7 O& y; q/ g9 U- i5 q: ~' Z4 v7 Z! [3 t
   /*********AD转化函数************/
$ V/ c+ `/ Z( l2 |6 [7 `5 K
0 T" M  E/ \1 t% h! C+ {: T3 `7 i   void AD()  ]+ K, n; G8 R0 \  o' T  D
{            . d9 h7 v8 s1 F4 {) ^* g- i
   OE=0;6 [9 I. _. A2 @% M
   st=0;
* b8 `  l9 c6 w2 R   delay(1);
; t$ o& N+ U+ V4 y1 V- a, d   st=1;0 d* L9 _1 a' N
   st=0;: w7 z3 ?) Y0 l* F6 Q, L5 e
   delay(5);//    while(eoc==1);//等待转化完毕
4 W7 k+ ]% h# r. I( d   OE=1;//打开传送数据
: m  P6 t5 W/ M2 O! h# Z- W   data1=P0;//数据送入P0口5 d$ _  S9 R  e3 N! H) ~4 P% G
}5 w$ @/ c4 u- t8 [- \8 Y6 t) R

+ ?+ N$ a6 B  C, K0 W+ K" s9 [( ^% x+ d/*********计算除法************/
* x9 z( l1 V+ W* E& i
; n8 C2 z; [  h. z/ i" ?5 e! Z3 Svoid chufa()3 d! G% E0 t- R  S# n9 b
{
" X. S: X6 o+ g+ c0 j0 p. o- p( a   data1=data1*19.53125*2;
0 R% c( b% i) f& ]2 X2 c   disi=data1/1000;0 J5 i! K: r* F" R% s, [) V
   disan=data1%1000/100;0 R) R: p9 z) F  m
   dier=data1%1000%100/10;
0 r4 f( Y* g, y# G% S9 N+ C3 j( `   diyi=data1%1000%100%10;4 m. v5 C9 e5 W6 ~( U! A
}
- {( X4 \( S0 F' V  _
7 r- b6 w1 c% }) b& N4 ~/*********显示函数************/  ~2 p( N/ Y- ]; u# }

$ y( U2 Y- M7 e# ^void xianshi()2 f7 D5 H* c4 h% v4 |; X0 j
{    6 I0 e$ B& k( p
                P1=dt[disi];//整数部分
1 W5 N7 _  h2 f' N    P2=0x01;8 y1 g* E* Q3 a( ?
    delay(1);3 K* z' C/ ^8 }3 [" h
    P1=0xff;
+ f9 D/ q' v1 c6 ?5 c    P1=dt[disan];//小数点后一位/ ^0 E1 F$ g- h1 L& f# F$ a
    P2=0x02;2 K& ?; q7 I# D4 ]
    delay(1);3 }0 j. H& X, b. M$ ?3 f
    P1=0xff;
4 i6 t5 n9 j! @# w. I    P1=dt[dier];//小数点后两位
; M4 S, h! f; F( u4 N' _                dian=0;//打开小数点6 ]* n2 w8 p+ A! [& I- Z# @4 a. Q' C
    P2=0x04;
7 o  e) Q  _7 H4 N! A6 g1 T    delay(1);  @# e% O4 I$ y# L2 o. A
    P1=0xff; ) G2 _/ r  c: \. C5 R8 o7 U
                P1=dt[diyi];//小数点后三位
* O4 x* X2 D1 Z+ `! b7 ~  ]    P2=0x08;
2 R: q' N1 |& e: d; G4 A    delay(1); 6 T& ]0 {: o  m5 K
                P1=0xff;
% u. p: C* I* a; O# U}
0 d9 B/ T% f! \: H1 n1 g6 ], }! `& b( C
/*********主函数************/
3 `3 R: [: V+ H$ ~
5 {$ D6 O* M; b, Q, R* tvoid main(void)
8 M( T1 _6 m0 ?0 n9 D  a; s{
- c1 x/ s# q7 }* k    while(1)8 y# a  ?( D- s1 p+ n2 G6 E9 w- ]
    {
0 _; j' k8 o! d9 [: R& z                        AD();, O5 Z+ c4 l7 d7 b" J
      chufa();+ C4 _; S- M: s
      xianshi();+ w. F* @2 G0 i2 y9 A8 n/ s
          }$ X! ?, o$ D& V  D8 L: n. i9 v2 @
}
- y6 p$ n/ J# i# ?7 [9 N
" e. N' D: Z9 i9 T! |! D
  f) @7 u" d* z& n. Q  H5 I% _: d+ J* X' I
# X3 I* d# {% p" o1 Q" \所有资料下载:
2 L3 P6 r0 c) W* ^8 z
游客,如果您要查看本帖隐藏内容请回复

0 }0 A, ~2 A/ c1 b; F  M

) `' p0 b% A6 v9 b" k( O; Z3 z

该用户从未签到

2#
发表于 2019-1-15 23:44 | 只看该作者
谢谢楼主分享

该用户从未签到

3#
发表于 2019-1-15 23:45 | 只看该作者
好东东,谢谢楼主分享

该用户从未签到

4#
发表于 2020-6-12 23:01 | 只看该作者
谢谢楼主分享
9 `+ l3 W7 R1 @  x; E! K3 ?8 R3 ?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-8-11 21:53 , Processed in 0.140625 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表