【正文】 abs(tv(1))del)。 % 返回當(dāng)前軸坐標(biāo)的設(shè)置 del=t(2)t(1)。)。 % 只能 X軸放大 elseif strcmp(action,39。xon39。)。 % 以采樣速率 fs輸出聲音文件數(shù)據(jù) elseif strcmp(action,39。 xx=x(n1:n2)。n2=length(x)。n2=find(abs(tv(2))del)。del=del*.5。 % 播放聲音文件 v=axis。Play39。H2=1。 n1=1。)39。T (39。])。 % gca是返回當(dāng)前軸的句柄并設(shè)置 title([39。FontSize39。Arial39。FontName39。 plot(t,x,c1)。ms39。t=t*1000。us39。t=t*1e+06。s39。T=N*dt。N=length(x)。 end。c2=39。 c1=39。539。g39。y39。)。 whitebg(39。439。)。)。Spectrum39。audspec(39。Callback39。Spectrum39。,39。 uimenu(39。39。39。39。,39。,39。amp。Label39。)。)。Zoom39。audspec(39。Callback39。Zoom39。,39。 uimenu(39。Position39。off39。NumberTitle39。OSCILLOSCOPE THEE 2021/839。Name39。)。)和 audspec(39。)， audspec(39。 26 音頻頻譜分析儀程序（續(xù) 1） % 增加菜單項（ Zoom， Play， Spectrum）， 生成信號波形，回應(yīng)（ Callback） 分別調(diào)用 % 函數(shù) audspec(39。]。 int2str(fs) 39。 file=[file 39。)。 elseif strcmp(v(1),39。 % 取左聲道數(shù)據(jù) %x=x(:,2)。 x=x(:)。,stero39。 if n==2。bits39。Hz,39。 fs=39。 % x是采樣數(shù)據(jù)， fs是采樣速率（ Hz） [m,n]=size(x)。)。 % 文件名稱和路徑 if strcmp(v(1),39。)。,39。 % MATLAB版本 [fname,pname]=uigetfile(39。 % 示波器 clc。initialized39。end。action=39。 %=========================================================== 25 音頻頻譜分析儀程序 （ 車晴 ） 返回 y=audspec(action)。 text(9000,60,F2_rt)。 Hz39。 F2_r=(10000+i2_r)/32768*10000。 text(3000,850,F1_rt)。 Hz39。 % 找出簡單合成聲音頻域最大值 F1_r=i1_r/32768*10000。])。 xlabel([39。左聲道簡單合成聲音的頻域幅值 39。,10)。,39。,39。 set(gca,39。)。 24 音頻信號的分析與合成程序（續(xù) 4） disp(39。39。)。 disp(39。 pause sound(y1,fs,bits)。 pause sound(y1,fs,bits)。39。)。 disp(39。左聲道簡單合成聲音波形 39。,10)。,39。,39。 set(gca,39。)。 disp(39。按任意鍵顯示左聲道簡單合成聲音波形?。?39。 y1=(sin(2*pi*788*t)+sin(2*pi*3174*t)*()+sin(2*pi*6936*t)*())*。 text(8000,20,F3t)。 Hz39。 % 找出頻域次次大值 F3=(10000+i3)/32768*fs。 text(3000,40,F2t)。 Hz39。 % 找出頻域次大值 F2=(4000+i2)/32768*fs。 text(1500,450,F1t)。 Hz39。 % 找出頻域最大值 F1=i1/32768*fs。])。 xlabel([39。左聲道聲音頻域的幅值 39。,10)。,39。,39。 set(gca,39。)。 22 音頻信號的分析與合成程序（續(xù) 2） disp(39。39。)。 disp(39。 pause sound(y,fs,bits)。 pause sound(y,fs,bits)。39。)。 disp(39。采樣點(diǎn)數(shù) 39。])。 title([39。FontSize39。Arial39。FontName39。 pause plot(y)。39。)。 % 右聲道信號波形數(shù)據(jù) %=========================================================== 21 音頻信號的分析與合成程序（續(xù) 1） %=========================================================== disp(39。 % 雙聲道信號波形數(shù)據(jù) y=x(:,1)。 % 讀入聲音文件（ *.wav） sound(x,fs,bits)。 file=[pname,fname]。Open Wave File39。*.wav39。end。action=39。 %=========================================================== clear。 % SIGNAL SPECTRUM ANALYSER THEE 2021/10 % y=sigspec(action)。通過本例說明： （ A） 回調(diào)屬性的運(yùn)作機(jī)理； （ B） 用戶頂層菜單項的制作； （ C） uimenu屬性的設(shè)置方法； （ D） 復(fù)雜字符串的構(gòu)成方法和注意事項。 ? 運(yùn)行程序 ， 驗證 Callback 屬性定義的子程序。 ? 在編輯框輸入 ::1， 可以看到十根曲線 。 18 控件的 Callback 屬性 返回 （張志涌 P426） ? 對于傳遞函數(shù)為 的歸一化二階系統(tǒng)，制作一 個能繪制該系統(tǒng)單位階躍響應(yīng)的圖形用戶界面。 返回 sa = circle(r,s) % CIRCLE plot a circle of radii r in the line specified by s. % r 指定半徑的數(shù)值 % s 指定線色的字符串 % sa 圓面積 % circle(r) 利用藍(lán)實(shí)線畫半徑為 r 的圓周線 . % circle(r,s) 利用串 s 指定的線色畫半徑為 r 的圓周線 . % sa=circle(r) 計算圓面積，并畫半徑為 r 的藍(lán)色圓面 . % sa=circle(r,s) 計算圓面積，并畫半徑為 r 的 s 色圓面 . % 編寫于 1999年 4月 7日，修改于 1999年 8月 27日。surf(x,y,z)。 end end end axis([a,a,b,b,min(min(z)),max(max(z))])。 elseif x(j)+y(i)=1 z(i,j)=*exp(*y(i)^*x(j)^2+*x(j))。y=b::b。 clf。 ?????????????????????????),(21216212112122212212122xxexxexxexxpxxxxxxxx （ ） 16 M腳本文件入門（續(xù)） 返回 % This is my first example. a=2。 Am? DSBAM： ttmts ?s i n)()( ??? SSB： 是調(diào)制信號 的希爾伯特 變換 。幅度調(diào)制有多種實(shí)現(xiàn)方式，包括：標(biāo)準(zhǔn)幅度調(diào)制（ SAM），雙邊帶幅度調(diào)制（ DSBAM）， 單邊帶幅度調(diào)制（ SSB），殘留邊帶調(diào)制（ VSB） 和平衡正交幅度調(diào)制（ QAM） 等。)。 st