<h2>Edit File: lsymbol.mim</h2><form method="post"><textarea name="content" rows="20" cols="80">;; lsymbol.mim -- input method for various symbols.
;; Copyright (C) 2014  K. Handa  &lt;handa@gnu.org&gt;

;; This file is 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 t lsymbol)

(description (_&quot;Input method for symbols with relatively longer key sequences.
It provides access to a broad category of symbols by using the
technique of showing multiple alternatives based on the starter keys
pressed.  For instance,
   \&quot;/-&gt;\&quot; -&gt; arrows (e.g. →↑)
   \&quot;/||\&quot; -&gt; hand genstures (e.g. 👍👎)
   \&quot;/:)\&quot; -&gt; happy faces (e.g. ☺😃)
   \&quot;/:(\&quot; -&gt; unhappy faces (e.g. 😢😡)
   \&quot;/&lt;3\&quot; -&gt; hearts (e.g. ♥♡)
   \&quot;/*\&quot;  -&gt; flowers and stars (e.g. 🌹★)
   \&quot;&amp;&amp;\&quot; -&gt; spiritual (e.g. ☸☯)   \&quot;/xx\&quot; -&gt; checks (e.g. ✔✘)
   \&quot;$\&quot; -&gt; currency (€£)          \&quot;@\&quot; -&gt; legal/text signs (e.g &quot;©¶&quot;)

The user can select the appropriate symbol using ↑,↓,→,←
(or C-p, C-n, C-f, C-b) keys and/or the digits.

Other miscellaneous keys are:
   \&quot;//\&quot; -&gt; \&quot;/\&quot;
   \&quot;/...\&quot; -&gt; \&quot;…\&quot;

This input methods is registered as one of fallback input methods by default.
See the documentation page of m17n input methods for more detail.
  &lt;http://www.nongnu.org/m17n/manual-en/m17nDBData.html#mim-list&gt;&quot;))

;; Some guidelines for determining shortcut sequences:

;;  * Where appropriate, provide access to a broad category of
;;  symbols by using the technique of showing multiple alternatives
;;  based on the starter keys pressed.
;;
;;  * Prefer restricting the size of a character cluster to 6 - so
;;  that the user can use digits more accessible to the left hand,
;;  with arrow keys using the right hand. For example, prefer
;;  &quot;♥♡💔💖💘💓&quot; &quot;💞💕💌&quot; to &quot;♥♡💔💖💘💓💞💕💌&quot;.

;;  * Within a group (say hand gestures), cluster semantically
;;  similar symbols together.

;;  * Keyboard shortcuts used in popular applications provide clues
;;  as to what the appropriate

;; Some references:

;; * Some statistics are available online. Example
;; http://www.scribd.com/doc/262594751/SwiftKey-Emoji-Report
;; (guardian highlight) and http://emojitracker.com/.  Although, this
;; is biased towards populations who are already tech savvy + have
;; the time to type emojis easily and does not give as much weight to
;; people who are just beginning to use IM/ digital communication.

;; * There are other indications of popularity - such as other
;; products (say MS Office or Facebook or Google Hangouts, who would
;; presumably have adapted towards user expectations) providing
;; shortcuts for these emoji-s.
;;
;;    * General lists: http://fsymbols.com/computer/ http://emojipedia.org/
;;    * Emoticon shortcuts in MS Office: https://support.office.com/en-us/article/Keyboard-shortcuts-for-emoticons-dda403dc-ffe9-4cbb-9b9f-aed845ff8b8c
;;    * Facebook shortcuts: http://www.shoutmeloud.com/list-of-facebook-keyboard-shortcuts-and-emoticons.html http://emojicodes.com/

(map
 ;; All starter keys must be registered here.
 (starter (&quot;/&quot; &quot;/&quot;))

 ;; Mapping table.  Each key sequence should not include the starter
 ;; key.
 (map
  (&quot;/&quot; &quot;/&quot;)
  (&quot;...&quot; &quot;…&quot;))

 (multi-choice
  ;; arrows
  (&quot;-&gt;&quot; (delete @0) (&quot;→←↑↓&quot; &quot;👉👈👆👇✋&quot; &quot;►◄▲▾◤◥◣◢&quot;))

  ;; hand gestures
  (&quot;||&quot; (delete @0) (&quot;👍👎👌✋👏🙆&quot; &quot;🙏👋🙌✌✊👊&quot; &quot;💁🙋💪✍💆💅&quot;))

  ;; happy faces
  (&quot;:)&quot; (delete @0) (&quot;☺😃😅😆😉😇😂&quot; &quot;😏😛😜😝😋😉&quot; &quot;💏💋😍😘😚😽😻&quot;))

  ;; unhappy faces
  (&quot;:(&quot; (delete @0) (&quot;😢😩😡😭😪&quot; &quot;🙈🙊🙉&quot;))

  ;; neutral faces
  (&quot;:|&quot; (delete @0) (&quot;🤔&quot;))

  ;; hearts
  (&quot;&lt;3&quot; (delete @0) (&quot;♥♡💔💖💘💓&quot; &quot;💞💕💌💑😍😘&quot;))

  ;; *-like things: flowers, stars, other bright things, snowflakes
  (&quot;*&quot; (delete @0) (&quot;🌹💐❁✽&quot; &quot;★☆⭐🌟💫✨🌠✯🌃&quot; &quot;☀❂✷✸✹🌞⛅🌅🌇&quot; &quot;💡☄⚡ϟ🔥🌈🎆&quot; &quot;❄❆❅&quot;))

  ;; spiritual symbols.
  (&quot;&amp;&amp;&quot; (delete @0) (&quot;💀☠👹👼😇&quot; &quot;卍卐☸☯♋☬&quot; &quot;✝☦✙✡☪💒⛪&quot; &quot;🙈🙊🙉&quot;))

  ;; checks
  (&quot;xx&quot; (delete @0) (&quot;✔✘☐☑☒&quot;))

  ;; currency symbols
  (&quot;$&quot; (delete @0) (&quot;€£¥﷼₱₹&quot; &quot;💰💵💶💴💷&quot;))

  ;; legal signs and text signs
  (&quot;@&quot; (delete @0) (&quot;©®™§¶†‡&quot;))

  )

 ;; Typing 1, 2, ..., 0 selects the 0th, 1st, ..., 9th candidate.
 (choose
  (&quot;1&quot; (select 0))
  (&quot;2&quot; (select 1))
  (&quot;3&quot; (select 2))
  (&quot;4&quot; (select 3))
  (&quot;5&quot; (select 4))
  (&quot;6&quot; (select 5))
  (&quot;7&quot; (select 6))
  (&quot;8&quot; (select 7))
  (&quot;9&quot; (select 8))
  (&quot;0&quot; (select 9)))

 (change-candidate
  ((Left) (select @-))
  ((C-b) (select @-))
  ((Right) (select @+))
  ((C-f) (select @+))
  ((Up) (select @\[))
  ((C-p) (select @\[))
  ((Down) (select @\]))
  ((C-n) (select @\])))

 (focus-move
  ;; When an input spot is moved, commit the current predit by shifting
  ;; to init.
  ((input-focus-move)))

 (focus-change
  ;; When an input focus is out or in, keep the current preedit.
  ((input-focus-out) (set KK @@) (sub KK 1) (undo KK))
  ((input-focus-in) (set KK @@) (sub KK 1) (undo KK)))

 (backspace
  ((BackSpace)))

 (commit-preedit
  ((S-\ ))
  ((\ ))))

(state
 (init
  (starter (show) (shift main)))

 (main
  (map (move @&lt;) (delete 1) (move @&gt;) (shift init))
  (multi-choice (show) (shift select))
  (nil (hide) (shift check-undo)))

 (check-undo
  ;; When Backspace is typed, cancel the last input.
  (backspace (undo))
  (focus-move (shift init))
  (focus-change)
  ;; When anything else is typed, produce the current candidate (if
  ;; any), and re-handle the last input in &quot;init&quot; state.
  (nil (hide) (shift init)))

 (select
  (t (set K @@) (sub K 1))
  ;; When a number is typed, select the corresponding canidate,
  ;; produce it, and shift to &quot;init&quot; state.
  (focus-move (shift init))
  (focus-change)
  (choose (hide) (shift init))
  (change-candidate)
  (backspace (undo K))
  ;; When key to force committing, commit the current preedit.
  (commit-preedit (shift init))
  ;; When anything else is typed, produce the current candidate,
  ;; and re-handle the last input in &quot;init&quot; state.
  (nil (hide) (shift init))))

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