183ab3372e
This adds 4 new input methods: . Burmese . Burmese Visual . Shan . Mon * lisp/leim/quail/burmese.el: New file. (Bug#77026)
388 lines
5.7 KiB
EmacsLisp
388 lines
5.7 KiB
EmacsLisp
;;; burmese.el --- Quail package for inputting Burmese -*- coding: utf-8; lexical-binding:t -*-
|
||
|
||
;; Copyright (C) 2007-2025 Free Software Foundation, Inc.
|
||
|
||
;; Author: Billy Lei <LeiYiXia29@outlook.com>
|
||
;; Keywords: multilingual, input method, Burmese
|
||
|
||
;; This file is part of GNU Emacs.
|
||
|
||
;; GNU Emacs is free software: you can redistribute it and/or modify
|
||
;; it under the terms of the GNU General Public License as published by
|
||
;; the Free Software Foundation, either version 3 of the License, or
|
||
;; (at your option) any later version.
|
||
|
||
;; GNU Emacs is distributed in the hope that it will be useful,
|
||
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
;; GNU General Public License for more details.
|
||
|
||
;; You should have received a copy of the GNU General Public License
|
||
;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
|
||
|
||
;;; Commentary:
|
||
|
||
;;; Code:
|
||
|
||
(require 'quail)
|
||
|
||
|
||
(quail-define-package
|
||
"burmese" "Burmese" "MY" nil "Burmese input method (in phonetic order)." nil t t t t nil nil nil nil nil t)
|
||
|
||
(quail-define-rules
|
||
("1" ?၁)
|
||
("2" ?၂)
|
||
("3" ?၃)
|
||
("4" ?၄)
|
||
("5" ?၅)
|
||
("6" ?၆)
|
||
("7" ?၇)
|
||
("8" ?၈)
|
||
("9" ?၉)
|
||
("0" ?၀)
|
||
|
||
("!" ?ဍ)
|
||
("@" ?ၒ)
|
||
("#" ?ဋ)
|
||
("$" ?ၓ)
|
||
("%" ?ၔ)
|
||
("^" ?ၕ)
|
||
("&" ?ရ)
|
||
|
||
("`" ?ၐ)
|
||
("~" ?ဎ)
|
||
|
||
("Q" ?ဈ)
|
||
("W" ?ဝ)
|
||
("E" ?ဣ)
|
||
("R" ?၎)
|
||
("T" ?ဤ)
|
||
("Y" ?၌)
|
||
("U" ?ဥ)
|
||
("I" ?၍)
|
||
("O" ?ဿ)
|
||
("P" ?ဏ)
|
||
("{" ?ဧ)
|
||
("}" ?ဪ)
|
||
|
||
("A" ?ဗ)
|
||
("S" ?ှ)
|
||
("D" ?ီ)
|
||
("F" ?္)
|
||
("G" ?ွ)
|
||
("H" ?ံ)
|
||
("J" ?ဲ)
|
||
("K" ?ဒ)
|
||
("L" ?ဓ)
|
||
|
||
("Z" ?ဇ)
|
||
("X" ?ဌ)
|
||
("C" ?ဃ)
|
||
("V" ?ဠ)
|
||
("B" ?ယ)
|
||
("N" ?ဉ)
|
||
("M" ["ဦ"])
|
||
("<" ?၊)
|
||
(">" ?။)
|
||
("?" ??)
|
||
|
||
("q" ?ဆ)
|
||
("w" ?တ)
|
||
("e" ?န)
|
||
("r" ?မ)
|
||
("t" ?အ)
|
||
("y" ?ပ)
|
||
("u" ?က)
|
||
("i" ?င)
|
||
("o" ?သ)
|
||
("p" ?စ)
|
||
("[" ?ဟ)
|
||
("]" ?ဩ)
|
||
|
||
("a" ?ေ)
|
||
("s" ?ျ)
|
||
("d" ?ိ)
|
||
("f" ?်)
|
||
("g" ?ါ)
|
||
("h" ?့)
|
||
("j" ?ြ)
|
||
("k" ?ု)
|
||
("l" ?ူ)
|
||
(";" ?း)
|
||
(":" ?ဂ)
|
||
|
||
("z" ?ဖ)
|
||
("x" ?ထ)
|
||
("c" ?ခ)
|
||
("v" ?လ)
|
||
("b" ?ဘ)
|
||
("n" ?ည)
|
||
("m" ?ာ)
|
||
)
|
||
|
||
(quail-define-package
|
||
"burmese-visual" "Burmese" "MYV" nil "Burmese input method (in visual order).
|
||
|
||
A more common way to input Burmese, which allows inputing the vowel ေ in visual order.
|
||
" nil t t t t nil nil nil nil nil t)
|
||
|
||
(quail-define-rules
|
||
("1" ?၁)
|
||
("2" ?၂)
|
||
("3" ?၃)
|
||
("4" ?၄)
|
||
("5" ?၅)
|
||
("6" ?၆)
|
||
("7" ?၇)
|
||
("8" ?၈)
|
||
("9" ?၉)
|
||
("0" ?၀)
|
||
|
||
("!" ?ဍ)
|
||
("@" ?ၒ)
|
||
("#" ?ဋ)
|
||
("$" ?ၓ)
|
||
("%" ?ၔ)
|
||
("^" ?ၕ)
|
||
("&" ?ရ)
|
||
|
||
("`" ?ၐ)
|
||
("~" ?ဎ)
|
||
|
||
("Q" ?ဈ)
|
||
("W" ?ဝ)
|
||
("E" ?ဣ)
|
||
("R" ?၎)
|
||
("T" ?ဤ)
|
||
("Y" ?၌)
|
||
("U" ?ဥ)
|
||
("I" ?၍)
|
||
("O" ?ဿ)
|
||
("P" ?ဏ)
|
||
("{" ?ဧ)
|
||
("}" ?ဪ)
|
||
|
||
("A" ?ဗ)
|
||
("S" ?ှ)
|
||
("D" ?ီ)
|
||
("F" ?္)
|
||
("G" ?ွ)
|
||
("H" ?ံ)
|
||
("J" ?ဲ)
|
||
("K" ?ဒ)
|
||
("L" ?ဓ)
|
||
|
||
("Z" ?ဇ)
|
||
("X" ?ဌ)
|
||
("C" ?ဃ)
|
||
("V" ?ဠ)
|
||
("B" ?ယ)
|
||
("N" ?ဉ)
|
||
("M" ["ဦ"])
|
||
("<" ?၊)
|
||
(">" ?။)
|
||
|
||
("q" ?ဆ)
|
||
("w" ?တ)
|
||
("e" ?န)
|
||
("r" ?မ)
|
||
("t" ?အ)
|
||
("y" ?ပ)
|
||
("u" ?က)
|
||
("i" ?င)
|
||
("o" ?သ)
|
||
("p" ?စ)
|
||
("[" ?ဟ)
|
||
("]" ["ဩ"])
|
||
|
||
("a" ?ေ)
|
||
("s" ?ျ)
|
||
("d" ?ိ)
|
||
("f" ?်)
|
||
("g" ?ါ)
|
||
("h" ?့)
|
||
("j" ?ြ)
|
||
("k" ?ု)
|
||
("l" ?ူ)
|
||
(";" ?း)
|
||
(":" ?ဂ)
|
||
|
||
("z" ?ဖ)
|
||
("x" ?ထ)
|
||
("c" ?ခ)
|
||
("v" ?လ)
|
||
("b" ?ဘ)
|
||
("n" ?ည)
|
||
("m" ?ာ)
|
||
|
||
("au" ["ကေ"]) ("ac" ["ခေ"]) ("a:" ["ဂေ"]) ("aC" ["ဃေ"]) ("ai" ["ငေ"])
|
||
("ap" ["စေ"]) ("aq" ["ဆေ"]) ("aZ" ["ဇေ"]) ("aQ" ["ဈေ"]) ("an" ["ညေ"])
|
||
("a#" ["ဋေ"]) ("aX" ["ဌေ"]) ("a!" ["ဍေ"]) ("a~" ["ဎေ"]) ("aP" ["ဏေ"])
|
||
("aw" ["တေ"]) ("ax" ["ထေ"]) ("aK" ["ဒေ"]) ("aL" ["ဓေ"]) ("ae" ["နေ"])
|
||
("ay" ["ပေ"]) ("az" ["ဖေ"]) ("aA" ["ဗေ"]) ("ab" ["ဘေ"]) ("ar" ["မေ"])
|
||
("aB" ["ယေ"]) ("a&" ["ရေ"]) ("av" ["လေ"]) ("aW" ["ဝေ"]) ("ao" ["သေ"])
|
||
("a[" ["ဟေ"]) ("aV" ["ဠေ"]) ("at" ["အေ"])
|
||
)
|
||
|
||
(quail-define-package
|
||
"shan" "Burmese" "SHN" nil "Shan input method." nil t t t t nil nil nil nil nil t)
|
||
|
||
(quail-define-rules
|
||
("Q" ?ꩡ)
|
||
("W" ?တ)
|
||
("E" ?ꧣ)
|
||
("R" ?႞)
|
||
("T" ?ြ)
|
||
("Y" ?ၿ)
|
||
("U" ?ၷ)
|
||
("I" ?ရ)
|
||
("O" ?သ)
|
||
("P" ?ႀ)
|
||
|
||
("A" ?ဵ)
|
||
("S" ?ႅ)
|
||
("D" ?ီ)
|
||
("F" ?ႂ)
|
||
("G" ?ႂ)
|
||
("H" ?့)
|
||
("J" ?ႆ)
|
||
("K" ?ဒ)
|
||
("L" ?ႊ)
|
||
|
||
("Z" ?ၾ)
|
||
("X" ?ꩪ)
|
||
("C" ?ꧠ)
|
||
("V" ?ꩮ)
|
||
("B" ?ျ)
|
||
("N" ?႟)
|
||
("M" ?ႃ)
|
||
("<" ?၊)
|
||
(">" ?။)
|
||
|
||
("q" ?ၸ)
|
||
("w" ?တ)
|
||
("e" ?ၼ)
|
||
("r" ?မ)
|
||
("t" ?ဢ)
|
||
("y" ?ပ)
|
||
("u" ?ၵ)
|
||
("i" ?င)
|
||
("o" ?ဝ)
|
||
("p" ?ႁ)
|
||
|
||
("a" ?ေ)
|
||
("s" ?ႄ)
|
||
("d" ?ိ)
|
||
("f" ?်)
|
||
("g" ?ွ)
|
||
("h" ?ႉ)
|
||
("j" ?ႇ)
|
||
("k" ?ု)
|
||
("l" ?ူ)
|
||
(";" ?ႈ)
|
||
(":" ?း)
|
||
|
||
("z" ?ၽ)
|
||
("x" ?ထ)
|
||
("c" ?ၶ)
|
||
("v" ?လ)
|
||
("b" ?ယ)
|
||
("n" ?ၺ)
|
||
("m" ?ၢ)
|
||
)
|
||
|
||
|
||
(quail-define-package
|
||
"mon" "Burmese" "MON" nil "Mon input method." nil t t t t nil nil nil nil nil t)
|
||
|
||
(quail-define-rules
|
||
("1" ?၁)
|
||
("2" ?၂)
|
||
("3" ?၃)
|
||
("4" ?၄)
|
||
("5" ?၅)
|
||
("6" ?၆)
|
||
("7" ?၇)
|
||
("8" ?၈)
|
||
("9" ?၉)
|
||
("0" ?၀)
|
||
|
||
("!" ?ဍ)
|
||
("@" ?ၒ)
|
||
("#" ?ဋ)
|
||
("$" ?ၓ)
|
||
("^" ?ဵ)
|
||
("&" ?ရ)
|
||
|
||
("`" ?ၝ)
|
||
("~" ?ဎ)
|
||
|
||
("Q" ?ၛ)
|
||
("W" ?ဝ)
|
||
("E" ?ဣ)
|
||
("R" ?ၟ)
|
||
("T" ?ဳ)
|
||
("Y" ?ၠ)
|
||
("U" ?ဥ)
|
||
("I" ?၎)
|
||
("O" ?ဿ)
|
||
("P" ?ဏ)
|
||
("{" ?ဨ)
|
||
("}" ?/)
|
||
|
||
("A" ?ဗ)
|
||
("S" ?ှ)
|
||
("D" ?ီ)
|
||
("F" ?္)
|
||
("G" ?ွ)
|
||
("H" ?ံ)
|
||
("J" ?ဲ)
|
||
("K" ?ဒ)
|
||
("L" ?ဓ)
|
||
|
||
("Z" ?ဇ)
|
||
("X" ?ဌ)
|
||
("C" ?ဃ)
|
||
("V" ?ဠ)
|
||
("B" ?ၐ)
|
||
("N" ?ဉ)
|
||
("M" ?ၔ)
|
||
("<" ?ၞ)
|
||
(">" ?ၕ)
|
||
("?" ?၊)
|
||
("/" ?။)
|
||
|
||
("q" ?ဆ)
|
||
("w" ?တ)
|
||
("e" ?န)
|
||
("r" ?မ)
|
||
("t" ?အ)
|
||
("y" ?ပ)
|
||
("u" ?က)
|
||
("i" ?ၚ)
|
||
("o" ?သ)
|
||
("p" ?စ)
|
||
("[" ?ဟ)
|
||
("]" ?ဩ)
|
||
|
||
("a" ?ေ)
|
||
("s" ?ျ)
|
||
("d" ?ိ)
|
||
("f" ?်)
|
||
("g" ?ါ)
|
||
("h" ?ဴ)
|
||
("j" ?ြ)
|
||
("k" ?ု)
|
||
("l" ?ူ)
|
||
(";" ?း)
|
||
|
||
("z" ?ဖ)
|
||
("x" ?ထ)
|
||
("c" ?ခ)
|
||
("v" ?လ)
|
||
("b" ?ဘ)
|
||
("n" ?ည)
|
||
("m" ?ာ)
|
||
)
|
||
;;; burmese.el ends here
|