普中HC6800V2.2開發板思考記錄-蜂鳴器（譜曲軟件自動生成代碼，燒錄就可用，內含醉酒的蝴蝶，大海，把悲傷留給自己這三首歌）

原創 Johnson-Lan 2020-06-21 14:44

對於51單片機，用蜂鳴器來實現一些音樂，如果自己一個音節一個音節去譜曲的話，就會非常麻煩，在裏用自動譜曲軟件就可以了。
譜曲軟件我會上傳，各位自己搜索就能找打
在這裏插入圖片描述
來點好玩的，醉酒的蝴蝶，代碼給大家看看，下載就能聽哦！

#include <REG51.H>
#define uchar unsigned char
sbit beepIO=P2^0;
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},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{28,4},{28,4},{26,4},{23,16},{23,4},{28,4},{28,4},{23,4},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{28,16},{0,8},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{23,2},{19,2},{14,2},{16,12},{16,4},{16,2},{14,2},{11,4},{19,2},{16,2},{16,16},{23,4},{23,4},{21,4},{19,2},{16,2},{16,16},{21,4},{21,2},{19,2},{21,4},{23,2},{21,2},{21,16},{19,4},{16,2},{19,2},{16,4},{14,2},{11,2},{11,12},{11,2},{14,2},{16,4},{16,2},{14,2},{11,4},{19,2},{16,2},{16,12},{19,2},{21,2},{23,4},{23,4},{21,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,4},{28,4},{21,2},{23,2},{21,12},{19,2},{21,2},{23,6},{26,2},{23,6},{26,2},{23,4},{14,4},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{16,24},{16,2},{19,2},{21,2},{26,2},{23,24},{23,2},{26,2},{28,2},{19,2},{21,24},{21,2},{23,2},{26,2},{28,2},{23,24},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{21,2},{19,2},{14,2},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{28,4},{28,4},{26,4},{23,16},{23,4},{28,4},{28,4},{23,4},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{28,16},{0,8},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{23,2},{19,2},{14,2},{16,12},{16,
4
},{16,2},{14,2},{11,4},{19,2},{16,2},{16,16},{23,4},{23,4},{21,4},{19,2},{16,2},{16,16},{21,4},{21,2},{19,2},{21,4},{23,2},{21,2},{21,16},{19,4},{16,2},{19,2},{16,4},{14,2},{11,2},{11,12},{11,2},{14,2},{16,4},{16,2},{14,2},{11,4},{19,2},{16,2},{16,12},{19,2},{21,2},{23,4},{23,4},{21,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,4},{28,4},{21,2},{23,2},{21,12},{19,2},{21,2},{23,6},{26,2},{23,6},{26,2},{23,4},{14,4},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{16,24},{16,2},{19,2},{21,2},{26,2},{23,24},{23,2},{26,2},{28,2},{19,2},{21,24},{21,2},{23,2},{26,2},{28,2},{23,24},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{21,2},{19,2},{14,2},{16,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,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[i][0];n=music[i][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++;}
      }
}

還有大海這首歌：

