|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
51单片机与7SEG-MPX8-CA-BLUE数码管显示数字" j0 D* f2 M( _0 Q% X/ `* u
+ L" ^) F! \* W/ `4 T" a
, \- s! Q3 A$ N3 Y+ [6 g( c, _8 q Q0 f j, d
% X6 a5 q& Y! o) v程序用软件keil打开,仿真用proteus软件打开。型号为7SEG-MPX8-CA-BLUE数码管显示仿真原理图:' E1 k c5 Z8 d/ V. E3 B
( z/ L- g/ o- e5 J0 v5 F% a1 n. l. ~
单片机源程序:
3 K9 {1 W+ }3 x; G/ t" |3 u
( t" y" \3 G+ h1 n# n5 K: Z/ R#include<reg51.h>2 W8 k; K) l6 X, H, c- ]7 F
#include<intrins.h>
. R' @0 q# x: V9 U! [. e#define uchar unsigned char
4 y( U/ j! f" M: B#define ulong unsigned long
}: _% f9 p) B#define uint unsigned int$ F' E! M* h9 y6 p I8 X" \
uchar code DSY_CODE[]={0xa4,0xc0,0xf9,0x99,0xb0,0xc0,0xf8,0x99};& c* l% X8 s4 Q; c
uchar Digits[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};8 X3 G8 }" J' F$ I% X9 V5 Q) q/ H. o
void delay_us(void)1 k$ Y6 q# G4 Y+ l. ^( @0 m
{# [$ K }0 q: u+ S, P' S. @
uint a,b;. D: c* X8 W! `
for(a=10;a>0;a--)
/ P6 F4 }6 }, u" F for(b=10;b>0;b--)
9 c1 y o4 i: W3 j ;* A# I( k* k, V$ E1 A* @3 c* A
} ! C1 A' `- \" x* C
. Q5 D7 V( y% Y5 ]void main()
* g( Y9 B* W; |- @5 P{
& ^1 }, W' F/ A+ c uchar i;; E- K6 B+ p7 m) T$ i! R7 F$ A
while(1)
& L/ M x0 {' |0 ] | { 0 X' I( E/ q, w$ w/ ~0 c, |
for(i=0;i<8;i++)
x9 c$ v9 y5 D% } { & Q0 s1 S2 F( w9 t
P2=Digits; C4 ^6 |+ j0 ?! M4 ^# s$ ^
P0=DSY_CODE;
' m5 Z# J D- n; Y/ \3 X$ H
$ ]3 z) P, R! t; I" y delay_us();
e% |9 {+ S+ T4 g } / H( }2 z' q6 Z4 G7 N/ ?1 N- Z
} 9 @! z& B! N& e! L- \, |
}
. _# F( m* H# A1 e/ k( D) S! C9 y3 Y9 A3 z
下载:
5 i! S4 b) i, g- G( h
$ G) y& i% b% p7 D( Y7 p d& {5 c1 c f
|
|