ooknrzmf.m

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

open_system([sys,'/','d_e(t)'])
set_param([sys,'/','d_e(t)'],...
		'position',[840,180,870,210])

add_block('built-in/Product',[sys,'/','Product1'])
set_param([sys,'/','Product1'],...
		'hide name',0,...
		'position',[650,113,680,137])

add_block('built-in/Scope',[sys,'/','Senkensignal v(t)'])
set_param([sys,'/','Senkensignal v(t)'],...
		'Vgain','2.000000',...
		'Hgain','25.000000',...
		'Vmax','4.000000',...
		'Hmax','50.000000',...
		'Window',[344,922,1280,1022])
open_system([sys,'/','Senkensignal v(t)'])
set_param([sys,'/','Senkensignal v(t)'],...
		'position',[1000,110,1030,140])

add_block('built-in/Scope',[sys,'/','Sendesignal s(t)'])
set_param([sys,'/','Sendesignal s(t)'],...
		'orientation',1,...
		'Vgain','2.000000',...
		'Hgain','25.000000',...
		'Vmax','4.000000',...
		'Hmax','50.000000',...
		'Window',[344,533,1280,633])
open_system([sys,'/','Sendesignal s(t)'])
set_param([sys,'/','Sendesignal s(t)'],...
		'position',[425,190,455,220])

add_block('built-in/Scope',[sys,'/','x(t)'])
set_param([sys,'/','x(t)'],...
		'orientation',1,...
		'Vgain','2.000000',...
		'Hgain','25.000000',...
		'Vmax','4.000000',...
		'Hmax','50.000000',...
		'Window',[344,434,1279,534])
open_system([sys,'/','x(t)'])
set_param([sys,'/','x(t)'],...
		'position',[165,210,195,240])


%     Subsystem  'Error rate'.

new_system([sys,'/','Error rate'])
set_param([sys,'/','Error rate'],'Location',[255,368,509,510])

add_block('built-in/S-Function',[sys,'/','Error rate/S-function'])
set_param([sys,'/','Error rate/S-function'],...
		'function name','sbiterr',...
		'parameters','num_lin, K, TDelay, Sample',...
		'position',[130,52,195,78])

add_block('built-in/Mux',[sys,'/','Error rate/Mux'])
set_param([sys,'/','Error rate/Mux'],...
		'inputs','2',...
		'position',[65,46,100,79])

add_block('built-in/Inport',[sys,'/','Error rate/in_1'])
set_param([sys,'/','Error rate/in_1'],...
		'position',[15,45,35,65])

add_block('built-in/Inport',[sys,'/','Error rate/in_2'])
set_param([sys,'/','Error rate/in_2'],...
		'Port','2',...
		'position',[15,60,35,80])
add_line([sys,'/','Error rate'],[105,65;125,65])
add_line([sys,'/','Error rate'],[40,55;60,55])
add_line([sys,'/','Error rate'],[40,70;60,70])
set_param([sys,'/','Error rate'],...
		'Mask Display','Error\nmeter',...
		'Mask Type','Symbol/bit error counter')
set_param([sys,'/','Error rate'],...
		'Mask Dialogue','Use the input data from the 1st port as the reference signal to detect the number of errors and error rate of the 2nd signal.|Bit per symbol:|Number of digits on display:|Delay between 1st port and 2nd port:|Sample time (sec):')
set_param([sys,'/','Error rate'],...
		'Mask Translate','K=@1;num_lin=@2;TDelay=@3;Sample=@4;')
set_param([sys,'/','Error rate'],...
		'Mask Help','The signal from the first port must be a scalar. The second input port can be a vector with a delay to the first port signal. The comparison happens only at the sampling point.')
set_param([sys,'/','Error rate'],...
		'Mask Entries','1\/10\/1\/1\/')


%     Finished composite block 'Error rate'.

set_param([sys,'/','Error rate'],...
		'orientation',1,...
		'position',[900,235,980,275])

