Simplify the 1st stage.
[m17n/m17n-db.git] / FLT / CHAM-GENERIC.flt
1 ;; CHAM-GENERIC.flt -- Font Layout Table for Cham (proportional font)
2 ;; Copyright (C) 2008  AIST (H15PRO112)
3 ;; See the end for copying conditions.
4
5 (font layouter cham-generic nil
6       (font (nil nil unicode-bmp :script=cham)))
7
8 ;;; <li> CHARM-GENERIC.flt
9 ;;;
10 ;;; For the Cham proportional fonts to draw Cham script.
11
12 (category
13  (0xAA00 0xAA5F ?E) ;; E: anyting else (independent)
14  (0xAA00        ?A) ;; A: independent vowel A
15  (0xAA01 0xAA05 ?I) ;; I: independent vowel (except for A)
16  (0xAA06 0xAA28 ?C) ;; C: consonant normal
17  (0xAA29        ?L) ;; L: vowel lengthener
18  (0xAA2A 0xAA32 ?V) ;; V: dependent vowel (postfix)
19  (0xAA2F 0xAA30 ?v) ;; v: dependent vowel (prefix)
20  (0xAA33 0xAA36 ?M) ;; M: medial consonant (postfix)
21  (0xAA34        ?m) ;; m: medial consonant (prefix)
22  (0xAA40 0xAA4D ?F) ;; F: consonant sign final (independent)
23  (0xAA43        ?f) ;; f: consonant sign final (dependent)
24  (0xAA4C        ?f))
25
26 (generator
27  (0
28   (cond
29    ("([IA])(v?)(V?L?)([fF]?)"
30     | < (2 =) (1 =) (3 = *) > (4 =) |)
31    ("([CA])(m?)(M?M?)(v?)(V?L?)([fF]?)"
32     | < (4 = ) (2 =) (1 =) (3 = *) (5 = *) > (6 =) |)
33    ("."
34     [ = ]))
35   *))
36
37 (generator
38  (0
39   (cond
40    (" (.*f) " < (1 = *) >)
41    (" (.*) " (1 = *))
42    ("." =))
43   *))
44
45 ;; Copyright (C) 2008
46 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
47 ;;   Registration Number H15PRO112
48
49 ;; This file is part of the m17n database; a sub-part of the m17n
50 ;; library.
51
52 ;; The m17n library is free software; you can redistribute it and/or
53 ;; modify it under the terms of the GNU Lesser General Public License
54 ;; as published by the Free Software Foundation; either version 2.1 of
55 ;; the License, or (at your option) any later version.
56
57 ;; The m17n library is distributed in the hope that it will be useful,
58 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
59 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
60 ;; Lesser General Public License for more details.
61
62 ;; You should have received a copy of the GNU Lesser General Public
63 ;; License along with the m17n library; if not, write to the Free
64 ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
65 ;; Boston, MA 02110-1301, USA.
66
67 ;; Local Variables:
68 ;; mode: lisp
69 ;; End: