clc;
clear;
close all;
% Nombre
nombre = 'Jaider';
% Conversión a ASCII de 7 bits
bits = [];
for k = 1:length(nombre)
    bits = [bits dec2bin(double(nombre(k)),7)-'0'];
end
% Codificación AMI
ami = zeros(1,length(bits));
polaridad = 1;
for i = 1:length(bits)
    if bits(i) == 1
        ami(i) = polaridad;
        polaridad = -polaridad;
    else
        ami(i) = 0;
    end
end
% Tiempo
t = 0:length(bits);
% Gráfica
figure;
stairs(t,[ami ami(end)],'LineWidth',2);
grid on;
title('Codificación AMI del nombre "Jaider"');
xlabel('Bits');
ylabel('Voltaje');
axis([0 length(bits) -1.5 1.5]);
% Mostrar ASCII
disp('ASCII de 7 bits:');
for k = 1:length(nombre)
    fprintf('%c --> %s\n', nombre(k), dec2bin(double(nombre(k)),7));
end