nrz.m
上传用户:loeagle
上传日期:2013-03-02
资源大小:1236k
文件大小:1k
源码类别:

通讯编程文档

开发平台:

Matlab

  1. % plot impulse response of nrz rectangular pulse
  2. warning off;
  3. set(0,'Units','pixels');
  4. scnsize = get(0,'ScreenSize');
  5. %figure ('Position', [350   375   900   573], ...
  6. figure ('Position', [0.25*scnsize(3)   0.15*scnsize(4)   0.7*scnsize(3)   0.7*scnsize(4)], ...
  7. 'Name', 'Impulse Response and Fourier Transform of NRZ Rectangular Pulse', ...
  8. 'Tag', 'NRZ Rectangular', ...
  9. 'NumberTitle', 'off' ...
  10. );
  11. set(gcf,'DefaultTextColor','m')
  12. % -----------------------------
  13. % Plot Nr 1: NRZ rectangular pulse
  14. % ------------------------------
  15. x = -2 : 0.005 : 2;
  16. y = 0.5*(sign(x+0.5)-sign(x-0.5));
  17. subplot(2,1,1), plot(x,y, 'linewidth', 2)
  18. axis([-2 2 -0.2 1.2]);
  19. title('Impulse Response') 
  20. xlabel('t/T')
  21. ylabel('g_T(t/T)')
  22. set(gca,'YTick', 0: 0.5 : 1);
  23. grid
  24. % ----------------------------------------------
  25. % Plot Nr 2: Fourier Transform 
  26. % ----------------------------------------------
  27. a = -10 : 0.005 : 10;
  28. b = pi .* a;
  29. c = sin(b)./b;
  30. subplot(2,1,2), plot(a,c, 'linewidth', 2)
  31. title('Fourier Transform')
  32. xlabel('f T')
  33. ylabel('G_T(f/T)/T')
  34. set(gca,'XTick', -10: 1 : 10);
  35. grid
  36. warning on;