单片机音乐喷泉程序

gaoxings

单片机音乐喷泉程序

. Y7 j7 H  R8 G
6 t2 ?) N$ ?; c% M- o% O单片机音乐喷泉程序源码：
4 c) E2 ?# W5 `8 d" J9 |  c0 Y: s#include<reg51.h>
#define uchar unsigned char
* i- [1 G4 C7 q3 S* \#define uint unsigned int
! l8 S- X2 F- Q: `/ y# xsbit out=P3^7;
% W3 H! b8 M6 {, A2 v# R2 R; {. Esbit led1=P0^0;
6 C/ A; `2 M, w! w+ f' ]/ hsbit led2=P0^1;
sbit led3=P0^2;
sbit led4=P0^3;
7 o& `, b" O0 x1 H1 L2 A4 L' l. g) Zsbit led5=P0^4;
6 Q! c/ Q( U# F4 T3 T, ]# y* ksbit led6=P0^5;
0 A" x1 g' V/ Ksbit led7=P0^6;
) J4 n+ N4 y7 x2 [( msbit led8=P0^7;
+ B. t' F+ Y8 K5 e6 h3 i

sbit SCL=P1^2;                //SCL定义为P1口的第3位脚，连接ADC0832SCL脚
, i' L' r$ M) z! Y7 S& qsbit DO=P1^3;                //DO定义为P1口的第4位脚，连接ADC0832DO脚
sbit CS=P1^0;                //CS定义为P1口的第4位脚，连接ADC0832CS脚


+ x9 O# W2 @& R; [; M) t



uchar h1,date;
unsigned char adval;
void delay(uint z)
$ Z+ |% h6 `. c6 z+ g% H' \0 L' \{
   uchar y;
- A. I* Z$ {! X( j) u   for(;z>0;z--)
   for(y=5;y>0;y--);
& H6 F7 a4 e2 i% |: Q  t. j}
, z, R0 p6 _, p


- n( t0 r) {0 ?, u; J
/***********读数模转换数据********************************************************/        
7 c8 H9 F5 a  u: V9 j  B2 t- }( f//请先了解ADC0832模数转换的串行协议，再来读本函数，主要是对应时序图来理解，本函数是模拟0832的串行协议进行的
                                                //  1  1  0 通道
                                                //  1  1  1 通道
unsigned char ad0832read(bit SGL,bit ODD)
{
        unsigned char i=0,value=0,value1=0;               
! y: I9 ^- V/ W/ A. d                SCL=0;
& G. Q! l$ ~- q                DO=1;
                CS=0;                //开始
8 g- M' D4 ~# x4 E# S' |* K, A* v: R; D                SCL=1;                //第一个上升沿        
  m7 \- z! X. {6 v; t                SCL=0;
                DO=SGL;
$ O9 d1 ~8 |6 N+ t                SCL=1;          //第二个上升沿
& ]& r  T) ]3 |# a$ |+ C                SCL=0;
& k6 ]# w- ?5 \( [0 K! ?1 b7 @' B/ d                DO=ODD;
                SCL=1;           //第三个上升沿
                SCL=0;           //第三个下降沿
                DO=1;
                for(i=0;i<8;i++)
. Y% x; L) P  h' a# d                {
% h* K. A; B9 f- t, n+ L                        SCL=1;
                        SCL=0; //开始从第四个下降沿接收数据
                        value<<=1;
0 {( G. u- v6 P7 [- H                        if(DO)
                                value++;                                                
: n0 W+ I8 c; k+ j5 h$ z) C' V                }
' N7 \0 x$ Z! E  k! v4 p                for(i=0;i<8;i++)
/ T! A3 `) w& }. m2 C                {                        //接收校验数据
/ w& a: L' ?  T                        value1<<=1;
  k' T/ ^- W' [. Y) I# R                        if(DO)
                                value1+=0x80;
                        SCL=1;
                        SCL=0;
( N" }; u! [4 L: s+ }) E$ p5 c$ g                }
                CS=1;
. N( @7 l) _; K' M                SCL=1;        
                if(value==value1)                                //与校验数据比较，正确就返回数据，否则返回0        
                        return value;
        return 0;
}
2 p' k# L8 w  P# r* n5 r4 G

void penquan()          //PWM调压
{
" a5 y. ?5 @! G6 }  G+ x    date=ad0832read(1,0);
. T% r8 V% @- Z/ n5 E# M9 b7 q        
& n5 F# R4 M/ ^/ R    h1=(255-date);
    out=0;
    delay(h1);
6 T- A; y! z7 V        if(h1>30) led1=1; else led1=0;
3 m# u+ ?: k3 N" R        
- m8 P. N; O; L3 f, T
* v- `# k2 A( q8 A# P
* Y) P1 a5 N/ x$ H6 ^

2 Y) J  D5 ^) `, d+ [/ P) \…………余下代码请下载附件…………
! T9 c% Y9 P# w, D0 m4 {6 J4 d3 V9 ~) ?
下载：
+ V. Q) c/ Z) q

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

3 u5 p* ]4 K* m4 p/ r' {3 m

sunygd

看看楼主的代码

S123456S

看看代码，参考参考
: ^4 S! q7 J& t( h