true-dvorak.el

;;
(quail-define-package
 "english-true-dvorak" "English" "DVO" t
 "English (ASCII) input method simulating Dvorak keyboard"
 nil t t t t nil nil nil nil nil t)

;; 1!  2@  3#  4$  5%  6^  7&  8*  9(  0)  -_  =+  `~
;;  dD  vV  oO  rR  aA  kK  lL  uU  yY  ;:  [{ ]} \|
;;   gG  pP  sS  tT  qQ  hH  nN  eE  iI  fF  '"
;;    zZ  xX  cC  wW  bB  jJ  mM  ,<  .>  /?

(quail-define-rules
 ("-" ?\-)
 ("=" ?\=)
 ("`" ?`)
 ("q" ?d)
 ("w" ?v)
 ("e" ?o)
 ("r" ?r)
 ("t" ?a)
 ("y" ?k)
 ("u" ?l)
 ("i" ?u)
 ("o" ?y)
 ("p" ?\;)
 ("[" ?\[)
 ("]" ?\])
 ("a" ?g)
 ("s" ?p)
 ("d" ?s)
 ("f" ?t)
 ("g" ?q)
 ("h" ?h)
 ("j" ?n)
 ("k" ?e)
 ("l" ?i)
 (";" ?f)
 ("'" ?')
 ("\\" ?\\)
 ("z" ?z)
 ("x" ?x)
 ("c" ?c)
 ("v" ?w)
 ("b" ?b)
 ("n" ?j)
 ("m" ?m)
 ("," ?,)
 ("." ?.)
 ("/" ?/)

 ("_" ?_)
 ("+" ?+)
 ("`" ?`)
 ("Q" ?D)
 ("W" ?V)
 ("E" ?O)
 ("R" ?R)
 ("T" ?A)
 ("Y" ?K)
 ("U" ?L)
 ("I" ?U)
 ("O" ?Y)
 ("P" ?:)
 ("{" ?{)
 ("}" ?})
 ("A" ?G)
 ("S" ?P)
 ("D" ?S)
 ("F" ?T)
 ("G" ?Q)
 ("H" ?H)
 ("J" ?N)
 ("K" ?E)
 ("L" ?I)
 (":" ?F)
 ("\"" ?\")
 ("|" ?|)
 ("Z" ?Z)
 ("X" ?X)
 ("C" ?C)
 ("V" ?W)
 ("B" ?B)
 ("N" ?J)
 ("M" ?M)
 ("<" ?<)
 (">" ?>)
 ("?" ??))