;
; $Id: mode,v 1.3 1995/12/26 09:42:38 kuwa Exp $
;

(defmode YIN  on) 
	(defmode PY on) (defmode ZY)
(defmode ASCII	)
	(defmode ban_jiao on) (defmode quan_jiao)
2A_CTRL
(if  YIN
   (if PY    1B_TOUPPER   2P_QuanPin  2P_RongCuo   2Z_tail_pin   "ȫƴ:P")
   (if ZY    1Z_ZhuYin  1B_TOUPPER  2Z_ZhuYin  2Z_tail "ע:Z")
)
(if  ASCII
        (if ban_jiao            ":")
        (if quan_jiao           3B_quanjiao    "ȫ:")
)
