qamnrzbw.m

现代通信系统（prokis）的所有matlab源程序,对初学者很有帮助的。

set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Minimum']],...
		'function name','arymimai',...
		'parameters','''min''',...
		'position',[385,165,450,185])

add_block('built-in/Constant',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Shift key']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Shift key']],...
		'Value','sfty',...
		'position',[225,214,250,236])

add_block('built-in/S-Function',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Minimum1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Minimum1']],...
		'function name','arymimai',...
		'parameters','''min''',...
		'position',[385,40,445,60])

add_block('built-in/Constant',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Shift key1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Shift key1']],...
		'Value','sftx',...
		'position',[220,89,245,111])

add_block('built-in/Constant',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Shift key2']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Shift key2']],...
		'BackGround',5,...
		'position',[325,114,350,136])

add_block('built-in/Abs',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Abs1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Abs1']],...
		'position',[325,38,355,62])

add_block('built-in/Abs',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Abs']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung/Abs']],...
		'position',[325,163,355,187])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[85,40;130,40])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[360,175;380,175])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[315,175;320,175])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[255,225;260,225;260,180;285,180])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[250,100;255,100;255,55;275,55])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[305,50;320,50])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[360,50;380,50])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[665,90;680,90])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[550,80;575,80])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[605,90;625,90])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[450,50;450,65;465,65])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[455,175;465,175])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[495,170;500,170;510,85])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[355,125;560,125;560,95;575,95])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[450,125;450,160;465,160])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[450,125;450,80;465,80])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[495,75;510,75])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[85,165;130,165])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[175,165;285,165])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],[175,40;275,40])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],...
		'Mask Display','QASK\nS-demap',...
		'Mask Type','QASK S-demap')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],...
		'Mask Dialogue','Reverse the QASK map. Input in-phase\nand quadrature components from the\ntwo inputs. Output demapped signal.|QASK M-ary number (outputs are in range [0, M-1]):|Output symbol interval and offset (sec):')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],...
		'Mask Translate','N=@1;td=@2;Ac=1;sftx=[1 -1 3 -3 5 -5 7 -7 9 -9 11 -11 13 -13 15 -15];sftx=sftx(1:2*ceil(sqrt(N)/2));sfty=sftx;if N==8,sfty=sfty(1:2);end;sftx=sftx/max(sftx)*Ac;sfty=sfty/max(sfty)*Ac;tab=qaskdeco(length(sftx),length(sfty),''fetch'')+1;x=[1:length(sftx)];y=[1:length(sfty)];')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],...
		'Mask Help','This block demaps a QASK mapped signal using square constellation. You can place this block after a QAM demodulation block. This block assumes the maximum amplitude of the input signals is 1. The output symbols are integers in the range [0, M-1]. The input symbol interval can be a two-element vector with the second element being offset. The default value offset is 0.')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],...
		'Mask Entries','16\/1\/')


%     Finished composite block ['Empf鋘ger/Signalraum-',13,'decodierung'].

set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung']],...
		'position',[800,128,880,172])

add_block('built-in/Zero-Pole',[sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter']])
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter']],...
		'Zeros','z',...
		'Poles','p',...
		'Gain','k',...
		'Mask Display','plot(20*log10(w),20*log10(abs(h)))',...
		'Mask Type','buttap')
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter']],...
		'Mask Dialogue','Analog Butterworth low pass filter.\n\n(Requires Signal Processing Toolbox)|Cutoff frequency (rad/sec)|Order')
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter']],...
		'Mask Translate','[z,p,k]=buttap(@2); z=@1*z; p=@1*p; k=real(prod(-p)); [num,den]=zp2tf(z,p,k); w=logspace(log10(@1/10),log10(10*@1),20); h=freqs(num,den,w); ')
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter']],...
		'Mask Help','Butterworth low pass filter using MATLAB''s butter command.',...
		'Mask Entries','5\/4\/',...
		'position',[435,68,495,112])

add_block('built-in/Zero-Pole',[sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter_']])
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter_']],...
		'Zeros','z',...
		'Poles','p',...
		'Gain','k',...
		'Mask Display','plot(20*log10(w),20*log10(abs(h)))',...
		'Mask Type','buttap')
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter_']],...
		'Mask Dialogue','Analog Butterworth low pass filter.\n\n(Requires Signal Processing Toolbox)|Cutoff frequency (rad/sec)|Order')
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter_']],...
		'Mask Translate','[z,p,k]=buttap(@2); z=@1*z; p=@1*p; k=real(prod(-p)); [num,den]=zp2tf(z,p,k); w=logspace(log10(@1/10),log10(10*@1),20); h=freqs(num,den,w); ')
set_param([sys,'/',['Empf鋘ger/Analog Butterworth',13,'LP Filter_']],...
		'Mask Help','Butterworth low pass filter using MATLAB''s butter command.',...
		'Mask Entries','5\/4\/',...
		'position',[435,203,495,247])


