單片機的簡易電子琴設計報告-資料下載頁

　　

【正文】 機原理與應用， 年 8 月第一版【3】康華光. 電子技術基礎（數字部分） ，【4】徐志軍,伊廷輝等. EDA 技術與 PLD 設計 人民郵電出版社 , 2022 年 2 月第 1 版【5】李朝青. 單片機原理及接口技術[M]. 北京：北京航天航空大學出版色， 2022.【6】胡漢才. 單片機原理及其接口技術[M]. 北京：清華大學出版社， 2022.河南理工大學本科課程設計報告 24 附 1 源程序代碼include define keyport P1define uchar unsigned chardefine uint unsigned intuchar high,low。 //定時器預裝值的高 8 位和低 8 位sbit speak=P3^0。sbit gao=P3^5。sbit di=P3^6。sbit zdbf=P3^7。uchar yinjie=1。uchar time。uchar n=0。uchar bo=0。uchar code fre[][2]= { 0x8c,0xf8,0x5b,0xf9,0x15,0xfa,0x67,0xfa,0x90,0xfb,0xae,0xfb,河南理工大學本科課程設計報告 25 0x0c,0xfc, //低音 0x44,0xfc,0xac,0xfc,0x09,0xfd,0x34,0xfd,0x82,0xfd,0xc2,0xfd,0x06,0xfe, //中音0x22,0xfe,0x56,0xfe,0x85,0xfe,0x9a,0xfe,0xc1,0xfe,0xe4,0xfe,0x03,0xff, //高音 }。void delay(uint )。void ITimer0(void)。//定時器初始化void key(void)。void dtxs(int,int)。void song(){河南理工大學本科課程設計報告 26 TH0=high。TL0=low。TR0=1。delay(time*240)。 }void yinyue(){uchar code hls[]={ 5,2,2, 3,2,1, 5,2,1, 1,3,4, 6,2,2, 1,3,2, 5,2,4, 5,2,2, 1,2,1, 2,2,1 ,3,2,2 ,2,2,1, 1,2,1 ,2,2,6, 5,2,2, 3,2,1, 5,2,1, 1,3,3, 7,2,1, 6,2,2, 1,3,2, 5,2,4, 5,2,2, 2,2,1, 3,2,1, 4,2,3, 7,1,1, 1,2,6, 6,2,2, 1,3,2, 1,3,4, 7,2,2, 6,2,1, 7,2,1, 1,3,4 ,6,2,1,7,2,1, 1,3,1 ,6,2,1, 6,2,1 ,5,2,1 ,3,2,1, 1,2,1, 2,2,6, 5,2,2, 3,2,1, 1,2,1, 1,3,3, 7,2,1, 6,2,2, 1,3,2, 5,2,4, 5,2,2, 2,2,1, 3,2,1, 4,2,3, 7,1,1, 1,2,6 }。uchar m。n=0。 while(n174) { m=hls[n]+7*(hls[n+1]1)1。high=fre[m][1]。low=fre[m][0]。time=hls[n+2]。河南理工大學本科課程設計報告 27 n=n+3。song()。 }}void main (void){uchar num。ITimer0()。speak=0。while(1){key()。switch(keyport){case 0xfe:num=1。break。case 0xfd:num=2。break。case 0xfb:num= 3。break。 case 0xf7:num= 4。break。 case 0xef:num= 5。break。 case 0xdf:num= 6。break。 case 0xbf:num= 7。break。 case 0x7f:num= 8。break。河南理工大學本科課程設計報告 28 default:num= 0。break。}if(num==0){TR0=0。speak=0。}else{high=fre[7*yinjie+num1][1]。low=fre[7*yinjie+num1][0]。TR0=1。}dtxs(yinjie,num)。}}void ITimer0(void){TMOD |= 0x01。 //使用模式 1，16 位定時器，使用|符號可以在使用多個定時器時不受影響 EA=1。 //總中斷打開ET0=1。 //定時器中斷打開河南理工大學本科課程設計報告 29 TR0=1。 //定時器開關打開}void Timer0_isr(void) interrupt 1{TH0=high。TL0=low。speak=!speak。if(zdbf==0) { delay(100)。if(zdbf==0){ bo++。 if(bo/2==1){ delay(100)。if(n174)n=500。 //n 賦值大于 174，跳出 while，停止音樂else n=0。dtxs(3,0)。}if(bo%2==0){ delay(100)。河南理工大學本科課程設計報告 30 n=500。 //n 賦值大于 174，跳出 while，停止音樂}} }/**/}void key(){if(zdbf==0) {delay(100)。 if(zdbf==0)yinyue()。}if(gao==0){delay(100)。if(gao==0){delay(100)。if(yinjie==2)yinjie=1。else yinjie=2。}河南理工大學本科課程設計報告 31 } if(di==0){delay(100)。if(di==0){delay(100)。if(yinjie==0)yinjie=1。else yinjie=0。}}}void delay(unsigned int x){ int a,b。 for(a=x。a0。a) for(b=110。b0。b)。}void dtxs(k,l)//k 是按鍵號，l 是工作方式{ char seg[14]={0x6f,0x0a,0xe3,0xcb,0x8e,0xcd,河南理工大學本科課程設計報告 32 0xed,0x0b,0xef,0xcf,0xaf,0xec,0x65,0xea}。 P2=0x01。//選擇第一個數碼管 P0=seg[l]。//顯示按鍵號 delay(4)。 P2=0x02。//選擇第二個數碼管 P0=seg[k+10]。//顯示工作方式 delay(4)。 }河南理工大學本科課程設計報告 33 附 2 系統原理圖