tceps3cd.m

通信系统的matlab仿真程序

		'position',[285,280,290,285])

add_block('built-in/Filter',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Filter']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Filter']],...
		'Numerator','num',...
		'Denominator','den',...
		'Sample time','ts',...
		'position',[390,61,445,99])

add_block('built-in/Product',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product']],...
		'position',[260,43,290,67])

add_block('built-in/Sum',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Sum']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Sum']],...
		'inputs','+-',...
		'position',[335,70,355,90])

add_block('built-in/Product',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product3']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product3']],...
		'position',[270,193,300,217])

add_block('built-in/Product',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product2']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product2']],...
		'position',[270,238,300,262])

add_block('built-in/Constant',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Constant']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Constant']],...
		'Value','x1',...
		'position',[155,40,175,60])

add_block('built-in/Demux',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Demux']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Demux']],...
		'outputs','2',...
		'position',[120,105,160,140])

add_block('built-in/Product',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product1']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Product1']],...
		'position',[260,123,290,147])

add_block('built-in/Filter',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Filter1']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Filter1']],...
		'Numerator','num',...
		'Denominator','den',...
		'Sample time','ts',...
		'position',[395,211,450,249])

add_block('built-in/Outport',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/out_2']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/out_2']],...
		'Port','2',...
		'position',[485,220,505,240])

add_block('built-in/Sum',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Sum1']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Sum1']],...
		'position',[340,220,360,240])

add_block('built-in/Constant',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Constant1']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/Constant1']],...
		'Value','x2',...
		'position',[160,245,180,265])

add_block('built-in/Inport',[sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/in_1']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3/in_1']],...
		'position',[55,115,75,135])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[455,230;480,230])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[365,230;390,230])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[450,80;475,80])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[360,80;385,80])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[80,125;115,125])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[305,250;315,250;315,235;335,235])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[305,205;315,205;315,225;335,225])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[295,135;305,135;305,85;330,85])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[295,55;305,55;305,75;330,75])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[180,50;255,50])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[215,50;215,200;265,200])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[165,130;255,130])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[180,130;180,210;265,210])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[185,255;200,255;200,140;255,140])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[200,255;265,255])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[165,115;230,115;230,60;255,60])
add_line([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],[230,115;230,245;265,245])
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],...
		'Mask Display','plot(0,0,100,100,x,y,u,v);QADM',...
		'Mask Type','QM DSB-SC ADM CE')
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],...
		'Mask Dialogue','Demodulate the complex envelope of a\nQAM modulated signal into in-phase and\nquadrature components into 1st and 2nd\nout ports.|Lowpass filter numerator:|Lowpass filter denominator:|Initial phase (rad):|Sample time (sec):')
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],...
		'Mask Translate','num=@1;den=@2;Ph=@3;ts=@4;x1=cos(-Ph);x2=sin(-Ph);[x,y]=moduicon(2);[u,v]=cmplxicn(0,50,get_param(gcb,''orientation''));')
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],...
		'Mask Help','This block demodulates the quadratic multiplexed double-sideband suppressed-carrier amplitude modulation modulated signal using the QAM method. The filter to be specified is a lowpass filter that passes the signal message and eliminates the carrier signal.')
set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],...
		'Mask Entries','num\/den\/Ph\/ts\/')


%     Finished composite block ['A-map QASK',13,'demod baseband/QADM',13,'baseband3'].

set_param([sys,'/',['A-map QASK',13,'demod baseband/QADM',13,'baseband3']],...
		'ForeGround',4,...
		'hide name',0,...
		'position',[70,38,150,82])

