From d2bf391050dcbc4c62d48c9b2022ad127201f842 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 1 Aug 1997 06:45:06 +0000 Subject: [PATCH] (cyrillic-translit): New input method. --- leim/quail/cyrillic.el | 65 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 65 insertions(+) diff --git a/leim/quail/cyrillic.el b/leim/quail/cyrillic.el index 31973a5b82f..9accf5ad5fd 100644 --- a/leim/quail/cyrillic.el +++ b/leim/quail/cyrillic.el @@ -829,3 +829,68 @@ as follows. ("/A" ?,L,(B) ("/S" ?,L.(B) ("/D" ?,L/(B)) + +;; This was provided by Valery Alexeev . + +(quail-define-package + "cyrillic-translit" "Cyrillic" ",A6(Bt" nil + "Intuitively transliterated keybooard layout. +Most convenient for entering Russian but all cyrillic characters are included. +Should handle most cases. However: + for TSE use \"c\", never \"ts\" + SHCHA = Bulgarian SHT = \"shch\", \"sj\", \"\\sht\" or \"\\t\", + REVERSE ROUNDED E = \"e'\" or \"e`\" + KHA when after \"c,s,z\" = \"x\" or \"kh\" + HARD SIGN = \"~\", CAPITAL HARD SIGN = \"~~\", + SOFT SIGN = \"'\", CAPITAL SOFT SIGN = \"''\". + +Also included are Ukranian YE = \"\\e\" and YI = \"yi\", +Belorussian SHORT U = \"u'\", +Serbocroatian DJE = \"\\d\", CHJE= \"\\ch\", +Macedonian GJE = \"\\g\", DZE = \"\\s\", KJE = \"\\k\", +cyrillic I DECIMAL = \"\\i\", JE = \"\\j\", LJE = \"\\l\", NJE = \"\\n\" and DZE =\"\\z\"." + nil t t t t) + +(quail-define-rules + ("a" ?,AP(B)("b" ?,AQ(B) ("v" ?,AR(B) ("w" ?,AR(B) ("g" ?,AS(B) ("d" ?,AT(B) + ("e" ?,AU(B) ("je" ?,AU(B) ("je" ?,AU(B) + ("yo" ?,Aq(B) ("jo" ?,Aq(B) + ("zh" ?,AV(B) ("z" ?,AW(B) ("i" ?,AX(B) + ("j" ?,AY(B) ("j'" ?,AY(B) ("j`" ?,AY(B) ("k" ?,AZ(B) ("l" ?,A[(B) + ("m" ?,A\(B) ("n" ?,A](B) ("o" ?,A^(B) ("p" ?,A_(B) ("r" ?,A`(B) ("s" ?,Aa(B) ("t" ?,Ab(B) ("u" ?,Ac(B) + ("f" ?,Ad(B) ("x" ?,Ae(B) ("h" ?,Ae(B) ("kh" ?,Ae(B) + ("c" ?,Af(B) ("ch" ?,Ag(B) + ("sh" ?,Ah(B) +; ("w" ?,Ai(B) ("q" ?,Ai(B) + ("shch" ?,Ai(B) ("sj" ?,Ai(B) + ("\\sht" ?,Ai(B) ("\\t" ?,Ai(B) + ("~" ?,Aj(B) ("y" ?,Ak(B) ("'" ?,Al(B) ("`" ?,Al(B) + ("e'" ?,Am(B) ("e`" ?,Am(B) ("@" ?,Am(B) + ("yu" ?,An(B) ("ju" ?,An(B) + ("ya" ?,Ao(B) ("ja" ?,Ao(B) + + ("A" ?,A0(B) ("B" ?,A1(B) ("V" ?,A2(B) ("W" ?,A2(B) ("G" ?,A3(B) ("D" ?,A4(B) + ("E" ?,A5(B) ("Je" ?,A5(B) ("JE" ?,A5(B) + ("Yo" ?,A!(B) ("YO" ?,A!(B) ("Jo" ?,A!(B) ("JO" ?,A!(B) + ("Zh" ?,A6(B) ("ZH" ?,A6(B) ("Z" ?,A7(B) ("I" ?,A8(B) + ("J" ?,A9(B) ("J'" ?,A9(B) ("J`" ?,A9(B) ("K" ?,A:(B) ("L" ?,A;(B) + ("M" ?,A<(B) ("N" ?,A=(B) ("O" ?,A>(B) ("P" ?,A?(B) ("R" ?,A@(B) ("S" ?,AA(B) ("T" ?,AB(B) ("U" ?,AC(B) + ("F" ?,AD(B) ("X" ?,AE(B) ("H" ?,AE(B) ("Kh" ?,AE(B) ("KH" ?,AE(B) + ("C" ?,AF(B) ("Ch" ?,AG(B) ("CH" ?,AG(B) + ("Sh" ?,AH(B) ("SH" ?,AH(B) +; ("W" ?,AI(B) ("Q" ?,AI(B) + ("Shch" ?,AI(B) ("SHCH" ?,AI(B) ("Sj" ?,AI(B) ("SJ" ?,AI(B) + ("\\Sht" ?,AI(B) ("\\SHT" ?,AI(B) ("\\T" ?,AI(B) + ("~~" ",AJ(B") ("Y" ?,AK(B) ("''" ",AL(B") ("E'" ?,AM(B) ("E`" ?,AM(B) + ("Yu" ?,AN(B) ("YU" ?,AN(B) ("Ju" ?,AN(B) ("JU" ?,AN(B) + ("Ya" ?,AO(B) ("YA" ?,AO(B) ("Ja" ?,AO(B) ("JA" ?,AO(B) + + ("\\e" ?,At(B) ("yi" ?,Aw(B) ("u'" ?,A~(B) + ("\\d" ?,Ar(B) ("\\ch" ?,A{(B) + ("\\g" ?,As(B) ("\\s" ?,Au(B) ("\\k" ?,A|(B) + ("\\i" ?,Av(B) ("\\j" ?,Ax(B) ("\\l" ?,Ay(B) ("\\n" ?,Az(B) ("\\z" ?,A(B) + ("\\E" ?,A$(B) ("YE" ?,A$(B) ("Yi" ?,A'(B) ("YI" ?,A'(B) ("U'" ?,A.(B) + ("\\D" ?,A"(B) ("\\Ch" ?,A+(B) ("\\CH" ?,A+(B) + ("\\G" ?,A#(B) ("\\S" ?,A%(B) ("\\K" ?,A,(B) + ("\\I" ?,A&(B) ("\\J" ?,A((B) ("\\L" ?,A)(B) ("\\N" ?,A*(B) ("\\Z" ?,A/(B) +) -- 2.39.2