%     Subsystem  'Empf鋘ger/Diagramme'.

new_system([sys,'/','Empf鋘ger/Diagramme'])
set_param([sys,'/','Empf鋘ger/Diagramme'],'Location',[669,447,1065,724])


%     Subsystem  'Empf鋘ger/Diagramme/Auge Quadratur'.

new_system([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],'Location',[121,409,416,595])

add_block('built-in/S-Function',[sys,'/','Empf鋘ger/Diagramme/Auge Quadratur/Plot1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur/Plot1'],...
		'function name','eyesampl',...
		'parameters','time_range, boundary, kept_length, eye_line, scatter_line, two_d_line',...
		'position',[130,70,200,110])

add_block('built-in/Inport',[sys,'/','Empf鋘ger/Diagramme/Auge Quadratur/in_1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur/in_1'],...
		'position',[75,80,95,100])
add_line([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],[100,90;125,90])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],...
		'Mask Display','plot(0,0,100,100,x,y);',...
		'Mask Type','Eye-diagram/scatter plot')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],...
		'Mask Dialogue','Produce eye-pattern diagram and/or scatter plot.|[Symbol interval, plot offset, decision point offset]:|Lower and upper bound of in-coming signal (1x2 vector):|Number of saved traces:|Line-type for eye-pattern diagram (0 for no plot):|Line-type for scatter plot (0 for no plot):|Plot update sample time:')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],...
		'Mask Translate','time_range=@1;boundary=@2;kept_length=@3;eye_line=@4;scatter_line=@5;two_d_line=@6;[x,y]=srcsicon(10);')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],...
		'Mask Help','This plot opens one, or two plots by assigning the line type parameters. The scatter plot point is selected by the decision point in the first parameter entry. A decision line is drawn in the eye-pattern diagram. The plot is updated at the plot update sample time point.')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],...
		'Mask Entries','[2 0 1+offset]\/[-1.5 1.5]\/0\/''w-/r-''\/0\/2/anzahl\/')


%     Finished composite block 'Empf鋘ger/Diagramme/Auge Quadratur'.

set_param([sys,'/','Empf鋘ger/Diagramme/Auge Quadratur'],...
		'position',[305,77,360,113])


%     Subsystem  'Empf鋘ger/Diagramme/Auge Inphase'.

new_system([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],'Location',[121,409,416,595])

add_block('built-in/Inport',[sys,'/','Empf鋘ger/Diagramme/Auge Inphase/in_1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase/in_1'],...
		'position',[75,80,95,100])

add_block('built-in/S-Function',[sys,'/','Empf鋘ger/Diagramme/Auge Inphase/Plot1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase/Plot1'],...
		'function name','eyesampl',...
		'parameters','time_range, boundary, kept_length, eye_line, scatter_line, two_d_line',...
		'position',[130,70,200,110])
add_line([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],[100,90;125,90])
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],...
		'Mask Display','plot(0,0,100,100,x,y);',...
		'Mask Type','Eye-diagram/scatter plot')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],...
		'Mask Dialogue','Produce eye-pattern diagram and/or scatter plot.|[Symbol interval, plot offset, decision point offset]:|Lower and upper bound of in-coming signal (1x2 vector):|Number of saved traces:|Line-type for eye-pattern diagram (0 for no plot):|Line-type for scatter plot (0 for no plot):|Plot update sample time:')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],...
		'Mask Translate','time_range=@1;boundary=@2;kept_length=@3;eye_line=@4;scatter_line=@5;two_d_line=@6;[x,y]=srcsicon(10);')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],...
		'Mask Help','This plot opens one, or two plots by assigning the line type parameters. The scatter plot point is selected by the decision point in the first parameter entry. A decision line is drawn in the eye-pattern diagram. The plot is updated at the plot update sample time point.')
set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],...
		'Mask Entries','[2 0 1+offset]\/[-1.5 1.5]\/0\/''w-/r-''\/0\/2/anzahl\/')


%     Finished composite block 'Empf鋘ger/Diagramme/Auge Inphase'.

set_param([sys,'/','Empf鋘ger/Diagramme/Auge Inphase'],...
		'position',[305,22,360,58])

add_block('built-in/Mux',[sys,'/','Empf鋘ger/Diagramme/Mux'])
set_param([sys,'/','Empf鋘ger/Diagramme/Mux'],...
		'inputs','2',...
		'position',[230,21,265,54])

add_block('built-in/Mux',[sys,'/','Empf鋘ger/Diagramme/Mux1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Mux1'],...
		'inputs','2',...
		'position',[230,76,265,109])

add_block('built-in/Constant',[sys,'/','Empf鋘ger/Diagramme/Constant'])
set_param([sys,'/','Empf鋘ger/Diagramme/Constant'],...
		'orientation',3,...
		'hide name',0,...
		'Value','Inf',...
		'position',[90,125,110,145])