add_block('built-in/Inport',[sys,'/',['A-map QASK',13,'demod baseband/in_1']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/in_1']],...
		'position',[10,50,30,70])

add_block('built-in/Outport',[sys,'/',['A-map QASK',13,'demod baseband/out_1']])
set_param([sys,'/',['A-map QASK',13,'demod baseband/out_1']],...
		'position',[285,50,305,70])
add_line([sys,'/',['A-map QASK',13,'demod baseband']],[35,60;65,60])
add_line([sys,'/',['A-map QASK',13,'demod baseband']],[260,60;280,60])
add_line([sys,'/',['A-map QASK',13,'demod baseband']],[155,50;170,50])
add_line([sys,'/',['A-map QASK',13,'demod baseband']],[155,70;170,70])
set_param([sys,'/',['A-map QASK',13,'demod baseband']],...
		'Mask Display','plot(0,0,100,100,x,y,u,v);A-QASK',...
		'Mask Type','Baseband A-QASK demodulation')
set_param([sys,'/',['A-map QASK',13,'demod baseband']],...
		'Mask Dialogue','Demodulate the complex envelope of a QASK modulated signal. The arbitrary constellation is defined by in-phase and quadrature vectors.|Constellation in-phase component:|Constellation quadrature component:|Symbol interval and offset (sec):|Lowpass filter [num; den], a 2 row matrix:|Initial phase (rad):|Sample time (sec):')
set_param([sys,'/',['A-map QASK',13,'demod baseband']],...
		'Mask Translate','y1=@1;y2=@2;td=@3;num=@4;Ph=@5;ts=@6;den=num(2,:);num=num(1,:);[x,y]=moduicon(6);[u,v]=cmplxicn(0,50,get_param(gcb,''orientation''));')
set_param([sys,'/',['A-map QASK',13,'demod baseband']],...
		'Mask Help','This block demodulates the complex envelope of a QASK modulated signal with user-defined arbitrary constellation. The vector length of the in-phase and quadrature components vectors should have the same length. The outputs are integers in the range [0, M-1], where M is the vector length of in-phase or quadrature. When the symbol interval is a two-element vector, the second element is the offset (default 0).')
set_param([sys,'/',['A-map QASK',13,'demod baseband']],...
		'Mask Entries','real(exp(j*[0:M-1]/M*pi*2))\/imag(exp(j*[0:M-1]/M*pi*2))\/[td, td-ts]\/[num;den]\/0\/ts\/')


%     Finished composite block ['A-map QASK',13,'demod baseband'].

set_param([sys,'/',['A-map QASK',13,'demod baseband']],...
		'hide name',0,...
		'position',[350,58,430,102])


%     Subsystem  ['A-map QASK',13,'mod baseband'].

new_system([sys,'/',['A-map QASK',13,'mod baseband']])
set_param([sys,'/',['A-map QASK',13,'mod baseband']],'Location',[26,513,372,670])


%     Subsystem  ['A-map QASK',13,'mod baseband/QAM',13,'baseband2'].

new_system([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2']],'Location',[321,500,954,793])

add_block('built-in/Note',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Ref: Hambley: An Intro to Comm. Systems. pp72']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Ref: Hambley: An Intro to Comm. Systems. pp72']],...
		'position',[260,370,265,375])

add_block('built-in/Note',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/I_out']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/I_out']],...
		'position',[445,206,450,211])

add_block('built-in/Sum',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Sum1']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Sum1']],...
		'position',[385,210,405,230])

add_block('built-in/Product',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Product2']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Product2']],...
		'position',[310,228,340,252])

add_block('built-in/Product',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Product3']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Product3']],...
		'position',[310,183,340,207])

add_block('built-in/Note',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/I2']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/I2']],...
		'position',[190,155,195,160])

add_block('built-in/Note',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/R2']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/R2']],...
		'position',[125,135,130,140])

add_block('built-in/Inport',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/in_2']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/in_2']],...
		'Port','2',...
		'position',[135,55,155,75])

add_block('built-in/Note',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/I1']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/I1']],...
		'position',[193,43,198,48])

add_block('built-in/Constant',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Constant1']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Constant1']],...
		'Value','x2',...
		'position',[130,165,150,185])

add_block('built-in/Constant',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Constant']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/Constant']],...
		'Value','x1',...
		'position',[80,145,100,165])

add_block('built-in/Outport',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/out_1']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/out_1']],...
		'position',[585,130,605,150])

add_block('built-in/Inport',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/in_1']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/in_1']],...
		'position',[95,30,115,50])

add_block('built-in/Mux',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/RI2C']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/RI2C']],...
		'inputs','2',...
		'Mask Display','Real/Imag\nto Complex',...
		'Mask Type','Real/Imag to Complex')
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/RI2C']],...
		'Mask Dialogue','Construct complex vector from real and imaginary vectors.')
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/RI2C']],...
		'Mask Help','The Real/Imag to Complex block creates a complex output from the two inputs. It uses a Mux block to append the complex part (input 2) to the real part (input 1).')
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/RI2C']],...
		'position',[470,119,545,161])

add_block('built-in/Note',[sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/R_out']])
set_param([sys,'/',['A-map QASK',13,'mod baseband/QAM',13,'baseband2/R_out']],...