Mercurial > hg > xemacs-beta

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

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