Advertisement
Guest User

Untitled

a guest
Jan 30th, 2019
227
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Awk 0.40 KB | None | 0 0
  1. BEGIN { FS="";
  2.  m="A.-B-...C-.-.D-..E.F..-.G--.H....I..J.---K-.-L.-..M--N-.";
  3.  m=m "O---P.--.Q--.-R.-.S...T-U..-V...-W.--X-..-Y-.--Z--..  ";
  4. }
  5.  
  6. { for(i=1; i<=NF; i++)
  7.   {
  8.     c=toupper($i); n=1; b=".";
  9.  
  10.     while((c!=b)&&(b!=" ")) { b=substr(m,n,1); n++; }
  11.  
  12.     b=substr(m,n,1);
  13.  
  14.     while((b==".")||(b=="-")) { printf("%s",b); n++; b=substr(m,n,1); }
  15.  
  16.     printf("|");
  17.   }
  18.   printf("\n");
  19. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement