%Createdby:MingminSchu%Time:2013/3/7%Function:SimulationofUPWholdonpause(3)holdoffk=2*pi*1e-2;w=6*pi*1e6;n=120*pi;ae=5e-3;ah=ae/n;t=0:0.01e-6/3:60e-6;z=0:1:1200;Nt=length(t);fori=1:Nttn=t(i);E=ae.*sin(w.*tn-k.*z);H=ah.*sin(w.*tn-k.*z);S=E.*H;subplot(3,1,1)plot(z,E)subplot(3,1,2)plot(z,H)subplot(3,1,3)plot(z,S)pause(0.005e-6/3)end