com_mocd.m

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

set_param([sys,'/','MASK demap'],...
		'Mask Entries','M\/[td, td-ts]\/')


%     Finished composite block 'MASK demap'.

set_param([sys,'/','MASK demap'],...
		'position',[445,48,525,92])


%     Subsystem  ['ASK Mo//Dem',13,'demo'].

new_system([sys,'/',['ASK Mo//Dem',13,'demo']])
set_param([sys,'/',['ASK Mo//Dem',13,'demo']],'Location',[175,552,335,697])
set_param([sys,'/',['ASK Mo//Dem',13,'demo']],...
		'Mask Display','MASK\nmap\ndemo',...
		'Mask Dialogue','eval(''ts=.01;[num,den]=butter(2,100/pi/2*ts);td=.1;M=8;tstam2cd'')')


%     Finished composite block ['ASK Mo//Dem',13,'demo'].

set_param([sys,'/',['ASK Mo//Dem',13,'demo']],...
		'BackGround',7,...
		'hide name',0,...
		'position',[565,48,645,92])


%     Subsystem  ['PSK Mo//Dem',13,'demo'].

new_system([sys,'/',['PSK Mo//Dem',13,'demo']])
set_param([sys,'/',['PSK Mo//Dem',13,'demo']],'Location',[175,552,335,697])
set_param([sys,'/',['PSK Mo//Dem',13,'demo']],...
		'Mask Display','MPSK\nmap\ndemo',...
		'Mask Dialogue','eval(''ts=.01;td=.2;M=8;Fc=100/2/pi;tstpk2cd'')')


%     Finished composite block ['PSK Mo//Dem',13,'demo'].

set_param([sys,'/',['PSK Mo//Dem',13,'demo']],...
		'BackGround',7,...
		'hide name',0,...
		'position',[565,503,645,547])


%     Subsystem  'MPSK map'.

new_system([sys,'/','MPSK map'])
set_param([sys,'/','MPSK map'],'Location',[71,474,419,648])

add_block('built-in/Constant',[sys,'/','MPSK map/Multiple factor'])
set_param([sys,'/','MPSK map/Multiple factor'],...
		'Value','Sft',...
		'position',[130,108,150,132])

add_block('built-in/Outport',[sys,'/','MPSK map/out_1'])
set_param([sys,'/','MPSK map/out_1'],...
		'position',[310,85,330,105])

add_block('built-in/Product',[sys,'/','MPSK map/Product'])
set_param([sys,'/','MPSK map/Product'],...
		'position',[235,76,260,109])

add_block('built-in/Zero-Order Hold',[sys,'/',['MPSK map/Zero-Order',13,'Hold1']])
set_param([sys,'/',['MPSK map/Zero-Order',13,'Hold1']],...
		'Sample time','td',...
		'position',[130,29,165,61])

add_block('built-in/Inport',[sys,'/','MPSK map/in_1'])
set_param([sys,'/','MPSK map/in_1'],...
		'position',[60,35,80,55])
add_line([sys,'/','MPSK map'],[155,120;200,120;200,100;230,100])
add_line([sys,'/','MPSK map'],[265,95;305,95])
add_line([sys,'/','MPSK map'],[85,45;125,45])
add_line([sys,'/','MPSK map'],[170,45;200,45;200,85;230,85])
set_param([sys,'/','MPSK map'],...
		'Mask Display','MPSK\nmap',...
		'Mask Type','MPSK map')
set_param([sys,'/','MPSK map'],...
		'Mask Dialogue','Map input digital signal to analog phase shift.|M-ary number (input integer in range [0, M-1]):|Input symbol interval and offset (sec):',...
		'Mask Translate','pi2=2*pi;Sft=pi2/@1;td=@2;')
set_param([sys,'/','MPSK map'],...
		'Mask Help','This block maps the input digital signal to the analog signal, which is ready for the PM modulation. The input are integers in the range [0, M-1], where M is the M-ary number. You can view the MPSK constellation using the MODMAP function.')
