0
|
1 ;
|
|
2 ; $Id: ./mode $
|
|
3 ;
|
|
4
|
|
5 ;
|
|
6 ; FreeWnn is a network-extensible Kana-to-Kanji conversion system.
|
|
7 ; This file is part of FreeWnn.
|
|
8 ;
|
|
9 ; Copyright Kyoto University Research Institute for Mathematical Sciences
|
|
10 ; 1987, 1988, 1989, 1990, 1991, 1992
|
|
11 ; Copyright OMRON Corporation. 1987, 1988, 1989, 1990, 1991, 1992, 1999
|
|
12 ; Copyright ASTEC, Inc. 1987, 1988, 1989, 1990, 1991, 1992
|
|
13 ; Copyright FreeWnn Project 1999, 2000
|
|
14 ;
|
|
15 ; Maintainer: FreeWnn Project <freewnn@tomo.gr.jp>
|
|
16 ;
|
|
17 ; This program is free software; you can redistribute it and/or modify
|
|
18 ; it under the terms of the GNU General Public License as published by
|
|
19 ; the Free Software Foundation; either version 2 of the License, or
|
|
20 ; (at your option) any later version.
|
|
21 ;
|
|
22 ; This program is distributed in the hope that it will be useful,
|
|
23 ; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
24 ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
25 ; GNU General Public License for more details.
|
|
26 ;
|
|
27 ; You should have received a copy of the GNU General Public License
|
|
28 ; along with this program; if not, write to the Free Software
|
|
29 ; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
30 ;
|
|
31
|
|
32 (defmode ZY on)
|
|
33 (defmode ZHUYIN on)
|
|
34 (defmode BX )
|
|
35 (defmode CANGJIE on)
|
|
36 (defmode ASCII )
|
|
37 (defmode ban_jiao on)
|
|
38 (defmode quan_jiao)
|
|
39 (defmode GONG_NENG)
|
|
40 (defmode select on)
|
|
41 (defmode YT on) (defmode XY)
|
|
42
|
|
43 2A_CTRL
|
|
44 (if GONG_NENG
|
|
45 (if select 1F_select 2F_select "Ñ¡Ôñ:")
|
|
46 )
|
|
47 (if ZY
|
|
48 (if ZHUYIN
|
|
49 (if YT 1Z_ZhuYin 1B_TOUPPER 2Z_ZhuYin 2Z_tail "×¢Òô:Z")
|
|
50 (if XY 1Z_ZhuYin_X 1B_TOUPPER 2Z_ZhuYin_X 2Z_tail_X "×¢Òô:Z")
|
|
51 )
|
|
52 )
|
|
53 (if BX
|
|
54 (if CANGJIE "²Öò¡:Q")
|
|
55 )
|
|
56 (if ASCII
|
|
57 (if ban_jiao "°ë½Ç:")
|
|
58 (if quan_jiao 3B_quanjiao "È«½Ç:")
|
|
59 )
|