comparison cWnn/td/rk_p/2A_CTRL @ 0:bbc77ca4def5

initial import
author Yoshiki Yazawa <yaz@cc.rim.or.jp>
date Thu, 13 Dec 2007 04:30:14 +0900
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:bbc77ca4def5
1 ;
2 ; $Id: ./2A_CTRL $
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 (defvar pf1 (list '\x81'))
33 (defvar pf2 (list '\x82'))
34 (defvar pf3 (list '\x83'))
35 (defvar pf4 (list '\x84'))
36 (defvar pf5 (list '\x85'))
37
38 (unless PIN_YIN)(pf1) (on PIN_YIN)(off ASCII)(off QI_TA)(off GONG_NENG)
39 (if PIN_YIN)(if quan_pin)(pf1) (off quan_pin)(off two_pin_3key)(on two_pin)
40 (if PIN_YIN)(if two_pin)(pf1) (off two_pin)(off quan_pin)(on two_pin_3key)
41 (if PIN_YIN)(if two_pin_3key)(pf1) (off two_pin)(off two_pin_3key)(on quan_pin)
42
43 (unless ASCII)(pf3) (on ASCII)(off PIN_YIN)(off QI_TA)(off GONG_NENG)
44 (if ASCII)(if ban_jiao)(pf3) (off ban_jiao)(on quan_jiao)
45 (if ASCII)(if quan_jiao)(pf3) (off quan_jiao)(on ban_jiao)
46
47 (unless QI_TA)(pf4) (on QI_TA)(off PIN_YIN)(off ASCII)(off GONG_NENG)
48 (if QI_TA)(if chang_yong_zi)(pf4) (off chang_yong_zi)(on guo_biao_ma)
49 (if QI_TA)(if guo_biao_ma)(pf4) (off guo_biao_ma)(on qu_wei_ma)
50 (if QI_TA)(if qu_wei_ma)(pf4) (off qu_wei_ma)(on nei_ma)
51 (if QI_TA)(if nei_ma)(pf4) (off nei_ma)(on chang_yong_zi)
52
53 (pf5) (switch GONG_NENG) H