单片机音乐喷泉程序

gaoxings

单片机音乐喷泉程序
. k( m7 x( p1 ~% t% L. u& ~- X

单片机音乐喷泉程序源码：
) @2 W2 B% S+ ^# R2 c#include<reg51.h>
#define uchar unsigned char
#define uint unsigned int
/ \$ Q: [( `$ fsbit out=P3^7;
sbit led1=P0^0;
sbit led2=P0^1;
! k. ?. F. g4 k9 Usbit led3=P0^2;
sbit led4=P0^3;
sbit led5=P0^4;
sbit led6=P0^5;
sbit led7=P0^6;
sbit led8=P0^7;


4 e' `! `% W0 L6 E% t  X1 Isbit SCL=P1^2;                //SCL定义为P1口的第3位脚，连接ADC0832SCL脚
sbit DO=P1^3;                //DO定义为P1口的第4位脚，连接ADC0832DO脚
" N2 p" s1 [6 y) o0 e. E: Nsbit CS=P1^0;                //CS定义为P1口的第4位脚，连接ADC0832CS脚

5 a8 T6 U7 u6 p  j0 a2 ^& }

( }2 N+ M. A1 r1 _1 |. y: i" M

! p3 m0 @4 V. N3 A5 K$ C5 x
( Q7 A" q1 U9 `  }uchar h1,date;
5 ~/ e* c! H' xunsigned char adval;
9 T, V$ ?6 B& h- `2 fvoid delay(uint z)
$ X3 C3 |9 w& l3 u& X# T- y{
   uchar y;
   for(;z>0;z--)
   for(y=5;y>0;y--);
4 q. ^4 O# I( ~5 m" G}
  |. O' Q+ [7 X8 c

: A3 g' R* h+ M- b1 J% [
6 H0 F4 `+ B- j" W4 }3 _
) W  M- E5 G. R7 d' J; M/***********读数模转换数据********************************************************/        
: i' h4 X3 g  ?1 W3 M//请先了解ADC0832模数转换的串行协议，再来读本函数，主要是对应时序图来理解，本函数是模拟0832的串行协议进行的
                                                //  1  1  0 通道
% w3 w; n- D8 b) M& l7 D" ], Z5 F                                                //  1  1  1 通道
3 k- k4 Q$ H4 Z  g7 {unsigned char ad0832read(bit SGL,bit ODD)
{
        unsigned char i=0,value=0,value1=0;               
                SCL=0;
                DO=1;
                CS=0;                //开始
/ t/ m( v4 A2 Y! o9 S9 v                SCL=1;                //第一个上升沿        
/ C# C2 S0 ~) `8 {6 ~                SCL=0;
                DO=SGL;
. w  }7 W6 y( K! f. \6 B  m                SCL=1;          //第二个上升沿
) t' W: R9 N/ _0 P1 d5 o4 j! d                SCL=0;
                DO=ODD;
! R$ t0 K% y2 ^/ b" q) F3 `8 Q                SCL=1;           //第三个上升沿
* ]9 D; D9 R- w: H, f; O# v# `# w                SCL=0;           //第三个下降沿
                DO=1;
                for(i=0;i<8;i++)
                {
) F5 `* E* k' g( e/ G. s                        SCL=1;
                        SCL=0; //开始从第四个下降沿接收数据
' a( B5 p& a$ P6 f) ~7 b8 x                        value<<=1;
                        if(DO)
( ]- h( X/ A5 M8 n" M                                value++;                                                
6 x9 v+ {: M9 f9 B2 N                }
2 Q' h5 L9 I8 }7 Z6 D1 r# t( i. u6 u% m                for(i=0;i<8;i++)
6 o+ x! H+ h/ d3 i2 T/ R0 X2 ^                {                        //接收校验数据
                        value1<<=1;
                        if(DO)
                                value1+=0x80;
                        SCL=1;
                        SCL=0;
  i( \0 o8 J8 s  K1 I                }
                CS=1;
                SCL=1;        
                if(value==value1)                                //与校验数据比较，正确就返回数据，否则返回0        
, I  D5 s5 ~* |0 o                        return value;
0 ~1 R- Q4 K' }- F+ `        return 0;
+ k) b) M3 a1 N6 \7 f. f}


void penquan()          //PWM调压
{
    date=ad0832read(1,0);
        
    h1=(255-date);
    out=0;
% f. w& J2 @4 @* c$ M9 [! \    delay(h1);
5 {/ `  d" f  E) N9 c+ j; W        if(h1>30) led1=1; else led1=0;
5 m' b: [/ d, }/ X        

8 A; n' F. C. C6 F- g8 D( M

8 O7 W" y4 ]6 j, d7 X; N0 I
# d3 ^4 i: t: ?7 |. {2 n…………余下代码请下载附件…………

下载：

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

$ I+ {% t. S4 j& R" |

sunygd

看看楼主的代码

S123456S

看看代码，参考参考