开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 文章/文档 > 通讯编程文档 > 查看源码
showmskr.m
资源名称：现代通信系统matlab版源代码.zip　[点击查看]
上传用户：loeagle
上传日期：2013-03-02
资源大小：1236k
文件大小：1k
源码类别：

通讯编程文档

开发平台：

Matlab

showmskr.m：源码内容
  1. %Shows receiver 
  3. function showmskr(system)
  5. ss = get(0, 'ScreenSize');
  6. sw = ss(3);
  8. if (nargin == 0)
  9.   % find current system
  10.   system = get_param(0,'CurrentSystem');
  11.   % find Root System
  12.   while (~isempty(get_param(system, 'parent')))
  13.     system = get_param(system, 'parent');
  14.   end;
  15.   % check if  System loaded
  16.   if (exist(system) ~= 4)
  17.     clear system; 
  18.   end;
  19. end;
  21. if (exist('system') == 0)
  22.   disp('No Simulink model found!');
  23. else
  25.   if (exist(system) ~= 4)
  26.     disp(['System ',system,' not found.'])
  27.   else;
  30.     close_system([system, '/u(t)']);
  31.     close_system([system, '/v(t)']);
  32.     close_system([system, '/a(t)']);
  33.     close_system([system, '/r(t)']);
  34.     close_system([system, '/phi(t)']);
  36.     open_system([system, '/Receiver']);
  37. %    open_system([system, '/Empf鋘ger/r(t)']);
  38. %    open_system([system, '/Empf鋘ger/x_eI(t)']);
  39. %    open_system([system, '/Empf鋘ger/d_eI(t)']);
  40. %    open_system([system, '/Empf鋘ger/v_eI(t)']);
  41. %    open_system([system, '/Empf鋘ger/x_eQ(t)']);
  42. %    open_system([system, '/Empf鋘ger/d_eQ(t)']);
  43. %    open_system([system, '/Empf鋘ger/v_eQ(t)']);
  44. %    open_system([system, '/Empf鋘ger/v(t)']);
  46.   end;
  48. end;