已閱讀5頁,還剩9頁未讀, 繼續(xù)免費(fèi)閱讀
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
單片機(jī)原理及應(yīng)用實(shí)驗(yàn)報告實(shí)驗(yàn)名稱: 電子琴設(shè)計(jì) 組 員: 實(shí)驗(yàn)成績: 實(shí)驗(yàn)日期: 2013年6月17日 實(shí)驗(yàn)地點(diǎn): 3#北604 實(shí) 驗(yàn) 報 告一、 實(shí)驗(yàn)?zāi)康?以51單片機(jī)最小系統(tǒng)為核心,通過鍵盤獲取按鍵信息,運(yùn)用單片機(jī)定時器等部件實(shí)現(xiàn)蜂鳴器發(fā)聲同時用數(shù)碼管同步顯示,同時該系統(tǒng)具有播放歌曲及選取按鍵輸入高、中、低音的功能。二、 實(shí)驗(yàn)原理1、 利用蜂鳴器作為發(fā)聲部件。2、 兩個數(shù)碼管作為顯示部件。3、 設(shè)置10個按鍵,實(shí)現(xiàn)高音、中音、低音的1、2、3、4、5、6、7的發(fā)音。4、 大部分功能通過軟件實(shí)現(xiàn)。軟件的結(jié)構(gòu)圖如下程序流程圖如下:三、 系統(tǒng)仿真圖整體仿真圖:動態(tài)顯示放聲部分按鍵四、 心得體會看似簡單的題目,實(shí)際操作中,仍舊存在很多問題,尤其是在程序中的數(shù)碼管顯示的模塊中,和鍵值的計(jì)算容易出問題。五、 源碼附錄/*初始化數(shù)據(jù)*/void init(void)speaker=0;/關(guān)蜂鳴器LED1=1;/LED2=0;EA=1;/開總中斷TCON=0x01;/外部中斷0設(shè)置為邊沿觸發(fā)EX0=1;/開外部中斷0ET0=1;/開定時器0中斷ET1=1;/開定時器1中斷TMOD=0x11;/定時器0,1工作在定時狀態(tài),均為方式1#include#define uint unsigned int #define uchar unsigned charsbit P1_0=P10;sbit P1_1=P11;sbit P1_2=P12;sbit P1_3=P13;sbit P1_4=P14;sbit P1_5=P15;sbit P1_6=P16;sbit P1_7=P17;sbit LED1=P26;sbit LED2=P27; sbit change=P32;sbit high=P35;sbit normal=P34;sbit low=P33;sbit P2_0=P20;sbit P2_1=P21;sbit speaker=P22;unsigned char i;unsigned char key,yin=0;uchar m,n;bit a=0;/a為change鍵的鍵值uchar seg= 0x3F,/*0*/ 0x06,/*1*/ 0x5B,/*2*/ 0x4F,/*3*/ 0x66,/*4*/ 0x6D,/*5*/ 0x7D,/*6*/ 0x07,/*7*/ 0x7F,/*8*/ 0x6F,/*9*/0x37,/*N*/中音0x38,/*L*/低音 0x76,/*H*/高音 0x79 /*E*/;/共陰極數(shù)碼管code unsigned char FH= 0xFC,0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,/中音 0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,/低音的高8位 0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF, ; / 音階頻率表 低八位code unsigned char FL=0x8E,0xED,0x44,0x6B,0xB4,0xF4,0x2D,/中音 0x21,0xDB,0x87,0xD7,0x68,0xE8,0x5B,/低音的低8位 0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16, ;code uchar star=1,2,3,1, 1,2,3,1, 3,4,5, 3,4,5, 5,6,5,4,3,1, 5,6,5,4,3,1, 1,12/*低音5*/,1, 1,12,1; code uchar shijian=4,4,4,4, 4,4,4, 4, 4,4,8, 4,4,8, 2,1,2,1,4,4, 2,1,2,1,4,4, 4,4,6, 4,4,6;void init(void);void music();void play();void seg1();void yinjie();/*主程序*/void main()init();while(1)if(a=0)music();elseplay();/*1ms延遲*/void delay(uint x)uint i,j;for(i=x;i0;i-)for(j=340;j0;j-);/*初始化數(shù)據(jù)*/void init(void)speaker=0;LED1=1;LED2=0;EA=1;/開總中斷TCON=0x01;/外部中斷0設(shè)置為邊沿觸發(fā)EX0=1;/開外部中斷0ET0=1;ET1=1;TMOD=0x11;/定時器0,1工作在定時狀態(tài),均為方式1/*數(shù)碼管動態(tài)顯示*/void seg1()P2_0=1;/關(guān)數(shù)碼管1P2_1=0;/開數(shù)碼管2P0=segn+1;/送數(shù)碼管2的數(shù)據(jù)delay(15);/延時15msP2_1=1;/關(guān)數(shù)碼管2P2_0=0;/開數(shù)碼管1P0=segyin;/yin為high,normal,low的判斷結(jié)果送數(shù)碼管1的數(shù)據(jù)delay(15);/延時15ms/*高低音的選擇*/void yinjie()if(normal=0)delay(5);if(normal=0) yin=10;m=0;/返回10為seg10顯示Cif(low=0)delay(5);if(low=0)yin=11;m=1;/返回11為seg11顯示Lif(high=0)delay(5);if(high=0)yin=12;m=2;/返回12為seg12顯示Hif(yin=0)yin=13;/*外部中斷0*/void inter0() interrupt 0 if(change=0)delay(5);while(change=0);a=a;LED1=LED1;LED2=LED2;/*播放音樂程序*/void music()TH0=FHstari-1;TL0=FLstari-1;while(a=0)if(i32)TR0=1;delay(57*shijiani);i+;if(i=32)i=0;/*演奏模式*/void play()TR0=0;TR1=0;yinjie();P2_1=1;/關(guān)數(shù)碼管2P2_0=0;/開數(shù)碼管1P0=segyin;if(yin!=13&a=1)if(P1_0=0)TH1=FH7*m+n;TL1=FL7*m+n;TR1=1;while(P1_0=0)n=0;seg1();if(P1_1=0)TH1=FH7*m+n;TL1=FL7*m+n;TR1=1;while(P1_1=0)n=1;seg1();if(P1_2=0)TH1=FH7*m+n;TL1=FL7*m+n;TR1=1;while(P1_2=0)n=2;seg1();if(P1_3=0)TH1=FH7*m+n;TL1=FL7*m+n;TR1=1;while(P1_3=0)n=3;seg1();if(P1_4=0)TH1=FH7*m+n;TL1=FL7*m+n;TR1=1;while(P1_4=0)n=4;seg1();if(P1_5=0)TH1=FH7*m+n;TL1=FL7*m+n;TR1=1;while(P1_5=0)n=5;seg1();if(P1_6=0)TH1=FH7*m+n;TL1=FL7*m+n;TR1=1;while(P1_6=0)n=6;seg1();/*定時器0中斷*/void timer
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 二零二五年度個人土地承包抵押借款合同范例3篇
- 2024年車輛用輪胎購銷協(xié)議標(biāo)準(zhǔn)版版
- 2024年度離婚協(xié)議書附債權(quán)債務(wù)清償與婚姻財產(chǎn)分割協(xié)議3篇
- 承德護(hù)理職業(yè)學(xué)院《口腔醫(yī)學(xué)技術(shù)新進(jìn)展》2023-2024學(xué)年第一學(xué)期期末試卷
- 成都職業(yè)技術(shù)學(xué)院《新媒體數(shù)據(jù)分析與應(yīng)用實(shí)踐》2023-2024學(xué)年第一學(xué)期期末試卷
- 2025年度智慧校園班主任師徒結(jié)對人才培養(yǎng)協(xié)議6篇
- 二零二五年健身俱樂部場地租賃及運(yùn)營支持合同3篇
- 2024新品科技教育產(chǎn)品進(jìn)場推廣合作合同3篇
- 二零二五年度事業(yè)單位內(nèi)部食堂承包經(jīng)營合同2篇
- 2024年私人車輛抵押車輛置換服務(wù)合同3篇
- 基于STEAM教育的小學(xué)德育創(chuàng)新實(shí)踐研究
- 2024年03月山東煙臺銀行招考筆試歷年參考題庫附帶答案詳解
- 安徽省合肥市蜀山區(qū)2024-2025學(xué)年七年級上學(xué)期地理期末模擬練習(xí)(含答案)
- 新建設(shè)項(xiàng)目施工人員安全教育培訓(xùn)課件
- 江蘇省揚(yáng)州市2024-2025學(xué)年高中學(xué)業(yè)水平合格性模擬考試英語試題(含答案)
- 品質(zhì)總監(jiān)轉(zhuǎn)正述職報告
- 2024年游艇俱樂部會員專屬活動策劃與執(zhí)行合同3篇
- 《項(xiàng)目管理培訓(xùn)課程》課件
- 2024年企業(yè)團(tuán)購:銷售合作協(xié)議3篇
- 2024-2025學(xué)年八年級語文上學(xué)期期末真題復(fù)習(xí) 專題06 文言文閱讀
- 制藥課程設(shè)計(jì)三廢處理
評論
0/150
提交評論