]> git.eshelyaron.com Git - emacs.git/commitdiff
#
authorDave Love <fx@gnu.org>
Tue, 5 Jun 2001 20:25:29 +0000 (20:25 +0000)
committerDave Love <fx@gnu.org>
Tue, 5 Jun 2001 20:25:29 +0000 (20:25 +0000)
lisp/language/codepages.el [new file with mode: 0644]

diff --git a/lisp/language/codepages.el b/lisp/language/codepages.el
new file mode 100644 (file)
index 0000000..d9af9ee
--- /dev/null
@@ -0,0 +1,3869 @@
+;;; codepages.el --- coding systems for assorted codepages  -*-coding: utf-8;-*-
+
+;; Copyright (C) 2001  Free Software Foundation, Inc.
+
+;; Author: Dave Love <fx@gnu.org>
+;; Keywords: i18n
+
+;; 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.
+
+;;; Commentary:
+
+;; Definitions of miscellaneous 8-bit coding systems based on ASCII,
+;; mainly for PC `code pages'.  They are decoded into Latin-1 and
+;; mule-unicode character sets rather than (lossily) into single iso8859
+;; charsets.  A utility function `cp-make-coding-system' derives them
+;; from simple tables.
+
+;; Those covered are: cp437, cp775, cp850, cp851, cp852, cp855, cp857,
+;; cp860, cp861, cp862, cp863, cp864, cp865, cp866, cp869, cp874,
+;; windows-1250, windows-1251, windows-1252, windows-1253,
+;; windows-1254, windows-1255, windows-1256, windows-1257,
+;; windows-1258, next, koi8-r, koi8-u.
+
+;; Note that koi8-r and cp866 (alternativnyj) clash with the
+;; iso8859-5-based versions in cyrillic.el.  A few CPs from
+;; codepage.el aren't covered (in the absence of translation tables to
+;; Unicode).
+
+;; Compile this to avoid loading `ccl' at runtime.
+
+;;; Code:
+
+;; Re-written to allow nil in the vector.
+(defun make-translation-table-from-vector (vec)
+  "Make translation table from decoding vector VEC.
+VEC is an array of 256 elements to map unibyte codes to multibyte
+characters.  Elements may be nil for undefined code points.
+See also the variable `nonascii-translation-table'."
+  (let ((table (make-char-table 'translation-table))
+       (rev-table (make-char-table 'translation-table))
+       ch)
+    (dotimes (i 256)
+      (setq ch (aref vec i))
+      (when ch
+       (aset table i ch)
+       (if (>= ch 256)
+           (aset rev-table ch i))))
+    (set-char-table-extra-slot table 0 rev-table)
+    table))
+
+(defun cp-make-translation-table (v)
+  "Return a translation table made from 128-long vector V.
+V comprises characters encodable by mule-utf-8."
+  (let ((encoding-vector (make-vector 256 0))
+       (i 0)
+       translation-table)
+    (while (< i 128)
+      (aset encoding-vector i i)
+      (setq i (1+ i)))
+    (while (< i 160)
+      (aset encoding-vector i (aref v (- i 128)))
+      (setq i (1+ i)))
+    (while (< i 256)
+      (aset encoding-vector i (decode-char 'ucs i))
+      (setq i (1+ i)))
+    (make-translation-table-from-vector encoding-vector)))
+
+(defun cp-valid-codes (v)
+  "Derive a valid-codes list for translation vector V.
+See `make-coding-system'."
+  (let (pairs
+       (i 128)                         ; index into v
+       (start 0)                       ; start of a valid range
+       (end 127))                      ; end of a valid range
+    (while (< i 256)
+      (if (aref v (- i 128))           ; start or extend range
+         (progn
+           (setq end i)
+           (unless start (setq start i)))
+       (if start
+           (push (cons start end) pairs))
+       (setq start nil))
+      (setq i (1+ i)))
+    (if start (push (cons start end) pairs))
+    (nreverse pairs)))
+
+;; Macro to allow the ccl compilation at byte-compile time, avoiding
+;; loading ccl.
+(defmacro cp-make-coding-system (name v &optional doc-string mnemonic)
+  "Make coding system NAME for and 8-bit, extended-ASCII character set.
+V is a 128-long vector of characters to translate the upper half of
+the charactert set.  DOC-STRING and MNEMONIC are used as the
+corresponding args of `make-coding-system'.  If MNEMONIC isn't given,
+?D is used."
+  (let* ((encoder (intern (format "encode-%s" name)))
+        (decoder (intern (format "decode-%s" name)))
+        (ccl-decoder
+         (ccl-compile
+          `(4
+            ((loop
+              (read r1)
+              (if (r1 < 128) ;; ASCII
+                  (r0 = ,(charset-id 'ascii))
+                (if (r1 < 160)
+                    (r0 = ,(charset-id 'eight-bit-control))
+                  (r0 = ,(charset-id 'eight-bit-graphic))))
+              (translate-character ,decoder r0 r1)
+              (write-multibyte-character r0 r1)
+              (repeat))))))
+        (ccl-encoder
+         (ccl-compile
+          `(1
+            ((loop
+              (read-multibyte-character r0 r1)
+              (translate-character ,encoder r0 r1)
+              (write-repeat r1)))))))
+    `(let ((translation-table (cp-make-translation-table ,v)))
+       (define-translation-table ',decoder translation-table)
+       (define-translation-table ',encoder 
+        (char-table-extra-slot translation-table 0))
+       (make-coding-system
+       ',name 4 ,(or mnemonic ?D)
+       (or ,doc-string (format "%s encoding" ',name))
+       (cons ,ccl-decoder ,ccl-encoder)
+       (list (cons 'safe-chars (get ',encoder 'translation-table))
+             (cons 'valid-codes (cp-valid-codes translation-table))
+             (cons 'mime-charset ',name))))))
+
+
+;; These tables were mostly derived by running somthing like
+;; `recode -f cpxxx/..utf-8' on a binary file filled by
+;; `(dotimes (i 128) (insert ?? ?\\ (+ 128 i) ?\n))' and then
+;; exchanging the ?\� entries for nil.  iconv was used instead in at
+;; least one case.
+
+(cp-make-coding-system
+ cp437
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ä
+  ?\à
+  ?\å
+  ?\ç
+  ?\ê
+  ?\ë
+  ?\è
+  ?\ï
+  ?\î
+  ?\ì
+  ?\Ä
+  ?\Å
+  ?\É
+  ?\æ
+  ?\Æ
+  ?\ô
+  ?\ö
+  ?\ò
+  ?\û
+  ?\ù
+  ?\ÿ
+  ?\Ö
+  ?\Ü
+  ?\¢
+  ?\£
+  ?\¥
+  ?\₧
+  ?\ƒ
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\ñ
+  ?\Ñ
+  ?\ª
+  ?\º
+  ?\¿
+  ?\⌐
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¡
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\╡
+  ?\╢
+  ?\╖
+  ?\╕
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\╜
+  ?\╛
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\╞
+  ?\╟
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\╧
+  ?\╨
+  ?\╤
+  ?\╥
+  ?\╙
+  ?\╘
+  ?\╒
+  ?\╓
+  ?\╫
+  ?\╪
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\α
+  ?\ß
+  ?\Γ
+  ?\π
+  ?\Σ
+  ?\σ
+  ?\µ
+  ?\τ
+  ?\Φ
+  ?\Θ
+  ?\Ω
+  ?\δ
+  ?\∞
+  ?\φ
+  ?\ε
+  ?\∩
+  ?\≡
+  ?\±
+  ?\≥
+  ?\≤
+  ?\⌠
+  ?\⌡
+  ?\÷
+  ?\≈
+  ?\°
+  ?\·
+  ?\•
+  ?\√
+  ?\ⁿ
+  ?\²
+  ?\■
+  ?\ 
+  ]
+ )
+
+(cp-make-coding-system
+ cp775
+ [?\Ć
+  ?\ü
+  ?\é
+  ?\ā
+  ?\ä
+  ?\ģ
+  ?\å
+  ?\ć
+  ?\ł
+  ?\ē
+  ?\Ŗ
+  ?\ŗ
+  ?\ī
+  ?\Ź
+  ?\Ä
+  ?\Å
+  ?\É
+  ?\æ
+  ?\Æ
+  ?\ō
+  ?\ö
+  ?\Ģ
+  ?\¢
+  ?\Ś
+  ?\ś
+  ?\Ö
+  ?\Ü
+  ?\ø
+  ?\£
+  ?\Ø
+  ?\×
+  ?\¤
+  ?\Ā
+  ?\Ī
+  ?\ó
+  ?\Ż
+  ?\ż
+  ?\ź
+  ?\”
+  ?\¦
+  ?\©
+  ?\®
+  ?\¬
+  ?\½
+  ?\¼
+  ?\Ł
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\Ą
+  ?\Č
+  ?\Ę
+  ?\Ė
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\Į
+  ?\Š
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\Ų
+  ?\Ū
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\Ž
+  ?\ą
+  ?\č
+  ?\ę
+  ?\ė
+  ?\į
+  ?\š
+  ?\ų
+  ?\ū
+  ?\ž
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\Ó
+  ?\ß
+  ?\Ō
+  ?\Ń
+  ?\õ
+  ?\Õ
+  ?\µ
+  ?\ń
+  ?\Ķ
+  ?\ķ
+  ?\Ļ
+  ?\ļ
+  ?\ņ
+  ?\Ē
+  ?\Ņ
+  ?\’
+  ?\­
+  ?\±
+  ?\“
+  ?\¾
+  ?\¶
+  ?\§
+  ?\÷
+  ?\„
+  ?\°
+  ?\∙
+  ?\·
+  ?\¹
+  ?\³
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp850
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ä
+  ?\à
+  ?\å
+  ?\ç
+  ?\ê
+  ?\ë
+  ?\è
+  ?\ï
+  ?\î
+  ?\ì
+  ?\Ä
+  ?\Å
+  ?\É
+  ?\æ
+  ?\Æ
+  ?\ô
+  ?\ö
+  ?\ò
+  ?\û
+  ?\ù
+  ?\ÿ
+  ?\Ö
+  ?\Ü
+  ?\ø
+  ?\£
+  ?\Ø
+  ?\×
+  ?\ƒ
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\ñ
+  ?\Ñ
+  ?\ª
+  ?\º
+  ?\¿
+  ?\®
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¡
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\Á
+  ?\Â
+  ?\À
+  ?\©
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\¢
+  ?\¥
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\ã
+  ?\Ã
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\¤
+  ?\ð
+  ?\Ð
+  ?\Ê
+  ?\Ë
+  ?\È
+  ?\ı
+  ?\Í
+  ?\Î
+  ?\Ï
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\¦
+  ?\Ì
+  ?\▀
+  ?\Ó
+  ?\ß
+  ?\Ô
+  ?\Ò
+  ?\õ
+  ?\Õ
+  ?\µ
+  ?\þ
+  ?\Þ
+  ?\Ú
+  ?\Û
+  ?\Ù
+  ?\ý
+  ?\Ý
+  ?\¯
+  ?\´
+  ?\­
+  ?\±
+  ?\‗
+  ?\¾
+  ?\¶
+  ?\§
+  ?\÷
+  ?\¸
+  ?\°
+  ?\¨
+  ?\·
+  ?\¹
+  ?\³
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp851
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ä
+  ?\à
+  ?\Ά
+  ?\ç
+  ?\ê
+  ?\ë
+  ?\è
+  ?\ï
+  ?\î
+  ?\Έ
+  ?\Ä
+  ?\Ή
+  ?\Ί
+  nil
+  ?\Ό
+  ?\ô
+  ?\ö
+  ?\Ύ
+  ?\û
+  ?\ù
+  ?\Ώ
+  ?\Ö
+  ?\Ü
+  ?\ά
+  ?\£
+  ?\έ
+  ?\ή
+  ?\ί
+  ?\ϊ
+  ?\ΐ
+  ?\ό
+  ?\ύ
+  ?\Α
+  ?\Β
+  ?\Γ
+  ?\Δ
+  ?\Ε
+  ?\Ζ
+  ?\Η
+  ?\½
+  ?\Θ
+  ?\Ι
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\Κ
+  ?\Λ
+  ?\Ν
+  ?\Μ
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\Ξ
+  ?\Ο
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\Π
+  ?\Ρ
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\Σ
+  ?\Τ
+  ?\Υ
+  ?\Φ
+  ?\Χ
+  ?\Ψ
+  ?\Ω
+  ?\α
+  ?\β
+  ?\γ
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\δ
+  ?\ε
+  ?\▀
+  ?\ζ
+  ?\η
+  ?\θ
+  ?\ι
+  ?\κ
+  ?\λ
+  ?\μ
+  ?\ν
+  ?\ξ
+  ?\ο
+  ?\π
+  ?\ρ
+  ?\σ
+  ?\ς
+  ?\τ
+  ?\´
+  ?\­
+  ?\±
+  ?\υ
+  ?\φ
+  ?\χ
+  ?\§
+  ?\ψ
+  ?\˛
+  ?\°
+  ?\¨
+  ?\ω
+  ?\ϋ
+  ?\ΰ
+  ?\ώ
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp852
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ä
+  ?\ů
+  ?\ć
+  ?\ç
+  ?\ł
+  ?\ë
+  ?\Ő
+  ?\ő
+  ?\î
+  ?\Ź
+  ?\Ä
+  ?\Ć
+  ?\É
+  ?\Ĺ
+  ?\ĺ
+  ?\ô
+  ?\ö
+  ?\Ľ
+  ?\ľ
+  ?\Ś
+  ?\ś
+  ?\Ö
+  ?\Ü
+  ?\Ť
+  ?\ť
+  ?\Ł
+  ?\×
+  ?\č
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\Ą
+  ?\ą
+  ?\Ž
+  ?\ž
+  ?\Ę
+  ?\ę
+  ?\¬
+  ?\ź
+  ?\Č
+  ?\ş
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\Á
+  ?\Â
+  ?\Ě
+  ?\Ş
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\Ż
+  ?\ż
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\Ă
+  ?\ă
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\¤
+  ?\đ
+  ?\Đ
+  ?\Ď
+  ?\Ë
+  ?\ď
+  ?\Ň
+  ?\Í
+  ?\Î
+  ?\ě
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\Ţ
+  ?\Ů
+  ?\▀
+  ?\Ó
+  ?\ß
+  ?\Ô
+  ?\Ń
+  ?\ń
+  ?\ň
+  ?\Š
+  ?\š
+  ?\Ŕ
+  ?\Ú
+  ?\ŕ
+  ?\Ű
+  ?\ý
+  ?\Ý
+  ?\ţ
+  ?\´
+  ?\­
+  ?\˝
+  ?\˛
+  ?\ˇ
+  ?\˘
+  ?\§
+  ?\÷
+  ?\¸
+  ?\°
+  ?\¨
+  ?\˙
+  ?\ű
+  ?\Ř
+  ?\ř
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp855
+ [?\ђ
+  ?\Ђ
+  ?\ѓ
+  ?\Ѓ
+  ?\ё
+  ?\Ё
+  ?\є
+  ?\Є
+  ?\ѕ
+  ?\Ѕ
+  ?\і
+  ?\І
+  ?\ї
+  ?\Ї
+  ?\ј
+  ?\Ј
+  ?\љ
+  ?\Љ
+  ?\њ
+  ?\Њ
+  ?\ћ
+  ?\\93
+  ?\ќ
+  ?\Ќ
+  ?\ў
+  ?\Ў
+  ?\џ
+  ?\Џ
+  ?\ю
+  ?\Ю
+  ?\ъ
+  ?\Ъ
+  ?\а
+  ?\А
+  ?\б
+  ?\Б
+  ?\ц
+  ?\Ц
+  ?\д
+  ?\Д
+  ?\е
+  ?\Е
+  ?\ф
+  ?\Ф
+  ?\г
+  ?\Г
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\х
+  ?\Х
+  ?\и
+  ?\И
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\й
+  ?\Й
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\к
+  ?\К
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\¤
+  ?\л
+  ?\Л
+  ?\м
+  ?\М
+  ?\н
+  ?\Н
+  ?\о
+  ?\О
+  ?\п
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\П
+  ?\я
+  ?\▀
+  ?\Я
+  ?\р
+  ?\Р
+  ?\с
+  ?\С
+  ?\т
+  ?\Т
+  ?\у
+  ?\У
+  ?\ж
+  ?\Ж
+  ?\в
+  ?\В
+  ?\ь
+  ?\Ь
+  ?\´
+  ?\­
+  ?\ы
+  ?\Ы
+  ?\з
+  ?\З
+  ?\ш
+  ?\Ш
+  ?\э
+  ?\Э
+  ?\щ
+  ?\Щ
+  ?\ч
+  ?\Ч
+  nil
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp857
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ä
+  ?\à
+  ?\å
+  ?\ç
+  ?\ê
+  ?\ë
+  ?\è
+  ?\ï
+  ?\î
+  ?\ı
+  ?\Ä
+  ?\Å
+  ?\É
+  ?\æ
+  ?\Æ
+  ?\ô
+  ?\ö
+  ?\ò
+  ?\û
+  ?\ù
+  ?\İ
+  ?\Ö
+  ?\Ü
+  ?\ø
+  ?\£
+  ?\Ø
+  ?\Ş
+  ?\ş
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\ñ
+  ?\Ñ
+  ?\Ğ
+  ?\ğ
+  ?\¿
+  ?\®
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¡
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\Á
+  ?\Â
+  ?\À
+  ?\©
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\¢
+  ?\¥
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\ã
+  ?\Ã
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\¤
+  ?\º
+  ?\ª
+  ?\Ê
+  ?\Ë
+  ?\È
+  nil
+  ?\Í
+  ?\Î
+  ?\Ï
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\¦
+  ?\Ì
+  ?\▀
+  ?\Ó
+  ?\ß
+  ?\Ô
+  ?\Ò
+  ?\õ
+  ?\Õ
+  ?\µ
+  nil
+  ?\×
+  ?\Ú
+  ?\Û
+  ?\Ù
+  ?\ì
+  ?\ÿ
+  ?\—
+  ?\´
+  ?\­
+  ?\±
+  nil
+  ?\¾
+  ?\¶
+  ?\§
+  ?\÷
+  ?\˛
+  ?\°
+  ?\¨
+  ?\˙
+  ?\¹
+  ?\³
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp860
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ã
+  ?\à
+  ?\Á
+  ?\ç
+  ?\ê
+  ?\Ê
+  ?\è
+  ?\Î
+  ?\Ô
+  ?\ì
+  ?\Ã
+  ?\Â
+  ?\É
+  ?\À
+  ?\È
+  ?\ô
+  ?\õ
+  ?\ò
+  ?\Ú
+  ?\ù
+  ?\Ì
+  ?\Õ
+  ?\Ü
+  ?\¢
+  ?\£
+  ?\Ù
+  ?\₧
+  ?\Ò
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\ñ
+  ?\Ñ
+  ?\ª
+  ?\º
+  ?\¿
+  ?\Ó
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¡
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\╡
+  ?\╢
+  ?\╖
+  ?\╕
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\╜
+  ?\╛
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\╞
+  ?\╟
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\╧
+  ?\╨
+  ?\╤
+  ?\╥
+  ?\╙
+  ?\╘
+  ?\╒
+  ?\╓
+  ?\╫
+  ?\╪
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\α
+  ?\ß
+  ?\Γ
+  ?\π
+  ?\Σ
+  ?\σ
+  ?\µ
+  ?\τ
+  ?\Φ
+  ?\Θ
+  ?\Ω
+  ?\δ
+  ?\∞
+  ?\φ
+  ?\ε
+  ?\∩
+  ?\≡
+  ?\±
+  ?\≥
+  ?\≤
+  ?\⌠
+  ?\⌡
+  ?\÷
+  ?\≈
+  ?\°
+  ?\·
+  ?\•
+  ?\√
+  ?\ⁿ
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp861
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ä
+  ?\à
+  ?\å
+  ?\ç
+  ?\ê
+  ?\ë
+  ?\è
+  ?\Ð
+  ?\ð
+  ?\Þ
+  ?\Ä
+  ?\Å
+  ?\É
+  ?\æ
+  ?\Æ
+  ?\ô
+  ?\ö
+  ?\þ
+  ?\û
+  ?\Ý
+  ?\ý
+  ?\Ö
+  ?\Ü
+  ?\ø
+  ?\£
+  ?\Ø
+  ?\₧
+  ?\Ò
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\Á
+  ?\Í
+  ?\Ó
+  ?\Ú
+  ?\¿
+  nil
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¡
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\╡
+  ?\╢
+  ?\╖
+  ?\╕
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\╜
+  ?\╛
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\╞
+  ?\╟
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\╧
+  ?\╨
+  ?\╤
+  ?\╥
+  ?\╙
+  ?\╘
+  ?\╒
+  ?\╓
+  ?\╫
+  ?\╪
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\α
+  ?\ß
+  ?\Γ
+  ?\π
+  ?\Σ
+  ?\σ
+  ?\µ
+  ?\τ
+  ?\Φ
+  ?\Θ
+  ?\Ω
+  ?\δ
+  ?\∞
+  ?\φ
+  ?\ε
+  ?\∩
+  ?\≡
+  ?\±
+  ?\≥
+  ?\≤
+  ?\⌠
+  ?\⌡
+  ?\÷
+  ?\≈
+  ?\°
+  ?\·
+  ?\•
+  ?\√
+  ?\ⁿ
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp862
+ [?\א
+  ?\ב
+  ?\ג
+  ?\ד
+  ?\ה
+  ?\ו
+  ?\ז
+  ?\ח
+  ?\ט
+  ?\י
+  ?\ך
+  ?\כ
+  ?\ל
+  ?\ם
+  ?\מ
+  ?\ן
+  ?\נ
+  ?\ס
+  ?\ע
+  ?\ף
+  ?\פ
+  ?\ץ
+  ?\צ
+  ?\ק
+  ?\ר
+  ?\ש
+  ?\ת
+  ?\¢
+  ?\£
+  ?\Ù
+  ?\₧
+  ?\Ò
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\ñ
+  ?\Ñ
+  ?\ª
+  ?\º
+  ?\¿
+  nil
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¡
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\╡
+  ?\╢
+  ?\╖
+  ?\╕
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\╜
+  ?\╛
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\╞
+  ?\╟
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\╧
+  ?\╨
+  ?\╤
+  ?\╥
+  ?\╙
+  ?\╘
+  ?\╒
+  ?\╓
+  ?\╫
+  ?\╪
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\α
+  ?\ß
+  ?\Γ
+  ?\π
+  ?\Σ
+  ?\σ
+  ?\µ
+  ?\τ
+  ?\Φ
+  ?\Θ
+  ?\Ω
+  ?\δ
+  ?\∞
+  ?\φ
+  ?\ε
+  ?\∩
+  ?\≡
+  ?\±
+  ?\≥
+  ?\≤
+  ?\⌠
+  ?\⌡
+  ?\÷
+  ?\≈
+  ?\°
+  ?\·
+  ?\•
+  ?\√
+  ?\ⁿ
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp863
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\Â
+  ?\à
+  ?\¶
+  ?\ç
+  ?\ê
+  ?\ë
+  ?\è
+  ?\ï
+  ?\î
+  ?\ì
+  ?\À
+  ?\§
+  ?\É
+  ?\È
+  ?\Ê
+  ?\ô
+  ?\Ë
+  ?\Ï
+  ?\û
+  ?\ù
+  ?\¤
+  ?\Ô
+  ?\Ü
+  ?\¢
+  ?\£
+  ?\Ù
+  ?\Û
+  ?\ƒ
+  ?\¦
+  ?\´
+  ?\ó
+  ?\ú
+  ?\¨
+  ?\¸
+  ?\³
+  ?\¯
+  ?\Î
+  ?\⌐
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¾
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\╡
+  ?\╢
+  ?\╖
+  ?\╕
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\╜
+  ?\╛
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\╞
+  ?\╟
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\╧
+  ?\╨
+  ?\╤
+  ?\╥
+  ?\╙
+  ?\╘
+  ?\╒
+  ?\╓
+  ?\╫
+  ?\╪
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\α
+  ?\ß
+  ?\Γ
+  ?\π
+  ?\Σ
+  ?\σ
+  ?\µ
+  ?\τ
+  ?\Φ
+  ?\Θ
+  ?\Ω
+  ?\δ
+  ?\∞
+  ?\∅
+  ?\ε
+  ?\∩
+  ?\≡
+  ?\±
+  ?\≥
+  ?\≤
+  ?\⌠
+  ?\⌡
+  ?\÷
+  ?\≈
+  ?\∘
+  ?\·
+  ?\•
+  ?\√
+  ?\ⁿ
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp864
+ [?\°
+  ?\·
+  ?\∘
+  ?\√
+  ?\▒
+  ?\─
+  ?\│
+  ?\┼
+  ?\┤
+  ?\┬
+  ?\├
+  ?\┴
+  ?\┐
+  ?\┌
+  ?\└
+  ?\┘
+  ?\ß
+  ?\∞
+  ?\ø
+  ?\±
+  ?\½
+  ?\¼
+  ?\≈
+  ?\«
+  ?\»
+  ?\ﻷ
+  ?\ﻸ
+  nil
+  nil
+  ?\ﻻ
+  ?\ﻼ
+  ?\
+  nil
+  ?\­
+  ?\ﺂ
+  ?\£
+  ?\¤
+  ?\ﺄ
+  nil
+  nil
+  ?\ﺎ
+  ?\ب
+  ?\ت
+  ?\ث
+  ?\،
+  ?\ج
+  ?\ح
+  ?\خ
+  ?\٠
+  ?\١
+  ?\٢
+  ?\٣
+  ?\٤
+  ?\٥
+  ?\٦
+  ?\٧
+  ?\٨
+  ?\٩
+  ?\ڤ
+  ?\؛
+  ?\س
+  ?\ش
+  ?\ص
+  ?\؟
+  ?\¢
+  ?\ء
+  ?\آ
+  ?\أ
+  ?\ؤ
+  ?\ﻊ
+  ?\ئ
+  ?\ا
+  ?\ﺑ
+  ?\ة
+  ?\ﺗ
+  ?\ﺛ
+  ?\ﺟ
+  ?\ﺣ
+  ?\ﺧ
+  ?\د
+  ?\ذ
+  ?\ر
+  ?\ز
+  ?\ﺳ
+  ?\ﺷ
+  ?\ﺻ
+  ?\ﺿ
+  ?\ط
+  ?\ظ
+  ?\ﻋ
+  ?\ﻏ
+  ?\¦
+  ?\¬
+  ?\÷
+  ?\×
+  ?\ع
+  ?\ـ
+  ?\ﻒ
+  ?\ﻖ
+  ?\ﻛ
+  ?\ﻞ
+  ?\ﻣ
+  ?\ﻦ
+  ?\ﻫ
+  ?\و
+  ?\ى
+  ?\ﻳ
+  ?\ض
+  ?\ﻢ
+  ?\ﻎ
+  ?\غ
+  ?\م
+  ?\ﹽ
+  ?\ّ
+  ?\ن
+  ?\ه
+  ?\ﻬ
+  ?\ﻰ
+  ?\ﻲ
+  ?\ف
+  ?\ق
+  ?\ﻵ
+  ?\ﻶ
+  ?\ل
+  ?\ك
+  ?\ي
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp865
+ [?\Ç
+  ?\ü
+  ?\é
+  ?\â
+  ?\ä
+  ?\à
+  ?\å
+  ?\ç
+  ?\ê
+  ?\ë
+  ?\è
+  ?\ï
+  ?\î
+  ?\ì
+  ?\Ä
+  ?\Å
+  ?\É
+  ?\æ
+  ?\Æ
+  ?\ô
+  ?\ö
+  ?\ò
+  ?\û
+  ?\ù
+  ?\ÿ
+  ?\Ö
+  ?\Ü
+  ?\ø
+  ?\£
+  ?\Ø
+  ?\₧
+  ?\ƒ
+  ?\á
+  ?\í
+  ?\ó
+  ?\ú
+  ?\ñ
+  ?\Ñ
+  ?\ª
+  ?\º
+  ?\¿
+  ?\⌐
+  ?\¬
+  ?\½
+  ?\¼
+  ?\¡
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\╡
+  ?\╢
+  ?\╖
+  ?\╕
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\╜
+  ?\╛
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\╞
+  ?\╟
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\╧
+  ?\╨
+  ?\╤
+  ?\╥
+  ?\╙
+  ?\╘
+  ?\╒
+  ?\╓
+  ?\╫
+  ?\╪
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\α
+  ?\ß
+  ?\Γ
+  ?\π
+  ?\Σ
+  ?\σ
+  ?\µ
+  ?\τ
+  ?\Φ
+  ?\Θ
+  ?\Ω
+  ?\δ
+  ?\∞
+  ?\∅
+  ?\ε
+  ?\∩
+  ?\≡
+  ?\±
+  ?\≥
+  ?\≤
+  ?\⌠
+  ?\⌡
+  ?\÷
+  ?\≈
+  ?\∘
+  ?\·
+  ?\•
+  ?\√
+  ?\ⁿ
+  ?\²
+  ?\■
+  ?\ 
+  ])
+
+;; This should be the same as cyrillic-alternativnyj,
+;; (<URL:http://czyborra.com/charsets/cyrillic.html>), but code point
+;; 255 in the cyrillic.el alternativnyj table is `№', i.e. point 240
+;; in 8859-5, not no-break space as below; `№' should be at point 252.
+(cp-make-coding-system
+ cp866
+ [?\А
+  ?\Б
+  ?\В
+  ?\Г
+  ?\Д
+  ?\Е
+  ?\Ж
+  ?\З
+  ?\И
+  ?\Й
+  ?\К
+  ?\Л
+  ?\М
+  ?\Н
+  ?\О
+  ?\П
+  ?\Р
+  ?\С
+  ?\Т
+  ?\У
+  ?\Ф
+  ?\Х
+  ?\Ц
+  ?\Ч
+  ?\Ш
+  ?\Щ
+  ?\Ъ
+  ?\Ы
+  ?\Ь
+  ?\Э
+  ?\Ю
+  ?\Я
+  ?\а
+  ?\б
+  ?\в
+  ?\г
+  ?\д
+  ?\е
+  ?\ж
+  ?\з
+  ?\и
+  ?\й
+  ?\к
+  ?\л
+  ?\м
+  ?\н
+  ?\о
+  ?\п
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\╡
+  ?\╢
+  ?\╖
+  ?\╕
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\╜
+  ?\╛
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\╞
+  ?\╟
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\╧
+  ?\╨
+  ?\╤
+  ?\╥
+  ?\╙
+  ?\╘
+  ?\╒
+  ?\╓
+  ?\╫
+  ?\╪
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\▌
+  ?\▐
+  ?\▀
+  ?\р
+  ?\с
+  ?\т
+  ?\у
+  ?\ф
+  ?\х
+  ?\ц
+  ?\ч
+  ?\ш
+  ?\щ
+  ?\ъ
+  ?\ы
+  ?\ь
+  ?\э
+  ?\ю
+  ?\я
+  ?\Ё
+  ?\ё
+  ?\Є
+  ?\є
+  ?\Ї
+  ?\ї
+  ?\Ў
+  ?\ў
+  ?\°
+  ?\∙
+  ?\·
+  ?\√
+  ?\№
+  ?\¤
+  ?\■
+  ?\ 
+  ]
+ "CP866 (Cyrillic Alternativnyj) encoding using Unicode.")
+
+(cp-make-coding-system
+ cp869
+ [nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  ?\Ά
+  nil
+  ?\·
+  ?\¬
+  ?\¦
+  ?\‛
+  ?\’
+  ?\Έ
+  ?\—
+  ?\Ή
+  ?\Ί
+  ?\Ϊ
+  ?\Ό
+  nil
+  nil
+  ?\Ύ
+  ?\Ϋ
+  ?\©
+  ?\Ώ
+  ?\²
+  ?\³
+  ?\ά
+  ?\£
+  ?\έ
+  ?\ή
+  ?\ί
+  ?\ϊ
+  ?\ΐ
+  ?\ό
+  ?\ύ
+  ?\Α
+  ?\Β
+  ?\Γ
+  ?\Δ
+  ?\Ε
+  ?\Ζ
+  ?\Η
+  ?\½
+  ?\Θ
+  ?\Ι
+  ?\«
+  ?\»
+  ?\░
+  ?\▒
+  ?\▓
+  ?\│
+  ?\┤
+  ?\Κ
+  ?\Λ
+  ?\Μ
+  ?\Ν
+  ?\╣
+  ?\║
+  ?\╗
+  ?\╝
+  ?\Ξ
+  ?\Ο
+  ?\┐
+  ?\└
+  ?\┴
+  ?\┬
+  ?\├
+  ?\─
+  ?\┼
+  ?\Π
+  ?\Ρ
+  ?\╚
+  ?\╔
+  ?\╩
+  ?\╦
+  ?\╠
+  ?\═
+  ?\╬
+  ?\Σ
+  ?\Τ
+  ?\Υ
+  ?\Φ
+  ?\Χ
+  ?\Ψ
+  ?\Ω
+  ?\α
+  ?\β
+  ?\γ
+  ?\┘
+  ?\┌
+  ?\█
+  ?\▄
+  ?\δ
+  ?\ε
+  ?\▀
+  ?\ζ
+  ?\η
+  ?\θ
+  ?\ι
+  ?\κ
+  ?\λ
+  ?\μ
+  ?\ν
+  ?\ξ
+  ?\ο
+  ?\π
+  ?\ρ
+  ?\σ
+  ?\ς
+  ?\τ
+  ?\´
+  ?\­
+  ?\±
+  ?\υ
+  ?\φ
+  ?\χ
+  ?\§
+  ?\ψ
+  ?\΅
+  ?\°
+  ?\¨
+  ?\ω
+  ?\ϋ
+  ?\ΰ
+  ?\ώ
+  ?\■
+  ?\ 
+  ])
+
+(cp-make-coding-system
+ cp874
+ [?\€
+  nil
+  nil
+  nil
+  nil
+  ?\…
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  ?\ 
+  ?\ก
+  ?\ข
+  ?\ฃ
+  ?\ค
+  ?\ฅ
+  ?\ฆ
+  ?\ง
+  ?\จ
+  ?\ฉ
+  ?\ช
+  ?\ซ
+  ?\ฌ
+  ?\ญ
+  ?\ฎ
+  ?\ฏ
+  ?\ฐ
+  ?\ฑ
+  ?\ฒ
+  ?\ณ
+  ?\ด
+  ?\ต
+  ?\ถ
+  ?\ท
+  ?\ธ
+  ?\น
+  ?\บ
+  ?\ป
+  ?\ผ
+  ?\ฝ
+  ?\พ
+  ?\ฟ
+  ?\ภ
+  ?\ม
+  ?\ย
+  ?\ร
+  ?\ฤ
+  ?\ล
+  ?\ฦ
+  ?\ว
+  ?\ศ
+  ?\ษ
+  ?\ส
+  ?\ห
+  ?\ฬ
+  ?\อ
+  ?\ฮ
+  ?\ฯ
+  ?\ะ
+  ?\ั
+  ?\า
+  ?\ำ
+  ?\ิ
+  ?\ี
+  ?\ึ
+  ?\ื
+  ?\ุ
+  ?\ู
+  ?\ฺ
+  nil
+  nil
+  nil
+  nil
+  ?\฿
+  ?\เ
+  ?\แ
+  ?\โ
+  ?\ใ
+  ?\ไ
+  ?\ๅ
+  ?\ๆ
+  ?\็
+  ?\่
+  ?\้
+  ?\๊
+  ?\๋
+  ?\์
+  ?\ํ
+  ?\๎
+  ?\๏
+  ?\๐
+  ?\๑
+  ?\๒
+  ?\๓
+  ?\๔
+  ?\๕
+  ?\๖
+  ?\๗
+  ?\๘
+  ?\๙
+  ?\๚
+  ?\๛
+  nil
+  nil
+  nil
+  nil])
+
+(cp-make-coding-system
+ windows-1250
+ [?\€
+  nil
+  ?\‚
+  nil
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  nil
+  ?\‰
+  ?\Š
+  ?\‹
+  ?\Ś
+  ?\Ť
+  ?\Ž
+  ?\Ź
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  nil
+  ?\™
+  ?\š
+  ?\›
+  ?\ś
+  ?\ť
+  ?\ž
+  ?\ź
+  ?\ 
+  ?\ˇ
+  ?\˘
+  ?\Ł
+  ?\¤
+  ?\Ą
+  ?\¦
+  ?\§
+  ?\¨
+  ?\©
+  ?\Ş
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\Ż
+  ?\°
+  ?\±
+  ?\˛
+  ?\ł
+  ?\´
+  ?\µ
+  ?\¶
+  ?\·
+  ?\¸
+  ?\ą
+  ?\ş
+  ?\»
+  ?\Ľ
+  ?\˝
+  ?\ľ
+  ?\ż
+  ?\Ŕ
+  ?\Á
+  ?\Â
+  ?\Ă
+  ?\Ä
+  ?\Ĺ
+  ?\Ć
+  ?\Ç
+  ?\Č
+  ?\É
+  ?\Ę
+  ?\Ë
+  ?\Ě
+  ?\Í
+  ?\Î
+  ?\Ď
+  ?\Đ
+  ?\Ń
+  ?\Ň
+  ?\Ó
+  ?\Ô
+  ?\Ő
+  ?\Ö
+  ?\×
+  ?\Ř
+  ?\Ů
+  ?\Ú
+  ?\Ű
+  ?\Ü
+  ?\Ý
+  ?\Ţ
+  ?\ß
+  ?\ŕ
+  ?\á
+  ?\â
+  ?\ă
+  ?\ä
+  ?\ĺ
+  ?\ć
+  ?\ç
+  ?\č
+  ?\é
+  ?\ę
+  ?\ë
+  ?\ě
+  ?\í
+  ?\î
+  ?\ď
+  ?\đ
+  ?\ń
+  ?\ň
+  ?\ó
+  ?\ô
+  ?\ő
+  ?\ö
+  ?\÷
+  ?\ř
+  ?\ů
+  ?\ú
+  ?\ű
+  ?\ü
+  ?\ý
+  ?\ţ
+  ?\˙]
+ "CP1250/Windows-1250 Encoding")
+
+(cp-make-coding-system
+ windows-1251
+ [?\Ђ
+  ?\Ѓ
+  ?\‚
+  ?\ѓ
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  ?\€
+  ?\‰
+  ?\Љ
+  ?\‹
+  ?\Њ
+  ?\Ќ
+  ?\Ћ
+  ?\Џ
+  ?\ђ
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  nil
+  ?\™
+  ?\љ
+  ?\›
+  ?\њ
+  ?\ќ
+  ?\ћ
+  ?\џ
+  ?\ 
+  ?\Ў
+  ?\ў
+  ?\Ј
+  ?\¤
+  ?\Ґ
+  ?\¦
+  ?\§
+  ?\Ё
+  ?\©
+  ?\Є
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\Ї
+  ?\°
+  ?\±
+  ?\І
+  ?\і
+  ?\ґ
+  ?\µ
+  ?\¶
+  ?\·
+  ?\ё
+  ?\№
+  ?\є
+  ?\»
+  ?\ј
+  ?\Ѕ
+  ?\ѕ
+  ?\ї
+  ?\А
+  ?\Б
+  ?\В
+  ?\Г
+  ?\Д
+  ?\Е
+  ?\Ж
+  ?\З
+  ?\И
+  ?\Й
+  ?\К
+  ?\Л
+  ?\М
+  ?\Н
+  ?\О
+  ?\П
+  ?\Р
+  ?\С
+  ?\Т
+  ?\У
+  ?\Ф
+  ?\Х
+  ?\Ц
+  ?\Ч
+  ?\Ш
+  ?\Щ
+  ?\Ъ
+  ?\Ы
+  ?\Ь
+  ?\Э
+  ?\Ю
+  ?\Я
+  ?\а
+  ?\б
+  ?\в
+  ?\г
+  ?\д
+  ?\е
+  ?\ж
+  ?\з
+  ?\и
+  ?\й
+  ?\к
+  ?\л
+  ?\м
+  ?\н
+  ?\о
+  ?\п
+  ?\р
+  ?\с
+  ?\т
+  ?\у
+  ?\ф
+  ?\х
+  ?\ц
+  ?\ч
+  ?\ш
+  ?\щ
+  ?\ъ
+  ?\ы
+  ?\ь
+  ?\э
+  ?\ю
+  ?\я]
+ "CP1251/Windows-1251 Encoding")
+
+(cp-make-coding-system
+ windows-1252
+ [?\€
+  nil
+  ?\‚
+  ?\ƒ
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  ?\ˆ
+  ?\‰
+  ?\Š
+  ?\‹
+  ?\Œ
+  nil
+  ?\Ž
+  ?\ž
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  ?\˜
+  ?\™
+  ?\š
+  ?\›
+  ?\œ
+  nil
+  nil
+  ?\Ÿ
+  ?\ 
+  ?\¡
+  ?\¢
+  ?\£
+  ?\¤
+  ?\¥
+  ?\¦
+  ?\§
+  ?\¨
+  ?\©
+  ?\ª
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\¯
+  ?\°
+  ?\±
+  ?\²
+  ?\³
+  ?\´
+  ?\µ
+  ?\¶
+  ?\·
+  ?\¸
+  ?\¹
+  ?\º
+  ?\»
+  ?\¼
+  ?\½
+  ?\¾
+  ?\¿
+  ?\À
+  ?\Á
+  ?\Â
+  ?\Ã
+  ?\Ä
+  ?\Å
+  ?\Æ
+  ?\Ç
+  ?\È
+  ?\É
+  ?\Ê
+  ?\Ë
+  ?\Ì
+  ?\Í
+  ?\Î
+  ?\Ï
+  ?\Ð
+  ?\Ñ
+  ?\Ò
+  ?\Ó
+  ?\Ô
+  ?\Õ
+  ?\Ö
+  ?\×
+  ?\Ø
+  ?\Ù
+  ?\Ú
+  ?\Û
+  ?\Ü
+  ?\Ý
+  ?\Þ
+  ?\ß
+  ?\à
+  ?\á
+  ?\â
+  ?\ã
+  ?\ä
+  ?\å
+  ?\æ
+  ?\ç
+  ?\è
+  ?\é
+  ?\ê
+  ?\ë
+  ?\ì
+  ?\í
+  ?\î
+  ?\ï
+  ?\ð
+  ?\ñ
+  ?\ò
+  ?\ó
+  ?\ô
+  ?\õ
+  ?\ö
+  ?\÷
+  ?\ø
+  ?\ù
+  ?\ú
+  ?\û
+  ?\ü
+  ?\ý
+  ?\þ
+  ?\ÿ]
+ "CP1252/Windows-1252 (Western) Encoding")
+
+(cp-make-coding-system
+ windows-1253
+ [?\€
+  nil
+  ?\‚
+  ?\ƒ
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  nil
+  ?\‰
+  nil
+  ?\‹
+  nil
+  nil
+  nil
+  nil
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  nil
+  ?\™
+  nil
+  ?\›
+  nil
+  nil
+  nil
+  nil
+  ?\ 
+  ?\΅
+  ?\Ά
+  ?\£
+  ?\¤
+  ?\¥
+  ?\¦
+  ?\§
+  ?\¨
+  ?\©
+  nil
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\―
+  ?\°
+  ?\±
+  ?\²
+  ?\³
+  ?\΄
+  ?\µ
+  ?\¶
+  ?\·
+  ?\Έ
+  ?\Ή
+  ?\Ί
+  ?\»
+  ?\Ό
+  ?\½
+  ?\Ύ
+  ?\Ώ
+  ?\ΐ
+  ?\Α
+  ?\Β
+  ?\Γ
+  ?\Δ
+  ?\Ε
+  ?\Ζ
+  ?\Η
+  ?\Θ
+  ?\Ι
+  ?\Κ
+  ?\Λ
+  ?\Μ
+  ?\Ν
+  ?\Ξ
+  ?\Ο
+  ?\Π
+  ?\Ρ
+  nil
+  ?\Σ
+  ?\Τ
+  ?\Υ
+  ?\Φ
+  ?\Χ
+  ?\Ψ
+  ?\Ω
+  ?\Ϊ
+  ?\Ϋ
+  ?\ά
+  ?\έ
+  ?\ή
+  ?\ί
+  ?\ΰ
+  ?\α
+  ?\β
+  ?\γ
+  ?\δ
+  ?\ε
+  ?\ζ
+  ?\η
+  ?\θ
+  ?\ι
+  ?\κ
+  ?\λ
+  ?\μ
+  ?\ν
+  ?\ξ
+  ?\ο
+  ?\π
+  ?\ρ
+  ?\ς
+  ?\σ
+  ?\τ
+  ?\υ
+  ?\φ
+  ?\χ
+  ?\ψ
+  ?\ω
+  ?\ϊ
+  ?\ϋ
+  ?\ό
+  ?\ύ
+  ?\ώ
+  nil]
+ "CP1253/Windows-1253 Encoding")
+
+(cp-make-coding-system
+ windows-1254
+ [?\€
+  nil
+  ?\‚
+  ?\ƒ
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  ?\ˆ
+  ?\‰
+  ?\Š
+  ?\‹
+  ?\Œ
+  nil
+  nil
+  nil
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  ?\˜
+  ?\™
+  ?\š
+  ?\›
+  ?\œ
+  nil
+  nil
+  ?\Ÿ
+  ?\ 
+  ?\¡
+  ?\¢
+  ?\£
+  ?\¤
+  ?\¥
+  ?\¦
+  ?\§
+  ?\¨
+  ?\©
+  ?\ª
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\¯
+  ?\°
+  ?\±
+  ?\²
+  ?\³
+  ?\´
+  ?\µ
+  ?\¶
+  ?\·
+  ?\¸
+  ?\¹
+  ?\º
+  ?\»
+  ?\¼
+  ?\½
+  ?\¾
+  ?\¿
+  ?\À
+  ?\Á
+  ?\Â
+  ?\Ã
+  ?\Ä
+  ?\Å
+  ?\Æ
+  ?\Ç
+  ?\È
+  ?\É
+  ?\Ê
+  ?\Ë
+  ?\Ì
+  ?\Í
+  ?\Î
+  ?\Ï
+  ?\Ğ
+  ?\Ñ
+  ?\Ò
+  ?\Ó
+  ?\Ô
+  ?\Õ
+  ?\Ö
+  ?\×
+  ?\Ø
+  ?\Ù
+  ?\Ú
+  ?\Û
+  ?\Ü
+  ?\İ
+  ?\Ş
+  ?\ß
+  ?\à
+  ?\á
+  ?\â
+  ?\ã
+  ?\ä
+  ?\å
+  ?\æ
+  ?\ç
+  ?\è
+  ?\é
+  ?\ę
+  ?\ë
+  ?\ė
+  ?\í
+  ?\î
+  ?\ī
+  ?\ğ
+  ?\ñ
+  ?\ò
+  ?\ó
+  ?\ô
+  ?\õ
+  ?\ö
+  ?\÷
+  ?\ø
+  ?\ù
+  ?\ú
+  ?\û
+  ?\ü
+  ?\ı
+  ?\ş
+  ?\ÿ]
+"CP1254/Windows-1254 Encoding")
+
+(cp-make-coding-system
+ windows-1255
+ [?\€
+  nil
+  ?\‚
+  ?\ƒ
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  nil
+  ?\‰
+  nil
+  ?\‹
+  nil
+  nil
+  nil
+  nil
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  nil
+  ?\™
+  nil
+  ?\›
+  nil
+  nil
+  nil
+  nil
+  ?\ 
+  nil
+  ?\¢
+  ?\£
+  ?\¤
+  ?\¥
+  ?\¦
+  ?\§
+  ?\¨
+  ?\©
+  ?\×
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\‾
+  ?\°
+  ?\±
+  ?\²
+  ?\³
+  ?\´
+  ?\µ
+  ?\¶
+  ?\·
+  ?\¸
+  ?\¹
+  ?\÷
+  ?\»
+  ?\¼
+  ?\½
+  ?\¾
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  nil
+  ?\‗
+  ?\א
+  ?\ב
+  ?\ג
+  ?\ד
+  ?\ה
+  ?\ו
+  ?\ז
+  ?\ח
+  ?\ט
+  ?\י
+  ?\ך
+  ?\כ
+  ?\ל
+  ?\ם
+  ?\מ
+  ?\ן
+  ?\נ
+  ?\ס
+  ?\ע
+  ?\ף
+  ?\פ
+  ?\ץ
+  ?\צ
+  ?\ק
+  ?\ר
+  ?\ש
+  ?\ת
+  nil
+  nil
+  ?\‎
+  ?\‏
+  nil]
+ "CP1255/Windows-1255 Encoding")
+
+(cp-make-coding-system
+ windows-1256
+ [?\€
+  ?\٠
+  ?\‚
+  ?\١
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  ?\٢
+  ?\٣
+  ?\٤
+  ?\‹
+  ?\٥
+  ?\٦
+  ?\٧
+  ?\٨
+  ?\٩
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  ?\؛
+  ?\™
+  ?\؟
+  ?\›
+  ?\ء
+  ?\آ
+  ?\أ
+  ?\Ÿ
+  ?\ 
+  ?\ؤ
+  ?\إ
+  ?\£
+  ?\¤
+  ?\ئ
+  ?\¦
+  ?\§
+  ?\ا
+  ?\©
+  ?\ب
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\پ
+  ?\°
+  ?\±
+  ?\ة
+  ?\ت
+  ?\ث
+  ?\µ
+  ?\¶
+  ?\·
+  ?\ج
+  ?\چ
+  ?\ح
+  ?\»
+  ?\خ
+  ?\د
+  ?\ذ
+  ?\ر
+  ?\À
+  ?\ز
+  ?\Â
+  ?\ژ
+  ?\س
+  ?\ش
+  ?\ص
+  ?\Ç
+  ?\È
+  ?\É
+  ?\Ê
+  ?\Ë
+  ?\ض
+  ?\ط
+  ?\Î
+  ?\Ï
+  ?\ㄓ
+  ?\ع
+  ?\غ
+  ?\ـ
+  ?\Ô
+  ?\ف
+  ?\ق
+  ?\×
+  ?\ك
+  ?\Ù
+  ?\گ
+  ?\Û
+  ?\Ü
+  ?\ل
+  ?\م
+  ?\ن
+  ?\à
+  ?\ه
+  ?\â
+  ?\ځ
+  ?\و
+  ?\ى
+  ?\ي
+  ?\ç
+  ?\è
+  ?\é
+  ?\ê
+  ?\ë
+  ?\ً
+  ?\ٌ
+  ?\î
+  ?\ï
+  ?\ٍ
+  ?\َ
+  ?\ُ
+  ?\ِ
+  ?\ô
+  ?\ّ
+  ?\ْ
+  ?\÷
+  nil
+  ?\ù
+  nil
+  ?\û
+  ?\ü
+  ?\‎
+  ?\‏
+  ?\ÿ]
+ "CP1256/Windows-1256 Encoding")
+
+(cp-make-coding-system
+ windows-1257
+ [?\€
+  nil
+  ?\‚
+  nil
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  nil
+  ?\‰
+  nil
+  ?\‹
+  nil
+  nil
+  nil
+  nil
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  nil
+  ?\™
+  nil
+  ?\›
+  nil
+  nil
+  nil
+  nil
+  ?\ 
+  nil
+  ?\¢
+  ?\£
+  ?\¤
+  nil
+  ?\¦
+  ?\§
+  ?\Ø
+  ?\©
+  ?\Ŗ
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\Æ
+  ?\°
+  ?\±
+  ?\²
+  ?\³
+  nil
+  ?\µ
+  ?\¶
+  ?\·
+  ?\ø
+  ?\¹
+  ?\ŗ
+  ?\»
+  ?\¼
+  ?\½
+  ?\¾
+  ?\æ
+  ?\Ą
+  ?\Į
+  ?\Ā
+  ?\Ć
+  ?\Ä
+  ?\Å
+  ?\Ę
+  ?\Ē
+  ?\Č
+  ?\É
+  ?\Ź
+  ?\Ė
+  ?\Ģ
+  ?\Ķ
+  ?\Ī
+  ?\Ļ
+  ?\Š
+  ?\Ń
+  ?\Ņ
+  ?\Ó
+  ?\Ō
+  ?\Õ
+  ?\Ö
+  ?\×
+  ?\Ų
+  ?\Ł
+  ?\Ś
+  ?\Ū
+  ?\Ü
+  ?\Ż
+  ?\Ž
+  ?\ß
+  ?\ą
+  ?\į
+  ?\ā
+  ?\ć
+  ?\ä
+  ?\å
+  ?\ę
+  ?\ē
+  ?\č
+  ?\é
+  ?\ź
+  ?\ė
+  ?\ģ
+  ?\ķ
+  ?\ī
+  ?\ļ
+  ?\š
+  ?\ń
+  ?\ņ
+  ?\ó
+  ?\ō
+  ?\õ
+  ?\ö
+  ?\÷
+  ?\ų
+  ?\ł
+  ?\ś
+  ?\ū
+  ?\ü
+  ?\ż
+  ?\ž
+  nil]
+ "CP1257/Windows-1257 Encoding")
+
+(cp-make-coding-system
+ windows-1258
+ [?\€
+  nil
+  ?\‚
+  ?\ƒ
+  ?\„
+  ?\…
+  ?\†
+  ?\‡
+  ?\ˆ
+  ?\‰
+  nil
+  ?\‹
+  ?\Œ
+  nil
+  nil
+  nil
+  nil
+  ?\‘
+  ?\’
+  ?\“
+  ?\”
+  ?\•
+  ?\–
+  ?\—
+  ?\˜
+  ?\™
+  nil
+  ?\›
+  ?\œ
+  nil
+  nil
+  ?\Ÿ
+  ?\ 
+  ?\¡
+  ?\¢
+  ?\£
+  ?\¤
+  ?\¥
+  ?\¦
+  ?\§
+  ?\¨
+  ?\©
+  ?\ª
+  ?\«
+  ?\¬
+  ?\­
+  ?\®
+  ?\¯
+  ?\°
+  ?\±
+  ?\²
+  ?\³
+  ?\´
+  ?\µ
+  ?\¶
+  ?\·
+  ?\¸
+  ?\¹
+  ?\º
+  ?\»
+  ?\¼
+  ?\½
+  ?\¾
+  ?\¿
+  ?\À
+  ?\Á
+  ?\Â
+  ?\Ă
+  ?\Ä
+  ?\Å
+  ?\Æ
+  ?\Ç
+  ?\È
+  ?\É
+  ?\Ê
+  ?\Ë
+  ?\̀
+  ?\Í
+  ?\Î
+  ?\Ï
+  ?\Đ
+  ?\Ñ
+  ?\̉
+  ?\Ó
+  ?\Ô
+  ?\Ơ
+  ?\Ö
+  ?\×
+  ?\Ø
+  ?\Ù
+  ?\Ú
+  ?\Û
+  ?\Ü
+  ?\Ư
+  ?\̃
+  ?\ß
+  ?\à
+  ?\á
+  ?\â
+  ?\ă
+  ?\ä
+  ?\å
+  ?\æ
+  ?\ç
+  ?\è
+  ?\é
+  ?\ê
+  ?\ë
+  ?\́
+  ?\í
+  ?\î
+  ?\ï
+  ?\đ
+  ?\ñ
+  ?\̣
+  ?\ó
+  ?\ô
+  ?\ơ
+  ?\ö
+  ?\÷
+  ?\ø
+  ?\ù
+  ?\ú
+  ?\û
+  ?\ü
+  ?\ư
+  ?\₫
+  ?\ÿ]
+ "CP1258/Windows-1258 Encoding")
+
+(cp-make-coding-system
+ next
+ [?\ 
+  ?\À
+  ?\Á
+  ?\Â
+  ?\Ã
+  ?\Ä
+  ?\Å
+  ?\Ç
+  ?\È
+  ?\É
+  ?\Ê
+  ?\Ë
+  ?\Ì
+  ?\Í
+  ?\Î
+  ?\Ï
+  ?\Ð
+  ?\Ñ
+  ?\Ò
+  ?\Ó
+  ?\Ô
+  ?\Õ
+  ?\Ö
+  ?\Ù
+  ?\Ú
+  ?\Û
+  ?\Ü
+  ?\Ý
+  ?\Þ
+  ?\µ
+  ?\×
+  ?\÷
+  ?\©
+  ?\¡
+  ?\¢
+  ?\£
+  ?\⁄
+  ?\¥
+  ?\ƒ
+  ?\§
+  ?\¤
+  nil
+  ?\“
+  ?\«
+  nil
+  nil
+  ?\fi
+  ?\fl
+  ?\®
+  ?\–
+  ?\†
+  ?\‡
+  ?\·
+  ?\¦
+  ?\¶
+  ?\•
+  nil
+  nil
+  ?\”
+  ?\»
+  ?\…
+  ?\‰
+  ?\¬
+  ?\¿
+  ?\¹
+  ?\ˋ
+  ?\´
+  ?\ˆ
+  ?\˜
+  ?\¯
+  ?\˘
+  ?\˙
+  ?\¨
+  ?\²
+  ?\˚
+  ?\¸
+  ?\³
+  ?\˝
+  ?\˛
+  ?\ˇ
+  ?\—
+  ?\±
+  ?\¼
+  ?\½
+  ?\¾
+  ?\à
+  ?\á
+  ?\â
+  ?\ã
+  ?\ä
+  ?\å
+  ?\ç
+  ?\è
+  ?\é
+  ?\ê
+  ?\ë
+  ?\ì
+  ?\Æ
+  ?\í
+  ?\ª
+  ?\î
+  ?\ï
+  ?\ð
+  ?\ñ
+  ?\Ł
+  ?\Ø
+  ?\Œ
+  ?\º
+  ?\ò
+  ?\ó
+  ?\ô
+  ?\õ
+  ?\ö
+  ?\æ
+  ?\ù
+  ?\ú
+  ?\û
+  ?\ı
+  ?\ü
+  ?\ý
+  ?\ł
+  ?\ø
+  ?\œ
+  ?\ß
+  ?\þ
+  ?\ÿ
+  nil
+  nil]
+ "NeXTstep encoding." ?N)
+
+(cp-make-coding-system
+ koi8-u
+ [?\─
+  ?\│
+  ?\┌
+  ?\┐
+  ?\└
+  ?\┘
+  ?\├
+  ?\┤
+  ?\┬
+  ?\┴
+  ?\┼
+  ?\▀
+  ?\▄
+  ?\█
+  ?\▌
+  ?\▐
+  ?\░
+  ?\▒
+  ?\▓
+  ?\⌠
+  ?\■
+  ?\∙
+  ?\√
+  ?\≈
+  ?\≤
+  ?\≥
+  ?\ 
+  ?\⌡
+  ?\°
+  ?\²
+  ?\·
+  ?\÷
+  ?\═
+  ?\║
+  ?\╒
+  ?\ё
+  ?\є
+  ?\╔
+  ?\і
+  ?\ї
+  ?\╗
+  ?\╘
+  ?\╙
+  ?\╚
+  ?\╛
+  ?\ґ
+  ?\╝
+  ?\╞
+  ?\╟
+  ?\╠
+  ?\╡
+  ?\Ё
+  ?\Є
+  ?\╣
+  ?\І
+  ?\Ї
+  ?\╦
+  ?\╧
+  ?\╨
+  ?\╩
+  ?\╪
+  ?\Ґ
+  ?\╬
+  ?\©
+  ?\ю
+  ?\а
+  ?\б
+  ?\ц
+  ?\д
+  ?\е
+  ?\ф
+  ?\г
+  ?\х
+  ?\и
+  ?\й
+  ?\к
+  ?\л
+  ?\м
+  ?\н
+  ?\о
+  ?\п
+  ?\я
+  ?\р
+  ?\с
+  ?\т
+  ?\у
+  ?\ж
+  ?\в
+  ?\ь
+  ?\ы
+  ?\з
+  ?\ш
+  ?\э
+  ?\щ
+  ?\ч
+  ?\ъ
+  ?\Ю
+  ?\А
+  ?\Б
+  ?\Ц
+  ?\Д
+  ?\Е
+  ?\Ф
+  ?\Г
+  ?\Х
+  ?\И
+  ?\Й
+  ?\К
+  ?\Л
+  ?\М
+  ?\Н
+  ?\О
+  ?\П
+  ?\Я
+  ?\Р
+  ?\С
+  ?\Т
+  ?\У
+  ?\Ж
+  ?\В
+  ?\Ь
+  ?\Ы
+  ?\З
+  ?\Ш
+  ?\Э
+  ?\Щ
+  ?\Ч
+  ?\Ъ]
+ "Cyrillic KOI8-U (Ukranian) encoding.")
+
+;; Unicode-based, not cyrillic-iso8859-5 based (and incomplete) like the
+;; standard version.
+(cp-make-coding-system
+ cyrillic-koi8
+ [?\─
+  ?\│
+  ?\┌
+  ?\┐
+  ?\└
+  ?\┘
+  ?\├
+  ?\┤
+  ?\┬
+  ?\┴
+  ?\┼
+  ?\▀
+  ?\▄
+  ?\█
+  ?\▌
+  ?\▐
+  ?\░
+  ?\▒
+  ?\▓
+  ?\⌠
+  ?\■
+  ?\•
+  ?\√
+  ?\≈
+  ?\≤
+  ?\≥
+  ?\ 
+  ?\⌡
+  ?\°
+  ?\²
+  ?\·
+  ?\÷
+  ?\═
+  ?\║
+  ?\╒
+  ?\ё
+  ?\╓
+  ?\╔
+  ?\╕
+  ?\╖
+  ?\╗
+  ?\╘
+  ?\╙
+  ?\╚
+  ?\╛
+  ?\╜
+  ?\╝
+  ?\╞
+  ?\╟
+  ?\╠
+  ?\╡
+  ?\Ё
+  ?\╢
+  ?\╣
+  ?\╤
+  ?\╥
+  ?\╦
+  ?\╧
+  ?\╨
+  ?\╩
+  ?\╪
+  ?\╫
+  ?\╬
+  ?\©
+  ?\ю
+  ?\а
+  ?\б
+  ?\ц
+  ?\д
+  ?\е
+  ?\ф
+  ?\г
+  ?\х
+  ?\и
+  ?\й
+  ?\к
+  ?\л
+  ?\м
+  ?\н
+  ?\о
+  ?\п
+  ?\я
+  ?\р
+  ?\с
+  ?\т
+  ?\у
+  ?\ж
+  ?\в
+  ?\ь
+  ?\ы
+  ?\з
+  ?\ш
+  ?\э
+  ?\щ
+  ?\ч
+  ?\ъ
+  ?\Ю
+  ?\А
+  ?\Б
+  ?\Ц
+  ?\Д
+  ?\Е
+  ?\Ф
+  ?\Г
+  ?\Х
+  ?\И
+  ?\Й
+  ?\К
+  ?\Л
+  ?\М
+  ?\Н
+  ?\О
+  ?\П
+  ?\Я
+  ?\Р
+  ?\С
+  ?\Т
+  ?\У
+  ?\Ж
+  ?\В
+  ?\Ь
+  ?\Ы
+  ?\З
+  ?\Ш
+  ?\Э
+  ?\Щ
+  ?\Ч
+  ?\Ъ]
+ "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R) using Unicode.")
+(coding-system-put 'cyrillic-koi8 'mime-charset 'koi8-r)
+
+(define-coding-system-alias 'cp1250 'windows-1250)
+(define-coding-system-alias 'cp1251 'windows-1251)
+(define-coding-system-alias 'cp1252 'windows-1252)
+(define-coding-system-alias 'cp1253 'windows-1253)
+(define-coding-system-alias 'cp1254 'windows-1254)
+(define-coding-system-alias 'cp1255 'windows-1255)
+(define-coding-system-alias 'cp1256 'windows-1256)
+(define-coding-system-alias 'cp1257 'windows-1257)
+(define-coding-system-alias 'cp1258 'windows-1258)
+
+;; Use Unicode font under Windows.  Jason Rumney fecit.
+(if (and (fboundp 'w32-add-charset-info)
+        (not (boundp 'w32-unicode-charset-defined)))
+    (w32-add-charset-info "iso10646-1" 'w32-charset-ansi t))
+
+(provide 'codepages)
+;;; codepages.el ends here