showtra.m
上传用户:loeagle
上传日期:2013-03-02
资源大小:1236k
文件大小:1k
- %Shows transmitter e.g. QPSK
- function showtra(system)
- ss = get(0, 'ScreenSize');
- sw = ss(3);
- if (nargin == 0)
- % find current system
- system = get_param(0,'CurrentSystem');
- % find Root System
- while (~isempty(get_param(system, 'parent')))
- system = get_param(system, 'parent');
- end;
- % check if System loaded
- if (exist(system) ~= 4)
- clear system;
- end;
- end;
- if (exist('system') == 0)
- disp('No Simulink model found!');
- else
- if (exist(system) ~= 4)
- disp(['System ',system,' not found.'])
- else;
- close_system([system, '/binary data']);
- close_system([system, '/transmitted symbols']);
- close_system([system, '/u(t)']);
- close_system([system, '/r(t)']);
- close_system([system, '/detected symbols']);
- open_system([system, '/Transmitter']);
-
- end;
- end;