yjsh.m

信号实验常用的simulink模型和mfile,可直接在matlan下运行。

		'Operator','XOR',...
		'position',[285,38,315,62])

add_block('built-in/Logical Operator',[sys,'/',['方波信号/Logical',13,'Operator1']])
set_param([sys,'/',['方波信号/Logical',13,'Operator1']],...
		'Operator','NOT',...
		'Number of Input Ports','1',...
		'position',[355,38,385,62])

add_block('built-in/Product',[sys,'/','方波信号/Product'])
set_param([sys,'/','方波信号/Product'],...
		'hide name',0,...
		'position',[455,105,480,125])

add_block('built-in/Gain',[sys,'/','方波信号/Gain'])
set_param([sys,'/','方波信号/Gain'],...
		'hide name',0,...
		'Gain','ht',...
		'position',[510,102,535,128])

add_block('built-in/Outport',[sys,'/','方波信号/out_1'])
set_param([sys,'/','方波信号/out_1'],...
		'hide name',0,...
		'position',[560,105,580,125])
add_line([sys,'/','方波信号'],[155,130;245,130;245,55;280,55])
add_line([sys,'/','方波信号'],[160,45;280,45])
add_line([sys,'/','方波信号'],[50,40;70,40;70,125;125,125])
add_line([sys,'/','方波信号'],[135,175;100,175;100,135;125,135])
add_line([sys,'/','方波信号'],[155,130;210,130;210,175;195,175])
add_line([sys,'/','方波信号'],[50,40;130,40])
add_line([sys,'/','方波信号'],[160,45;230,45;230,85;200,85])
add_line([sys,'/','方波信号'],[140,85;105,85;105,50;130,50])
add_line([sys,'/','方波信号'],[320,110;365,110])
add_line([sys,'/','方波信号'],[405,120;450,120])
add_line([sys,'/','方波信号'],[485,115;505,115])
add_line([sys,'/','方波信号'],[540,115;555,115])
add_line([sys,'/','方波信号'],[325,160;345,160;345,125;365,125])
add_line([sys,'/','方波信号'],[320,50;350,50])
add_line([sys,'/','方波信号'],[390,50;430,50;430,110;450,110])
set_param([sys,'/','方波信号'],...
		'Mask Display','plot(0,0,100,100,[90,75,75,60,60,35,35,20,20,10],[20,20,80,80,20,20,80,80,20,20])',...
		'Mask Type','Pulse Generator')
set_param([sys,'/','方波信号'],...
		'Mask Dialogue','Pulse Generator.|Pulse period (secs):|Pulse width:|Pulse height:|Pulse start time:')
set_param([sys,'/','方波信号'],...
		'Mask Translate','Ts=@1; du=@2; ht=@3; stt=@4; ini=ones(length(ht),1); st1=rem(stt,Ts); st2=rem(stt+du,Ts);if(Ts<=1.2*du),ini=zeros(length(ht),1);end;')
set_param([sys,'/','方波信号'],...
		'Mask Help','Pulse generator which ensures pulse\ntransitions are hit. Provides a vector of pulses when the height is entered as a vector.\nUnmask to see how it works.',...
		'Mask Entries','20\/20\/1\/1\/')


%     Finished composite block '方波信号'.

set_param([sys,'/','方波信号'],...
		'Font Name','宋体',...
		'position',[20,149,50,181])


%     Subsystem  ['频谱分析仪2',13,'（系统2的频谱）'].

new_system([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']])
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],'Location',[0,0,371,185])

add_block('built-in/Mux',[sys,'/',['频谱分析仪2',13,'（系统2的频谱）/Mux']])
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）/Mux']],...
		'inputs','2',...
		'position',[145,71,175,104])

add_block('built-in/Inport',[sys,'/',['频谱分析仪2',13,'（系统2的频谱）/system output']])
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）/system output']],...
		'Port','2',...
		'position',[55,110,75,130])

add_block('built-in/S-Function',[sys,'/',['频谱分析仪2',13,'（系统2的频谱）/S-function block',13,'which calls M-file']])
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）/S-function block',13,'which calls M-file']],...
		'function name','sfuntf',...
		'parameters','fftpts,npts,HowOften,offset,ts,0',...
		'position',[250,72,295,108])

