Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Pablo
PRAWIE elektronik - prawie robi...
Dołączył: 11 Paź 2006
Posty: 228
Przeczytał: 0 tematów
Skąd: Czerwionka-Leszczyny
|
Wysłany: Śro 20:52, 12 Lis 2008 Temat postu: Modulacja |
|
|
Poniżej wrzucam mój program odnośnie modulacji Sa(x)^2:
Kod: | clear;
f1=1000;
fs=200000;
fc=20000;
n=1:1000;
nl=-fliplr(n);
xp=(sin(2*pi*f1/fs*n)./(2*pi*f1/fs*n)).^2;
xl=fliplr(xp);
x=[xl 1 xp];
nw=[nl 0 n];
c=cos(2*pi*fc/fs*nw);
y=x.*c;
subplot(311);plot(nw,x);
subplot(312);plot(nw,y);
subplot(313);stem(abs(fft(y)));axis([150 250 0 60]); |
|
|
Powrót do góry |
|
|
|
|
leon
Sado-Elektro - wiecie gdzie ma lutownice
Dołączył: 09 Paź 2006
Posty: 679
Przeczytał: 0 tematów
Skąd: Tarnowskie Góry
|
Wysłany: Śro 23:42, 12 Lis 2008 Temat postu: |
|
|
danke Pablo przyda sie bankowo
|
|
Powrót do góry |
|
|
krzysiek414
Tłuste zero
Dołączył: 24 Paź 2006
Posty: 52
Przeczytał: 0 tematów
|
Wysłany: Nie 16:22, 16 Lis 2008 Temat postu: |
|
|
Nie jestem pewien czy dobrze (program na kartkówkę u sułka modulacja i demodulacja AM-DSB-WC jedna z kartkówek na gmailu ):
fc=500;
f1=25;
f2=50;
a1=1;
ac=1;
a2=2;
fm=25;
k=0.75;
fp=250000;
Tp=1/fp;
N=30000;
n=0:N-1;
t=Tp*n;
s=a1*sin(2*pi*f1*t)+a2*cos(2*pi*f2*t);
si=s/max(abs(max(s)),abs(min(s)));
c=ac*cos(2*pi*fc*t);
m=c.*(1+k.*si);
znak=(sign(m)+1)/2;
o=znak.*m;
Wn=2*(fm/fp);
[B,A]=CHEBY1(3,0.000001,Wn);
y=filter(B,A,o);
subplot(2,1,1);
plot(t,s);
title('sygnal modulujacy');
xlabel('s');
subplot(2,1,2);
plot(t,si);
title('sygnal modulujacy znormalizowany');
xlabel('s');
figure;
plot(t,c);
title('sygnal nosny');
xlabel('s');
pause;
clg;
plot(t,m);
title('sygnal zmodlowany');
xlabel('s');
pause;
clg;
plot(t,y);
title('sygnal po demodulacji');
xlabel('s');[/color]
|
|
Powrót do góry |
|
|
Pablo
PRAWIE elektronik - prawie robi...
Dołączył: 11 Paź 2006
Posty: 228
Przeczytał: 0 tematów
Skąd: Czerwionka-Leszczyny
|
Wysłany: Śro 11:55, 19 Lis 2008 Temat postu: |
|
|
Modulacja Sa^2 jednowstęgowa
Kod: | clear;
f1=1000;
fs=200000;
fc=20000;
N=2*fs/f1;
n=0:N-1;
n=1:1000;
nl=-fliplr(n);
xp=(sin(2*pi*f1/fs*n)./(2*pi*f1/fs*n)).^2;
xl=fliplr(xp);
x=[xl 1 xp];
nw=[nl 0 n];
f=0:2000;
f1=f/2001*fs;
c=cos(2*pi*fc/fs*nw);
x1=imag(hilbert(x));
c1=sin(2*pi*fc/fs*nw);
w1=x1.*c1;
w=x.*c;
y=w+w1;
X=abs(fft(x));
subplot(411);plot(nw,x);
subplot(412);stem(f1,X);
subplot(413);plot(f1,y);
subplot(414);stem(f1,abs(fft(y))); |
|
|
Powrót do góry |
|
|
leon
Sado-Elektro - wiecie gdzie ma lutownice
Dołączył: 09 Paź 2006
Posty: 679
Przeczytał: 0 tematów
Skąd: Tarnowskie Góry
|
Wysłany: Śro 23:19, 19 Lis 2008 Temat postu: |
|
|
dzieki Pablo !
|
|
Powrót do góry |
|
|
|