单片机音乐喷泉程序

gaoxings

单片机音乐喷泉程序


# {. R* R  z7 V) K; c单片机音乐喷泉程序源码：
#include<reg51.h>
#define uchar unsigned char
#define uint unsigned int
sbit out=P3^7;
sbit led1=P0^0;
sbit led2=P0^1;
sbit led3=P0^2;
sbit led4=P0^3;
, |/ c. ^( P+ A" Y7 F/ isbit led5=P0^4;
sbit led6=P0^5;
sbit led7=P0^6;
sbit led8=P0^7;
" x- Z+ I5 [9 _- ]
! `( ~4 w# X: N) j4 F
6 J: I! ]! i& m0 W) t  L3 Asbit SCL=P1^2;                //SCL定义为P1口的第3位脚，连接ADC0832SCL脚
sbit DO=P1^3;                //DO定义为P1口的第4位脚，连接ADC0832DO脚
: ~5 c, v) z/ Z' Msbit CS=P1^0;                //CS定义为P1口的第4位脚，连接ADC0832CS脚

8 }% d% s6 n( K2 E* n5 h


( D. E0 ^( W* E0 b6 i; i9 v4 S, i* c
- V% g$ s( E: o6 O' L
uchar h1,date;
unsigned char adval;
$ t! l+ Y( D2 jvoid delay(uint z)
{
: D7 x1 j7 m& Z- V2 y& }1 O   uchar y;
   for(;z>0;z--)
   for(y=5;y>0;y--);
}


# h8 s3 A+ A5 C% U4 u- K! K
3 {$ @6 L6 [+ |" q
1 ]% \7 B/ h' b$ c7 D/***********读数模转换数据********************************************************/        
//请先了解ADC0832模数转换的串行协议，再来读本函数，主要是对应时序图来理解，本函数是模拟0832的串行协议进行的
                                                //  1  1  0 通道
% G# C+ F! l. P: p/ r  C$ {                                                //  1  1  1 通道
" x' g# b4 v( H( F" H8 B8 _unsigned char ad0832read(bit SGL,bit ODD)
{
  X3 S* M3 C0 F  g, x  X' p8 Z        unsigned char i=0,value=0,value1=0;               
                SCL=0;
                DO=1;
                CS=0;                //开始
                SCL=1;                //第一个上升沿        
                SCL=0;
" ^3 Z9 |: C0 l# B2 a/ i, R! d                DO=SGL;
                SCL=1;          //第二个上升沿
0 V  }0 b% C8 r" C% o                SCL=0;
; s" j/ L1 S' I  M; o! a* u4 O                DO=ODD;
% g2 p6 X' g: x% V: s& p                SCL=1;           //第三个上升沿
5 ]4 z! R9 b* P; p                SCL=0;           //第三个下降沿
, b" x& R5 t  e) b& }                DO=1;
* f+ w" g0 G5 h% S! b2 S                for(i=0;i<8;i++)
                {
                        SCL=1;
                        SCL=0; //开始从第四个下降沿接收数据
                        value<<=1;
                        if(DO)
                                value++;                                                
) V1 @6 _4 u: n# f# c) ^6 n                }
                for(i=0;i<8;i++)
, q4 n* g2 c. x7 {# j# J* j  r                {                        //接收校验数据
                        value1<<=1;
/ x" X" U* [- q                        if(DO)
                                value1+=0x80;
                        SCL=1;
% Z" H1 f- b  c( b" Y                        SCL=0;
* D+ c3 g8 y" y0 V                }
                CS=1;
+ E( c) y$ m5 W- w# {) C8 T                SCL=1;        
                if(value==value1)                                //与校验数据比较，正确就返回数据，否则返回0        
                        return value;
        return 0;
}


void penquan()          //PWM调压
{
- F9 d" J$ e* Z) P6 m    date=ad0832read(1,0);
        
8 M: [1 i' k+ p) `, b# k& a' g    h1=(255-date);
    out=0;
8 l* z4 G( s- L    delay(h1);
        if(h1>30) led1=1; else led1=0;
        

! C( [7 o5 z# u0 k7 }0 \
( s3 t/ _1 t/ v" f

…………余下代码请下载附件…………
8 y" f3 f1 M9 A% t: Q- W/ u
下载：

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

- D7 x4 R: H& |' p0 Y/ {
5 |- \) ?( j% i. C! ?

sunygd

看看楼主的代码

S123456S

看看代码，参考参考