单片机音乐喷泉程序

gaoxings

单片机音乐喷泉程序


" V- b$ b0 M) p. A" ?  h. ]单片机音乐喷泉程序源码：
#include<reg51.h>
! Q4 s1 ]6 I4 n: K. B#define uchar unsigned char
- U  v+ R: d" ~0 K#define uint unsigned int
) l; C& k% P6 I( Dsbit out=P3^7;
sbit led1=P0^0;
sbit led2=P0^1;
* I/ Q. _2 l0 G8 S! Isbit led3=P0^2;
sbit led4=P0^3;
8 A! m3 ]2 N: ?8 R( i5 wsbit led5=P0^4;
( l- [! H0 [7 h2 v# U3 ~. b8 nsbit led6=P0^5;
- n" R0 B' S0 p1 P( r8 M' a) a- L" ssbit led7=P0^6;
+ ~; q% x( _, msbit led8=P0^7;
3 ]4 d! ^6 q1 H  c0 M) B

sbit SCL=P1^2;                //SCL定义为P1口的第3位脚，连接ADC0832SCL脚
' z- f" D! T! Z: E" e4 C0 |sbit DO=P1^3;                //DO定义为P1口的第4位脚，连接ADC0832DO脚
+ A1 m; i: M4 K( ?sbit CS=P1^0;                //CS定义为P1口的第4位脚，连接ADC0832CS脚

& b. r' K7 l: S2 D, `7 r1 J4 Y

* s& p$ H9 Y! u; U* a- L- h/ R


/ V- _: p4 g: B, p0 i, y" G/ Duchar h1,date;
( B3 W/ N" S  I8 k+ [% }unsigned char adval;
void delay(uint z)
{
$ {- t: m3 T" O6 D: ~1 w   uchar y;
   for(;z>0;z--)
, w; \. {) V" U   for(y=5;y>0;y--);
}
0 K  t- M0 H0 ]. L. d2 e0 G/ A7 _
  u  L" M6 J% K3 {1 ^; G
! s" n# ~1 U, f7 [* ?, F
0 f! `; [; n' f- n( {
/***********读数模转换数据********************************************************/        
//请先了解ADC0832模数转换的串行协议，再来读本函数，主要是对应时序图来理解，本函数是模拟0832的串行协议进行的
3 q2 ~$ ]" ~! b3 ~# M                                                //  1  1  0 通道
                                                //  1  1  1 通道
: A  n( a# J3 s  junsigned char ad0832read(bit SGL,bit ODD)
{
& S9 [: b7 Y" D, G8 Y        unsigned char i=0,value=0,value1=0;               
1 E4 n! j- h  D, I                SCL=0;
5 w+ Q4 |6 Z! X) {2 m" R                DO=1;
                CS=0;                //开始
                SCL=1;                //第一个上升沿        
                SCL=0;
                DO=SGL;
                SCL=1;          //第二个上升沿
# e' x" S' b1 k; e, X) ]2 ^                SCL=0;
                DO=ODD;
  C5 d  k1 w8 M- c" X                SCL=1;           //第三个上升沿
                SCL=0;           //第三个下降沿
! H7 o+ M" D; a% M& ?                DO=1;
+ c1 {6 d! G) x1 r                for(i=0;i<8;i++)
+ i" H% Y- v- j& b' F                {
2 F$ G4 e% N# D6 Q' n& E8 w2 l                        SCL=1;
                        SCL=0; //开始从第四个下降沿接收数据
                        value<<=1;
                        if(DO)
                                value++;                                                
, E- e# O7 x: [: _4 ~5 {                }
* i" l' Y( \; b$ I" I3 p                for(i=0;i<8;i++)
0 P; `) S$ n, |  V. m4 u                {                        //接收校验数据
                        value1<<=1;
: h3 |2 A- }1 C/ V5 J3 f                        if(DO)
                                value1+=0x80;
                        SCL=1;
                        SCL=0;
                }
                CS=1;
                SCL=1;        
                if(value==value1)                                //与校验数据比较，正确就返回数据，否则返回0        
. a3 H/ `; s- Y+ H4 V' {# v                        return value;
        return 0;
}
0 s- f1 h# h! `, }
- t7 J: @5 N: c& U5 Y* i) x% `2 R
, {( V7 _& u; p: Q% j  u% Y2 uvoid penquan()          //PWM调压
{
% B  F. O) U& E3 Y  m    date=ad0832read(1,0);
& Q+ a, W# C1 ?' q! Q$ G        
    h1=(255-date);
/ z. t7 l1 S9 w0 G: [    out=0;
0 E$ A8 X. F7 e/ w) l6 [- o$ P    delay(h1);
2 G1 [, N6 o0 C6 [7 q        if(h1>30) led1=1; else led1=0;
        


5 a) l5 o" J* ?! {

) @! K$ n9 G: c6 [/ N* O  h…………余下代码请下载附件…………

! @; f* \8 D; M/ P& E0 A下载：
6 S: i; q; f7 P

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

0 u# [) S; u: n/ n- a

sunygd

看看楼主的代码

S123456S

看看代码，参考参考
  s0 a! d9 g9 s5 p0 t