set_param([sys,'/','MPSK map'],...
		'Mask Entries','M\/td\/')


%     Finished composite block 'MPSK map'.

set_param([sys,'/','MPSK map'],...
		'position',[40,498,120,542])


%     Subsystem  'help'.

new_system([sys,'/','help'])
set_param([sys,'/','help'],'Location',[95,429,862,670])

add_block('built-in/Note',[sys,'/','help/(1) digital map: mapping digit signal to analog signal. '])
set_param([sys,'/','help/(1) digital map: mapping digit signal to analog signal. '],...
		'position',[255,100,260,105])

add_block('built-in/Note',[sys,'/','help/The blocks in this libraris contains (in five block columns):'])
set_param([sys,'/','help/The blocks in this libraris contains (in five block columns):'],...
		'position',[240,75,245,80])

add_block('built-in/Note',[sys,'/','help/(3) analog demodulation: demodulatig analog signal.'])
set_param([sys,'/','help/(3) analog demodulation: demodulatig analog signal.'],...
		'position',[250,150,255,155])

add_block('built-in/Note',[sys,'/',['help/This library is the ungroupped version of Digital Modulation//Demodulation Library (discrete-time filter).',13,'']])
set_param([sys,'/',['help/This library is the ungroupped version of Digital Modulation//Demodulation Library (discrete-time filter).',13,'']],...
		'position',[365,50,370,55])

add_block('built-in/Note',[sys,'/','help/(2) analog modulation: modulating analog signal to carrier frequency.'])
set_param([sys,'/','help/(2) analog modulation: modulating analog signal to carrier frequency.'],...
		'ForeGround',4,...
		'position',[295,125,300,130])

add_block('built-in/Note',[sys,'/','help/(4) digit demap: demaping the demodulated signal to digit signal.'])
set_param([sys,'/','help/(4) digit demap: demaping the demodulated signal to digit signal.'],...
		'position',[285,175,290,180])

add_block('built-in/Note',[sys,'/','help/(5) demo for how to use the blocks.'])
set_param([sys,'/','help/(5) demo for how to use the blocks.'],...
		'ForeGround',7,...
		'position',[200,200,205,205])
set_param([sys,'/','help'],...
		'Mask Display','?')


%     Finished composite block 'help'.

set_param([sys,'/','help'],...
		'ForeGround',6,...
		'hide name',0,...
		'position',[565,580,590,606])


%     Subsystem  'Blocks that can be found in some other sublibraries in this toolbox'.

new_system([sys,'/','Blocks that can be found in some other sublibraries in this toolbox'])
set_param([sys,'/','Blocks that can be found in some other sublibraries in this toolbox'],'Location',[175,552,335,697])
set_param([sys,'/','Blocks that can be found in some other sublibraries in this toolbox'],...
		'Mask Display','.')


%     Finished composite block 'Blocks that can be found in some other sublibraries in this toolbox'.

set_param([sys,'/','Blocks that can be found in some other sublibraries in this toolbox'],...
		'orientation',1,...
		'ForeGround',4,...
		'position',[40,640,95,663])


%     Subsystem  'Mapping//demapping blocks'.

new_system([sys,'/','Mapping//demapping blocks'])
set_param([sys,'/','Mapping//demapping blocks'],'Location',[175,552,335,697])
set_param([sys,'/','Mapping//demapping blocks'],...
		'Mask Display','.')


%     Finished composite block 'Mapping//demapping blocks'.

set_param([sys,'/','Mapping//demapping blocks'],...
		'orientation',1,...
		'position',[40,610,95,633])


%     Subsystem  'Demonstration blocks'.

new_system([sys,'/','Demonstration blocks'])
set_param([sys,'/','Demonstration blocks'],'Location',[175,552,335,697])
set_param([sys,'/','Demonstration blocks'],...
		'Mask Display','.')


%     Finished composite block 'Demonstration blocks'.

set_param([sys,'/','Demonstration blocks'],...
		'orientation',1,...
		'BackGround',7,...
		'position',[40,580,95,603])


