com_cemo.m

数字通信第四版原书的例程

add_block('built-in/Outport',[sys,'/',['PDM',13,'baseband/out_1']])
set_param([sys,'/',['PDM',13,'baseband/out_1']],...
		'position',[660,40,680,60])

add_block('built-in/Unit Delay',[sys,'/',['PDM',13,'baseband/Unit Delay']])
set_param([sys,'/',['PDM',13,'baseband/Unit Delay']],...
		'orientation',2,...
		'Sample time','ts',...
		'position',[555,80,605,100])

add_block('built-in/Sum',[sys,'/',['PDM',13,'baseband/Sum1']])
set_param([sys,'/',['PDM',13,'baseband/Sum1']],...
		'position',[565,40,585,60])

add_block('built-in/Gain',[sys,'/',['PDM',13,'baseband/Gain1']])
set_param([sys,'/',['PDM',13,'baseband/Gain1']],...
		'Gain','-ts(1)',...
		'position',[465,30,495,60])


%     Subsystem  ['PDM',13,'baseband/Dis module',13,'integrator1'].

new_system([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],'Location',[48,515,661,644])

add_block('built-in/Gain',[sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/Gain1']])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/Gain1']],...
		'Gain','ts(1)',...
		'position',[100,20,130,50])

add_block('built-in/Sum',[sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/Sum']])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/Sum']],...
		'position',[195,30,215,50])

add_block('built-in/Fcn',[sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/module']])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/module']],...
		'Expr','rem(u[1],modu)',...
		'position',[235,29,325,51])

add_block('built-in/Inport',[sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/in_1']])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/in_1']],...
		'position',[15,25,35,45])

add_block('built-in/Unit Delay',[sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/Unit Delay']])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/Unit Delay']],...
		'Sample time','ts',...
		'x0','init',...
		'position',[345,30,395,50])

add_block('built-in/Outport',[sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/out_1']])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1/out_1']],...
		'position',[425,30,445,50])
add_line([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],[220,40;230,40])
add_line([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],[40,35;95,35])
add_line([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],[135,35;190,35])
add_line([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],[330,40;340,40])
add_line([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],[400,40;420,40])
add_line([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],[410,40;410,90;175,90;175,45;190,45])
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],...
		'Mask Display','discrete\nmod-int',...
		'Mask Type','Module Integrator')
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],...
		'Mask Dialogue','Module the given number when state exceed limit|Module bound:|Initial value:|Sample time:',...
		'Mask Translate','init=@2; modu=@1;ts=@3;')
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],...
		'Mask Help','The absolute value of this integrator will not exceed the specified module bound. The state value is set to be zero when the module bound is reached. This block can only be used for scale value calculation.')
set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],...
		'Mask Entries','100\/0\/ts\/')


%     Finished composite block ['PDM',13,'baseband/Dis module',13,'integrator1'].

set_param([sys,'/',['PDM',13,'baseband/Dis module',13,'integrator1']],...
		'orientation',1,...
		'position',[390,95,450,135])

add_block('built-in/Gain',[sys,'/',['PDM',13,'baseband/Sensitivity']])
set_param([sys,'/',['PDM',13,'baseband/Sensitivity']],...
		'Gain','-2*pi',...
		'position',[355,30,395,60])

add_block('built-in/Constant',[sys,'/',['PDM',13,'baseband/Constant1']])
set_param([sys,'/',['PDM',13,'baseband/Constant1']],...
		'orientation',2,...
		'Value','Ph',...
		'position',[340,190,370,210])

add_block('built-in/Filter',[sys,'/',['PDM',13,'baseband/Filter']])
set_param([sys,'/',['PDM',13,'baseband/Filter']],...
		'Numerator','num',...
		'Denominator','den',...
		'Sample time','ts',...
		'position',[255,26,310,64])


%     Subsystem  ['PDM',13,'baseband/Multiply &',13,'take imag'].

new_system([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],'Location',[317,81,820,296])

add_block('built-in/Demux',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split']],...
		'outputs','2',...
		'Mask Display','Complex to\nReal/Imag',...
		'Mask Type','Complex to Real/Imag')
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split']],...
		'Mask Dialogue','Real and imaginary components of complex vector.')
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split']],...
		'Mask Help','The Complex to Real/Imag block decomposes a complex vector into its real and imaginary components using a Demux block. The real part is directed to output 1, and the imaginary to output 2.')
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split']],...
		'position',[90,24,165,66])

add_block('built-in/Inport',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Complex',13,'input 1']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Complex',13,'input 1']],...
		'position',[40,35,60,55])

add_block('built-in/Demux',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split1']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split1']],...
		'outputs','2',...
		'Mask Display','Complex to\nReal/Imag',...
		'Mask Type','Complex to Real/Imag')
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split1']],...
		'Mask Dialogue','Real and imaginary components of complex vector.')
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split1']],...
		'Mask Help','The Complex to Real/Imag block decomposes a complex vector into its real and imaginary components using a Demux block. The real part is directed to output 1, and the imaginary to output 2.')
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Split1']],...
		'position',[85,139,160,181])

add_block('built-in/Inport',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Complex',13,'input 2']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Complex',13,'input 2']],...
		'Port','2',...
		'position',[30,150,50,170])