add_block('built-in/Scope',[sys,'/','u(t)'])
set_param([sys,'/','u(t)'],...
		'move name',0,...
		'Vgain','2.000000',...
		'Hgain','25.000000',...
		'Vmax','4.000000',...
		'Hmax','50.000000',...
		'Window',[345,339,1280,439])
open_system([sys,'/','u(t)'])
set_param([sys,'/','u(t)'],...
		'position',[100,210,130,240])


%     Subsystem  ['Schwellenwert-',13,'Entscheider'].

new_system([sys,'/',['Schwellenwert-',13,'Entscheider']])
set_param([sys,'/',['Schwellenwert-',13,'Entscheider']],'Location',[159,417,467,586])

add_block('built-in/Constant',[sys,'/',['Schwellenwert-',13,'Entscheider/Constant']])
set_param([sys,'/',['Schwellenwert-',13,'Entscheider/Constant']],...
		'Value','0.5',...
		'position',[60,107,90,133])

add_block('built-in/Inport',[sys,'/',['Schwellenwert-',13,'Entscheider/in_1']])
set_param([sys,'/',['Schwellenwert-',13,'Entscheider/in_1']],...
		'position',[65,20,85,40])

add_block('built-in/Relational Operator',[sys,'/',['Schwellenwert-',13,'Entscheider/Relational',13,'Operator']])
set_param([sys,'/',['Schwellenwert-',13,'Entscheider/Relational',13,'Operator']],...
		'Operator','>',...
		'position',[150,57,180,88])

add_block('built-in/Outport',[sys,'/',['Schwellenwert-',13,'Entscheider/out_1']])
set_param([sys,'/',['Schwellenwert-',13,'Entscheider/out_1']],...
		'position',[215,65,235,85])
add_line([sys,'/',['Schwellenwert-',13,'Entscheider']],[90,30;115,30;115,65;145,65])
add_line([sys,'/',['Schwellenwert-',13,'Entscheider']],[95,120;110,120;110,80;145,80])
add_line([sys,'/',['Schwellenwert-',13,'Entscheider']],[185,75;210,75])
set_param([sys,'/',['Schwellenwert-',13,'Entscheider']],...
		'Mask Display','plot(-50,-50,50,50,[-50,50],[0,0],[0,0],[-50,50],[-40,0],[-30,-30],[0,40],[30,30])',...
		'Mask Type','Sign',...
		'Mask Dialogue','y = sign(x)')
set_param([sys,'/',['Schwellenwert-',13,'Entscheider']],...
		'Mask Help','Sign Function:\n\t\t\ty = 1 if x > 0\n\t\t\ty = 0 if x = 0\n\t\t\ty = -1 if x < 0')


%     Finished composite block ['Schwellenwert-',13,'Entscheider'].

set_param([sys,'/',['Schwellenwert-',13,'Entscheider']],...
		'position',[895,112,925,138])


%     Subsystem  ['Diagramme',13,'sendeseitig'].

new_system([sys,'/',['Diagramme',13,'sendeseitig']])
set_param([sys,'/',['Diagramme',13,'sendeseitig']],'Location',[475,310,844,551])

