cgit.sxemacs.org Git - packages/blob - mule-packages/mule-ucs/lisp/reldata/uiscii.el

   1 ;;; -*- coding: iso-2022-7bit  -*-
   2 ;;; uiscii.el --- incomplete table between Unicode and IS13194:1991.
   3
   4 ;; Keywords: CCL, mule, multilingual,
   5 ;;           character set, coding-system, ISO10646, Unicode, IS13194
   6
   7 ;; Copyright (C) 2000 Miyashita Hisashi
   8
   9 ;; This file is part of Mule-UCS
  10
  11 ;; Mule-UCS is free software; you can redistribute it and/or modify
  12 ;; it under the terms of the GNU General Public License as published by
  13 ;; the Free Software Foundation; either version 2, or (at your option)
  14 ;; any later version.
  15
  16 ;; Mule-UCS is distributed in the hope that it will be useful,
  17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19 ;; GNU General Public License for more details.
  20
  21 ;; You should have received a copy of the GNU General Public License
  22 ;; along with this program; see the file COPYING.  If not, write to the
  23 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  24 ;; Boston, MA 02111-1307, USA.
  25
  26 (put 'indian-is13194 'unicode-assoc
  27      'indian-is13194-vs-unicode-assoc)
  28
  29 ; IS13194 1991 code table.
  30 ;  0 1 2 3 4 5 6 7 8 9 A B C D E F
  31 ;
  32 ;   \e(5!"#$%&'()*+,-./\e(B
  33 ;
  34 ; \e(50123456789:;<=>?\e(B
  35 ;
  36 ; \e(5@ABCDEFGHIJKLMNO\e(B
  37 ;
  38 ; \e(5PQRSTUVWXYZ[\]^_\e(B
  39 ;
  40 ; \e(5`abcdefghijklmno\e(B
  41 ;
  42 ; \e(5pqrstuvwxyz\e(B
  43
  44 ;;; This table is incomplete because Unicode has more
  45 ;;; characters precomposed with Nukta.
  46
  47 (defvar
  48   indian-is13194-vs-unicode-assoc
  49   `(assoc
  50     (char-1 . ucs-generic)
  51     ,(transformate-list-structure
  52       (identity . c-notated-string-to-number)
  53       ((?\e(5!\e(B . "0x0901") ;; Vowel-modifier CHANDRABINDU
  54        (?\e(5"\e(B . "0x0902") ;; Vowel-modifier ANUSWAR
  55        (?\e(5#\e(B . "0x0903") ;; Vowel-modifier VISARG
  56        (?\e(5$\e(B . "0x0905") ;; Vowel A
  57        (?\e(5%\e(B . "0x0906") ;; Vowel AA
  58        (?\e(5&\e(B . "0x0907") ;; Vowel I
  59        (?\e(5'\e(B . "0x0908") ;; Vowel II
  60        (?\e(5(\e(B . "0x0909") ;; Vowel U
  61        (?\e(5)\e(B . "0x090A") ;; Vowel UU
  62        (?\e(5*\e(B . "0x090B") ;; Vowel RI
  63        (?\e(5+\e(B . "0x090E") ;; Vowel E (Southern Scripts)
  64        (?\e(5,\e(B . "0x090F") ;; Vowel EY
  65        (?\e(5-\e(B . "0x0910") ;; Vowel AI
  66        (?\e(5.\e(B . "0x090D") ;; Vowel AYE (Devanagari Scripts)
  67        (?\e(5/\e(B . "0x0912") ;; Vowel O (Southern Scripts)
  68        (?\e(50\e(B . "0x0913") ;; Vowel OW
  69        (?\e(51\e(B . "0x0914") ;; Vowel AU
  70        (?\e(52\e(B . "0x090D") ;; Vowel AWE (Devanagari Scripts)
  71        (?\e(53\e(B . "0x0915") ;; Consonant KA
  72        (?\e(54\e(B . "0x0916") ;; Consonant KHA
  73        (?\e(55\e(B . "0x0917") ;; Consonant GA
  74        (?\e(56\e(B . "0x0918") ;; Consonant GHA
  75        (?\e(57\e(B . "0x0919") ;; Consonant NGA
  76        (?\e(58\e(B . "0x091A") ;; Consonant CHA
  77        (?\e(59\e(B . "0x091B") ;; Consonant CHHA
  78        (?\e(5:\e(B . "0x091C") ;; Consonant JA
  79        (?\e(5;\e(B . "0x091D") ;; Consonant JHA
  80        (?\e(5<\e(B . "0x091E") ;; Consonant JNA
  81        (?\e(5=\e(B . "0x091F") ;; Consonant Hard TA
  82        (?\e(5>\e(B . "0x0920") ;; Consonant Hard THA
  83        (?\e(5?\e(B . "0x0921") ;; Consonant Hard DA
  84        (?\e(5@\e(B . "0x0922") ;; Consonant Hard DHA
  85        (?\e(5A\e(B . "0x0923") ;; Consonant Hard NA
  86        (?\e(5B\e(B . "0x0924") ;; Consonant Soft TA
  87        (?\e(5C\e(B . "0x0925") ;; Consonant Soft THA
  88        (?\e(5D\e(B . "0x0926") ;; Consonant Soft DA
  89        (?\e(5E\e(B . "0x0927") ;; Consonant Soft DHA
  90        (?\e(5F\e(B . "0x0928") ;; Consonant Soft NA
  91        (?\e(5G\e(B . "0x0929") ;; Consonant NA (Tamil)
  92        (?\e(5H\e(B . "0x092A") ;; Consonant PA
  93        (?\e(5I\e(B . "0x092B") ;; Consonant PHA
  94        (?\e(5J\e(B . "0x092C") ;; Consonant BA
  95        (?\e(5K\e(B . "0x092D") ;; Consonant BHA
  96        (?\e(5L\e(B . "0x092E") ;; Consonant MA
  97        (?\e(5M\e(B . "0x092F") ;; Consonant YA
  98        (?\e(5N\e(B . "0x095F") ;; Consonant JYA (Bengali, Assamese, and Oriya)
  99        (?\e(5O\e(B . "0x0930") ;; Consonant RA
 100        (?\e(5P\e(B . "0x0931") ;; Consonant Hard RA (Southern Scripts)
 101        (?\e(5Q\e(B . "0x0932") ;; Consonant LA
 102        (?\e(5R\e(B . "0x0933") ;; Consonant Hard LA
 103        (?\e(5S\e(B . "0x0934") ;; Consonant ZHA
 104        (?\e(5T\e(B . "0x0935") ;; Consonant VA
 105        (?\e(5U\e(B . "0x0936") ;; Consonant SHA
 106        (?\e(5V\e(B . "0x0937") ;; Consonant Hard SHA
 107        (?\e(5W\e(B . "0x0938") ;; Consonant SA
 108        (?\e(5X\e(B . "0x0939") ;; Consonant HA
 109      ;;INV(0xD9) Consonant Invisible
 110        (?\e(5Z\e(B . "0x093E") ;; Vowel Sign AA
 111        (?\e(5[\e(B . "0x093F") ;; Vowel Sign I
 112        (?\e(5\\e(B . "0x0940") ;; Vowel Sign II
 113        (?\e(5]\e(B . "0x0941") ;; Vowel Sign U
 114        (?\e(5^\e(B . "0x0942") ;; Vowel Sign UU
 115        (?\e(5_\e(B . "0x0943") ;; Vowel Sign RI
 116        (?\e(5`\e(B . "0x0946") ;; Vowel Sign E (Southern Scripts)
 117        (?\e(5a\e(B . "0x0947") ;; Vowel Sign EY
 118        (?\e(5b\e(B . "0x0948") ;; Vowel Sign AI
 119        (?\e(5c\e(B . "0x0945") ;; Vowel Sign AYE (Devanagari Scripts)
 120        (?\e(5d\e(B . "0x094A") ;; Vowel Sign O (Southern Scripts)
 121        (?\e(5e\e(B . "0x094B") ;; Vowel Sign OW
 122        (?\e(5f\e(B . "0x094C") ;; Vowel Sign AU
 123        (?\e(5g\e(B . "0x0949") ;; Vowel Sign AWE (Devanagari Scripts)
 124        (?\e(5h\e(B . "0x094D") ;; Vowel Omission Sign (Halant)
 125        (?\e(5i\e(B . "0x093C") ;; Diacritic Sign (Nukta)
 126        (?\e(5j\e(B . "0x0964") ;; Full Stop (Viram, Nothern Scripts)
 127        ;;  Reserved
 128        ;;  Reserved
 129        ;;  Reserved
 130        ;;  Reserved
 131        ;;  ATR(0xEF)
 132        ;;  EXT(0xF0)
 133        (?\e(5q\e(B . "0x0966") ;; DEVANAGARI DIGIT 0
 134        (?\e(5r\e(B . "0x0967") ;; DEVANAGARI DIGIT 1
 135        (?\e(5s\e(B . "0x0968") ;; DEVANAGARI DIGIT 2
 136        (?\e(5t\e(B . "0x0969") ;; DEVANAGARI DIGIT 3
 137        (?\e(5u\e(B . "0x096A") ;; DEVANAGARI DIGIT 4
 138        (?\e(5v\e(B . "0x096B") ;; DEVANAGARI DIGIT 5
 139        (?\e(5w\e(B . "0x096C") ;; DEVANAGARI DIGIT 6
 140        (?\e(5x\e(B . "0x096D") ;; DEVANAGARI DIGIT 7
 141        (?\e(5y\e(B . "0x096E") ;; DEVANAGARI DIGIT 8
 142        (?\e(5z\e(B . "0x096F") ;; DEVANAGARI DIGIT 9
 143        ))))
 144
 145 (provide 'uiscii)