#include <REG51.H>
#define uchar unsigned char
sbit beepIO=P2^0;
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},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{28,4},{28,4},{26,4},{23,16},{23,4},{28,4},{28,4},{23,4},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{28,16},{0,8},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{23,2},{19,2},{14,2},{16,12},{16,4},{16,2},{14,2},{11,4},{19,2},{16,2},{16,16},{23,4},{23,4},{21,4},{19,2},{16,2},{16,16},{21,4},{21,2},{19,2},{21,4},{23,2},{21,2},{21,16},{19,4},{16,2},{19,2},{16,4},{14,2},{11,2},{11,12},{11,2},{14,2},{16,4},{16,2},{14,2},{11,4},{19,2},{16,2},{16,12},{19,2},{21,2},{23,4},{23,4},{21,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,4},{28,4},{21,2},{23,2},{21,12},{19,2},{21,2},{23,6},{26,2},{23,6},{26,2},{23,4},{14,4},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{16,24},{16,2},{19,2},{21,2},{26,2},{23,24},{23,2},{26,2},{28,2},{19,2},{21,24},{21,2},{23,2},{26,2},{28,2},{23,24},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{21,2},{19,2},{14,2},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{28,4},{28,4},{26,4},{23,16},{23,4},{28,4},{28,4},{23,4},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{28,16},{0,8},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{23,2},{19,2},{14,2},{16,12},{16,
4
},{16,2},{14,2},{11,4},{19,2},{16,2},{16,16},{23,4},{23,4},{21,4},{19,2},{16,2},{16,16},{21,4},{21,2},{19,2},{21,4},{23,2},{21,2},{21,16},{19,4},{16,2},{19,2},{16,4},{14,2},{11,2},{11,12},{11,2},{14,2},{16,4},{16,2},{14,2},{11,4},{19,2},{16,2},{16,12},{19,2},{21,2},{23,4},{23,4},{21,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,4},{28,4},{21,2},{23,2},{21,12},{19,2},{21,2},{23,6},{26,2},{23,6},{26,2},{23,4},{14,4},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{23,4},{16,4},{19,4},{21,2},{23,2},{23,16},{26,4},{26,2},{28,2},{28,4},{26,2},{23,2},{23,12},{23,2},{26,2},{28,4},{28,2},{28,2},{28,4},{21,2},{23,2},{21,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,16},{16,24},{16,2},{19,2},{21,2},{26,2},{23,24},{23,2},{26,2},{28,2},{19,2},{21,24},{21,2},{23,2},{26,2},{28,2},{23,24},{19,2},{21,2},{23,2},{26,2},{28,8},{28,6},{26,2},{23,4},{23,2},{31,2},{28,8},{26,4},{26,2},{28,2},{26,4},{21,2},{26,2},{23,16},{21,6},{21,2},{21,4},{16,4},{19,4},{21,2},{23,2},{21,8},{23,4},{23,2},{26,2},{21,2},{21,2},{19,2},{14,2},{16,16},{26,4},{23,2},{26,2},{19,4},{21,2},{19,2},{16,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[i][0];n=music[i][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++;}
      }
}

陳昇-《把悲傷留給自己》

#include <REG51.H>
#define uchar unsigned char
sbit beepIO=P1^0;
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},
{8,4},{8,4},{10,4},{13,4},{13,4},{13,8},{0,4},{13,8},{15,4},{17,4},{17,12},{17,8},{17,4},{20,4},{22,4},{25,4},{25,12},{20,4},{22,4},{20,4},{17,8},{17,4},{20,4},{15,4},{15,4},{15,8},{0,4},{17,4},{15,4},{13,4},{10,8},{0,8},{10,4},{13,4},
{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[i][0];n=music[i][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++;}
      }
}
發表評論
所有評論
還沒有人評論，想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章

普中HC6800V2.2開發板思考記錄-步進電機（如何讓步進電機旋轉一定角度，如何讓步進電機以一整圈的方式來旋轉）

Johnson-Lan 2020-05-11 20:05:57

普中HC6800V2.2開發板思考記錄-蜂鳴器（譜曲軟件自動生成代碼，燒錄就可用，內含醉酒的蝴蝶，大海這兩首歌）

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-獨立按鍵控制8個LED燈亮滅

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-按鍵選擇花樣顯示

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-一位靜態數碼管顯示與切換

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-LED顯示按鍵鍵值

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-繼電器概念、原理、使用方法

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-頭文件中的預處理

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-按鍵控制LED燈左移和右移

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-LED燈實現二進制加減法的效果

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-流水燈

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-跑馬燈

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-左右流水燈

Johnson-Lan 2020-05-04 06:16:47

普中HC6800V2.2開發板思考記錄-步進電機（如何讓步進電機旋轉一定角度，如何讓步進電機以一整圈的方式來旋轉）

Johnson-Lan 2020-05-11 20:05:57

普中HC6800V2.2開發板思考記錄-蜂鳴器（譜曲軟件自動生成代碼，燒錄就可用，內含醉酒的蝴蝶，大海這兩首歌）

Johnson-Lan 2020-05-04 06:16:47