单片机音乐喷泉程序

gaoxings

单片机音乐喷泉程序


$ ^( h# W0 [/ \6 e" q! l9 x单片机音乐喷泉程序源码：
' s% S; [; \' Y+ `# S: ]#include<reg51.h>
# ?6 U0 O5 H7 y#define uchar unsigned char
8 K! @6 w, C/ K; h, k6 y$ x#define uint unsigned int
4 f7 X9 I1 u; r' ?sbit out=P3^7;
sbit led1=P0^0;
sbit led2=P0^1;
sbit led3=P0^2;
- e2 L" K6 f$ P; g6 Tsbit led4=P0^3;
sbit led5=P0^4;
: j. c. S7 P5 p$ M1 W7 ], F" N, c' Zsbit led6=P0^5;
sbit led7=P0^6;
sbit led8=P0^7;

2 ~8 I4 N1 y4 s
sbit SCL=P1^2;                //SCL定义为P1口的第3位脚，连接ADC0832SCL脚
sbit DO=P1^3;                //DO定义为P1口的第4位脚，连接ADC0832DO脚
sbit CS=P1^0;                //CS定义为P1口的第4位脚，连接ADC0832CS脚
. [& d2 L$ t( M6 l( @
, N' \* i6 M7 ?/ q- d9 Q* }
" |9 _* w& O5 R- V- e, _& k

7 @6 W" P8 T( @8 h

8 c1 y6 V( ^0 z0 s6 Auchar h1,date;
unsigned char adval;
4 n0 \1 @+ n1 t- g) g" T1 lvoid delay(uint z)
{
   uchar y;
   for(;z>0;z--)
   for(y=5;y>0;y--);
0 d' t, E/ A) n* l}
2 C( m/ G7 G1 o* c2 I8 k
9 m) ~4 D  B  n" Y& ~5 E


$ e6 C& z0 A2 H& R, Y  p- |/***********读数模转换数据********************************************************/        
//请先了解ADC0832模数转换的串行协议，再来读本函数，主要是对应时序图来理解，本函数是模拟0832的串行协议进行的
8 E# m. z. r1 b& ]  X& ]                                                //  1  1  0 通道
                                                //  1  1  1 通道
unsigned char ad0832read(bit SGL,bit ODD)
! X# B% ?2 M5 m{
- O/ z+ P5 h3 L, X        unsigned char i=0,value=0,value1=0;               
; a$ ^6 q* b- ?- f! Q0 h1 ]  k" d                SCL=0;
                DO=1;
                CS=0;                //开始
( y4 u  Z, A. B                SCL=1;                //第一个上升沿        
! d; H/ c6 p* J& u+ L% U' H  A$ o                SCL=0;
                DO=SGL;
3 e3 [8 N9 s6 q- a9 J                SCL=1;          //第二个上升沿
2 z7 X% t# |$ j! x                SCL=0;
$ ?7 K1 D% I0 ]: r5 W/ X                DO=ODD;
+ e# Z7 }/ f# A4 F- p- \                SCL=1;           //第三个上升沿
# ?: C% u; O% i0 o                SCL=0;           //第三个下降沿
                DO=1;
                for(i=0;i<8;i++)
+ q0 Z8 c" I5 d8 i                {
                        SCL=1;
( w. K7 A" X. u$ [) t                        SCL=0; //开始从第四个下降沿接收数据
                        value<<=1;
8 {. t' Z3 E. N+ e0 P% N  u% g                        if(DO)
                                value++;                                                
                }
                for(i=0;i<8;i++)
                {                        //接收校验数据
                        value1<<=1;
                        if(DO)
                                value1+=0x80;
1 {; M6 ^) z1 I  s4 I2 C. C' i                        SCL=1;
! g* c  R+ T" ]# j0 b/ {( t                        SCL=0;
6 h$ r6 ~' n! e8 D5 R                }
                CS=1;
" ]% M* Y9 M2 ^  e, b                SCL=1;        
                if(value==value1)                                //与校验数据比较，正确就返回数据，否则返回0        
                        return value;
        return 0;
}

- f8 r6 A* |; G. E) Y! {
void penquan()          //PWM调压
{
) X! P2 }- I  o    date=ad0832read(1,0);
        
7 W" E: i0 I! D5 F7 k4 }7 k    h1=(255-date);
    out=0;
    delay(h1);
$ R# Z8 e& Y+ d3 |/ s9 o        if(h1>30) led1=1; else led1=0;
        



' X$ s. D. _: A5 J+ r
2 e$ p* D% r( b! K…………余下代码请下载附件…………
1 o6 S* _! O0 D' F( j+ @% V- U
下载：
/ S7 A8 W8 `: G

游客，如果您要查看本帖隐藏内容请回复

* z( {$ t) b& I+ ]/ z6 K

S123456S

看看代码，参考参考
  R. ]! H7 u' q

sunygd

看看楼主的代码