% ma Hoa NRZ don cuc
clear
clc
k=1
while (k==1)        %kiem tra chuoi nhAap vao
  a=input(' nhap ma can ma hoa vao')
  x= num2str(a);
  for i=1:length(x)
    % a=str2num(x(i));
      if ((x(i)~='0')&(x(i)~='1'))
          k=1;
          disp (' chuoi khong hop le');
          break;
      else
          k=0;
      end
     
  end
end
%tao ma tran cac diem ve
j=1;
k=1;

for i=1:length(x)
 
    if x(i)=='0'
      u(j)=0;
      v(j)=k;
      j=j+1;
      k=k+1;
      u(j)=0;
      v(j)=k;
      j=j+1;
  end
  if (x(i)=='1')
     
      u(j)=1;
      v(j)=k;
      j=j+1;
      k=k+1;
      u(j)=1;
      v(j)=k;
      j=j+1;
   
  end
  end
plot(v,u,'LineWidth',2)
grid on