標(biāo)題: 音樂(lè)噴泉步進(jìn)電機(jī)pcb文件加代碼 [打印本頁(yè)]

作者: 363773892    時(shí)間: 2023-5-16 22:06
標(biāo)題: 音樂(lè)噴泉步進(jìn)電機(jī)pcb文件加代碼
uchar h1,date;
unsigned char adval;
void delay(uint z)
{
   uchar y;
   for(;z>0;z--)
   for(y=5;y>0;y--);
}


/***********讀數(shù)模轉(zhuǎn)換數(shù)據(jù)********************************************************/   
//請(qǐng)先了解ADC0832模數(shù)轉(zhuǎn)換的串行協(xié)議,再來(lái)讀本函數(shù),主要是對(duì)應(yīng)時(shí)序圖來(lái)理解,本函數(shù)是模擬0832的串行協(xié)議進(jìn)行的
                        //  1  1  0 通道
                        //  1  1  1 通道
unsigned char ad0832read(bit SGL,bit ODD)
{
    unsigned char i=0,value=0,value1=0;        
        SCL=0;
        DO=1;
        CS=0;        //開始
        SCL=1;        //第一個(gè)上升沿   
        SCL=0;
        DO=SGL;
        SCL=1;      //第二個(gè)上升沿
        SCL=0;
        DO=ODD;
        SCL=1;       //第三個(gè)上升沿
        SCL=0;       //第三個(gè)下降沿
        DO=1;
        for(i=0;i<8;i++)
        {
            SCL=1;
            SCL=0; //開始從第四個(gè)下降沿接收數(shù)據(jù)
            value<<=1;
            if(DO)
                value++;                        
        }
        for(i=0;i<8;i++)
        {            //接收校驗(yàn)數(shù)據(jù)
            value1<<=1;
            if(DO)
                value1+=0x80;
            SCL=1;
            SCL=0;
        }
        CS=1;
        SCL=1;   
        if(value==value1)                //與校驗(yàn)數(shù)據(jù)比較,正確就返回?cái)?shù)據(jù),否則返回0   
            return value;
    return 0;
}

void penquan()      //PWM調(diào)壓
{
    date=ad0832read(1,0);
   
    h1=(255-date);
    out=0;
    delay(h1);
    if(h1>30)  led1=1; else led1=0;
    if(h1>70)  led2=1; else led2=0;
    if(h1>100) led3=1; else led3=0;
    if(h1>130) led4=1; else led4=0;
    if(h1>160) led5=1; else led5=0;
    if(h1>180) led6=1; else led6=0;
    if(h1>200) led7=1; else led7=0;
    if(h1>220) led8=1; else led8=0;

    out=1;
    delay(date);

}
void main()
{
   
   while(1)
   {   
      
        penquan();           //給定個(gè)延時(shí)次數(shù)
      
         
   }
}






Keil代碼下載:無(wú)
原理圖下載:無(wú)
PCB下載: PCB.7z (553.51 KB, 下載次數(shù): 7)





歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1