%     Subsystem  ['Corr MPSK',13,'demod passband'].

new_system([sys,'/',['Corr MPSK',13,'demod passband']])
set_param([sys,'/',['Corr MPSK',13,'demod passband']],'Location',[269,223,837,414])

add_block('built-in/Gain',[sys,'/',['Corr MPSK',13,'demod passband/Gain']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Gain']],...
		'Gain','Fc',...
		'position',[65,85,105,115])

add_block('built-in/Zero-Order Hold',[sys,'/',['Corr MPSK',13,'demod passband/Zero-Order',13,'Hold']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Zero-Order',13,'Hold']],...
		'Sample time','td',...
		'position',[125,119,160,151])

add_block('built-in/Clock',[sys,'/',['Corr MPSK',13,'demod passband/Clock']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Clock']],...
		'position',[15,90,35,110])

add_block('built-in/Sum',[sys,'/',['Corr MPSK',13,'demod passband/Sum2']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Sum2']],...
		'inputs','+-',...
		'position',[185,90,210,125])

add_block('built-in/Sum',[sys,'/',['Corr MPSK',13,'demod passband/Sum1']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Sum1']],...
		'inputs','+++',...
		'position',[240,40,265,80])

add_block('built-in/Constant',[sys,'/',['Corr MPSK',13,'demod passband/Initial phase']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Initial phase']],...
		'Value','Ph',...
		'position',[165,48,185,72])

add_block('built-in/S-Function',[sys,'/',['Corr MPSK',13,'demod passband/Array sin']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Array sin']],...
		'function name','arysin',...
		'parameters','''cos''',...
		'position',[295,50,345,70])

add_block('built-in/Inport',[sys,'/',['Corr MPSK',13,'demod passband/in_1']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/in_1']],...
		'position',[305,100,325,120])

add_block('built-in/Product',[sys,'/',['Corr MPSK',13,'demod passband/Product']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Product']],...
		'position',[385,51,410,84])

add_block('built-in/S-Function',[sys,'/',['Corr MPSK',13,'demod passband/Scheduled',13,'reset-int1']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Scheduled',13,'reset-int1']],...
		'function name','schdint',...
		'parameters','td, ts, limit',...
		'Mask Display','Schdld\nreset-int',...
		'Mask Type','Scheduled reset integration.')
set_param([sys,'/',['Corr MPSK',13,'demod passband/Scheduled',13,'reset-int1']],...
		'Mask Dialogue','Reset the state to be zero(s) at the scheduled reset point.|Scheduled reset time inteval and offset:|Sample time and offset:|Modulo bound:')
set_param([sys,'/',['Corr MPSK',13,'demod passband/Scheduled',13,'reset-int1']],...
		'Mask Translate','td=@1;ts=@2;limit=@3;')
set_param([sys,'/',['Corr MPSK',13,'demod passband/Scheduled',13,'reset-int1']],...
		'Mask Help','This block resets the state(s) to be zero(s) at the begining of reset time inteval. The reset inteval can be a two elements vector with the second element being offset.')
set_param([sys,'/',['Corr MPSK',13,'demod passband/Scheduled',13,'reset-int1']],...
		'Mask Entries','td\/ts\/Inf\/',...
		'position',[440,49,500,91])

add_block('built-in/Outport',[sys,'/',['Corr MPSK',13,'demod passband/out_1']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/out_1']],...
		'position',[525,60,545,80])

add_block('built-in/Constant',[sys,'/',['Corr MPSK',13,'demod passband/Shift key']])
set_param([sys,'/',['Corr MPSK',13,'demod passband/Shift key']],...
		'Value','sft',...
		'position',[115,13,135,37])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[330,110;360,110;360,75;380,75])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[350,60;380,60])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[165,135;165,115;180,115])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[110,100;120,135])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[110,100;180,100])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[215,110;225,110;235,75])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[40,100;60,100])
add_line([sys,'/',['Corr MPSK',13,'demod passband']],[190,60;235,60])
add_line