qpsnrzmf.m

很多通信系统的matlab程序,便于修改调用

function [ret,x0,str,ts,xts]=qpsnrzmf(t,x,u,flag);
%QPSNRZMF	is the M-file description of the SIMULINK system named QPSNRZMF.
%	The block-diagram can be displayed by typing: QPSNRZMF.
%
%	SYS=QPSNRZMF(T,X,U,FLAG) returns depending on FLAG certain
%	system values given time point, T, current state vector, X,
%	and input vector, U.
%	FLAG is used to indicate the type of output to be returned in SYS.
%
%	Setting FLAG=1 causes QPSNRZMF to return state derivatives, FLAG=2
%	discrete states, FLAG=3 system outputs and FLAG=4 next sample
%	time. For more information and other options see SFUNC.
%
%	Calling QPSNRZMF with a FLAG of zero:
%	[SIZES]=QPSNRZMF([],[],[],0),  returns a vector, SIZES, which
%	contains the sizes of the state vector and other parameters.
%		SIZES(1) number of states
%		SIZES(2) number of discrete states
%		SIZES(3) number of outputs
%		SIZES(4) number of inputs
%		SIZES(5) number of roots (currently unsupported)
%		SIZES(6) direct feedthrough flag
%		SIZES(7) number of sample times
%
%	For the definition of other parameters in SIZES, see SFUNC.
%	See also, TRIM, LINMOD, LINSIM, EULER, RK23, RK45, ADAMS, GEAR.

% Note: This M-file is only used for saving graphical information;
%       after the model is loaded into memory an internal model
%       representation is used.

% the system will take on the name of this mfile:
sys = mfilename;
new_system(sys)
simver(1.3)
if (0 == (nargin + nargout))
     set_param(sys,'Location',[251,42,1260,320])
     open_system(sys)
end;
set_param(sys,'algorithm',     'RK-45')
set_param(sys,'Start time',    '0.0')
set_param(sys,'Stop time',     '999999')
set_param(sys,'Min step size', '0.000001')
set_param(sys,'Max step size', '10')
set_param(sys,'Relative error','1e-6')
set_param(sys,'Return vars',   '')


%     Subsystem  'Empf鋘ger'.

new_system([sys,'/','Empf鋘ger'])
set_param([sys,'/','Empf鋘ger'],'Location',[251,42,1259,320])

add_block('built-in/Product',[sys,'/','Empf鋘ger/Product'])
set_param([sys,'/','Empf鋘ger/Product'],...
		'hide name',0,...
		'position',[300,74,330,101])

add_block('built-in/Scope',[sys,'/','Empf鋘ger/x_eI(t)'])
set_param([sys,'/','Empf鋘ger/x_eI(t)'],...
		'orientation',3,...
		'Vgain','1.500000',...
		'Hgain','25.000000',...
		'Vmax','3.000000',...
		'Hmax','50.000000',...
		'Window',[0,440,640,540],...
		'position',[350,20,380,50])

add_block('built-in/Fcn',[sys,'/','Empf鋘ger/Fcn'])
set_param([sys,'/','Empf鋘ger/Fcn'],...
		'hide name',0,...
		'Expr','2*cos(4*pi*u)',...
		'position',[185,119,265,141])

add_block('built-in/Fcn',[sys,'/','Empf鋘ger/Fcn1'])
set_param([sys,'/','Empf鋘ger/Fcn1'],...
		'hide name',0,...
		'Expr','-2*sin(4*pi*u)',...
		'position',[185,159,265,181])

add_block('built-in/Scope',[sys,'/','Empf鋘ger/x_eQ(t)'])
set_param([sys,'/','Empf鋘ger/x_eQ(t)'],...
		'orientation',3,...
		'Vgain','1.500000',...
		'Hgain','25.000000',...
		'Vmax','3.000000',...
		'Hmax','50.000000',...
		'Window',[640,440,1280,540],...
		'position',[350,155,380,185])

add_block('built-in/Clock',[sys,'/','Empf鋘ger/Clock'])
set_param([sys,'/','Empf鋘ger/Clock'],...
		'hide name',0,...
		'position',[145,140,165,160])

add_block('built-in/Product',[sys,'/','Empf鋘ger/Product1'])
set_param([sys,'/','Empf鋘ger/Product1'],...
		'hide name',0,...
		'position',[295,213,325,237])

add_block('built-in/Inport',[sys,'/',['Empf鋘ger/gest鰎tes',13,'QPSK-',13,'Signal']])
set_param([sys,'/',['Empf鋘ger/gest鰎tes',13,'QPSK-',13,'Signal']],...
		'position',[25,145,45,165])

add_block('built-in/Scope',[sys,'/','Empf鋘ger/d_eI(t)'])
set_param([sys,'/','Empf鋘ger/d_eI(t)'],...
		'orientation',3,...
		'Vgain','1.500000',...
		'Hgain','25.000000',...
		'Vmax','3.000000',...
		'Hmax','50.000000',...
		'Window',[0,540,640,640],...
		'position',[540,20,570,50])

