function ast2
clear all;
close all;
u0 = 3;
u1 = 5;
u2 = 2;
w1 = 2 * pi * 10000;
w2 = 2 * pi * 1000;
t = linspace(0,50/w2,1000000);
t1 = linspace(0,10/w2,1000000);
ua1 = u1 * sin(w1*t);
ua3 = u1 * sin(w1*t1);
ua2 = u0 + u2 * sin(w2*t);
ua4 = (u0 + u2 * sin(w2*t))*(-(u1*u2)/2);
ua5 = (u0 + u2 * sin(w2*t))*((u1*u2)/2);
ua6 = u0 + u2 * sin(w2*t1);
ua = ua1 .* ua2;
subplot(3,1,1); plot(t,ua,'b'); hold; plot(t,ua4,'r'); plot(t,ua5,'r'); grid on; legend('Träger','Signal'); 
subplot(3,1,2); plot(t1,ua3,'b'); grid on;legend('Träger');
subplot(3,1,3); plot(t1,ua6,'b'); grid on; legend('Signal');
end