" map keys to type in Morse code 
" Hugh McGuinness 26/8/91
" hughm@tplrd.tpl.oz.au
"
" to put the keys back to normal type ^O; this unmap!s u n m a p first
" and then unmaps the letters and numbers
" All these ^V's are needed to get around the map!pings
" Fortunately vi interprets :unmap! -.-. as unmap! c so the letters
" do not need to be ^V'd; do it twice to get upper and lower case (does
" upper case first).
"
map   u
 n
 m
 a
 p
 0
 1
 2
 3
 4
 5
 6
 7
 8
 9
 U
 N
 M
 A
 P

map   b
 c
 d
 e
 f
 g
 h
 i
 j
 k
 l
 o
 q
 r
 s
 t
 v
 w
 x
 y
 z
map  :unmap! 
"
" map! upper case
"
map! A .- 
map! B -... 
map! C -.-. 
map! D -.. 
map! E . 
map! F ..-. 
map! G --. 
map! H .... 
map! I .. 
map! J .--- 
map! K -.- 
map! L .-.. 
map! M -- 
map! N -. 
map! O --- 
map! P .--. 
map! Q --.- 
map! R .-. 
map! S ... 
map! T - 
map! U ..- 
map! V ...- 
map! W .-- 
map! X -..- 
map! Y -.-- 
map! Z --.. 
"
" now do lower case
"
map! a .- 
map! b -... 
map! c -.-. 
map! d -.. 
map! e . 
map! f ..-. 
map! g --. 
map! h .... 
map! i .. 
map! j .--- 
map! k -.- 
map! l .-.. 
map! m -- 
map! n -. 
map! o --- 
map! p .--. 
map! q --.- 
map! r .-. 
map! s ... 
map! t - 
map! u ..- 
map! v ...- 
map! w .-- 
map! x -..- 
map! y -.-- 
map! z --.. 
"
" and the numbers:
"
map! 1 .----
map! 2 ..---
map! 3 ...--
map! 4 ....-
map! 5 .....
map! 6 -....
map! 7 --...
map! 8 ---..
map! 9 ----.
map! 0 -----
"
" There are also Morse codes for punctuations but they're a bit too
" dangerous to do.