add_block('built-in/Constant',[sys,'/',['Diagramme',13,'sendeseitig/Constant1']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Constant1']],...
		'Value','0',...
		'position',[130,130,150,150])

add_block('built-in/Step Fcn',[sys,'/',['Diagramme',13,'sendeseitig/Step input']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Step input']],...
		'Time','starttime',...
		'position',[35,85,55,105])

add_block('built-in/Inport',[sys,'/',['Diagramme',13,'sendeseitig/in_1']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/in_1']],...
		'position',[35,40,55,60])

add_block('built-in/Switch',[sys,'/',['Diagramme',13,'sendeseitig/Switch']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Switch']],...
		'Threshold','1',...
		'position',[110,44,135,76])

add_block('built-in/Constant',[sys,'/',['Diagramme',13,'sendeseitig/Constant']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Constant']],...
		'Value','Inf',...
		'position',[35,130,55,150])

add_block('built-in/Mux',[sys,'/',['Diagramme',13,'sendeseitig/Mux1']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Mux1']],...
		'inputs','2',...
		'position',[185,96,220,129])


%     Subsystem  ['Diagramme',13,'sendeseitig/Augendiagramm'].

new_system([sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],'Location',[121,409,416,595])

add_block('built-in/Inport',[sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm/in_1']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm/in_1']],...
		'position',[75,80,95,100])

add_block('built-in/S-Function',[sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm/Plot1']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm/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,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],[100,90;125,90])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],...
		'Mask Display','plot(0,0,100,100,x,y);',...
		'Mask Type','Eye-diagram/scatter plot')
set_param([sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],...
		'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,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],...
		'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,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],...
		'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,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],...
		'Mask Entries','[2 0 1+offset]\/[-1.5 1.5]\/0\/''w-/r-''\/0\/2/anzahl\/')


%     Finished composite block ['Diagramme',13,'sendeseitig/Augendiagramm'].

set_param([sys,'/',['Diagramme',13,'sendeseitig/Augendiagramm']],...
		'position',[275,37,330,73])


%     Subsystem  ['Diagramme',13,'sendeseitig/Trajektorie'].

new_system([sys,'/',['Diagramme',13,'sendeseitig/Trajektorie']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Trajektorie']],'Location',[165,242,460,428])

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

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

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

add_block('built-in/S-Function',[sys,'/',['Diagramme',13,'sendeseitig/Trajektorie/Plot1']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/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,'/',['Diagramme',13,'sendeseitig/Trajektorie']],[40,65;45,65;45,80;60,80])
add_line([sys,'/',['Diagramme',13,'sendeseitig/Trajektorie']],[45,125;50,125;60,95])
add_line([sys,'/',['Diagramme',13,'sendeseitig/Trajektorie']],[105,90;125,90])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Trajektorie']],...
		'Mask Display','plot(0,0,100,100,x,y,v,w);',...
		'Mask Type','Eye-diagram/scatter plot')
set_param([sys,'/',['Diagramme',13,'sendeseitig/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,'/',['Diagramme',13,'sendeseitig/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,'/',['Diagramme',13,'sendeseitig/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,'/',['Diagramme',13,'sendeseitig/Trajektorie']],...
		'Mask Entries','[2 0 1]\/[-1.5 1.5]\/0\/0\/0\/''g-''\/')


%     Finished composite block ['Diagramme',13,'sendeseitig/Trajektorie'].

set_param([sys,'/',['Diagramme',13,'sendeseitig/Trajektorie']],...
		'position',[275,105,330,140])


%     Subsystem  ['Diagramme',13,'sendeseitig/Signalraumpunkte'].

new_system([sys,'/',['Diagramme',13,'sendeseitig/Signalraumpunkte']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Signalraumpunkte']],'Location',[165,242,460,428])

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

add_block('built-in/S-Function',[sys,'/',['Diagramme',13,'sendeseitig/Signalraumpunkte/Plot1']])
set_param([sys,'/',['Diagramme',13,'sendeseitig/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,'/',['Diagramme',13,'sendeseitig/Signalraumpunkte']],[100,90;125,90])
set_param([sys,'/',['Diagramme',13,'sendeseitig/Signalraumpunkte']],...
		'Mask Display','plot(0,0,100,100,x,y);',...
		'Mask Type','Eye-diagram/scatter plot')
set_param([sys,'/',['Diagramme',13,'sendeseitig/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,'/',['Diagramme',13,'sendeseitig/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,'/',['Diagramme',13,'sendeseitig/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.')
set_param([sys,'/',['Diagramme',13,'sendeseitig/Signalraumpunkte']],...
		'Mask Entries','[1 .5 .999]\/[-1.5 1.5]\/0\/0\/''y.''\/[.5 offset]\/')