;;; cp932.el --- CP932 coding system -*-coding: shift_jis;-*-

;; Copyright (C) 2004  ARISAWA Akihiro

;; Author: ARISAWA Akihiro <ari@mbf.sphere.ne.jp>
;; Keywords: languages, cp932, ms932, Windows-31J

;; This file is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.

;; This file 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 General Public License for more details.

;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING.  If not, write to
;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.

;;; Code:

(require 'ccl)

(eval-and-compile
  (defvar cp932-conversion-map
    `((115-116ku
       . [#x40
	  ,(make-char 'japanese-jisx0212 115 115) ; SMALL ROMAN NUMERAL ONE
	  ,(make-char 'japanese-jisx0212 115 116) ; SMALL ROMAN NUMERAL TWO
	  ,(make-char 'japanese-jisx0212 115 117) ; SMALL ROMAN NUMERAL THREE
	  ,(make-char 'japanese-jisx0212 115 118) ; SMALL ROMAN NUMERAL FOUR
	  ,(make-char 'japanese-jisx0212 115 119) ; SMALL ROMAN NUMERAL FIVE
	  ,(make-char 'japanese-jisx0212 115 120) ; SMALL ROMAN NUMERAL SIX
	  ,(make-char 'japanese-jisx0212 115 121) ; SMALL ROMAN NUMERAL SEVEN
	  ,(make-char 'japanese-jisx0212 115 122) ; SMALL ROMAN NUMERAL EIGHT
	  ,(make-char 'japanese-jisx0212 115 123) ; SMALL ROMAN NUMERAL NINE
	  ,(make-char 'japanese-jisx0212 115 124) ; SMALL ROMAN NUMERAL TEN
	  ,(make-char 'japanese-jisx0212 115 125) ; ROMAN NUMERAL ONE
	  ,(make-char 'japanese-jisx0212 115 126) ; ROMAN NUMERAL TWO
	  ,(make-char 'japanese-jisx0212 116 33) ; ROMAN NUMERAL THREE
	  ,(make-char 'japanese-jisx0212 116 34) ; ROMAN NUMERAL FOUR
	  ,(make-char 'japanese-jisx0212 116 35) ; ROMAN NUMERAL FIVE
	  ,(make-char 'japanese-jisx0212 116 36) ; ROMAN NUMERAL SIX
	  ,(make-char 'japanese-jisx0212 116 37) ; ROMAN NUMERAL SEVEN
	  ,(make-char 'japanese-jisx0212 116 38) ; ROMAN NUMERAL EIGHT
	  ,(make-char 'japanese-jisx0212 116 39) ; ROMAN NUMERAL NINE
	  ,(make-char 'japanese-jisx0212 116 40) ; ROMAN NUMERAL TEN
	  ,(make-char 'japanese-jisx0208 34 76) ; FULLWIDTH NOT SIGN
	  ,(make-char 'japanese-jisx0212 34 67) ; FULLWIDTH BROKEN BAR
	  ,(make-char 'japanese-jisx0212 116 41) ; FULLWIDTH APOSTROPHE
	  ,(make-char 'japanese-jisx0212 116 42) ; FULLWIDTH QUOTATION MARK
	  ,(make-char 'japanese-jisx0212 116 43) ; PARENTHESIZED IDEOGRAPH STOCK
	  ,(make-char 'japanese-jisx0212 116 44) ; NUMERO SIGN
	  ,(make-char 'japanese-jisx0212 116 45) ; TELEPHONE SIGN
	  ,(make-char 'japanese-jisx0208 34 104) ; BECAUSE
	  ,(make-char 'japanese-jisx0212 84 99)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 92 95)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 105) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 120) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 89 33)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 59)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 46) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 45)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 67 124) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 80) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 63)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 60 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 48 41)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 48 72)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 47) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 48 82)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 48 84)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 48 99)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 48 110) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 39)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 35)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 44)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 41)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 62)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 95)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 88)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 72)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 87)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 99)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 49 97)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 50 35)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 48) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 50 59)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 50 102) ; CJK UNIFIED IDEOGRAPH
	  nil
	  ,(make-char 'japanese-jisx0212 50 109) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 50 117) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 50 124) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 49) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 51 53)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 51 88)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 51 91)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 51 101) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 51 110) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 51 123) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 50) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 51) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 52 64)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 52 71)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 52 80)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 52 94)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 52) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 53 42)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 53) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 53 47)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 53 68)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 53 104) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 54) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 55 66)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 55 100) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 55 104) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 55 103) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 55) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 56) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 57) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 56 78)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 56 97)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 56 117) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 56 119) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 56 120) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 56 124) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 57 47)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 57 55)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 58 62)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 58 91)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 77 42)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 58 97)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 58) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 58 107) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 51)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 56)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 59) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 74)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 60) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 61) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 80)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 94)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 117) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 59 121) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 60 100) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 60 109) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 60 126) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 62) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 61 66)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 61 103) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 63) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 61 112) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 62 48)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 62 44)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 64) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 62 51)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 62 61)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 62 77)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 62 73)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 62 100) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 63 40)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 63 73)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 64 68)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 64 100) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 64 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 65 38)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 65) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 65 117) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 65 124) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 66) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 65 120) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 43)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 33)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 37)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 67) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 56)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 58)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 68) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 68)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 82)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 87)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 91)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 94)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 109) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 66 112) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 69) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 67 33)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 67 53)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 67 73)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 67 57)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 70) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 67 88)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 67 126) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 71) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 68 76)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 72) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 68 89)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 68 106) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 68 125) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 73) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 69 39)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 69 53)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 69 54)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 74) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 69 85)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 70 56)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 70 87)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 70 96)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 70 106) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 70 99)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 33)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 43)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 71)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 67)	; CJK UNIFIED IDEOGRAPH
	  ])
      (117-118ku
       . [#x40
	  ,(make-char 'japanese-jisx0212 71 75)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 79)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 89)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 75) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 76) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 102) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 110) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 124) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 107) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 71 112) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 72 49)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 72 101) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 72 120) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 38)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 43)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 45)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 77) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 74)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 83)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 105) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 99)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 124) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 73 117) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 78) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 74 51)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 74 61)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 74 111) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 74 113) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 46)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 79) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 74)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 102) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 106) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 112) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 110) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 37)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 75 121) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 43)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 46)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 45)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 50)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 66)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 80)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 76 89)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 80) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 77 59)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 81) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 78 59)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 82) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 78 58)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 78 67)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 83) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 78 114) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 51 93)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 79 85)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 79 98)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 79 105) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 79 109) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 84) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 85) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 86) ; CJK COMPATIBILITY IDEOGRAPH
	  nil
	  ,(make-char 'japanese-jisx0212 116 87) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 80 101) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 88) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 80 105) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 81 104) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 89) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 90) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 81 108) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 82 59)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 91) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 83 97)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 83 104) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 84 39)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 92) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 93) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 84 84)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 84 114) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 85 46)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 94) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 87 94)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 95) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 88 34)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 88 55)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 88 65)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 88 81)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 88 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 89 70)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 89 72)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 89 81)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 96) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 97) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 98) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 99) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 100) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 92 83)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 93 72)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 93 84)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 93 106) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 93 122) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 94 36)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 94 48)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 101) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 94 53)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 94 75)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 102) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 95 57)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 103) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 95 67)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 104) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 105) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 96 89)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 106) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 107) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 97 98)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 108) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 109) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 110) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 98 71)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 40)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 38)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 41)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 47)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 48)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 42)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 43)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 60)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 65)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 63)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 85)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 88)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 86)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 95)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 99)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 97)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 84)	; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 105) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 38) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 113) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 99 114) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 75) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 65) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 67) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 62) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 111) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 64) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 71) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 63) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 96) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 94) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 81) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 112) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 92) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 82) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 91) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 84) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 122) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 100 111) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 101 51) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 101 63) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 101 73) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 101 80) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 101 98) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 101 106) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 101 107) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 113) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 114) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 115) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 102 104) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 102 111) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 103 44) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 116) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 103 46) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 117) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 103 49) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 118) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 103 50) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 104 49) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 104 54) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 119) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 120) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 104 93) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 121) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 122) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 105 81) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 123) ; CJK UNIFIED IDEOGRAPH
	  ])
      (119ku
       . [#x40
	  ,(make-char 'japanese-jisx0212 105 109) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 106 77) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 124) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 106 91) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 106 102) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 106 106) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 107 37) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 107 123) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 107 122) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 125) ; CJK COMPATIBILITY IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 108 86) ; CJK UNIFIED IDEOGRAPH
	  ,(make-char 'japanese-jisx0212 116 126) ; CJK UNIFIED IDEOGRAPH
	  ])
      ))

  (defvar cp932-conversion-map-with-nec-character
    '((115-116ku
       . [#x40
	  ?��				; SMALL ROMAN NUMERAL ONE
	  ?��				; SMALL ROMAN NUMERAL TWO
	  ?��				; SMALL ROMAN NUMERAL THREE
	  ?��				; SMALL ROMAN NUMERAL FOUR
	  ?��				; SMALL ROMAN NUMERAL FIVE
	  ?��				; SMALL ROMAN NUMERAL SIX
	  ?��				; SMALL ROMAN NUMERAL SEVEN
	  ?��				; SMALL ROMAN NUMERAL EIGHT
	  ?��				; SMALL ROMAN NUMERAL NINE
	  ?��				; SMALL ROMAN NUMERAL TEN
	  ?�T				; ROMAN NUMERAL ONE
	  ?�U				; ROMAN NUMERAL TWO
	  ?�V				; ROMAN NUMERAL THREE
	  ?�W				; ROMAN NUMERAL FOUR
	  ?�X				; ROMAN NUMERAL FIVE
	  ?�Y				; ROMAN NUMERAL SIX
	  ?�Z				; ROMAN NUMERAL SEVEN
	  ?�[				; ROMAN NUMERAL EIGHT
	  ?�\				; ROMAN NUMERAL NINE
	  ?�]				; ROMAN NUMERAL TEN
	  ?��				; FULLWIDTH NOT SIGN
	  ?��				; FULLWIDTH BROKEN BAR
	  ?��				; FULLWIDTH APOSTROPHE
	  ?��				; FULLWIDTH QUOTATION MARK
	  ?��			       ; PARENTHESIZED IDEOGRAPH STOCK
	  ?��				; NUMERO SIGN
	  ?��				; TELEPHONE SIGN
	  ?��				; BECAUSE
	  ?�@				; CJK UNIFIED IDEOGRAPH
	  ?�A				; CJK UNIFIED IDEOGRAPH
	  ?�B				; CJK UNIFIED IDEOGRAPH
	  ?�C				; CJK UNIFIED IDEOGRAPH
	  ?�D				; CJK UNIFIED IDEOGRAPH
	  ?�E				; CJK UNIFIED IDEOGRAPH
	  ?�F				; CJK UNIFIED IDEOGRAPH
	  ?�G				; CJK UNIFIED IDEOGRAPH
	  ?�H				; CJK UNIFIED IDEOGRAPH
	  ?�I				; CJK UNIFIED IDEOGRAPH
	  ?�J				; CJK UNIFIED IDEOGRAPH
	  ?�K				; CJK UNIFIED IDEOGRAPH
	  ?�L				; CJK UNIFIED IDEOGRAPH
	  ?�M				; CJK UNIFIED IDEOGRAPH
	  ?�N				; CJK UNIFIED IDEOGRAPH
	  ?�O				; CJK UNIFIED IDEOGRAPH
	  ?�P				; CJK UNIFIED IDEOGRAPH
	  ?�Q				; CJK UNIFIED IDEOGRAPH
	  ?�R				; CJK UNIFIED IDEOGRAPH
	  ?�S				; CJK UNIFIED IDEOGRAPH
	  ?�T				; CJK UNIFIED IDEOGRAPH
	  ?�U				; CJK UNIFIED IDEOGRAPH
	  ?�V				; CJK UNIFIED IDEOGRAPH
	  ?�W				; CJK UNIFIED IDEOGRAPH
	  ?�X				; CJK UNIFIED IDEOGRAPH
	  ?�Y				; CJK UNIFIED IDEOGRAPH
	  ?�Z				; CJK UNIFIED IDEOGRAPH
	  ?�[				; CJK UNIFIED IDEOGRAPH
	  ?�\				; CJK UNIFIED IDEOGRAPH
	  ?�]				; CJK UNIFIED IDEOGRAPH
	  ?�^				; CJK UNIFIED IDEOGRAPH
	  ?�_				; CJK UNIFIED IDEOGRAPH
	  ?�`				; CJK UNIFIED IDEOGRAPH
	  ?�a				; CJK UNIFIED IDEOGRAPH
	  ?�b				; CJK UNIFIED IDEOGRAPH
	  nil
	  ?�c				; CJK UNIFIED IDEOGRAPH
	  ?�d				; CJK UNIFIED IDEOGRAPH
	  ?�e				; CJK UNIFIED IDEOGRAPH
	  ?�f				; CJK UNIFIED IDEOGRAPH
	  ?�g				; CJK UNIFIED IDEOGRAPH
	  ?�h				; CJK UNIFIED IDEOGRAPH
	  ?�i				; CJK UNIFIED IDEOGRAPH
	  ?�j				; CJK UNIFIED IDEOGRAPH
	  ?�k				; CJK UNIFIED IDEOGRAPH
	  ?�l				; CJK UNIFIED IDEOGRAPH
	  ?�m				; CJK UNIFIED IDEOGRAPH
	  ?�n				; CJK UNIFIED IDEOGRAPH
	  ?�o				; CJK UNIFIED IDEOGRAPH
	  ?�p				; CJK UNIFIED IDEOGRAPH
	  ?�q				; CJK UNIFIED IDEOGRAPH
	  ?�r				; CJK UNIFIED IDEOGRAPH
	  ?�s				; CJK COMPATIBILITY IDEOGRAPH
	  ?�t				; CJK UNIFIED IDEOGRAPH
	  ?�u				; CJK UNIFIED IDEOGRAPH
	  ?�v				; CJK UNIFIED IDEOGRAPH
	  ?�w				; CJK UNIFIED IDEOGRAPH
	  ?�x				; CJK UNIFIED IDEOGRAPH
	  ?�y				; CJK UNIFIED IDEOGRAPH
	  ?�z				; CJK UNIFIED IDEOGRAPH
	  ?�{				; CJK UNIFIED IDEOGRAPH
	  ?�|				; CJK UNIFIED IDEOGRAPH
	  ?�}				; CJK UNIFIED IDEOGRAPH
	  ?�~				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ])
      (117-118ku
       . [#x40
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?�@				; CJK UNIFIED IDEOGRAPH
	  ?�A				; CJK UNIFIED IDEOGRAPH
	  ?�B				; CJK COMPATIBILITY IDEOGRAPH
	  ?�C				; CJK UNIFIED IDEOGRAPH
	  ?�D				; CJK UNIFIED IDEOGRAPH
	  ?�E				; CJK UNIFIED IDEOGRAPH
	  ?�F				; CJK UNIFIED IDEOGRAPH
	  ?�G				; CJK UNIFIED IDEOGRAPH
	  ?�H				; CJK UNIFIED IDEOGRAPH
	  ?�I				; CJK UNIFIED IDEOGRAPH
	  ?�J				; CJK UNIFIED IDEOGRAPH
	  ?�K				; CJK UNIFIED IDEOGRAPH
	  ?�L				; CJK UNIFIED IDEOGRAPH
	  ?�M				; CJK UNIFIED IDEOGRAPH
	  ?�N				; CJK UNIFIED IDEOGRAPH
	  ?�O				; CJK UNIFIED IDEOGRAPH
	  ?�P				; CJK UNIFIED IDEOGRAPH
	  ?�Q				; CJK UNIFIED IDEOGRAPH
	  ?�R				; CJK UNIFIED IDEOGRAPH
	  ?�S				; CJK UNIFIED IDEOGRAPH
	  ?�T				; CJK UNIFIED IDEOGRAPH
	  ?�U				; CJK UNIFIED IDEOGRAPH
	  ?�V				; CJK UNIFIED IDEOGRAPH
	  ?�W				; CJK UNIFIED IDEOGRAPH
	  ?�X				; CJK UNIFIED IDEOGRAPH
	  ?�Y				; CJK COMPATIBILITY IDEOGRAPH
	  ?�Z				; CJK UNIFIED IDEOGRAPH
	  ?�[				; CJK UNIFIED IDEOGRAPH
	  ?�\				; CJK UNIFIED IDEOGRAPH
	  ?�]				; CJK UNIFIED IDEOGRAPH
	  ?�^				; CJK UNIFIED IDEOGRAPH
	  ?�_				; CJK UNIFIED IDEOGRAPH
	  ?�`				; CJK UNIFIED IDEOGRAPH
	  ?�a				; CJK COMPATIBILITY IDEOGRAPH
	  ?�b				; CJK COMPATIBILITY IDEOGRAPH
	  nil
	  ?�c				; CJK COMPATIBILITY IDEOGRAPH
	  ?�d				; CJK UNIFIED IDEOGRAPH
	  ?�e				; CJK COMPATIBILITY IDEOGRAPH
	  ?�f				; CJK UNIFIED IDEOGRAPH
	  ?�g				; CJK UNIFIED IDEOGRAPH
	  ?�h				; CJK UNIFIED IDEOGRAPH
	  ?�i				; CJK COMPATIBILITY IDEOGRAPH
	  ?�j				; CJK UNIFIED IDEOGRAPH
	  ?�k				; CJK UNIFIED IDEOGRAPH
	  ?�l				; CJK COMPATIBILITY IDEOGRAPH
	  ?�m				; CJK UNIFIED IDEOGRAPH
	  ?�n				; CJK UNIFIED IDEOGRAPH
	  ?�o				; CJK UNIFIED IDEOGRAPH
	  ?�p				; CJK UNIFIED IDEOGRAPH
	  ?�q				; CJK UNIFIED IDEOGRAPH
	  ?�r				; CJK UNIFIED IDEOGRAPH
	  ?�s				; CJK UNIFIED IDEOGRAPH
	  ?�t				; CJK UNIFIED IDEOGRAPH
	  ?�u				; CJK COMPATIBILITY IDEOGRAPH
	  ?�v				; CJK UNIFIED IDEOGRAPH
	  ?�w				; CJK UNIFIED IDEOGRAPH
	  ?�x				; CJK UNIFIED IDEOGRAPH
	  ?�y				; CJK UNIFIED IDEOGRAPH
	  ?�z				; CJK UNIFIED IDEOGRAPH
	  ?�{				; CJK UNIFIED IDEOGRAPH
	  ?�|				; CJK UNIFIED IDEOGRAPH
	  ?�}				; CJK UNIFIED IDEOGRAPH
	  ?�~				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?�				; CJK COMPATIBILITY IDEOGRAPH
	  ?�				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ])
      (119ku
       . [#x40
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK COMPATIBILITY IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ?��				; CJK UNIFIED IDEOGRAPH
	  ])
      ))

  (defun cp932-set-conversion-map (map)
    (register-code-conversion-map
     'cp932-115-116ku-conversion-map (cdr (assq '115-116ku map)))
    (register-code-conversion-map
     'cp932-117-118ku-conversion-map (cdr (assq '117-118ku map)))
    (register-code-conversion-map
     'cp932-119ku-conversion-map (cdr (assq '119ku map))))

  (cp932-set-conversion-map cp932-conversion-map-with-nec-character)
  )

(define-ccl-program ccl-cp932-decoder
  `(2
    (loop
     (read r0)
     (if (r0 <= #x7F)
	 ;; #x00 - #x7F (ASCII)
	 (write-repeat r0))
     (r2 = (r0 >= #xF0))
     (r2 = ((r0 <= #xF9) & r2))
     (r2 = ((r0 == #x80) | r2))
     (r2 = ((r0 == #xA0) | r2))
     (if ((r0 >= #xFD) | r2)
	 ;; #x80**, #xA0**, #xF0**-#xF9**, #xFD**-#xFF** (invalid)
	 (write-repeat r0))
     (r2 = (r0 >= #xA1))
     (if ((r0 <= #xDF) & r2)
	 ;; #xA1 - #xDF (katakana-jisx0201)
	 ((r1 = ,(charset-id 'katakana-jisx0201))
	  (r0 -= ,(- #xA1 33))
	  (write-multibyte-character r1 r0)
	  (repeat)))
     (r2 = (r0 >= #xFA))
     (if ((r0 <= #xFC) & r2)
	 ;; #xFA**-$xFC** (IBM extension characters)
	 ((read r1)
	  (r2 = 0)
	  (if (r0 == #xFA)
	      (map-single r2 r1 cp932-115-116ku-conversion-map)
	    (if (r0 == #xFB)
		(map-single r2 r1 cp932-117-118ku-conversion-map)
	      (map-single r2 r1 cp932-119ku-conversion-map)))
	  (if (r2 == -1)
	      ;; invalid
	      ((write r0 r1)
	       (repeat))
	    (write-repeat r1))))
     (read r1)
     (r2 = (r1 < #x40))
     (r2 |= (r1 == #x7F))
     (if ((r1 >= #xFD) | r2)
	 ;; #x**00 - #x**3F, #x**7F, #x**FD - #x**FF (invalid)
	 ((write r0 r1)
	  (repeat)))
     (r1 = (r0 de-sjis r1))
     (r0 = (r1 << 7))
     (r0 += r7)
     (r1 = ,(charset-id 'japanese-jisx0208))
     (write-multibyte-character r1 r0)
     (repeat))))

(define-ccl-program ccl-cp932-encoder
  `(1
    (loop
     (read-multibyte-character r1 r2)
     (r0 = (r1 == ,(charset-id 'ascii)))
     (if ((r1 == ,(charset-id 'latin-jisx0201)) | r0)
	 ((write-repeat r2)))
     (if (r1 == ,(charset-id 'katakana-jisx0201))
	 ((write (r2 + ,(- #xA1 33)))
	  (repeat)))
     (r0 = (r1 == ,(charset-id 'japanese-jisx0208)))
     (if ((r1 == ,(charset-id 'japanese-jisx0208-1978)) | r0)
	 ((r1 = (r2 >> 7))
	  (r2 &= #x7F)
	  (r1 = (r1 en-sjis r2))
	  (write r1 r7)
	  (repeat)))
     (write-repeat ??))))

(make-coding-system
 'cp932 4 ?S
 "CP932"
 '(ccl-cp932-decoder . ccl-cp932-encoder)
 '((valid-codes (0 . #xFC))))

(provide 'cp932)
;;; cp932.el ends here