📄 am_sys.m

📁 信号实验常用的simulink模型和mfile,可直接在matlan下运行。
💻 M
📖 第 1 页 / 共 4 页
字号:
12 3 4 下一页
function [ret,x0,str,ts,xts]=am_sys(t,x,u,flag);
%AM_SYS	is the M-file description of the SIMULINK system named AM_SYS.
%	The block-diagram can be displayed by typing: AM_SYS.
%
%	SYS=AM_SYS(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 AM_SYS 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 AM_SYS with a FLAG of zero:
%	[SIZES]=AM_SYS([],[],[],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',[37,72,540,392])
     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.00001')
set_param(sys,'Max step size', '0.001')
set_param(sys,'Relative error','1e-3')
set_param(sys,'Return vars',   '')


%     Subsystem  ['非同步调制//解调系统',13,'（包络解调）1'].

new_system([sys,'/',['非同步调制//解调系统',13,'（包络解调）1']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1']],'Location',[17,44,529,411])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/非同步调制//解调系统中的调制器——幅度调制']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/非同步调制//解调系统中的调制器——幅度调制']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[225,10,230,15])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号接收']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号接收']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[65,285,70,290])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号传输']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号传输']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[140,235,145,240])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/通信信道']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/通信信道']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[205,210,210,215])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号发送']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号发送']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[265,135,270,140])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/已调信号']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/已调信号']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[265,110,270,115])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Y(t) = (A+X(t))*cos(Wc*t)']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Y(t) = (A+X(t))*cos(Wc*t)']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[310,80,315,85])


%     Subsystem  ['非同步调制//解调系统',13,'（包络解调）1/Diode'].

new_system([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],'Location',[4,207,504,457])

add_block('built-in/Inport',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/in_1']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/in_1']],...
		'position',[70,120,90,140])

add_block('built-in/Outport',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/out_1']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/out_1']],...
		'position',[395,120,415,140])


%     Subsystem  ['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign'].

new_system([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],'Location',[159,289,467,458])

add_block('built-in/Constant',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Constant']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Constant']],...
		'Value','0',...
		'position',[65,105,85,125])

add_block('built-in/Relational Operator',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Relational',13,'Operator1']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Relational',13,'Operator1']],...
		'Operator','<',...
		'position',[140,92,170,123])

add_block('built-in/Sum',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Sum']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Sum']],...
		'inputs','+-',...
		'position',[215,64,235,91])

add_block('built-in/Relational Operator',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Relational',13,'Operator']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/Relational',13,'Operator']],...
		'Operator','>',...
		'position',[140,32,170,63])

add_block('built-in/Inport',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/in_1']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/in_1']],...
		'position',[35,30,55,50])

add_block('built-in/Outport',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/out_1']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign/out_1']],...
		'position',[265,70,285,90])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],[240,80;260,80])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],[175,50;185,50;185,70;210,70])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],[175,110;185,110;185,85;210,85])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],[90,115;135,115])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],[110,115;110,55;135,55])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],[60,40;135,40])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],[95,40;95,100;135,100])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],...
		'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,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],...
		'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 ['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign'].

set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sign']],...
		'position',[120,117,150,143])

add_block('built-in/Product',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Product']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Product']],...
		'position',[195,123,225,147])

add_block('built-in/Sum',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sum']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Sum']],...
		'position',[270,120,290,140])

add_block('built-in/Gain',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Gain']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode/Gain']],...
		'Gain','1/2',...
		'position',[340,117,365,143])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],[95,130;115,130])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],[370,130;390,130])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],[155,130;190,130])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],[95,130;100,180;170,180;170,140;190,140])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],[230,135;265,135])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],[95,130;100,90;245,90;245,125;265,125])
add_line([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],[295,130;335,130])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],...
		'Mask Display','plot([0 2 2 2],[0 0 2 -2],[2 4],[2 0],[2 4],[-2 0],[4 4 4 6],[-2 2 0 0]);',...
		'Mask Type','二极管',...
		'Mask Dialogue','二极管')


%     Finished composite block ['非同步调制//解调系统',13,'（包络解调）1/Diode'].

set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Diode']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'Drop Shadow',4,...
		'position',[120,273,155,297])

add_block('built-in/Transfer Fcn',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/包络解调']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/包络解调']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'Drop Shadow',4,...
		'Numerator','[R]',...
		'Denominator','[R*C R+1]')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/包络解调']],...
		'Mask Display','plot([0 15],[2 2],[8 8 6 10],[2 0 0 0],[6 10],[-1 -1],[8 8 7 9],[-1 -4 -4 -4],[12.5 12.5 12 13],[2 1 1 1],[12 12],[1 -3],[13 13],[1 -3],[12 13 12.5 12.5],[-3 -3 -3 -4],[12 13],[-4 -4]);')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/包络解调']],...
		'Mask Type','单元6',...
		'Mask Dialogue','单元6|电阻值（欧）：|电容值（法）：',...
		'Mask Translate','R=@1;C=@2;',...
		'Mask Entries','1\/0.1\/')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/包络解调']],...
		'position',[190,263,295,307])

add_block('built-in/Sine Wave',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/载波',13,'cos(Wc*t)']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/载波',13,'cos(Wc*t)']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'frequency','F*2*pi',...
		'Mask Display','',...
		'Mask Type','载波')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/载波',13,'cos(Wc*t)']],...
		'Mask Dialogue','载波|载波频率（Hz）：',...
		'Mask Translate','F=@1;',...
		'Mask Entries','50\/',...
		'position',[55,145,75,165])

add_block('built-in/Gain',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/直流偏置',13,'A']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/直流偏置',13,'A']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'Gain','2',...
		'position',[135,145,155,165])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/X(t)']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/X(t)']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[85,70,90,75])

add_block('built-in/Note',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/调制信号']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/调制信号']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'position',[45,50,50,55])

add_block('built-in/Zero-Pole',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Butterworth',13,'低通滤波器']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Butterworth',13,'低通滤波器']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'Zeros','z',...
		'Poles','p',...
		'Gain','k')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Butterworth',13,'低通滤波器']],...
		'Mask Display','plot(20*log10(w),20*log10(abs(h)))',...
		'Mask Type','buttap')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Butterworth',13,'低通滤波器']],...
		'Mask Dialogue','Analog Butterworth low pass filter.\n\n(Requires Signal Processing Toolbox)|Cutoff frequency (rad/sec)|Order')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Butterworth',13,'低通滤波器']],...
		'Mask Translate','[z,p,k]=buttap(@2); z=@1*z; p=@1*p; k=real(prod(-p)); [num,den]=zp2tf(z,p,k); w=logspace(log10(@1/10),log10(10*@1),20); h=freqs(num,den,w); ')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/Butterworth',13,'低通滤波器']],...
		'Mask Help','Butterworth low pass filter using MATLAB''s butter command.',...
		'Mask Entries','5*2*pi\/4\/',...
		'position',[350,263,410,307])

add_block('built-in/Scope',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号波形']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号波形']],...
		'Font Name','宋体',...
		'Font Size',12,...
		'Vgain','3.000000',...
		'Hgain','1.000000',...
		'Vmax','6.000000',...
		'Hmax','2.000000')
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/信号波形']],...
		'Window',[0,139,331,300],...
		'position',[450,30,480,60])

add_block('built-in/Scope',[sys,'/',['非同步调制//解调系统',13,'（包络解调）1/已调幅信号波形']])
set_param([sys,'/',['非同步调制//解调系统',13,'（包络解调）1/已调幅信号波形']],...
		'Font Name','宋体',...
		'Font Size',12,...
12 3 4 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -