;;; cyrillic.el --- Quail package for inputting Cyrillic characters
-;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
+;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
;; Free Software Foundation, Inc.
;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
-;; 2006, 2007, 2008
+;; 2006, 2007, 2008, 2009, 2010
;; National Institute of Advanced Industrial Science and Technology (AIST)
;; Registration Number H14PRO021
"\e,L9FC:5=\e(B Russian typewriter layout (ISO 8859-5 encoding)."
nil t t t t nil nil nil nil nil t)
-;; 1! 2" 3' 4* 5: 6, 7. 8; 9( 0) -_ =+ \e,L!\e(B
-;; \e,L9\e(B \e,LF\e(B \e,LC\e(B \e,L:\e(B \e,L5\e(B \e,L=\e(B \e,L3\e(B \e,LH\e(B \e,LI\e(B \e,L7\e(B \e,LE\e(B \e,LJ\e(B
+;; \e,Lp\e(B1 -2 /3 "4 :5 ,6 .7 _8 ?9 %0 != ;\ |+
+;; \e,L9\e(B \e,LF\e(B \e,LC\e(B \e,L:\e(B \e,L5\e(B \e,L=\e(B \e,L3\e(B \e,LH\e(B \e,LI\e(B \e,L7\e(B \e,LE\e(B \e,LJ\e(B )(
;; \e,LD\e(B \e,LK\e(B \e,L2\e(B \e,L0\e(B \e,L?\e(B \e,L@\e(B \e,L>\e(B \e,L;\e(B \e,L4\e(B \e,L6\e(B \e,LM\e(B
-;; \e,LO\e(B \e,LG\e(B \e,LA\e(B \e,L<\e(B \e,L8\e(B \e,LB\e(B \e,LL\e(B \e,L1\e(B \e,LN\e(B /?
+;; \e,LO\e(B \e,LG\e(B \e,LA\e(B \e,L<\e(B \e,L8\e(B \e,LB\e(B \e,LL\e(B \e,L1\e(B \e,LN\e(B \e,L!\e(B
(quail-define-rules
- ("1" ?1)
- ("2" ?2)
- ("3" ?3)
- ("4" ?4)
- ("5" ?5)
- ("6" ?6)
- ("7" ?7)
- ("8" ?8)
- ("9" ?9)
- ("0" ?0)
- ("-" ?-)
- ("=" ?=)
- ("`" ?\e,Lq\e(B)
+ ("1" ?\e,Lp\e(B)
+ ("2" ?-)
+ ("3" ?/)
+ ("4" ?\")
+ ("5" ?:)
+ ("6" ?,)
+ ("7" ?.)
+ ("8" ?_)
+ ("9" ??)
+ ("0" ?%)
+ ("-" ?!)
+ ("=" ?\;)
+ ("`" ?|)
("q" ?\e,LY\e(B)
("w" ?\e,Lf\e(B)
("e" ?\e,Lc\e(B)
("l" ?\e,LT\e(B)
(";" ?\e,LV\e(B)
("'" ?\e,Lm\e(B)
- ("\\" ?\\)
+ ("\\" ?\))
("z" ?\e,Lo\e(B)
("x" ?\e,Lg\e(B)
("c" ?\e,La\e(B)
("m" ?\e,Ll\e(B)
("," ?\e,LQ\e(B)
("." ?\e,Ln\e(B)
- ("/" ?/)
-
- ("!" ?!)
- ("@" ?\")
- ("#" ?')
- ("$" ?*)
- ("%" ?:)
- ("^" ?,)
- ("&" ?.)
- ("*" ?\;)
- ("(" ?\()
- (")" ?\))
- ("_" ?_)
- ("+" ?+)
- ("~" ?\e,L!\e(B)
+ ("/" ?\e,Lq\e(B)
+
+ ("!" ?1)
+ ("@" ?2)
+ ("#" ?3)
+ ("$" ?4)
+ ("%" ?5)
+ ("^" ?6)
+ ("&" ?7)
+ ("*" ?8)
+ ("(" ?9)
+ (")" ?0)
+ ("_" ?=)
+ ("+" ?\\)
+ ("~" ?+)
("Q" ?\e,L9\e(B)
("W" ?\e,LF\e(B)
("E" ?\e,LC\e(B)
("L" ?\e,L4\e(B)
(":" ?\e,L6\e(B)
("\"" ?\e,LM\e(B)
- ("|" ?|)
+ ("|" ?\()
("Z" ?\e,LO\e(B)
("X" ?\e,LG\e(B)
("C" ?\e,LA\e(B)
("M" ?\e,LL\e(B)
("<" ?\e,L1\e(B)
(">" ?\e,LN\e(B)
- ("?" ??)
+ ("?" ?\e,L!\e(B)
)
;; Maintain the obsolete name for now.
"\e,L9FC:5=\e(B Russian computer layout"
nil t t t t nil nil nil nil nil t)
-;; 1! 2" 3\e,Lp\e(B 4; 5% 6: 7? 8* 9( 0) -_ =+ \e,Lq!\e(B
+;; 1! 2" 3\e,Lp\e(B 4; 5% 6: 7? 8* 9( 0) -_ =+ \/ \e,Lq!\e(B
;; \e,L9\e(B \e,LF\e(B \e,LC\e(B \e,L:\e(B \e,L5\e(B \e,L=\e(B \e,L3\e(B \e,LH\e(B \e,LI\e(B \e,L7\e(B \e,LE\e(B \e,LJ\e(B
;; \e,LD\e(B \e,LK\e(B \e,L2\e(B \e,L0\e(B \e,L?\e(B \e,L@\e(B \e,L>\e(B \e,L;\e(B \e,L4\e(B \e,L6\e(B \e,LM\e(B
;; \e,LO\e(B \e,LG\e(B \e,LA\e(B \e,L<\e(B \e,L8\e(B \e,LB\e(B \e,LL\e(B \e,L1\e(B \e,LN\e(B .,
("0" ?0)
("-" ?-)
("=" ?=)
+ ("|" ?/)
("`" ?\e,Lq\e(B)
("q" ?\e,LY\e(B)
("w" ?\e,Lf\e(B)
Russian alphabet: a b v=w g d e yo=jo zh z i j=j' k l m n o p r s t
u f h=kh=x c ch sh shch=sj=/s=/sht ~ y ' e\\ yu=ju ya=ja=q
-Also included are Ukrainian \e,Lt\e(B (YE) = \"/e\" and \e,Lw\e(B (YI) = \"yi\",
+Also included are Ukrainian \e,Lt\e(B (YE) = \"/e\", \e,Lw\e(B (YI) = \"yi\",
+\e$,1)Q\e(B (GHE WITH UPTURN) = \"g'\",
Belarusian \e,L~\e(B (SHORT U) = \"u~\",
Serbo-Croatian \e,Lr\e(B (DJE) = \"/d\", \e,L{\e(B (CHJE)= \"/ch\",
Macedonian \e,Ls\e(B (GJE) = \"/g\", \e,Lu\e(B (DZE) = \"/s\", \e,L|\e(B (KJE) = \"/k\",
("shch" ?\e,Li\e(B) ("sj" ?\e,Li\e(B)
("/sht" ?\e,Li\e(B) ("/t" ?\e,Li\e(B)
("~" ?\e,Lj\e(B) ("y" ?\e,Lk\e(B) ("'" ?\e,Ll\e(B) ("`" ?\e,Ll\e(B)
- ("e\\" ?\e,Lm\e(B) ("@" ?\e,Lm\e(B)
+ ("e\\" ?\e,Lm\e(B) ("e'" ?\e,Lm\e(B) ("e`" ?\e,Lm\e(B) ("@" ?\e,Lm\e(B)
("yu" ?\e,Ln\e(B) ("ju" ?\e,Ln\e(B)
("ya" ?\e,Lo\e(B) ("ja" ?\e,Lo\e(B) ("q" ?\e,Lo\e(B)
("Shch" ?\e,LI\e(B) ("SHCH" ?\e,LI\e(B) ("Sj" ?\e,LI\e(B) ("SJ" ?\e,LI\e(B)
("/Sht" ?\e,LI\e(B) ("/SHT" ?\e,LI\e(B) ("/T" ?\e,LI\e(B)
("~~" ?\e,LJ\e(B) ("Y" ?\e,LK\e(B) ("''" ?\e,LL\e(B)
- ("E\\" ?\e,LM\e(B) ("@@" ?\e,LM\e(B)
+ ("E\\" ?\e,LM\e(B) ("E'" ?\e,LM\e(B) ("E`" ?\e,LM\e(B) ("@@" ?\e,LM\e(B)
("Yu" ?\e,LN\e(B) ("YU" ?\e,LN\e(B) ("Ju" ?\e,LN\e(B) ("JU" ?\e,LN\e(B)
("Ya" ?\e,LO\e(B) ("YA" ?\e,LO\e(B) ("Ja" ?\e,LO\e(B) ("JA" ?\e,LO\e(B) ("Q" ?\e,LO\e(B)
- ;; Combining accents
- ("a'" ["\e,LP\e$(O+Z\e(B"]) ("a`" ["\e,LP\e$(O+\\e(B"])
- ("e'" ["\e,LU\e$(O+Z\e(B"]) ("e`" ["\e,LU\e$(O+\\e(B"])
- ("i'" ["\e,LX\e$(O+Z\e(B"]) ("i`" ["\e,LX\e$(O+\\e(B"])
- ("o'" ["\e,L^\e$(O+Z\e(B"]) ("o`" ["\e,L^\e$(O+\\e(B"])
- ("u'" ["\e,Lc\e$(O+Z\e(B"]) ("u`" ["\e,Lc\e$(O+\\e(B"])
- ("A'" ["\e,L0\e$(O+Z\e(B"]) ("A`" ["\e,L0\e$(O+\\e(B"])
- ("E'" ["\e,L5\e$(O+Z\e(B"]) ("E`" ["\e,L5\e$(O+\\e(B"])
- ("I'" ["\e,L8\e$(O+Z\e(B"]) ("I`" ["\e,L8\e$(O+\\e(B"])
- ("O'" ["\e,L>\e$(O+Z\e(B"]) ("O`" ["\e,L>\e$(O+\\e(B"])
- ("U'" ["\e,LC\e$(O+Z\e(B"]) ("U`" ["\e,LC\e$(O+\\e(B"])
-
- ("/e" ?\e,Lt\e(B) ("yi" ?\e,Lw\e(B) ("u~" ?\e,L~\e(B)
+ ("/e" ?\e,Lt\e(B) ("yi" ?\e,Lw\e(B) ("u'" ?\e,L~\e(B) ("u~" ?\e,L~\e(B)
+ ("g'" ?\e$,1)Q\e(B)
("/d" ?\e,Lr\e(B) ("/ch" ?\e,L{\e(B)
("/g" ?\e,Ls\e(B) ("/s" ?\e,Lu\e(B) ("/k" ?\e,L|\e(B)
("/i" ?\e,Lv\e(B) ("/j" ?\e,Lx\e(B) ("/l" ?\e,Ly\e(B) ("/n" ?\e,Lz\e(B) ("/z" ?\e,L\7f\e(B)
- ("/E" ?\e,L$\e(B) ("YE" ?\e,L$\e(B) ("Yi" ?\e,L'\e(B) ("YI" ?\e,L'\e(B) ("U~" ?\e,L.\e(B)
+ ("/E" ?\e,L$\e(B) ("YE" ?\e,L$\e(B) ("Yi" ?\e,L'\e(B) ("YI" ?\e,L'\e(B) ("U'" ?\e,L.\e(B) ("U~" ?\e,L.\e(B)
+ ("G'" ?\e$,1)P\e(B)
("/D" ?\e,L"\e(B) ("/Ch" ?\e,L+\e(B) ("/CH" ?\e,L+\e(B)
("/G" ?\e,L#\e(B) ("/S" ?\e,L%\e(B) ("/K" ?\e,L,\e(B)
("/I" ?\e,L&\e(B) ("/J" ?\e,L(\e(B) ("/L" ?\e,L)\e(B) ("/N" ?\e,L*\e(B) ("/Z" ?\e,L/\e(B)
+ ;; Combining accents as a separate character
+ ("//'" ?\e$(O+Z\e(B) ("//`" ?\e$(O+\\e(B)
+
+ ;; In the following two rules the accent is not a separate character
+ ("i`" ?\e$,1(}\e(B) ("I`" ?\e$,1(-\e(B)
+
("/-" ?\e$(G!9\e(B) ;; EN DASH
("/--" ?\e$(G!7\e(B) ;; EM DASH
("/*" ?\e$(O#@\e(B) ;; BULLET
("/c" ?\e,A)\e(B)
("/tm" ?\e$(D"o\e(B)
("/reg" ?\e,A.\e(B)
- ("/eu" ?\e,b$\e(B)
+ ("/eu" ?\e,b$\e(B)
("/ce" ?\e,A"\e(B)
;; fractions