Tải bản đầy đủ (.pdf) (27 trang)

Tài liệu Bài tập môn học kỹ thuật truyền dẫn pdf

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (237.25 KB, 27 trang )

Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
1
I. MÃ ĐƯỜNG DÂY
Các hàm được viết và lưu trong các m-file riêng với tên trùng
tên hàm. x là tọa độ mà các đoạn thẳng được vẽ tại vị trí đó

1.Các hàm bổ trợ
Các hàm vẽ các đoạn nằm dọc

function doc1(x)%ve mot doan nam doc dai 1 don vi

u=linspace(0,1,1000);

plot(x,u,'r','LineWidth',5)

hold on;

grid on;

--------------------------
function doc_1(x))%ve mot doan nam doc dai -1 don vi

u=linspace(-1,0,1000);

plot(x,u,'r','LineWidth',5)

hold on;

grid on;
--------------------------


function doc2(x)%ve mot doan nam doc dai 2 don vi

u=linspace(-1,1,1000);

plot(x,u,'r','LineWidth',5)

hold on;

grid on;
--------------------------

Các hàm vẽ các đoạn nằm ngang
function ngang0_1(x)%ve mot doan nam ngang dai 1 don vi
% nam tren truc hoanh
t=linspace(x,x+1,100);

for a=1:100

N(a)=0;

end

plot(t,N,'r','LineWidth',5)

hold on;grid on;

--------------------------
function ngang0_5(x)%ve mot doan nam ngang dai 1/2 don vi

t=linspace(x,(2*x+1)/2,100);


for a=1:100

N(a)=0;

end

plot(t,N,'r','LineWidth',5)

hold on;grid on;
--------------------------

%ve mot doan nam phia duoi truc hoanh ngang dai 1/2 don vi

function ngang_0_5(x)

t=linspace(x,(2*x+1)/2,100);

for a=1:100

N(a)=-1;

end

plot(t,N,'r','LineWidth',5)

hold on;grid on;

Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46

2
--------------------------
function ngang1_5(x)%ve mot doan nam ngang
%cao tren truc hoanh dai 1/2 don vi

t=linspace(x,(2*x+1)/2,100);

for a=1:100

N(a)=1;

end

plot(t,N,'r','LineWidth',5)

hold on;grid on;


%ve mot doan nam phia duoi truc hoanh ngang dai 1 don vi

function ngang_0_1(x)

t=linspace(x,x+1,100);

for a=1:100

N(a)=-1;

end


plot(t,N,'r','LineWidth',5)

hold on;grid on;
--------------------------
function ngang1_1(x)%ve mot doan nam ngang dai 1 don vi

t=linspace(x,x+1,100);

for a=1:100

N(a)=1;

end

plot(t,N,'r','LineWidth',5)

hold on;
--------------------------


Các hàm vẽ nửa xung dương và xung âm
function duong(x)

doc1(x)

ngang1_5(x)

doc1(x+1/2)

ngang0_5(x+1/2)

--------------------------

function am(x)

doc_1(x)

ngang_0_5(x)

doc_1((2*x+1)/2)

ngang0_5((2*x+1)/2)
--------------------------


Các hàm vẽ mã HDB3 thuận và ngược
%ve ma thuan 0000->000V

function t=HDB3_thuan(x,t)%t la bien kiem tra

for a=x:x+2

ngang0_1(a-1)

end

%V la bit pha luat

if t==0%neu truoc do la mot xung am

am(x+2)%ve mot xung am


t=0;

else

duong(x+2)%ve mot xung duong

Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
3
t=1;

end
---------------------------
%ve ma nguoc 0000->B00V

function t=HDB3_nguoc(x,t)

if t==1%neu truoc do la mot xung duong

am(x-1)%ve mot xung am

t=0;

else

duong(x-1)%ve mot xung duong

t=1;


end

ngang0_1(x)%00

ngang0_1(x+1)%00

%V la bit pha' luat

if t==1%neu truoc do la mot xung duong

duong(x+2)

t=1;

else

am(x+2)

t=0;

end


1. Đoạn mã vẽ các mã đường truyền

%ma AMI

function AMI(x)

n=length(x);


truth=0;

for i=1:n

if x(i)==1

if truth==0

duong(i-1)

truth=1;

else

am(i-1)

truth=0;

end

else

ngang0_1(i-1)

end

end

xlabel('AMI')


-------------------------
% ma RZ don cuc
function RZ(x)
n=length(x);
for i=1:n
if i==n
x(i+1)=x(i);
end
if x(i)==1
duong(i-1)
else
ngang0_1(i-1)
Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
4
end
if (x(i)==1)&(x(i+1)==0)
doc1((2*(i-1)+1)/2)
end
if (x(i)==0)&(x(i+1)==1)
doc1(i)
end
end
%suon cuoi cung
xlabel('RZ don cuc')
-------------------------------------
% ma RZ luong cuc

