MATLAB: Converting Words to code

morse code

I wrote a program that converts letters into morse code. How do I change it so that it can change whole words into lines of morse code?
character=input('input character', 's');
switch character
case '1'
      disp('.----');
  case '2'
      disp('..---'); 
  case '3'
      disp('...--');
  case '4'
      disp('....-'); 
  case '5'
      disp('.....'); 
  case '6'
      disp('-....');
  case '7'
      disp('--...');
  case '8'
      disp('---..'); 
  case '9'
      disp('----.');
  case '0'
      disp('-----'); 
  case 'A'
      disp('.-'); 
  case 'B'
      disp('-...');
  case 'C'
      disp('-.-.'); 
  case 'D'
      disp('-..'); 
  case 'E'
      disp('.');
  case 'F'
      disp('..-.'); 
  case 'G'
      disp('--.'); 
  case 'H'
      disp('....');
  case 'I'
      disp('..'); 
  case 'J'
      disp('.---'); 
  case 'K'
      disp('-.-');
  case 'L'
      disp('.-..'); 
  case 'M'
      disp('--'); 
  case 'N'
      disp('-.');
  case 'O'
      disp('---'); 
  case 'P'
      disp('.--.'); 
  case 'Q'
      disp('--.-');
  case 'R'
      disp('.-.');
  case 'S'
      disp('...'); 
  case 'T'
      disp('-');
  case 'U'
      disp('..-'); 
  case 'V'
      disp('...-'); 
  case 'W'
      disp('.--');
  case 'X'
      disp('-..-'); 
  case 'Y'
      disp('-.--'); 
  case 'Z'
      disp('--..');
  case 'a'
      disp('.-'); 
  case 'b'
      disp('-...');
  case 'c'
      disp('-.-.'); 
  case 'd'
      disp('-..'); 
  case 'e'
      disp('.');
  case 'f'
      disp('..-.'); 
  case 'g'
      disp('--.'); 
  case 'h'
      disp('....');
  case 'i'
      disp('..'); 
  case 'j'
      disp('.---'); 
  case 'k'
      disp('-.-');
  case 'l'
      disp('.-..'); 
  case 'm'
      disp('--'); 
  case 'n'
      disp('-.');
  case 'o'
      disp('---'); 
  case 'p'
      disp('.--.'); 
  case 'q'
      disp('--.-');
  case 'r'
      disp('.-.');
  case 's'
      disp('...'); 
  case 't'
      disp('-');
  case 'u'
      disp('..-'); 
  case 'v'
      disp('...-'); 
  case 'w'
      disp('.--');
  case 'x'
      disp('-..-'); 
  case 'y'
      disp('-.--'); 
  case 'z'
      disp('--..');
  otherwise
    disp('Invalid character');
end

Best Answer

I suggest something like this:
Morse = {'.----' '..---' '...--' '.-' '-...' '-.-.'};
AlfNum = {'1' '2' '3' 'a' 'b' 'c'};
string = 'a1b2c3';
for k1 = 1:length(string)
    Msg{k1} = Morse(strcmpi(AlfNum,string(k1)))
end
fprintf('\n\n| ')
for k1 = 1:length(string)
    fprintf('%s | ',char(Msg{k1}))
end
fprintf('\n\n')
producing:
| .- | .---- | -... | ..--- | -.-. | ...-- |
Related Question