add_block('built-in/Constant',[sys,'/','Empf鋘ger/Diagramme/Constant0'])
set_param([sys,'/','Empf鋘ger/Diagramme/Constant0'],...
		'orientation',3,...
		'hide name',0,...
		'Value','0',...
		'position',[190,125,210,145])


%     Subsystem  'Empf鋘ger/Diagramme/Trajektorie'.

new_system([sys,'/','Empf鋘ger/Diagramme/Trajektorie'])
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],'Location',[165,242,460,428])

add_block('built-in/Inport',[sys,'/','Empf鋘ger/Diagramme/Trajektorie/in_1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie/in_1'],...
		'position',[15,55,35,75])

add_block('built-in/Inport',[sys,'/','Empf鋘ger/Diagramme/Trajektorie/in_2'])
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie/in_2'],...
		'Port','2',...
		'position',[20,115,40,135])

add_block('built-in/Mux',[sys,'/','Empf鋘ger/Diagramme/Trajektorie/Mux'])
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie/Mux'],...
		'inputs','2',...
		'position',[65,70,100,105])

add_block('built-in/S-Function',[sys,'/','Empf鋘ger/Diagramme/Trajektorie/Plot1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie/Plot1'],...
		'function name','eyediasi',...
		'parameters','time_range, boundary, kept_length, eye_line, scatter_line, two_d_line',...
		'position',[130,70,200,110])
add_line([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],[40,65;45,65;45,80;60,80])
add_line([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],[45,125;50,125;60,95])
add_line([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],[105,90;125,90])
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],...
		'Mask Display','plot(0,0,100,100,x,y,v,w);',...
		'Mask Type','Eye-diagram/scatter plot')
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],...
		'Mask Dialogue','Produce eye-pattern diagram/scatter\nplot/x-y plot with the rising edge of the second input as the decision line.|Eye-pattern plot time frame:|Lower and upper bound of in-coming signal (1x2 vector):|Number of saved traces:|Line-type for eye-pattern diagram (0 for no plot):|Line-type for scatter plot (0 for no plot):|Line-type for x-y plot (0 for no plot):')
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],...
		'Mask Translate','time_range=@1;boundary=@2;kept_length=@3;eye_line=@4;scatter_line=@5;two_d_line=@6;[x,y]=srcsicon(10);[v,w]=trigicon(0,25,get_param(gcb,''orientation''),2);')
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],...
		'Mask Help','This plot opens one, two, or three plots by assigning the line type parameters. The scatter plot point is selected by the rising edge of a trigger signal. A decision line is drawn at the rising edge of the trigger signal.')
set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],...
		'Mask Entries','[2 0 1]\/[-1.5 1.5]\/0\/0\/0\/''g-''\/')


%     Finished composite block 'Empf鋘ger/Diagramme/Trajektorie'.

set_param([sys,'/','Empf鋘ger/Diagramme/Trajektorie'],...
		'position',[305,155,360,190])

add_block('built-in/Mux',[sys,'/','Empf鋘ger/Diagramme/Mux2'])
set_param([sys,'/','Empf鋘ger/Diagramme/Mux2'],...
		'inputs','2',...
		'position',[230,146,265,179])

add_block('built-in/Mux',[sys,'/','Empf鋘ger/Diagramme/Mux3'])
set_param([sys,'/','Empf鋘ger/Diagramme/Mux3'],...
		'inputs','2',...
		'position',[230,211,265,244])


%     Subsystem  'Empf鋘ger/Diagramme/Signalraumpunkte'.

new_system([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte'])
set_param([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte'],'Location',[165,242,460,428])

add_block('built-in/Inport',[sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte/in_1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte/in_1'],...
		'position',[75,80,95,100])

add_block('built-in/S-Function',[sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte/Plot1'])
set_param([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte/Plot1'],...
		'function name','eyesampl',...
		'parameters','time_range, boundary, kept_length, eye_line, scatter_line, two_d_line',...
		'position',[130,70,200,110])
add_line([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte'],[100,90;125,90])
set_param([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte'],...
		'Mask Display','plot(0,0,100,100,x,y);',...
		'Mask Type','Eye-diagram/scatter plot')
set_param([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte'],...
		'Mask Dialogue','Produce eye-pattern diagram and/or scatter plot.|[Symbol interval, plot offset, decision point offset]:|Lower and upper bound of in-coming signal (1x2 vector):|Number of saved traces:|Line-type for eye-pattern diagram (0 for no plot):|Line-type for scatter plot (0 for no plot):|Plot update sample time:')
set_param([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte'],...
		'Mask Translate','time_range=@1;boundary=@2;kept_length=@3;eye_line=@4;scatter_line=@5;two_d_line=@6;[x,y]=srcsicon(10);')
set_param([sys,'/','Empf鋘ger/Diagramme/Signalraumpunkte'],...
		'Mask Help','This plot opens one, or two plots by assigning the line type parameters. The scatter plot point is selected by the decision point in the first parameter entry. A decision line is drawn in the eye-pattern diagram. The plot is updated at the plot update sample time point.')