久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開(kāi)始

搜索
查看: 6595|回復(fù): 2
收起左側(cè)

51單片機(jī) 播放極樂(lè)凈土音樂(lè)(只有開(kāi)頭)

[復(fù)制鏈接]
ID:153232 發(fā)表于 2016-12-8 17:13 | 顯示全部樓層 |閱讀模式
音樂(lè)播放實(shí)驗(yàn).rar (38.17 KB, 下載次數(shù): 25)

#include <reg51.h>             // 這是  單片機(jī)音樂(lè)代碼生成器  生成的代碼
#define uchar unsigned char
sbit beepIO=P3^7;                 // 輸出 為 P1.5  可以修改 成 其它 IO 口
uchar m,n;
uchar code T[49][2]={{0,0},
{0xF8,0x8B},{0xF8,0xF2},{0xF9,0x5B},{0xF9,0xB7},{0xFA,0x14},{0xFA,0x66},{0xFA,0xB9},{0xFB,0x03},{0xFB,0x4A},{0xFB,0x8F},{0xFB,0xCF},{0xFC,0x0B},
{0xFC,0x43},{0xFC,0x78},{0xFC,0xAB},{0xFC,0xDB},{0xFD,0x08},{0xFD,0x33},{0xFD,0x5B},{0xFD,0x81},{0xFD,0xA5},{0xFD,0xC7},{0xFD,0xE7},{0xFE,0x05},
{0xFE,0x21},{0xFE,0x3C},{0xFE,0x55},{0xFE,0x6D},{0xFE,0x84},{0xFE,0x99},{0xFE,0xAD},{0xFE,0xC0},{0xFE,0x02},{0xFE,0xE3},{0xFE,0xF3},{0xFF,0x02},
{0xFF,0x10},{0xFF,0x1D},{0xFF,0x2A},{0xFF,0x36},{0xFF,0x42},{0xFF,0x4C},{0xFF,0x56},{0xFF,0x60},{0xFF,0x69},{0xFF,0x71},{0xFF,0x79},{0xFF,0x81}
};
uchar code music[][2]={{0,4},
{23,4},{21,4},{23,16},{23,4},{21,4},{23,4},{21,4},{19,16},{16,4},{19,4},{21,8},{21,4},{23,4},{21,4},{19,4},{16,4},{19,4},{14,24},
{23,4},{21,4},{23,16},{23,4},{21,4},{23,4},{21,4},{19,24},{16,4},{19,4},{21,8},{21,4},{23,4},{21,4},{19,4},{16,4},{19,4},{21,24},
{23,4},{21,4},{23,16},{23,4},{21,4},{23,4},{21,4},{19,16},{16,4},{19,4},{21,8},{21,4},{23,4},{21,4},{19,4},{16,4},{19,4},{14,24},
{23,4},{26,4},{26,16},{26,4},{28,4},{26,4},{23,24},{21,4},{23,4},{21,8},{21,4},{23,4},{21,4},{19,4},{16,4},{16,2},{19,2},{19,24},{0,20},
{26,4},{26,4},{28,4},{31,4},{30,4},{30,4},{28,4},{23,4},{21,4},{21,4},{23,16},{0,4},{23,4},{23,4},{26,4},{28,8},{28,12},{16,4},{23,4},{21,4},
{21,24},{23,4},{26,4},{26,4},{23,4},{26,8},{0,4},{31,8},{30,4},{28,4},{30,4},{23,8},{0,4},{28,4},{28,4},{30,4},{28,4},{26,4},{23,4},{21,8},{23,4},{21,4},{23,4},{26,16},
{0xFF,0xFF}};
void delay(uchar p)
{
    uchar i,j;
    for(;p>0;p--)
    for(i=181;i>0;i--)
    for(j=181;j>0;j--);
}
void pause()
{
    uchar i,j;
    for(i=150;i>0;i--)
    for(j=150;j>0;j--);
}
void T0_int() interrupt 1
{
beepIO=!beepIO;
TH0=T[m][0]; TL0=T[m][1];
}
void main()
{
uchar i=0;
TMOD=0x01;  EA=1; ET0=1;
while(1)
      {
        m=music[0];n=music[1];
           if(m==0x00)
             {TR0=0;delay(n);i++;}
           else if(m==0xFF)
             {TR0=0;delay(30);i=0;}
           else if(m==music[i+1][0])
             {TR0=1;delay(n);TR0=0;pause();i++;}
           else
             {TR0=1;delay(n);i++;}
      }
}

相關(guān)帖子

回復(fù)

使用道具 舉報(bào)

ID:165757 發(fā)表于 2017-2-21 15:57 | 顯示全部樓層
我看看先~~~~
回復(fù)

使用道具 舉報(bào)

ID:396269 發(fā)表于 2018-9-10 23:02 | 顯示全部樓層
下下來(lái)學(xué)習(xí)學(xué)習(xí)
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表
主站蜘蛛池模板: 亚洲国产中文字幕 | 在线观看的av | 日本欧美久久久久免费播放网 | 国产成人在线观看免费网站 | 欧美xxx视频| 天天插天天狠天天透 | 国产精品久久久久久无人区 | 色婷婷香蕉在线一区二区 | 亚洲免费精品视频 | 久草网站 | 91精品久久久久 | 国产三级在线看 | 伊人春色av | 99热国产在线 | 饥渴放荡受np公车奶牛 | 欧美三级欧美一级 | 国产在线观看一区二区三区 | 国产黄色一级毛片 | 久久九九视频 | 成人精品免费视频 | 国产欧美精品一区二区三区 | 国产女人高潮毛片 | 久久精品视频免费 | 国产一级黄色录像 | 黄色网免费 | 在线欧美日韩 | 国产欧美精品 | 日韩理论片 | 成人午夜精品 | 国产小视频在线 | 国产精品自拍一区 | 国产一区二区在线观看视频 | 最新av在线 | 国产欧美视频在线观看 | 日本免费观看视频 | 精品国产一区二区三区四区 | 国产精品自拍小视频 | 久久精品黄色 | 成人免费福利 | 91免费看片网站 | 福利小视频在线观看 |