add_block('built-in/Product',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Product3']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Product3']],...
		'position',[310,63,340,87])

add_block('built-in/Product',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Product2']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Product2']],...
		'position',[220,108,250,132])

add_block('built-in/Sum',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Sum1']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/Sum1']],...
		'position',[390,105,410,125])

add_block('built-in/Outport',[sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/I_out_']])
set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag/I_out_']],...
		'position',[450,105,470,125])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[255,120;385,120])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[345,75;360,75;360,110;385,110])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[165,150;180,150;180,125;215,125])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[170,55;185,55;185,115;215,115])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[165,170;290,170;290,80;305,80])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[170,35;248,35;248,70;305,70])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[55,160;80,160])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[65,45;85,45])
add_line([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],[415,115;445,115])


%     Finished composite block ['PDM',13,'baseband/Multiply &',13,'take imag'].

set_param([sys,'/',['PDM',13,'baseband/Multiply &',13,'take imag']],...
		'position',[125,24,200,66])

add_block('built-in/Constant',[sys,'/',['PDM',13,'baseband/Constant']])
set_param([sys,'/',['PDM',13,'baseband/Constant']],...
		'orientation',2,...
		'position',[290,85,320,105])

add_block('built-in/Sum',[sys,'/',['PDM',13,'baseband/Sum']])
set_param([sys,'/',['PDM',13,'baseband/Sum']],...
		'orientation',2,...
		'position',[245,155,265,175])

add_block('built-in/Inport',[sys,'/',['PDM',13,'baseband/in_1']])
set_param([sys,'/',['PDM',13,'baseband/in_1']],...
		'position',[45,25,65,45])


%     Subsystem  ['PDM',13,'baseband/M//P 2 C'].

new_system([sys,'/',['PDM',13,'baseband/M//P 2 C']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C']],'Location',[87,375,532,683])

add_block('built-in/Inport',[sys,'/',['PDM',13,'baseband/M//P 2 C/in_1']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C/in_1']],...
		'position',[215,70,235,90])

add_block('built-in/Inport',[sys,'/',['PDM',13,'baseband/M//P 2 C/in_2']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C/in_2']],...
		'Port','2',...
		'position',[15,130,35,150])

add_block('built-in/Fcn',[sys,'/',['PDM',13,'baseband/M//P 2 C/cos']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C/cos']],...
		'Expr','cos(u[1])',...
		'position',[80,52,155,78])

add_block('built-in/Fcn',[sys,'/',['PDM',13,'baseband/M//P 2 C/sin']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C/sin']],...
		'position',[75,127,150,153])

add_block('built-in/Outport',[sys,'/',['PDM',13,'baseband/M//P 2 C/out_1']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C/out_1']],...
		'position',[380,115,400,135])

add_block('built-in/Product',[sys,'/',['PDM',13,'baseband/M//P 2 C/Product']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C/Product']],...
		'position',[320,107,345,138])

add_block('built-in/Mux',[sys,'/',['PDM',13,'baseband/M//P 2 C/Mux']])
set_param([sys,'/',['PDM',13,'baseband/M//P 2 C/Mux']],...
		'inputs','2',...
		'position',[225,111,270,149])
add_line([sys,'/',['PDM',13,'baseband/M//P 2 C']],[40,140;70,140])
add_line([sys,'/',['PDM',13,'baseband/M//P 2 C']],[50,140;50,65;75,65])
add_line([sys,'/',['PDM',13,'baseband/M//P 2 C']],[240,80;280,80;280,115;315,115])
add_line([sys,'/',['PDM',13,'baseband/M//P 2 C']],[350,125;375,125])
add_line([sys,'/',['PDM',13,'baseband/M//P 2 C']],[275,130;315,130])
add_line([sys,'/',['PDM',13,'baseband/M//P 2 C']],[155,140;220,140])
add_line([sys,'/',['PDM',13,'baseband/M//P 2 C']],[160,65;170,65;170,120;220,120])


%     Finished composite block ['PDM',13,'baseband/M//P 2 C'].

set_param([sys,'/',['PDM',13,'baseband/M//P 2 C']],...
		'orientation',2,...
		'position',[115,135,205,175])
add_line([sys,'/',['PDM',13,'baseband']],[400,45;460,45])
add_line([sys,'/',['PDM',13,'baseband']],[420,45;420,90])
add_line([sys,'/',['PDM',13,'baseband']],[590,50;630,50;630,90;610,90])
add_line([sys,'/',['PDM',13,'baseband']],[630,50;655,50])
add_line([sys,'/',['PDM',13,'baseband']],[550,90;540,90;540,55;560,55])
add_line([sys,'/',['PDM',13,'baseband']],[500,45;560,45])
add_line([sys,'/',['PDM',13,'baseband']],[315,45;350,45])
add_line([sys,'/',['PDM',13,'baseband']],[205,45;250,45])
add_line([sys,'/',['PDM',13,'baseband']],[110,155;85,155;85,55;120,55])
add_line([sys,'/',['PDM',13,'baseband']],[240,165;210,165])
add_line([sys,'/',['PDM',13,'baseband']],[285,95;255,95;255,145;210,145])
add_line([sys,'/',['PDM',13,'baseband']],[70,35;120,35])
add_line([sys,'/',['PDM',13,'baseband']],[335,200;295,200;295,170;270,170])