initial commit

README.md

@@ -0,0 +1,20 @@
+# zenkaku.vim
+Adds commands to find and replace zenkaku characters with normal character equivalents.
+
+[wtf is a zenkaku?](https://en.wikipedia.org/wiki/Halfwidth_and_Fullwidth_Forms_\(Unicode_block\))
+
+## Features
+The plugin adds the following commands:
+
+| Command              | Effect                                                                   |
+| -------------------- | ------------------------------------------------------------------------ |
+| `:FixZenkakuDigits`  | Replace all zenkaku digits with ascii equivalents                        |
+| `:FixZenkakuUpper`   | Replace all zenkaku upper-case with ascii equivalents                    |
+| `:FixZenkakuLower`   | Replace all zenkaku lower-case with ascii equivalents                    |
+| `:FixZenkakuOthers`  | Replace all zenkaku special characters with ascii equivalents            |
+| `:FixZenkakuLetters` | Combine `:FixZenkakuLower` and `:FixZenkakuUpper`                        |
+| `:FixZenkaku`        | Combine `:FixZenkakuDigits`, `FixZenkakuLetters` and `:FixZenkakuOthers` |
+
+## Installation
+As with most vim plugins, [vim-plug](https://github.com/junegunn/vim-plug) is a handy way to
+install it.

plugin/zenkaku.vim

@@ -0,0 +1,55 @@
+" vim:set ft=vim et sw=2:
+let s:digits = [
+      \  ['０', '0'], ['１', '1'], ['２', '2'], ['３', '3'], ['４', '4'],
+      \  ['５', '5'], ['６', '6'], ['７', '7'], ['８', '8'], ['９', '9'],
+      \]
+
+let s:upper = [
+      \  ['Ａ', 'A'], ['Ｂ', 'B'], ['Ｃ', 'C'], ['Ｄ', 'D'], ['Ｅ', 'E'],
+      \  ['Ｆ', 'F'], ['Ｇ', 'G'], ['Ｈ', 'H'], ['Ｉ', 'I'], ['Ｊ', 'J'],
+      \  ['Ｋ', 'K'], ['Ｌ', 'L'], ['Ｍ', 'M'], ['Ｎ', 'N'], ['Ｏ', 'O'],
+      \  ['Ｐ', 'P'], ['Ｑ', 'Q'], ['Ｒ', 'R'], ['Ｓ', 'S'], ['Ｔ', 'T'],
+      \  ['Ｕ', 'U'], ['Ｖ', 'V'], ['Ｗ', 'W'], ['Ｘ', 'X'], ['Ｙ', 'Y'],
+      \  ['Ｚ', 'Z'],
+      \]
+
+let s:lower = [
+      \  ['ａ', 'a'], ['ｂ', 'b'], ['ｃ', 'c'], ['ｄ', 'd'], ['ｅ', 'e'],
+      \  ['ｆ', 'f'], ['ｇ', 'g'], ['ｈ', 'h'], ['ｉ', 'i'], ['ｊ', 'j'],
+      \  ['ｋ', 'k'], ['ｌ', 'l'], ['ｍ', 'm'], ['ｎ', 'n'], ['ｏ', 'o'],
+      \  ['ｐ', 'p'], ['ｑ', 'q'], ['ｒ', 'r'], ['ｓ', 's'], ['ｔ', 't'],
+      \  ['ｕ', 'u'], ['ｖ', 'v'], ['ｗ', 'w'], ['ｘ', 'x'], ['ｙ', 'y'],
+      \  ['ｚ', 'z'],
+      \]
+
+let s:others = [
+      \  ['！', '!'], ['＂', '"'], ['＃', '#'], ['＄', '$'], ['％', '%'],
+      \  ['＆', '\&'], ["＇", "'"], ['（', '('], ['）', ')'], ['＊', '*'],
+      \  ['＋', '+'], ['，', ','], ['－', '-'], ['．', '.'], ['／', '\/'],
+      \  ['：', ':'], ['；', ';'], ['＜', '<'], ['＝', '='], ['＞', '>'],
+      \  ['？', '?'], ['＠', '@'], ['［', '['], ['＼', '\'], ['］', ']'],
+      \  ['＾', '^'], ['＿', '_'], ['｀', '`'], ['｛', '{'], ['｜', '|'],
+      \  ['｝', '}'], ['～', '~'], ['｟', '«'], ['｠', '»'], ['｡ ', '.'],
+      \  ['､ ', ','], ['ｰ ', '-'], ['] ', ']'], ['￠', '¢'], ['￡', '£'],
+      \  ['￥', '¥'], ['￦', '₩'],
+      \]
+
+function s:ReplaceWithMap(replacementMap)
+  for pair in a:replacementMap
+    execute '%s/\C' . pair[0] . '/' . pair[1] . '/g'
+  endfor
+endfunction
+
+command FixZenkakuDigits call s:ReplaceWithMap(s:digits)
+command FixZenkakuUpper call s:ReplaceWithMap(s:upper)
+command FixZenkakuLower call s:ReplaceWithMap(s:lower)
+command FixZenkakuOthers call s:ReplaceWithMap(s:others)
+
+command FixZenkakuLetters
+      \ execute 'FixZenkakuUpper'
+      \ | execute 'FixZenkakuLower'
+
+command FixZenkaku
+      \ execute 'FixZenkakuDigits'
+      \ | execute 'FixZenkakuLetters'
+      \ | execute 'FixZenkakuOthers'