function POLAR_RZ(x)

n=length(x);
for i=1:n
if x(i)==1
duong(i-1)
else
am(i-1)
end
end
xlabel('RZ luong cuc')
-------------------------------------
%ve ma NRZ don cuc
function NRZ(x)
n=length(x);
for i=1:n
if i==n
x(i+1)=x(i);
end
if x(i)==1
ngang1_1(i-1)
else
ngang0_1(i-1)
end
if ((x(i)==1)&(x(i+1)==0))|((x(i)==0)&(x(i+1)==1))
doc1(i)
end
end
%suon dau tien
if x(1)==1
doc1(0)
end

%suon cuoi cung
if x(n)==1
doc1(n)
end
xlabel('NRZ')
---------------------------------------
%ve ma NRZ bipolar
function NRZ_L(x)
n=length(x);
for i=1:n
if i==n
Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
5
x(i+1)=x(i);
end
if x(i)==1
ngang1_1(i-1)
else
ngang_0_1(i-1)
end
if ((x(i)==1)&(x(i+1)==0))|((x(i)==0)&(x(i+1)==1))
doc2(i)
end
end
%suon dau tien
if x(1)==1
doc1(0)
else
doc_1(0)

end
%suon cuoi cung
if x(n)==1
doc1(n)
else
doc_1(n)
end
xlabel('NRZ_L')

%ma HDB3
function HDB3(x)
n=length(x);
truth=0;%bien kiem tra xung duong=0 hay am=1
tn=0;%bien kiem tra=0 HDB3_thuan hoac=1 HBD3_nguoc
i=1;
while i<=n
dem=1;
if x(i)==1
if truth==0
duong(i-1)
truth=1;
else
am(i-1)
truth=0;
end
else
if i==n
x(i+1)=1;
x(i+2)=1;
x(i+3)=1;

end
if (x(i)==0)&(x(i+1)==0)&(x(i+2)==0)&(x(i+3)==0)
if tn==0
truth=HDB3_thuan(i,truth);
tn=1;
else
truth=HDB3_nguoc(i,truth);
tn=0;
end
dem=4 ;
Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
6
else
ngang0_1(i-1)
end
end
i=i+dem;
end
xlabel('HBD3')
-------------------------------------------
% Manchester
function Manchester(x)
n=length(x);
for i=1:n
if i==n
x(i+1)=x(i);
end
if x(i)==1
ngang1_5(i-1)

doc2(i-1/2)
ngang_0_5(i-1/2)
else
ngang_0_5(i-1)
doc2(i-1/2)
ngang1_5(i-1/2)
end
end
%ve cac suon xung
for i=1:n-1
if x(i)==x(i+1)
doc2(i)
end
end
%suon xung cuoi cung
if x(n)==1
doc_1(n)
else
doc1(n)
end
xlabel('Manchester')
--------------------------------------------
%ma B2Zs

%00->BV

function B2ZS(x)

n=length(x);


t=0;%bien xac dinh xung duong hay am

i=1;

dem=0;

while i<=n

dem=1;

if i==n

x(i+1)=1;

end

if x(i)==1

if t==0

duong(i-1)

t=1;

else

Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
7
am(i-1)


t=0;

end

else

if x(i+1)==0

if t==1

am(i-1)

am(i)

t=0;%bit V trai luat

else

duong(i-1)

duong(i)

t=1;%bit V trai luat

end

dem=2;

else


ngang0_1(i-1)

end

end

i=i+dem;

end

xlabel('B2ZS')

----------------------------
% ma CMI

function CMI(x)

n=length(x);

truth=0;

for i=1:n

if i==n

x(i+1)=x(i);

end


if x(i)==1

if truth==0

ngang1_1(i-1)

truth=1;

else

ngang_0_1(i-1)

truth=0;

end

else

ngang_0_5(i-1)

doc2(i-1/2)

ngang1_5(i-1/2)

end

%ve cac suon xung

if (x(i)==1)&(x(i+1)==0)&(truth==1)


doc2(i)

end

if (x(i)==0)&(x(i+1)==1)&(truth==1)

doc2(i)

end

end

for i=1:n-1

if x(i)==x(i+1)

doc2(i)

end

Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
8
end

%ve suon xung cuoi cung

if (x(n)==1)&(truth==0)

doc_1(n)


end

if (x(n)==1)&(truth==1)

doc1(n)

end

if x(n)==0

doc1(n)

end

xlabel ('CMI')


Giả sử ta có tín hiệu đầu vào là
x= [1,1,1,0,0,0,0,0,1,0,1,1,0,1];
• Dạng tín hiệu đối với từng mã đường dây là

1 . Tín hiệu Unipolar NRZ








Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
9











2.Tín hiệu RZ


Bài tập môn học Kỹ thuật truyền dẫn
Sinh viên thực hiện Nguyễn éức Ninh Lớp ĐT7 - K46
10
3.Tín hiệu Polar NZ























×