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

QQ登錄

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

搜索
查看: 5115|回復(fù): 6
打印 上一主題 下一主題
收起左側(cè)

單片機(jī)實(shí)訓(xùn)之24鍵電子琴仿真，可播放音樂(lè)

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
功能部分實(shí)現(xiàn)，框架已經(jīng)寫(xiě)好：
1、按鍵選擇音樂(lè)自動(dòng)播放或自己演奏
2、EEPROM實(shí)現(xiàn)存儲(chǔ)音樂(lè)（未加入，代碼寫(xiě)好需要調(diào)試）
3、.......

仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機(jī)源程序如下:
  1. #include <reg52.h>
  2. #include "led.h"
  3. #include "beep.h"
  4. #include "lcd1602.h"
  5. #include "key.h"
  6. #include "tim.h"
  7. #include "delay.h"
  8. #include "music.h"
  9. #include "musicArr.h"
  10. #include "SoundPlay.h"

  12. typedef unsigned int u16;
  13. typedef unsigned char u8;
  14. void show(u8 arr[],u8 length,u8 pos,u8 mode);
  15. unsigned char calcArrLen(unsigned char arr[]);
  16. void displayInit(void);

  18. u8 code ShowData[]="Electronic Organ";
  19. u8 code ShowData1[]="150802027";
  20. u8 code ShowData2[]="Welcome to use ";
  21. u8 code ShowData3[]="press note";
  22. u8 code ShowData4[]="Same     song";
  23. u8 code ShowData5[]="Song name";
  24. u8 code ShowData6[]="aiwonijiubaobaowo";
  25. u16 FreqTemp=0;

  27. void main()
  28. {
  29.     unsigned char i=0,key=0,timer=0,flag1=0;
  30.     LcdInit();  //液晶屏初始化
  31.     timInit();   //定時(shí)器初始化
  32. //    AT24C02_Init();  //EEPROM初始化
  33.     ledOFF();    //關(guān)閉LED燈
  34.     InitialSound();  //音樂(lè)播放器初始化
  35.    displayInit();
  36.     while(1)
  37.     {  
  38.         key=key_Scan();
  39.         if(key==0x16&&flag==0)  //播放/停止鍵  并且處于停止播放狀態(tài)，開(kāi)始播放
  40.         {
  41.             flag=1;
  42.         }
  43.         else if(key>0&&key<22&&flag==0)  //21鍵音符
  44.         {
  45.             num=key-1;
  46.             FreqTemp=Freqtab[key-1];
  47.             TR0=1;
  48.         }
  49.         else   
  50.         {
  51.             if(TR0==1) //之前音符鍵按下，延時(shí)一秒停止
  52.             {
  53.                 delay_ms(1000);
  54.                 TR0=0;
  55.             }
  56.         }
  57.         if(flag==1)
  58.         {
  59.             if(status==1)  //循環(huán)播放兩首歌曲
  60.             {
  61.                  LcdWriteCom(0x01);  //清屏
  62.                 show(ShowData5,9,4,0);
  63.                 show(ShowData4,15,0,1);
  64.                 Play(Music_Same,0,3,360);
  65.                 delay_ms(2000);
  66.             }
  67.             else
  68.              {
  69.                LcdWriteCom(0x01);  //清屏
  70.                show(ShowData5,9,4,0);
  71.                show(ShowData6,16,0,1);
  72.                Play(Music_Girl,0,3,360);
  73.                delay_ms(2000);
  74.              }
  75.         }

  77.     }
  78. }


  81. void displayInit(void)
  82. {
  83.     unsigned char i= 0;
  84.     for(i=0;i<16;i++)
  85.     {
  86.         LcdWriteData(ShowData[i]);
  87.     }
  88.     lcd_pos(0x40+3);  
  89.     for(i=0;i<9;i++)
  90.     {
  91.         LcdWriteData(ShowData1[i]);
  92.         num=ShowData1[i]+6-'0';
  93.         TR0=1;
  94.         delay_ms(1000);
  95. ……………………

  97. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載(仿真+代碼):
單片機(jī)開(kāi)發(fā)實(shí)訓(xùn).zip (321.68 KB, 下載次數(shù): 163)


評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏5 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:402000 發(fā)表于 2018-9-26 14:55 | 只看該作者
感謝樓主分享
回復(fù)

使用道具 舉報(bào)

板凳
ID:405626 發(fā)表于 2018-10-18 14:57 | 只看該作者
請(qǐng)問(wèn)里面是沒(méi)有DSN文件嗎？我打開(kāi)后沒(méi)有找到這個(gè)文件
回復(fù)

使用道具 舉報(bào)

地板
ID:258850 發(fā)表于 2018-11-10 16:55 | 只看該作者
歐陽(yáng)Emmm 發(fā)表于 2018-10-18 14:57
請(qǐng)問(wèn)里面是沒(méi)有DSN文件嗎？我打開(kāi)后沒(méi)有找到這個(gè)文件

你可得好好找找
回復(fù)

使用道具 舉報(bào)

5#
ID:774450 發(fā)表于 2020-6-9 22:01 | 只看該作者
u2是哪個(gè)元件
回復(fù)

使用道具 舉報(bào)

6#
ID:871804 發(fā)表于 2021-1-1 14:29 | 只看該作者
除了仿真代碼  文件里有說(shuō)明書(shū)嗎
回復(fù)

使用道具 舉報(bào)

7#
ID:991603 發(fā)表于 2021-12-14 09:04 來(lái)自手機(jī) | 只看該作者
沒(méi)有，實(shí)物圖嗎？
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

快速回復(fù) 返回頂部 返回列表