163 |
|
|
164 |
first radical: |
first radical: |
165 |
a b c d e f g h i j k l m n o p q r s t u v w x y z |
a b c d e f g h i j k l m n o p q r s t u v w x y z |
166 |
$APD(B $AZ"(B $AJ,(B $AX<(B $A;p(B $A?Z(B $A^P(B $Ac_(B $AZ%(B $A\3(B $AXi(B $AD>(B $Alj(B $Ab;(B $ATB(B $Afy(B $AJ/(B $AMu(B $A0K(B $AX/(B $AHU(B $AeA(B $Aak(B $AVq(B $AR;(B $AHK(B |
$APD(B $AZ"(B $AJ,(B $AX<(B $A;p(B $A?Z(B $A^P(B $Ac_(B $AZ%(B $A\3(B $AXi(B $AD>(B $Alj(B $Ab;(B $ATB(B $Afy(B $AJ/(B $AMu(B $A0K(B $AX/(B $AHU(B $AeA(B $Aak(B $AVq(B $AR;(B $AHK(B |
167 |
last radical: |
last radical: |
168 |
a b c d e f g h i j k l m n o p q r s t u v w x y z |
a b c d e f g h i j k l m n o p q r s t u v w x y z |
169 |
$ASV(B $AI=(B $AMA(B $A56(B $AZb(B $A?Z(B $ARB(B $Aqb(B $A4s(B $A6!(B $A[L(B $Ala(B $AJ.(B $A4u(B $AXg(B $ACE(B $A=q(B $AX-(B $AE.(B $ARR(B $A`m(B $AP!(B $A3'(B $A3f(B $A_.(B $A27(B |
$ASV(B $AI=(B $AMA(B $A56(B $AZb(B $A?Z(B $ARB(B $Aqb(B $A4s(B $A6!(B $A[L(B $Ala(B $AJ.(B $A4u(B $AXg(B $ACE(B $A=q(B $AX-(B $AE.(B $ARR(B $A`m(B $AP!(B $A3'(B $A3f(B $A_.(B $A27(B |
170 |
|
|
171 |
\\<quail-translation-docstring>") |
\\<quail-translation-docstring>") |
172 |
|
|
331 |
(princ (buffer-substring pos (point))) |
(princ (buffer-substring pos (point))) |
332 |
(princ "\n") |
(princ "\n") |
333 |
(forward-line 1))) |
(forward-line 1))) |
334 |
|
|
335 |
(princ "\n;;; End of the header of original TIT dictionary.\n\n") |
(princ "\n;;; End of the header of original TIT dictionary.\n\n") |
336 |
(princ ";;; Code:\n\n(require 'quail)\n\n") |
(princ ";;; Code:\n\n(require 'quail)\n\n") |
337 |
|
|
473 |
(set-buffer-multibyte nil) |
(set-buffer-multibyte nil) |
474 |
(let ((coding-system-for-read 'no-conversion)) |
(let ((coding-system-for-read 'no-conversion)) |
475 |
(insert-file-contents (expand-file-name filename))) |
(insert-file-contents (expand-file-name filename))) |
476 |
|
|
477 |
;; Decode the buffer contents from the encoding specified by a |
;; Decode the buffer contents from the encoding specified by a |
478 |
;; value of the key "ENCODE:". |
;; value of the key "ENCODE:". |
479 |
(if (not (search-forward "\nBEGIN" nil t)) |
(if (not (search-forward "\nBEGIN" nil t)) |
563 |
;; Alist of input method names and the corresponding information. |
;; Alist of input method names and the corresponding information. |
564 |
;; Each element has this form: |
;; Each element has this form: |
565 |
;; (INPUT-METHOD-NAME ;; Name of the input method. |
;; (INPUT-METHOD-NAME ;; Name of the input method. |
566 |
;; INPUT-METHOD-TITLE ;; Title string of the input method |
;; INPUT-METHOD-TITLE ;; Title string of the input method |
567 |
;; DICFILE ;; Name of the source dictionary file. |
;; DICFILE ;; Name of the source dictionary file. |
568 |
;; CODING ;; Coding system of the dictionary file. |
;; CODING ;; Coding system of the dictionary file. |
569 |
;; QUAILFILE ;; Name of the Quail package file. |
;; QUAILFILE ;; Name of the Quail package file. |
573 |
|
|
574 |
(defvar quail-misc-package-ext-info |
(defvar quail-misc-package-ext-info |
575 |
'(("chinese-b5-tsangchi" "$(06A(BB" |
'(("chinese-b5-tsangchi" "$(06A(BB" |
576 |
"cangjie-table.b5" big5 "tsang-b5.el" |
"cangjie-table.b5" big5 "tsang-b5.el" |
577 |
tsang-b5-converter |
tsang-b5-converter |
578 |
"\ |
"\ |
579 |
;; # Copyright 2001 Christian Wittern <wittern@iis.sinica.edu.tw> |
;; # Copyright 2001 Christian Wittern <wittern@iis.sinica.edu.tw> |
583 |
;; # this notice is preserved.") |
;; # this notice is preserved.") |
584 |
|
|
585 |
("chinese-b5-quick" "$(0X|(BB" |
("chinese-b5-quick" "$(0X|(BB" |
586 |
"cangjie-table.b5" big5 "quick-b5.el" |
"cangjie-table.b5" big5 "quick-b5.el" |
587 |
quick-b5-converter |
quick-b5-converter |
588 |
"\ |
"\ |
589 |
;; # Copyright 2001 Christian Wittern <wittern@iis.sinica.edu.tw> |
;; # Copyright 2001 Christian Wittern <wittern@iis.sinica.edu.tw> |
624 |
;; |
;; |
625 |
;; |
;; |
626 |
;; Copyright (C) 1999, Rui He, herui@cs.duke.edu |
;; Copyright (C) 1999, Rui He, herui@cs.duke.edu |
627 |
;; |
;; |
628 |
;; |
;; |
629 |
;; CCE(Console Chinese Environment) 0.32 |
;; CCE(Console Chinese Environment) 0.32 |
630 |
;; |
;; |
631 |
;; CCE is free software; you can redistribute it and/or modify it under the |
;; CCE is free software; you can redistribute it and/or modify it under the |
632 |
;; terms of the GNU General Public License as published by the Free Software |
;; terms of the GNU General Public License as published by the Free Software |
633 |
;; Foundation; either version 1, or (at your option) any later version. |
;; Foundation; either version 1, or (at your option) any later version. |
634 |
;; |
;; |
635 |
;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY |
;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY |
636 |
;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
637 |
;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more |
;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more |
638 |
;; details. |
;; details. |
639 |
;; |
;; |
640 |
;; You should have received a copy of the GNU General Public License along with |
;; You should have received a copy of the GNU General Public License along with |
641 |
;; CCE; see the file COPYING. If not, write to the Free Software Foundation, |
;; CCE; see the file COPYING. If not, write to the Free Software Foundation, |
642 |
;; 675 Mass Ave, Cambridge, MA 02139, USA.") |
;; 675 Mass Ave, Cambridge, MA 02139, USA.") |
643 |
|
|
644 |
("chinese-ziranma" "$AWTH;(B" |
("chinese-ziranma" "$AWTH;(B" |
653 |
;; |
;; |
654 |
;; |
;; |
655 |
;; Copyright (C) 1999, Rui He, herui@cs.duke.edu |
;; Copyright (C) 1999, Rui He, herui@cs.duke.edu |
656 |
;; |
;; |
657 |
;; |
;; |
658 |
;; CCE(Console Chinese Environment) 0.32 |
;; CCE(Console Chinese Environment) 0.32 |
659 |
;; |
;; |
660 |
;; CCE is free software; you can redistribute it and/or modify it under the |
;; CCE is free software; you can redistribute it and/or modify it under the |
661 |
;; terms of the GNU General Public License as published by the Free Software |
;; terms of the GNU General Public License as published by the Free Software |
662 |
;; Foundation; either version 1, or (at your option) any later version. |
;; Foundation; either version 1, or (at your option) any later version. |
663 |
;; |
;; |
664 |
;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY |
;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY |
665 |
;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
666 |
;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more |
;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more |
667 |
;; details. |
;; details. |
668 |
;; |
;; |
669 |
;; You should have received a copy of the GNU General Public License along with |
;; You should have received a copy of the GNU General Public License along with |
670 |
;; CCE; see the file COPYING. If not, write to the Free Software Foundation, |
;; CCE; see the file COPYING. If not, write to the Free Software Foundation, |
671 |
;; 675 Mass Ave, Cambridge, MA 02139, USA.") |
;; 675 Mass Ave, Cambridge, MA 02139, USA.") |
672 |
|
|
673 |
("chinese-ctlau" "$AAuTA(B" |
("chinese-ctlau" "$AAuTA(B" |
681 |
;; It contains the following copyright notice: |
;; It contains the following copyright notice: |
682 |
;; |
;; |
683 |
;; # Copyright (C) 1988-2001 Fung Fung Lee (lee@umunhum.stanford.edu) |
;; # Copyright (C) 1988-2001 Fung Fung Lee (lee@umunhum.stanford.edu) |
684 |
;; # |
;; # |
685 |
;; # This program is free software; you can redistribute it and/or |
;; # This program is free software; you can redistribute it and/or |
686 |
;; # modify it under the terms of the GNU General Public License |
;; # modify it under the terms of the GNU General Public License |
687 |
;; # as published by the Free Software Foundation; either version 2 |
;; # as published by the Free Software Foundation; either version 2 |
688 |
;; # of the License, or any later version. |
;; # of the License, or any later version. |
689 |
;; # |
;; # |
690 |
;; # This program is distributed in the hope that it will be useful, |
;; # This program is distributed in the hope that it will be useful, |
691 |
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of |
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of |
692 |
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
693 |
;; # GNU General Public License for more details. |
;; # GNU General Public License for more details. |
694 |
;; # |
;; # |
695 |
;; # You should have received a copy of the GNU General Public License |
;; # You should have received a copy of the GNU General Public License |
696 |
;; # along with this program; if not, write to the Free Software Foundation, |
;; # along with this program; if not, write to the Free Software Foundation, |
697 |
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.") |
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.") |
707 |
;; It contains the following copyright notice: |
;; It contains the following copyright notice: |
708 |
;; |
;; |
709 |
;; # Copyright (C) 1988-2001 Fung Fung Lee (lee@umunhum.stanford.edu) |
;; # Copyright (C) 1988-2001 Fung Fung Lee (lee@umunhum.stanford.edu) |
710 |
;; # |
;; # |
711 |
;; # This program is free software; you can redistribute it and/or |
;; # This program is free software; you can redistribute it and/or |
712 |
;; # modify it under the terms of the GNU General Public License |
;; # modify it under the terms of the GNU General Public License |
713 |
;; # as published by the Free Software Foundation; either version 2 |
;; # as published by the Free Software Foundation; either version 2 |
714 |
;; # of the License, or any later version. |
;; # of the License, or any later version. |
715 |
;; # |
;; # |
716 |
;; # This program is distributed in the hope that it will be useful, |
;; # This program is distributed in the hope that it will be useful, |
717 |
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of |
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of |
718 |
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
719 |
;; # GNU General Public License for more details. |
;; # GNU General Public License for more details. |
720 |
;; # |
;; # |
721 |
;; # You should have received a copy of the GNU General Public License |
;; # You should have received a copy of the GNU General Public License |
722 |
;; # along with this program; if not, write to the Free Software Foundation, |
;; # along with this program; if not, write to the Free Software Foundation, |
723 |
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.") |
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.") |
745 |
[Q $(0'D(B] [W $(0(q(B] [E $(0'V(B] [R $(0&H(B] [T $(0'>(B] [Y $(0&4(B] [U $(0&U(B] [I $(0'B(B] [O $(0&*(B] [P $(0'A(B] |
[Q $(0'D(B] [W $(0(q(B] [E $(0'V(B] [R $(0&H(B] [T $(0'>(B] [Y $(0&4(B] [U $(0&U(B] [I $(0'B(B] [O $(0&*(B] [P $(0'A(B] |
746 |
|
|
747 |
[A $(0'K(B] [S $(0&T(B] [D $(0'N(B] [F $(0'W(B] [G $(0&I(B] [H $(0*M(B] [J $(0&3(B] [L $(0&d(B] |
[A $(0'K(B] [S $(0&T(B] [D $(0'N(B] [F $(0'W(B] [G $(0&I(B] [H $(0*M(B] [J $(0&3(B] [L $(0&d(B] |
748 |
|
|
749 |
[Z ] [X $(0[E(B] [C $(01[(B] [V $(0&M(B] [B $(0'M(B] [N $(0&_(B] [M $(0&"(B] |
[Z ] [X $(0[E(B] [C $(01[(B] [V $(0&M(B] [B $(0'M(B] [N $(0&_(B] [M $(0&"(B] |
750 |
|
|
751 |
\\\\<quail-translation-docstring>\"\n" |
\\\\<quail-translation-docstring>\"\n" |
757 |
[Q $(GEC(B] [W $(GFp(B] [E $(GEU(B] [R $(GDG(B] [T $(GE=(B] [Y $(GD3(B] [U $(GDT(B] [I $(GEA(B] [O $(GD)(B] [P $(GE@(B] |
[Q $(GEC(B] [W $(GFp(B] [E $(GEU(B] [R $(GDG(B] [T $(GE=(B] [Y $(GD3(B] [U $(GDT(B] [I $(GEA(B] [O $(GD)(B] [P $(GE@(B] |
758 |
|
|
759 |
[A $(GEJ(B] [S $(GDS(B] [D $(GEM(B] [F $(GEV(B] [G $(GDH(B] [H $(GHL(B] [J $(GD2(B] [L $(GDc(B] |
[A $(GEJ(B] [S $(GDS(B] [D $(GEM(B] [F $(GEV(B] [G $(GDH(B] [H $(GHL(B] [J $(GD2(B] [L $(GDc(B] |
760 |
|
|
761 |
[Z ] [X $(GyE(B] [C $(GOZ(B] [V $(GDL(B] [B $(GEL(B] [N $(GD^(B] [M $(GD!(B] |
[Z ] [X $(GyE(B] [C $(GOZ(B] [V $(GDL(B] [B $(GEL(B] [N $(GD^(B] [M $(GD!(B] |
762 |
|
|
763 |
\\\\<quail-translation-docstring>\"\n" |
\\\\<quail-translation-docstring>\"\n" |
764 |
fulltitle fulltitle))) |
fulltitle fulltitle))) |
1096 |
the Cantonese romanization of the respective radical ($(0?f5}(B).")) |
the Cantonese romanization of the respective radical ($(0?f5}(B).")) |
1097 |
|
|
1098 |
(defun miscdic-convert (filename &optional dirname) |
(defun miscdic-convert (filename &optional dirname) |
1099 |
"Convert a dictionary file FILENAME into a Quail package. |
"Convert a dictionary file FILENAME into a Quail package. |
1100 |
Optional argument DIRNAME if specified is the directory name under which |
Optional argument DIRNAME if specified is the directory name under which |
1101 |
the generated Quail package is saved." |
the generated Quail package is saved." |
1102 |
(interactive "FInput method dictionary file: ") |
(interactive "FInput method dictionary file: ") |