在emacs里输入A岛颜文字

闲聊灌水
1 
(defvar emoticons-list 
  '("|∀ﾟ|"
    "( ´∀`)"
    "(*´∀`)"
    "(*ﾟ∇ﾟ)"
    "( ﾟ 3ﾟ)"
    "( ﾟ∀。)"
    "Σ( ﾟдﾟ)"
    "(ﾉ)`ω´(ヾ)"
    "(´ﾟДﾟ`)"
    "(;´Д`)"
    "(´д`)"
    "( -д-)"
    "(>д<)"
    "(σﾟдﾟ)σ"
    "(╬ﾟдﾟ)"
    "(/｡＼)"
    "(＾o＾)ﾉ"
    "(ﾟ∀ﾟ)"
    "(ﾟ∀ﾟ)ノ"
    "(ﾟДﾟ≡ﾟДﾟ)"
    "( ﾟ∀ﾟ)"
    "(TдT)"
    "･ﾟ( ﾉд`ﾟ)"
    "⊂彡☆))д`)"
    "|ω・´)"
    "(*ﾟーﾟ)"
    "(｀･ω･)"
    "( ´ー`)"
    "( ´_ゝ`)"
    "( `ー´)"
    "( `·ω·´)"
    "( `_っ´)"
    "( ﾟωﾟ)"
    "・・?)"
    "( ·_ゝ·)"
    "(￣皿￣)"
    "( ´ρ`)"
    "ᕕ( ᐛ )ᕗ"
    "(›´ω`‹)"
    "(|||ﾟДﾟ)"
    "(σﾟ∀ﾟ)σ"
    "(σﾟдﾟ)σ"
    "( ﾟ∀。)"
    "( ｣ﾟДﾟ)｣＜"
    "(ノﾟ∀ﾟ)ノ"
    "|ー`)"
    "(・ω・)"
    "(*´ω`*)"
    "(ツ)"
    "(つд⊂)"))

(defun emoticon-insert ()
  (interactive)
  (let ((selected-emoticon (completing-read "select an emoticon: " emoticons-list)))
    (insert selected-emoticon)))
1 个赞
2

( ﾟ∀。)

也许可以考虑 emacs 里做个 adnmb/nmbxd 的客户端

1 个赞
3

要是有空的话可以教我怎么做。我还是挺想在emacs里上岛的。

1 个赞
4

我挺想做个的，而且由于 a 岛大多数都是文字内容，做起来应该很容易（巨坑）

应该可以参考 telegram 的一个 emacs 客户端： zevlg/telega.el: GNU Emacs telegram client (unofficial) (github.com)，以及 A/X 岛提供的接口

1 个赞
5

我们一起做一个吧，我把我邮箱私信给你。

6

最喜欢的一个颜文字是这个狂按 F5 刷新的

 σ σ
σ( ´ρ`)σ[F5]
 σ σ

EDIT: 坛里好像会把 IDEOGRAPHIC SPACE 替换成 SPACE，看的对的不是那么整齐了

1 个赞
7

假如你也想在emacs里上岛的话，可以加入我们。。。