Add load directory

load/cyrillic-workman-input-method.el

@@ -0,0 +1,119 @@
+;;; cyrillic-workman-input-method.el --- Workman but cyrillic. -*- lexical-binding: t; -*-
+
+(require 'quail)
+
+(quail-define-package
+ "cyrillic-workman" "Russian" "RUW" t
+ "Russian (ЙЦУКЕН) input method simulating Workman keyboard"
+ nil t t t t nil nil nil nil nil t)
+
+;; 1!  2@  3#  4$  5%  6^  7&  8*  9(  0)  -_  +=  `~
+;;  qQ  dD  rR  wW  bB  jJ  fF  uU  pP  ;:  [{  ]}
+;;   aA  sS  hH  tT  gG  yY  nN  eE  oO  iI  '"  \|
+;;    zZ  xX  mM  cC  vV  kK  lL  ,<  .>  /?
+
+;;  1! 2" 3№ 4; 5% 6: 7? 8* 9( 0) -_ =+ \/ ёЁ
+;;   Й  Ц  У  К  Е  Н  Г  Ш  Щ  З  Х  Ъ
+;;    Ф  Ы  В  А  П  Р  О  Л  Д  Ж  Э
+;;     Я  Ч  С  М  И  Т  Ь  Б  Ю  .,
+
+(quail-define-rules
+ ("1" ?1)
+ ("2" ?2)
+ ("3" ?3)
+ ("4" ?4)
+ ("5" ?5)
+ ("6" ?6)
+ ("7" ?7)
+ ("8" ?8)
+ ("9" ?9)
+ ("0" ?0)
+ ("-" ?-)
+ ("=" ?=)
+ ("|" ?/)
+ ("`" ?ё)
+ ("q" ?й)
+ ("d" ?ц)
+ ("r" ?у)
+ ("w" ?к)
+ ("b" ?е)
+ ("j" ?н)
+ ("f" ?г)
+ ("u" ?ш)
+ ("p" ?щ)
+ (";" ?з)
+ ("[" ?х)
+ ("]" ?ъ)
+ ("a" ?ф)
+ ("s" ?ы)
+ ("h" ?в)
+ ("t" ?а)
+ ("g" ?п)
+ ("y" ?р)
+ ("n" ?о)
+ ("e" ?л)
+ ("o" ?д)
+ ("i" ?ж)
+ ("'" ?э)
+ ("\\" ?\\)
+ ("z" ?я)
+ ("x" ?ч)
+ ("m" ?с)
+ ("c" ?м)
+ ("v" ?и)
+ ("k" ?т)
+ ("l" ?ь)
+ ("," ?б)
+ ("." ?ю)
+ ("/" ?.)
+ ("!" ?!)
+ ("@" ?\")
+ ("#" ?№)
+ ("$" ?\;)
+ ("%" ?%)
+ ("^" ?:)
+ ("&" ??)
+ ("*" ?*)
+ ("(" ?\()
+ (")" ?\))
+ ("_" ?_)
+ ("+" ?+)
+ ("~" ?Ё)
+ ("Q" ?Й)
+ ("D" ?Ц)
+ ("R" ?У)
+ ("W" ?К)
+ ("B" ?Е)
+ ("J" ?Н)
+ ("F" ?Г)
+ ("U" ?Ш)
+ ("P" ?Щ)
+ (":" ?З)
+ ("{" ?Х)
+ ("}" ?Ъ)
+ ("A" ?Ф)
+ ("S" ?Ы)
+ ("H" ?В)
+ ("T" ?А)
+ ("G" ?П)
+ ("Y" ?Р)
+ ("N" ?О)
+ ("E" ?Л)
+ ("O" ?Д)
+ ("I" ?Ж)
+ ("\"" ?Э)
+ ("|" ?|)
+ ("Z" ?Я)
+ ("X" ?Ч)
+ ("M" ?С)
+ ("C" ?М)
+ ("V" ?И)
+ ("K" ?Т)
+ ("L" ?Ь)
+ ("<" ?Б)
+ (">" ?Ю)
+ ("?" ?,))
+
+(provide 'cyrillic-workman-input-method)
+
+;;; cyrillic-workman-input-method.el ends here