单片机音乐喷泉程序

gaoxings

单片机音乐喷泉程序

' w6 h# G8 q1 z6 ^
单片机音乐喷泉程序源码：
#include<reg51.h>
  L% q. D  M6 D' Q2 h2 Y6 u#define uchar unsigned char
- P6 I' z3 t4 P3 h6 G' j#define uint unsigned int
& D3 ]) v9 ]; ~$ Fsbit out=P3^7;
sbit led1=P0^0;
  ~5 w' n; Y5 |) bsbit led2=P0^1;
1 ~2 q: x' M1 usbit led3=P0^2;
+ a6 t  h7 I# M+ h! w( B9 }$ asbit led4=P0^3;
5 t/ w# M$ y0 t0 M* A" d- {$ Z% `sbit led5=P0^4;
sbit led6=P0^5;
" J* P. E8 ~& W# R' k! Wsbit led7=P0^6;
sbit led8=P0^7;
8 A, P8 v* x" ^$ K
+ z2 [( u4 E8 ]( X& n" Y
sbit SCL=P1^2;                //SCL定义为P1口的第3位脚，连接ADC0832SCL脚
sbit DO=P1^3;                //DO定义为P1口的第4位脚，连接ADC0832DO脚
/ p% I6 @+ B3 {* hsbit CS=P1^0;                //CS定义为P1口的第4位脚，连接ADC0832CS脚

6 z( w# q9 }5 C( W' H$ R5 y
+ Y; T- x2 U' r

) C& M) Y$ K! u; a

7 w" C; J" p; r2 Q/ G# E/ Xuchar h1,date;
unsigned char adval;
void delay(uint z)
{
   uchar y;
   for(;z>0;z--)
   for(y=5;y>0;y--);
3 x5 e5 m+ c" R5 F( `4 M}
* {+ K- s. ?5 P5 O3 G  s
. Y+ X8 Y4 d$ ~: L

# u) ]' A& w* ~1 @$ g
2 R, T7 S1 w4 G* {; O1 J/ }/***********读数模转换数据********************************************************/        
//请先了解ADC0832模数转换的串行协议，再来读本函数，主要是对应时序图来理解，本函数是模拟0832的串行协议进行的
                                                //  1  1  0 通道
                                                //  1  1  1 通道
5 C" J: m6 W6 E. _* vunsigned char ad0832read(bit SGL,bit ODD)
{
% K& Q. w; c3 ^        unsigned char i=0,value=0,value1=0;               
: L5 k. G8 o% w# m2 c. t                SCL=0;
                DO=1;
# X2 Y. d; L  O2 k: D3 ~3 ]                CS=0;                //开始
                SCL=1;                //第一个上升沿        
                SCL=0;
: t, ~! R) h( M, G. Z4 P) e+ F                DO=SGL;
                SCL=1;          //第二个上升沿
! s  j3 A4 G8 T7 J5 t/ v                SCL=0;
1 F7 t% Y4 M8 e: _6 P: W- ^                DO=ODD;
                SCL=1;           //第三个上升沿
) l3 _' M4 i5 V6 O! `( _8 x- b                SCL=0;           //第三个下降沿
' y9 A" _; _& X0 i: ^1 I: @% ^& L- Z                DO=1;
4 s) \. G) [/ r1 B' ]                for(i=0;i<8;i++)
: `3 Y0 U" c+ W# M# U, ~3 m                {
                        SCL=1;
& l3 F6 j& D0 z3 t6 ^. ?# U                        SCL=0; //开始从第四个下降沿接收数据
! M! [! v6 G9 b$ X. t9 i                        value<<=1;
                        if(DO)
, I# {- |2 b- _4 j! t1 r; K                                value++;                                                
                }
8 J4 n* t  d' @1 I' L$ H                for(i=0;i<8;i++)
- V5 @  g: R7 _4 M! j, e; T, W; C# ^                {                        //接收校验数据
                        value1<<=1;
& M1 f) P: |9 [1 M1 e. K                        if(DO)
/ g: y- L5 b* T4 W7 ~) t2 l                                value1+=0x80;
                        SCL=1;
                        SCL=0;
                }
2 X2 e, Y3 G( `; u0 m; x8 |# R                CS=1;
: G% D0 D, F6 j0 ^5 h1 X) C                SCL=1;        
                if(value==value1)                                //与校验数据比较，正确就返回数据，否则返回0        
                        return value;
        return 0;
" K8 |+ N2 j" u, z) x9 |! ?. x6 p}


void penquan()          //PWM调压
{
    date=ad0832read(1,0);
        
# b8 K9 U: X( v5 V    h1=(255-date);
% H% R' P. U! f" I! P    out=0;
    delay(h1);
* W' K1 |  A5 u- k- G. O        if(h1>30) led1=1; else led1=0;
        
' E- p; C7 l1 @# |. F3 ?
- x4 N6 i. F& c" e1 M: k
) y4 M" m% q, x+ s  a0 b

) L' k  E8 F# e7 {! B…………余下代码请下载附件…………
  p  p, A, g, N( Z* u- m
' s( c' t7 H- J& v下载：

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

. j$ z- I. N: ~: ~0 s
1 X+ G2 s, h) i4 o

sunygd

看看楼主的代码

S123456S

看看代码，参考参考
" d9 |1 h+ H) ?  X0 n9 C3 L9 `6 t