【正文】 if p==1 %選用包絡(luò) x=exp(3*n)。elseif p==2 x=exp(3*n).*sawtooth(2*pi*50*n)。elseif p==3 x=exp(3*n).*sin(2*pi*n)。endif r==1 %選用單頻還是多頻 ff=x.*sin(f*2*pi*n)+*x.*sin(f*4*pi*n)+*x.*sin(f*8*pi*n)。else ff=x.*sin(f*2*pi*n)。endaxes1_CreateF()。 %畫圖soundsc(ff)。 %播放音符有以上帶參的子函數(shù)后則每個鍵盤下面的程序非常簡單，然后在每個push button鍵的callback函數(shù)中調(diào)用該子函數(shù)即可，如qangqin（45）； 音效長短的選擇模塊（1）GUI界面的設(shè)計制作一個button group的組控件分別選擇不同的控件實現(xiàn)不同的音效長短，該組控件包括三個radio button分別對應(yīng)不同的音效長短（長，中，短）。界面如下圖所示：（2）程序設(shè)計音效長短的改變實質(zhì)上是改變其音階播放時間的長短，定義一個全局變量T通過改變T的值來改變音效的長度，gangqin的子函數(shù)如上面所示，該組控件的程序如下面所示：global T。g=get(,39。selectedobject39。)。 %獲得音效的選中對象gt=get(g,39。tag39。)。 %把對象賦給gtswitch gt %確認選中的對象 case 39。duanyin39。 T=。 case 39。zhongyin39。 T=1。 case 39。changyin39。 T=2。end（1）GUI界面的設(shè)計制作一個button group的組控件分別選擇不同的控件實現(xiàn)不同的包絡(luò)，該組控件包括三個radio button分別對應(yīng)不同的包絡(luò)。如圖所示，定義了指數(shù)波、三角波和正弦波三種不同形式的包絡(luò)可供選擇。（2） 程序設(shè)計 將組合鍵中的button group鍵的Tag的值設(shè)置為“baol”，三個radio button鍵分別對應(yīng)指數(shù)波、三角波、正弦波，相應(yīng)的Tag設(shè)“zhishu”、” sanjiao”、” zhengxian”， def=get(de,39。tag39。)獲取三個Radio Button鍵中Tag的值，設(shè)置一個全局變量p，用switch函數(shù)實現(xiàn)，當case為 39。 zhishu 39。時，p的值1。 case 為39。 sanjiao 39。時，p的值2。 case 為39。 zhengxian 39。 時p的值為3。程序如下所示：global T。global n。global p。de=get(,39。selectedobject39。)。 %獲得包絡(luò)選中的對象def=get(de,39。tag39。)。 %把選中對象的tag賦給defswitch def %確認選中的對象 case 39。zhishu39。 p=1。 case 39。sanjiao39。 p=2。 case 39。zhengxian39。 p=3。end把p的值反應(yīng)到gangqin（s）的子函數(shù)中，在子函數(shù)中根據(jù)不同的p的值選用不同的包絡(luò)，即可實現(xiàn)不同的包絡(luò)，所發(fā)出的音型便不一樣。gangqin（s）中包絡(luò)部分程序如下：if p==1 %選擇包絡(luò) x=exp(3*n)。elseif p==2 x=exp(3*n).*sawtooth(2*pi*50*n)。elseif p==3 x=exp(3*n).*sin(2*pi*n)。end（1）GUI界面的設(shè)計用一個radio button鍵便可實現(xiàn)該功能，可以根據(jù)不同的鍵盤按鍵發(fā)出不同的音樂。同時將該鍵的string改為“鍵盤”，表示這個鍵是實現(xiàn)鍵盤的功能。如圖所示：（2）程序設(shè)計根據(jù)計算機鍵盤上不同鍵對應(yīng)的ASCII碼的值不同，利用函數(shù)get()獲取當前所按下的鍵對應(yīng)的ASCII碼的值，并執(zhí)行相應(yīng)播放音階。在radio button鍵的KeypressF函數(shù)中的程序如下：function jianpan_KeyPressF(hObject, eventdata, handles)s=get(,39。value39。)。 %獲得按下鍵的值if s==0 %看radio button 是否按下elseif get(gcf,39。CurrentCharacter39。)==48 gangqin(28)。elseif get(gcf,39。CurrentCharacter39。)==49 gangqin(29)。elseif get(gcf,39。CurrentCharacter39。)==50 gangqin(30)。elseif get(gcf,39。CurrentCharacter39。)==51 gangqin(31)。elseif get(gcf,39。CurrentCharacter39。)==52 gangqin(32)。e