add_block('built-in/Scope',[sys,'/','Empf鋘ger/d_eQ(t)'])
set_param([sys,'/','Empf鋘ger/d_eQ(t)'],...
		'orientation',3,...
		'Vgain','1.500000',...
		'Hgain','25.000000',...
		'Vmax','3.000000',...
		'Hmax','50.000000',...
		'Window',[640,540,1280,640],...
		'position',[540,155,570,185])


%     Subsystem  ['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)'].

new_system([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],'Location',[96,182,645,417])

add_block('built-in/Constant',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/imag_pt']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/imag_pt']],...
		'BackGround',5,...
		'Value','y2',...
		'position',[165,169,190,191])

add_block('built-in/Constant',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/real_pt']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/real_pt']],...
		'BackGround',3,...
		'Value','y1',...
		'position',[170,84,195,106])

add_block('built-in/Outport',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/out_1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/out_1']],...
		'position',[495,85,515,105])

add_block('built-in/S-Function',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Minimum1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Minimum1']],...
		'function name','arymimai',...
		'parameters','''min''',...
		'position',[415,85,475,105])

add_block('built-in/Sum',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Sum2']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Sum2']],...
		'position',[370,78,390,107])

add_block('built-in/Product',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Product1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Product1']],...
		'position',[300,130,325,150])

add_block('built-in/Product',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Product']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Product']],...
		'position',[300,45,325,65])

add_block('built-in/Sum',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Sum6']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Sum6']],...
		'ForeGround',4,...
		'inputs','+-',...
		'position',[230,123,250,152])

add_block('built-in/Sum',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Sum1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Sum1']],...
		'ForeGround',2,...
		'inputs','+-',...
		'position',[230,38,250,67])

add_block('built-in/Zero-Order Hold',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Zero-Order',13,'Hold1']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Zero-Order',13,'Hold1']],...
		'ForeGround',4,...
		'Sample time','td',...
		'position',[120,114,155,146])

add_block('built-in/Inport',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/imag']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/imag']],...
		'Port','2',...
		'position',[45,120,65,140])

add_block('built-in/Inport',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/real']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/real']],...
		'position',[45,35,65,55])

add_block('built-in/Zero-Order Hold',[sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Zero-Order',13,'Hold']])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)/Zero-Order',13,'Hold']],...
		'ForeGround',2,...
		'Sample time','td',...
		'position',[120,29,155,61])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[480,95;490,95])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[395,95;410,95])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[330,140;340,140;340,100;365,100])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[330,55;340,55;340,85;365,85])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[255,140;270,140;270,135;295,135])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[270,140;270,145;295,145])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[255,55;270,55;270,50;295,50])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[270,55;270,60;295,60])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[195,180;205,180;205,145;225,145])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[160,130;225,130])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[160,45;225,45])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[200,95;205,95;205,60;225,60])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[70,130;115,130])
add_line([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],[70,45;115,45])
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],...
		'Mask Display','QASK\nC-demap',...
		'Mask Type','QASK C-demap')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],...
		'Mask Dialogue','Reverse the QASK map. Input in-phase\nand quadrature components from the\ntwo inputs. Output demapped signal.|Number of symbols on each circle NIC::|Radii for each circle RIC:|Phase shift on each circle PIC (rad):|Symbol interval and offset (sec):')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],...
		'Mask Translate','N=@1;A=@2;P=@3;td=@4;y1=apkconst(N,A,P);y2=imag(y1);y1=real(y1);')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],...
		'Mask Help','This block demaps a QASK mapped signal using circle constellation. You can place this block after a QAM demodulation block. The circle constellation is defined in NIC, RIC, and PIC. The symbol interval can be a two elements vector with the first element being offset. The default offset is zero. Use function MODMAP to view the constellation.')
set_param([sys,'/',['Empf鋘ger/Signalraum-',13,'decodierung',13,'(Symbolentscheider)']],...
		'Mask Entries','[4]\/[sqrt(2)]\/[pi/4]\/1\/')


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

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

add_block('built-in/Scope',[sys,'/','Empf鋘ger/r(t)'])
set_param([sys,'/','Empf鋘ger/r(t)'],...
		'orientation',3,...
		'Vgain','1.500000',...
		'Hgain','25.000000',...
		'Vmax','3.000000',...
		'Hmax','50.000000',...
		'Window',[320,340,960,440],...
		'position',[60,70,90,100])

add_block('built-in/Outport',[sys,'/',['Empf鋘ger/empfangenes',13,'Symbol']])
set_param([sys,'/',['Empf鋘ger/empfangenes',13,'Symbol']],...
		'position',[950,140,970,160])


%     Subsystem  'Empf鋘ger/Doppelklick4'.

new_system([sys,'/','Empf鋘ger/Doppelklick4'])
set_param([sys,'/','Empf鋘ger/Doppelklick4'],'Location',[136,230,381,439])
set_param([sys,'/','Empf鋘ger/Doppelklick4'],...
		'Mask Display','Schlie遝 Empf鋘ger',...
		'Mask Type','schlie遝n',...
		'Mask Dialogue','eval(''closempf'')')


%     Finished composite block 'Empf鋘ger/Doppelklick4'.

set_param([sys,'/','Empf鋘ger/Doppelklick4'],...
		'BackGround',7,...
		'hide name',0,...
		'Font Angle','italic',...
		'position',[815,20,950,46])