add_block('built-in/Inport',[sys,'/',['频谱分析仪2',13,'（系统2的频谱）/system input']])
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）/system input']],...
		'position',[55,30,75,50])
add_line([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],[80,120;110,120;110,95;140,95])
add_line([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],[80,40;110,40;110,80;140,80])
add_line([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],[180,90;245,90])
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],...
		'Mask Display','plot(0,0,100,100,[11,93,93,11,11],[90,90,40,40,90],[90,80,72,64,55,45,41,36,20],[50,50,52,59,67,75,78,80,80])',...
		'Mask Type','Spectrum analyzer.')
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],...
		'Mask Dialogue','Spectrum analyser using graph window.\nHook input 1 to system input.\nHook input 2 to system output.|Length of buffer:|Number of points for fft:|Plot after how many points:|Sample time:')
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],...
		'Mask Translate','npts=@1; fftpts=@2; HowOften=@3; ts=@4(1); if length(@4) > 1, offset = @4(2), else, offset = 0; end')
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],...
		'Mask Help','Hook the system''s input to the first port of this block and the system''s output to second port. Results are displayed as the frequency response of this system. Use signals with high harmonic content for best results. ')
set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],...
		'Mask Entries','512\/1024\/100\/0.05\/')


%     Finished composite block ['频谱分析仪2',13,'（系统2的频谱）'].

set_param([sys,'/',['频谱分析仪2',13,'（系统2的频谱）']],...
		'Font Name','宋体',...
		'Drop Shadow',4,...
		'position',[215,196,245,234])

add_block('built-in/Scope',[sys,'/',['示波器',13,'（系统2的响应）']])
set_param([sys,'/',['示波器',13,'（系统2的响应）']],...
		'Font Name','宋体',...
		'Vgain','1.500000',...
		'Hgain','30.000000',...
		'Vmax','3.000000',...
		'Hmax','60.000000',...
		'Window',[306,303,640,469])
open_system([sys,'/',['示波器',13,'（系统2的响应）']])
set_param([sys,'/',['示波器',13,'（系统2的响应）']],...
		'position',[280,247,310,283])

add_block('built-in/Scope',[sys,'/',['示波器',13,'（系统1的响应）']])
set_param([sys,'/',['示波器',13,'（系统1的响应）']],...
		'Font Name','宋体',...
		'Vgain','1.500000',...
		'Hgain','30.000000',...
		'Vmax','3.000000',...
		'Hmax','60.000000',...
		'Window',[306,153,639,309])
open_system([sys,'/',['示波器',13,'（系统1的响应）']])
set_param([sys,'/',['示波器',13,'（系统1的响应）']],...
		'position',[280,148,310,182])

add_block('built-in/Scope',[sys,'/',['示波器',13,'（输入信号）']])
set_param([sys,'/',['示波器',13,'（输入信号）']],...
		'Font Name','宋体',...
		'Vgain','1.500000',...
		'Hgain','30.000000',...
		'Vmax','3.000000',...
		'Hmax','60.000000',...
		'Window',[307,9,639,161])
open_system([sys,'/',['示波器',13,'（输入信号）']])
set_param([sys,'/',['示波器',13,'（输入信号）']],...
		'position',[280,57,310,93])

add_block('built-in/Note',[sys,'/','一阶系统的时域特性：'])
set_param([sys,'/','一阶系统的时域特性：'],...
		'Font Name','楷体_GB2312',...
		'Font Size',14,...
		'position',[95,20,100,25])
add_line(sys,[55,165;90,165])
add_line(sys,[70,165;70,265;95,265])
add_line(sys,[70,169;70,75;275,75])
add_line(sys,[170,165;275,165])
add_line(sys,[175,265;275,265])
add_line(sys,[70,205;210,205])
add_line(sys,[185,265;185,225;210,225])
add_line(sys,[70,105;210,105])
add_line(sys,[180,165;180,125;210,125])

drawnow

% Return any arguments.
if (nargin | nargout)
	% Must use feval here to access system in memory
	if (nargin > 3)
		if (flag == 0)
			eval(['[ret,x0,str,ts,xts]=',sys,'(t,x,u,flag);'])
		else
			eval(['ret =', sys,'(t,x,u,flag);'])
		end
	else
		[ret,x0,str,ts,xts] = feval(sys);
	end
else
	drawnow % Flash up the model and execute load callback
end