annotate lisp/quail/quail-punct.el @ 70:131b0175ea99 r20-0b30

Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
70
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
1 (require 'quail)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
2 ;; # !Id: Punct.tit,v 1.1 1991/10/27 06:21:16 ygz Exp !
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
3 ;; # HANZI input table for cxterm
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
4 ;; # To be used by cxterm, convert me to .cit format first
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
5 ;; # .cit version 1
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
6 ;; ENCODE: GB
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
7 ;; MULTICHOICE: YES
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
8 ;; PROMPT: $A::WVJdHk!K1j5c7{:E!K# (B
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
9 ;; #
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
10 ;; COMMENT Copyright 1991 by Yongguang Zhang.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
11 ;; COMMENT Permission to use/modify/copy for any purpose is hereby granted.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
12 ;; COMMENT Absolutely no fee and no warranties.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
13 ;; COMMENT
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
14 ;; COMMENT use <CTRL-f> to move to the right
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
15 ;; COMMENT use <CTRL-b> to move to the left
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
16 ;; # define keys
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
17 ;; VALIDINPUTKEY: "\043$%&'()*+,-./0123456789:;<=>?@[\134]^_`abcdefghijklm
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
18 ;; VALIDINPUTKEY: nopqrstuvwxyz|~
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
19 ;; SELECTKEY: 1\040
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
20 ;; SELECTKEY: 2
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
21 ;; SELECTKEY: 3
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
22 ;; SELECTKEY: 4
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
23 ;; SELECTKEY: 5
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
24 ;; SELECTKEY: 6
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
25 ;; SELECTKEY: 7
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
26 ;; SELECTKEY: 8
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
27 ;; SELECTKEY: 9
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
28 ;; SELECTKEY: 0
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
29 ;; BACKSPACE: \010\177
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
30 ;; DELETEALL: \015\025
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
31 ;; MOVERIGHT: \006
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
32 ;; MOVELEFT: \002
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
33 ;; REPEATKEY: \020\022
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
34 ;; # the following line must not be removed
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
35 ;; BEGINDICTIONARY
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
36 (quail-define-package "punct" "$A1j5c7{:E(B"
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
37 t
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
38 "$A::WVJdHk!K1j5c7{:E!K# (B
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
39 Copyright 1991 by Yongguang Zhang.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
40 Permission to use/modify/copy for any purpose is hereby granted.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
41 Absolutely no fee and no warranties.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
42
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
43 use <CTRL-f> to move to the right
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
44 use <CTRL-b> to move to the left"
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
45 '(
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
46 (" " . quail-select-current)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
47 )
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
48 nil nil)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
49
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
50 ;; #
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
51 (qdv "\"" "$A#"!0!1!e(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
52 (qd "\043" "$A##(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
53 (qdv "$" "$A#$!g!i!j(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
54 (qdv "%" "$A#%!k(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
55 (qdv "'" "$A#'!.!/!d(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
56 (qdv "(" "$A#(!8!:(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
57 (qdv ")" "$A#)!9!;(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
58 (qdv "*" "$A#*!A!G!D!I(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
59 (qdv "+" "$A#+!@!F!E!H(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
60 (qdv "," "$A#,!"(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
61 (qdv "-" "$A#-!%!*!+(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
62 (qdv "." "$A#.!#!$!'!-!_!`!c!Q(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
63 (qdv "/" "$A#/!B!L#\(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
64 (qdv "0" "$A#0":"D"N"X"b"n"z(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
65 (qdv "1" "$A#1"1";"E"O"Y"e"q(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
66 (qdv "2" "$A#2"2"<"F"P"Z"f"r(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
67 (qdv "3" "$A#3"3"="G"Q"["g"s(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
68 (qdv "4" "$A#4"4">"H"R"\"h"t(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
69 (qdv "5" "$A#5"5"?"I"S"]"i"u(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
70 (qdv "6" "$A#6"6"@"J"T"^"j"v(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
71 (qdv "7" "$A#7"7"A"K"U"_"k"w(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
72 (qdv "8" "$A#8"8"B"L"V"`"l"x(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
73 (qdv "9" "$A#9"9"C"M"W"a"m"y(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
74 (qdv ":" "$A#:!K(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
75 (qdv "<" "$A#<!4!6!Z!\(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
76 (qdv "=" "$A#=!Y!V!T!U(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
77 (qdv ">" "$A#>!5!7![!](B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
78 (qdv "@" "$A#@!Q(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
79 (qdv "[" "$A#[!2!<!>#{(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
80 (qdv "\134" "$A#\#/(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
81 (qdv "]" "$A#]!3!=!?#}(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
82 (qdv "^" "$A#^!&!P(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
83 (qdv "_" "$A#_!M(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
84 (qdv "`" "$A#`!.!/(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
85 (qdv "logo" "$A!n!o!p!q!r!s!t!u!v!w!x!y!z!{!|!}!~(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
86 (qdv "math" "$A!@!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![!\!]!^!_!`(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
87 (qdv "punct" "$A!!!"!#!$!%!&!'!(!)!*!+!,!-!.!/!0!1!2!3!4!5!6!7!8!9!:!;!<!=!>!?(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
88 (qdv "symbol" "$A!a!b!c!d!e!f!g!h!i!j!k!l!m(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
89 (qdv "|" "$A#|!,!N(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
90 (qdv "~" "$A#~!+!W!X!^(B")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
91
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
92 (quail-setup-current-package)