Add (and correct) some things to the flip mapping

  * Fix the mapping for the characters used for "flip guy" itself,
so that flipping flip flipping flips flip.

  * And add the braille characters (#824).

  * Written (and for the braille characters, generated by means of
a Forth program), but not tested, because ghci 8.0.2 rather than
8.4 or 8.6 or whatever it is that HyperNerd requires.

Author: abridgewater

src/Bot/Flip.hs

@@ -72,7 +72,129 @@ separateVariable =
   , ('\x203F', '\x2040')
   , ('\x2045', '\x2046')
   , ('\x2234', '\x2235')
-  , ('╰', '╯')
+  , ('╰', '╭')
+  , ('°', '｡')
+  , ('︵', '︶')
+  , ('⢀', '⠁')
+  , ('⠠', '⠂')
+  , ('⢠', '⠃')
+  , ('⠐', '⠄')
+  , ('⢐', '⠅')
+  , ('⠰', '⠆')
+  , ('⢰', '⠇')
+  , ('⡀', '⠈')
+  , ('⣀', '⠉')
+  , ('⡠', '⠊')
+  , ('⣠', '⠋')
+  , ('⡐', '⠌')
+  , ('⣐', '⠍')
+  , ('⡰', '⠎')
+  , ('⣰', '⠏')
+  , ('⢄', '⠑')
+  , ('⠤', '⠒')
+  , ('⢤', '⠓')
+  , ('⢔', '⠕')
+  , ('⠴', '⠖')
+  , ('⢴', '⠗')
+  , ('⡄', '⠘')
+  , ('⣄', '⠙')
+  , ('⡤', '⠚')
+  , ('⣤', '⠛')
+  , ('⡔', '⠜')
+  , ('⣔', '⠝')
+  , ('⡴', '⠞')
+  , ('⣴', '⠟')
+  , ('⢂', '⠡')
+  , ('⢢', '⠣')
+  , ('⢒', '⠥')
+  , ('⠲', '⠦')
+  , ('⢲', '⠧')
+  , ('⡂', '⠨')
+  , ('⣂', '⠩')
+  , ('⡢', '⠪')
+  , ('⣢', '⠫')
+  , ('⡒', '⠬')
+  , ('⣒', '⠭')
+  , ('⡲', '⠮')
+  , ('⣲', '⠯')
+  , ('⢆', '⠱')
+  , ('⢦', '⠳')
+  , ('⢖', '⠵')
+  , ('⢶', '⠷')
+  , ('⡆', '⠸')
+  , ('⣆', '⠹')
+  , ('⡦', '⠺')
+  , ('⣦', '⠻')
+  , ('⡖', '⠼')
+  , ('⣖', '⠽')
+  , ('⡶', '⠾')
+  , ('⣶', '⠿')
+  , ('⢈', '⡁')
+  , ('⢨', '⡃')
+  , ('⢘', '⡅')
+  , ('⢸', '⡇')
+  , ('⣈', '⡉')
+  , ('⡨', '⡊')
+  , ('⣨', '⡋')
+  , ('⡘', '⡌')
+  , ('⣘', '⡍')
+  , ('⡸', '⡎')
+  , ('⣸', '⡏')
+  , ('⢌', '⡑')
+  , ('⢬', '⡓')
+  , ('⢜', '⡕')
+  , ('⢼', '⡗')
+  , ('⣌', '⡙')
+  , ('⡬', '⡚')
+  , ('⣬', '⡛')
+  , ('⣜', '⡝')
+  , ('⡼', '⡞')
+  , ('⣼', '⡟')
+  , ('⢊', '⡡')
+  , ('⢪', '⡣')
+  , ('⢚', '⡥')
+  , ('⢺', '⡧')
+  , ('⣊', '⡩')
+  , ('⣪', '⡫')
+  , ('⣚', '⡭')
+  , ('⡺', '⡮')
+  , ('⣺', '⡯')
+  , ('⢎', '⡱')
+  , ('⢮', '⡳')
+  , ('⢞', '⡵')
+  , ('⢾', '⡷')
+  , ('⣎', '⡹')
+  , ('⣮', '⡻')
+  , ('⣞', '⡽')
+  , ('⣾', '⡿')
+  , ('⢡', '⢃')
+  , ('⢑', '⢅')
+  , ('⢱', '⢇')
+  , ('⣁', '⢉')
+  , ('⣡', '⢋')
+  , ('⣑', '⢍')
+  , ('⣱', '⢏')
+  , ('⢥', '⢓')
+  , ('⢵', '⢗')
+  , ('⣅', '⢙')
+  , ('⣥', '⢛')
+  , ('⣕', '⢝')
+  , ('⣵', '⢟')
+  , ('⢳', '⢧')
+  , ('⣃', '⢩')
+  , ('⣣', '⢫')
+  , ('⣓', '⢭')
+  , ('⣳', '⢯')
+  , ('⣇', '⢹')
+  , ('⣧', '⢻')
+  , ('⣗', '⢽')
+  , ('⣷', '⢿')
+  , ('⣩', '⣋')
+  , ('⣙', '⣍')
+  , ('⣹', '⣏')
+  , ('⣭', '⣛')
+  , ('⣽', '⣟')
+  , ('⣻', '⣯')
   ]
 
 table1 :: M.Map Char Char