Commit 6dacfdae authored by Alvar's avatar Alvar Committed by Sébastien Helleu

weechataboo.scm 0.1.1: add more emoticons

parent 22fa7651
......@@ -53,7 +53,7 @@
(emoticonize-line new-line)
new-line)))
; Pointer String String -> Weechat-Return
; Pointer String String -> Weechat-Return
; This function was registered to be called when an input was submitted and
; will try to replace ~~EMOTIONs to emoticons.
(define (command-run data buffer command)
......@@ -75,25 +75,28 @@
(let*
; Some defaults which may be useful‥
((emotions
'(("angry" "눈_눈,(¬_¬),(`ε´),(¬▂¬),(▽д▽)")
("blush" "(´ω`*),(‘-’*),(/ε\*),(*゚∀゚*),(*´ェ`*)")
("cry" "(;へ:),(πーπ),(iДi),(;Д;),(╥_╥)")
("dance" "ヾ(^^ゞ),(ノ^o^)ノ,⌎⌈╹우╹⌉⌍,└|゚ε゚|┐,┌|゚з゚|┘,(〜 ̄△ ̄)〜")
("drink" "(^-^)_日,(*^◇^)_旦,(  ゜Д゜)⊃旦,~~旦_(-ω-`。)")
("excited" "(≧∇≦*),ヽ(^Д^)ノ,(* >ω<)")
("gross" "(咒),( ≖ิ‿≖ิ ),ʅ(◔౪◔ ) ʃ")
("happy" "≖‿≖,(^ω^),(^ω^),ヽ(ヅ)ノ,(¬‿¬)")
("heart" "♡^▽^♡,✿♥‿♥✿,(。♥‿♥。),ヽ(o♡o)/")
("hug" "⊂(・﹏・⊂),(っ´▽`)っ,(づ ̄ ³ ̄)づ,⊂(´・ω・`⊂)")
("kiss" "|°з°|,(*^3^),(´ε`*)")
("lenny" "( ͡ ͜ʖ ͡ ),( ͡~ ͜ʖ ͡°),( ͡~ ͜ʖ ͡~),ヽ( ͝° ͜ʖ͡°)ノ,(つ ͡° ͜ʖ ͡°)つ")
("magic" "(っ・ω・)っ≡≡≡≡≡≡☆,ヽ༼ຈل͜ຈ༽⊃─☆*:・゚")
("sheep" "@^ェ^@,@・ェ・@")
("shrug" "┐(´д`)┌,╮(╯∀╰)╭,┐(´∀`)┌,ʅ(́◡◝)ʃ,ヽ(~~~ )ノ")
("shock" "(゚д゚;)")
("shy" "(/ω\),(‘-’*),(´~`ヾ),(〃´∀`)")
("smug" "( ̄ω ̄),( ̄ー ̄),( ̄ー ̄),(^~^)")
("wink" "ヾ(^∇^),ヾ(☆▽☆),(。-ω-)ノ,( ・ω・)ノ")))
'(("aggressive" "o(-`д´- 。),凸ಠ益ಠ)凸,' ̿'̵͇̿̿з=(◕_◕)=ε/̵͇̿̿/'̿'̿ ̿,O=('-'Q),。゜(`Д´)゜。,┌∩┐(ಠ_ಠ)┌∩┐")
("angry" "눈_눈,(¬_¬),(`ε´),(¬▂¬),(▽д▽),ಠ_ರೃ,(⋋▂⋌),(‡▼益▼),(*`へ´*)")
("blush" "(´ω`*),(‘-’*),(/ε\*),(*゚∀゚*),(*´ェ`*)")
("cat" "≋≋≋≋≋̯̫⌧̯̫(ˆ•̮ ̮•ˆ)")
("cry" "(;へ:),(πーπ),(iДi),(;Д;),(╥_╥),ಥ╭╮ಥ")
("dance" "ヾ(^^ゞ),(ノ^o^)ノ,⌎⌈╹우╹⌉⌍,└|゚ε゚|┐,┌|゚з゚|┘,(〜 ̄△ ̄)〜")
("drink" "(^-^)_日,(*^◇^)_旦,(  ゜Д゜)⊃旦,~~旦_(-ω-`。)")
("excited" "(≧∇≦*),ヽ(^Д^)ノ,(* >ω<)")
("gross" "(咒),( ≖ิ‿≖ิ ),ʅ(◔౪◔ ) ʃ")
("happy" "≖‿≖,(^ω^),(^ω^),ヽ(ヅ)ノ,(¬‿¬),(◡‿◡✿),(❀◦‿◦),(⁎⚈᷀᷁ᴗ⚈᷀᷁⁎)")
("heart" "♡^▽^♡,✿♥‿♥✿,(。♥‿♥。),ヽ(o♡o)/,(◍•ᴗ•◍)❤,(˘︶˘).。.:*♡,❣◕ ‿ ◕❣")
("hug" "⊂(・﹏・⊂),(っ´▽`)っ,(づ ̄ ³ ̄)づ,⊂(´・ω・`⊂)")
("kiss" "|°з°|,(*^3^),(´ε`*),(っ˘з(˘⌣˘ ),(*^3^)/~♡")
("lenny" "( ͡ ͜ʖ ͡ ),( ͡~ ͜ʖ ͡°),( ͡~ ͜ʖ ͡~),ヽ( ͝° ͜ʖ͡°)ノ,(つ ͡° ͜ʖ ͡°)つ,( ͝סּ ͜ʖ͡סּ),")
("magic" "(っ・ω・)っ≡≡≡≡≡≡☆,ヽ༼ຈل͜ຈ༽⊃─☆*:・゚")
("sheep" "@^ェ^@,@・ェ・@")
("shock" "(゚д゚;)")
("shrug" "┐(´д`)┌,╮(╯∀╰)╭,┐(´∀`)┌,ʅ(́◡◝)ʃ,ヽ(~~~ )ノ,ヽ(。_°)ノ,¯\(◉◡◔)/¯,◔_◔")
("shy" "(/ω\),(‘-’*),(´~`ヾ),(〃´∀`)")
("smug" "( ̄ω ̄),( ̄ー ̄),( ̄ー ̄),(^~^)")
("sword" "╰(◕ヮ◕)つ¤=[]———,╰(⇀︿⇀)つ-]═───,∩(˵☯‿☯˵)つ¤=[]:::::>")
("wink" "ヾ(^∇^),ヾ(☆▽☆),(。-ω-)ノ,( ・ω・)ノ")))
(names (string-join (map car emotions) ",")))
(and
(weechat:config_set_plugin "emotions" names)
......@@ -112,7 +115,7 @@
(weechat:register
"weechataboo" "Alvar" "0.1" "GPL3"
"weechataboo" "Alvar" "0.1.1" "GPL3"
"Replace emotion-tags with random emoticons" "clean-up" "")
(and (eq? (weechat:config_is_set_plugin "emotions") 0)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment