Unipolar_RZ.m

clc;
clear all;
close all;
b = input('Enter bit message');
l=length(b);
b(l+1)=1;
n = 1;
while n<length(b)
    t=n-1:0.001:n;
    y = t<=(n-0.5)+(t==n);
    subplot(3,1,1);
    d=plot(t,y);grid on;
    title('CLOCK');
    set(d,'LineWidth',2.5);
    hold on;
    axis([0 length(b)-1 -1 1.5]);
    n=n+1;
end
n=1;
subplot(3,1,2);
while n<length(b)
    t=n-1:0.001:n;
if b(n) == 0
    if b(n+1)==0  
        y=(t>n);
    else
        y=(t==n);
    end
else
    if b(n+1)==0
        y=(t<n);
    else
        y=(t<=n);
    end 
end
    
    d=plot(t,y);grid on;
    title('BINARY DATA');
    set(d,'LineWidth',2.5);
    hold on;
    n=n+1; 
end
n=1;
subplot(3,1,3);
while n<length(b)
    t=n-1:0.001:n;
if b(n) == 0
    if b(n+1)==0
        y = t>n;
    else
        y = (t==n);
    end
else
    if b(n+1)==1
        y = t<=(n-0.5)+(t==n);
    else
        y = t<=(n-0.5);
    end
end
d=plot(t,y);grid on;
title('Line code UNIPOLAR RZ reg no:68');
set(d,'LineWidth',2.5);
hold on;
axis([0 length(b)-1 -1 1.5]);
xlabel('n');
ylabel('x[n]')
n=n+1; 
end