rect1.m

来自「关于超宽带的一系列仿真包括高斯波形各阶导函数波形频谱以及采用高斯导函数的跳时超宽」· M 代码 · 共 28 行

%
%FUNCTION 1.1 :"cp0101_genrect"
%
%generates a unitary amplitude rectangular waveform
%that is modulated by a sinusoid at frequency 'f0'
%'signal' is the output waveform
%'dt' is the sampling period
% 
function [signal,dt]=cp0101_genrect
width=1e-1;
points=1000;
f0=1e3;
dt=width/points;
signal=zeros(1,5*points);
signal(2*points:3*points-1)=ones(1,points);
mod=cos(2.*pi.*f0.*linspace(1,5*width,5*points));
signal=signal.*mod;
figure(1)
time=linspace(-2*width,3*width,5*points);
p1=plot(time,signal);
set(p1,'linewidth',[2]);
axis([-2*width 3*width -1.2 1.2]);
ax=gca;
set(ax,'fontsize',12);
x=xlabel('time[s]');
set(x,'fontsize',14);
y=ylabel('amplitude[v]');
set(y,'fontsize',14);