FLT/THAI-TIS620.flt

   1 ;; THAI-TIS620.flt -- Font Layout Table for Thai (TIS620 font)
   2 ;; Copyright (C) 2003, 2004, 2007
   3 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
   4 ;;   Registration Number H15PRO112
   5
   6 ;; This file is part of the m17n database; a sub-part of the m17n
   7 ;; library.
   8
   9 ;; The m17n library is free software; you can redistribute it and/or
  10 ;; modify it under the terms of the GNU Lesser General Public License
  11 ;; as published by the Free Software Foundation; either version 2.1 of
  12 ;; the License, or (at your option) any later version.
  13
  14 ;; The m17n library is distributed in the hope that it will be useful,
  15 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  16 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17 ;; Lesser General Public License for more details.
  18
  19 ;; You should have received a copy of the GNU Lesser General Public
  20 ;; License along with the m17n library; if not, write to the Free
  21 ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  22 ;; Boston, MA 02110-1301, USA.
  23
  24 ;;; <li> THAI-TIS620.flt
  25 ;;;
  26 ;;; For fixed width fonts of TIS620 encoding to draw Thai script.
  27
  28 (font layouter thai-tis620 nil
  29       (font (tis620.2529-1)
  30             (tis620.2533-0)))
  31
  32 (category
  33  ;; C: CONSONANT
  34  ;; V: VOWEL UPPER
  35  ;; v: VOWEL LOWER
  36  ;; T: TONE
  37  ;; I: INDEPENDENT
  38  ;;
  39  (0x0E01 0x0E2E ?C)
  40  (0x0E2F 0x0E5B ?I)
  41  (0x0E31                ?V)
  42  (0x0E34 0x0E37 ?V)
  43  (0x0E38 0x0E3A ?v)
  44  (0x0E47                ?V)
  45  (0x0E48 0x0E4E ?T)
  46  )
  47
  48 (generator
  49  (0
  50   (cond
  51    ("C([vV])?T?"
  52     independent dependent * )
  53    ("[^C]*"
  54     independent *))
  55   *)
  56
  57  (independent
  58   ((range 0x0E00 0x0E5F) 0xA0))
  59
  60  (dependent
  61   (cond
  62    ((0x0E31)    tc+bc 0xD1)
  63    ((0x0E34)    tc+bc 0xD4)
  64    ((0x0E35)    tc+bc 0xD5)
  65    ((0x0E36)    tc+bc 0xD6)
  66    ((0x0E37)    tc+bc 0xD7)
  67    ((0x0E38)    bc-tc 0xD8)
  68    ((0x0E39)    bc-tc 0xD9)
  69    ((0x0E3A)    bc-tc 0xDA)
  70    ((0x0E47)    tc+bc 0xE7)
  71    ((0x0E48)    tc+bc 0xE8)
  72    ((0x0E49)    tc+bc 0xE9)
  73    ((0x0E4A)    tc+bc 0xEA)
  74    ((0x0E4B)    tc+bc 0xEB)
  75    ((0x0E4C)    tc+bc 0xEC)
  76    ((0x0E4D)    tc+bc 0xED)
  77    ((0x0E4E)    tc+bc 0xEE))))
  78
  79 ;; Local Variables:
  80 ;; mode: lisp
  81 ;; End: