% FILE  hlp043.m  begins.
fprintf('ASCII codes of some symbols: \n')
fprintf(' Code   Symbol  Shifted \n');
alfab=[];
for j=65:90
  alfab=[alfab char(j)];
end;
s=alfab;
p=length(s); % m tells the shift length
m=1;
for j=1:p 
  tmp=65+mod(double(s(j)+m)-65,26);  % 26=90-64
  fprintf('%3d   %3s %10s \n',...
    double(s(j)),s(j),char(tmp));
end;
fprintf('\n');
% $$$ s='VEWMPEKSIWGLMRE';
% $$$ p=length(s);
% $$$ for shift=1:26
% $$$   for j=1:p 
% $$$     tmp=65+mod(double(s(j)+shift)-65,26); % 26=90-64
% $$$     fprintf('% 3s',char(tmp))
% $$$   end;
% $$$   fprintf('\n');
% $$$ end;
% FILE  hlp043.m  ends.

