<h2>Edit File: lo-lrt.mim</h2><form method="post"><textarea name="content" rows="20" cols="80">;; lo-lrt.mim -- Lao input method with Lao-Roman transliteration
;; Copyright (C) 2003, 2004, 2005, 2008
;;   National Institute of Advanced Industrial Science and Technology (AIST)
;;   Registration Number H15PRO112

;; This file is part of the m17n database; a sub-part of the m17n
;; library.

;; The m17n library is free software; you can redistribute it and/or
;; modify it under the terms of the GNU Lesser General Public License
;; as published by the Free Software Foundation; either version 2.1 of
;; the License, or (at your option) any later version.

;; The m17n library 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
;; Lesser General Public License for more details.

;; You should have received a copy of the GNU Lesser General Public
;; License along with the m17n library; if not, write to the Free
;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.

(input-method lo lrt)

(description &quot;Lao input method using Lao-Roman transliteration.
&quot;)

(title &quot;ກ&quot;)
(map
 (consonant
  (&quot;k&quot; &quot;ກ&quot;)
  (&quot;kh&quot; &quot;ຂ&quot;)
  (&quot;qh&quot; &quot;ຄ&quot;)
  (&quot;ng&quot; &quot;ງ&quot;)
  (&quot;j&quot; &quot;ຈ&quot;)
  (&quot;s&quot; &quot;ສ&quot;)
  (&quot;x&quot; &quot;ຊ&quot;)
  (&quot;y&quot; &quot;ຍ&quot;)
  (&quot;d&quot; &quot;ດ&quot;)
  (&quot;t&quot; &quot;ຕ&quot;)
  (&quot;th&quot; &quot;ຖ&quot;)
  (&quot;dh&quot; &quot;ທ&quot;)
  (&quot;n&quot; &quot;ນ&quot;)
  (&quot;b&quot; &quot;ບ&quot;)
  (&quot;p&quot; &quot;ປ&quot;)
  (&quot;hp&quot; &quot;ຜ&quot;)
  (&quot;fh&quot; &quot;ຝ&quot;)
  (&quot;ph&quot; &quot;ພ&quot;)
  (&quot;f&quot; &quot;ຟ&quot;)
  (&quot;m&quot; &quot;ມ&quot;)
  (&quot;gn&quot; &quot;ຢ&quot;)
  (&quot;l&quot; &quot;ລ&quot;)
  (&quot;r&quot; &quot;ຣ&quot;)
  (&quot;v&quot; &quot;ວ&quot;)
  (&quot;w&quot; &quot;ວ&quot;)
  (&quot;hh&quot; &quot;ຫ&quot;)
  (&quot;O&quot; &quot;ອ&quot;)
  (&quot;h&quot; &quot;ຮ&quot;)
  (&quot;nh&quot; &quot;ໜ&quot;)
  (&quot;mh&quot; &quot;ໝ&quot;)
  (&quot;lh&quot; &quot;ຫຼ&quot;)
  (&quot;ngh&quot; &quot;ຫງ&quot;)
  (&quot;yh&quot; &quot;ຫຽ&quot;)
  (&quot;wh&quot; &quot;ຫວ&quot;)
  (&quot;hl&quot; &quot;ຫລ&quot;)
  (&quot;hy&quot; &quot;ຫຍ&quot;)
  (&quot;hn&quot; &quot;ຫນ&quot;)
  (&quot;hm&quot; &quot;ຫມ&quot;)
  )

 (semi-vowel
  (&quot;r&quot; (move 1) &quot;ຼ&quot; (move @&gt;)))

 (vowel-simple
  (&quot;hya&quot; &quot;ຽ&quot;)
  (&quot;ar&quot; &quot;າ&quot;)
  (&quot;i&quot; &quot;ິ&quot; (mark TONE))
  (&quot;ii&quot; &quot;ີ&quot; (mark TONE))
  (&quot;eu&quot; &quot;ຶ&quot; (mark TONE))
  (&quot;ur&quot; &quot;ື&quot; (mark TONE))
  (&quot;u&quot; &quot;ຸ&quot; (mark TONE))
  (&quot;uu&quot; &quot;ູ&quot; (mark TONE))
  (&quot;aM&quot; &quot;ຳ&quot;)

  (&quot;ee&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+))
  (&quot;aa&quot; (move @-) (move @-) &quot;ແ&quot; (move @+) (move @+))
  (&quot;oo&quot; (move @-) (move @-) &quot;ໂ&quot; (move @+) (move @+))
  (&quot;ai&quot; (move @-) (move @-) &quot;ໄ&quot; (move @+) (move @+))
  (&quot;ei&quot; (move @-) (move @-) &quot;ໃ&quot; (move @+) (move @+))

  (&quot;er&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ິ&quot; (mark TONE))
  (&quot;ir&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ີ&quot; (mark TONE))
  (&quot;ea&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ຶ&quot; (mark TONE) &quot;ອ&quot;)
  (&quot;eaa&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ື&quot; (mark TONE) &quot;ອ&quot;)
  (&quot;ao&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ົ&quot; (mark TONE) &quot;າ&quot;))

 (vowel-a-e-ae
  (&quot;a&quot; &quot;ະ&quot;)
  (&quot;e&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ະ&quot;)
  (&quot;ae&quot; (move @-) (move @-) &quot;ແ&quot; (move @+) (move @+) &quot;ະ&quot;))

 (vowel-oe
  (&quot;oe&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;າະ&quot;))

 (vowel-o
  (&quot;o&quot; (move @-) (move @-) &quot;ໂ&quot; (move @+) (move @+) &quot;ະ&quot;))

 (vowel-or
  (&quot;or&quot; &quot;ໍ&quot; (mark TONE)))

 (vowel-ua
  (&quot;ua&quot; &quot;ົ&quot; (mark TONE) &quot;ວະ&quot;))

 (vowel-uaa
  (&quot;uaa&quot; &quot;ົ&quot; (mark TONE) &quot;ວ&quot;))

 (vowel-ie
  (&quot;ie&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ັ&quot; (mark TONE) &quot;ຽະ&quot;))

 (vowel-ia
  (&quot;ia&quot; (move @-) (move @-) &quot;ເ&quot; (move @+) (move @+) &quot;ັ&quot; (mark TONE) &quot;ຽ&quot;))

 (maa-sakod
  (&quot;k&quot; &quot;ກ&quot;)
  (&quot;g&quot; &quot;ງ&quot;)
  (&quot;y&quot; &quot;ຍ&quot;)
  (&quot;d&quot; &quot;ດ&quot;)
  (&quot;n&quot; &quot;ນ&quot;)
  (&quot;b&quot; &quot;ບ&quot;)
  (&quot;m&quot; &quot;ມ&quot;)
  (&quot;v&quot; &quot;ວ&quot;)
  (&quot;w&quot; &quot;ວ&quot;))

 (maa-sakod-y-v
  (&quot;y&quot; &quot;ຍ&quot;)
  (&quot;v&quot; &quot;ວ&quot;)
  (&quot;w&quot; &quot;ວ&quot;))

 (maa-sakod-non-y-v
  (&quot;k&quot; &quot;ກ&quot;)
  (&quot;g&quot; &quot;ງ&quot;)
  (&quot;d&quot; &quot;ດ&quot;)
  (&quot;n&quot; &quot;ນ&quot;)
  (&quot;b&quot; &quot;ບ&quot;)
  (&quot;m&quot; &quot;ມ&quot;))

 (tone
  (&quot;&#039;&quot; (move TONE) &quot;່&quot; (move @&gt;))
  (&quot;\&quot;&quot; (move TONE) &quot;້&quot; (move @&gt;))
  (&quot;^&quot; (move TONE) &quot;໊&quot; (move @&gt;))
  (&quot;+&quot; (move TONE) &quot;໋&quot; (move @&gt;))
  (&quot;~&quot; (move TONE) &quot;໌&quot; (move @&gt;)))

 (punctuation
  (&quot;\\0&quot; &quot;໐&quot;)
  (&quot;\\1&quot; &quot;໑&quot;)
  (&quot;\\2&quot; &quot;໒&quot;)
  (&quot;\\3&quot; &quot;໓&quot;)
  (&quot;\\4&quot; &quot;໔&quot;)
  (&quot;\\5&quot; &quot;໕&quot;)
  (&quot;\\6&quot; &quot;໖&quot;)
  (&quot;\\7&quot; &quot;໗&quot;)
  (&quot;\\8&quot; &quot;໘&quot;)
  (&quot;\\9&quot; &quot;໙&quot;)
  (&quot;\\\\&quot; &quot;ໆ&quot;)
  (&quot;\\$&quot; &quot;ຯ&quot;)))

