|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
51单片机与7SEG-MPX8-CA-BLUE数码管显示数字
( g/ L7 [" d' W5 \8 g* L$ @1 Y$ ?1 x7 |& Q% X$ D* K- c% \7 X" s
0 z7 p2 P1 R% O+ q3 N
- j" j1 ^2 d3 N5 S; D5 e; o
5 G8 M) |, ?5 f/ L$ G4 S# R程序用软件keil打开,仿真用proteus软件打开。型号为7SEG-MPX8-CA-BLUE数码管显示仿真原理图:. }6 r8 f( p; B$ a
i) ^0 | X* Y
2 Z2 j4 d1 m3 G6 }% v单片机源程序:
$ p* n1 g4 b/ x: W
2 C/ @+ C D$ p" e. @#include<reg51.h>, n7 o- l8 q" @3 P; b1 o8 [6 E) [. k
#include<intrins.h>' T9 z8 a3 L' u9 d9 k& U
#define uchar unsigned char+ v" u f6 L9 k5 A
#define ulong unsigned long
: E6 W% V7 c" _+ m: K#define uint unsigned int
0 d( c6 B6 O& N" }5 suchar code DSY_CODE[]={0xa4,0xc0,0xf9,0x99,0xb0,0xc0,0xf8,0x99};
, b" x& h, r' B/ ]% X- H- K) m( _1 o8 Auchar Digits[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
6 }, U7 D* M+ @ Z" `void delay_us(void)! I W* F" y6 i
{
2 P1 ] j! ~9 u6 [ uint a,b;" `- c$ J( z( y+ J
for(a=10;a>0;a--)
. `$ }2 {+ b+ f4 U$ i for(b=10;b>0;b--)
9 P% n& e& A: t, b6 K ;' O' \+ v0 w1 e# M' `' s
}
s* G' g; k0 {! [2 `) W& o2 ?" ^% b H
void main()
# L* m0 S9 n6 u. m" N) W{ : X, v' I) w7 p! N0 ~8 L9 ^0 }
uchar i;
, ?: m& A: X) w& n6 X5 J7 C' D% c while(1)# J9 `2 O; C% j- M& I- A2 Q& o1 [. g
{ - A: X5 X w2 Z# H
for(i=0;i<8;i++)
4 F* d' L: v/ T3 H3 ~ {
; t: Q$ Z! g$ ~ y P2=Digits;* b) [9 E) W8 j
P0=DSY_CODE;0 _1 n9 x" r$ F- p+ ~$ I
: ]3 n% E S! ^- A5 a! o2 q" ^ delay_us();+ A* {/ H- _: X
} 6 z0 Y+ E+ W% ^* _: U" S
}
0 W- C8 L5 h$ _, i, o}
& P; m4 ~: v+ H9 _. x) [" |( d4 V4 X, \( h2 X( C; o' L* N, O
下载:
" Q3 }: B- H* }! A: e& Y
, P. t* A6 n3 c7 S& \3 U" {' M0 A; t% k: _7 l/ Z
|
|