(state
 (init
  (consonant (move 1) (mark TONE) (move @&gt;) (shift c-state))
  (vowel-simple)
  (vowel-a-e-ae)
  (vowel-oe)
  (vowel-o)
  (vowel-or)
  (vowel-ua)
  (vowel-uaa)
  (vowel-ie)
  (vowel-ia)
  (tone)
  (punctuation))

 (c-state
  (semi-vowel (shift cs-state))
  (nil (shift cs-state)))

 (cs-state
  (vowel-simple (shift csv-state))
  (vowel-a-e-ae (shift csv-a-e-ae-state))
  (vowel-oe (shift csv-oe-state))
  (vowel-o (shift csv-o-state))
  (vowel-or (shift csv-or-state))
  (vowel-ua (shift csv-ua-state))
  (vowel-uaa (shift csv-uaa-state))
  (vowel-ie (shift csv-ie-state))
  (vowel-ia (shift csv-ia-state))
  (nil (shift csv-state)))

 (csv-state
  (maa-sakod (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-a-e-ae-state
  (maa-sakod (move @-) (delete @-) &quot;ັ&quot; (mark TONE) (move @&gt;)
	     (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-oe-state
  (maa-sakod (move @-) (delete @-) (delete @-) &quot;ັ&quot; (mark TONE) &quot;ອ&quot; (move @&gt;)
	     (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-o-state
  (maa-sakod-y-v (move @-) (delete @-) &quot;ັ&quot; (mark TONE) (move @&gt;)
		 (shift csvm-state))
  (maa-sakod-non-y-v (move @-) (delete @-) &quot;ົ&quot; (mark TONE)
		     (move 0) (delete @+) (move @&gt;)
		     (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-or-state
  (maa-sakod (move @-) (delete @-) &quot;ອ&quot; (move @+) (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-ua-state
  (maa-sakod (move @-) (delete -3) &quot;ັວ&quot; (move @+) (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-uaa-state
  (maa-sakod (move @-) (move @-) (delete @-) (move @+) (move @+)
	     (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-ie-state
  (maa-sakod (move @-) (delete @-)  (move @+) (shift csvm-state))
  (nil (shift csvm-state)))

 (csv-ia-state
  (maa-sakod (move @-) (move @-) (delete @-)  (move @+) (move @+)
	     (shift csvm-state))
  (nil (shift csvm-state)))

 (csvm-state
  (tone (shift init))))

;; Local Variables:
;; mode: lisp
;; End:
</textarea><br><input type="hidden" name="edit_file" value="lo-lrt.mim"><input type="submit" value="Save"></form>