diff lisp/leim/quail/punct.el @ 155:43dd3413c7c7 r20-3b4

Import from CVS: tag r20-3b4
author cvs
date Mon, 13 Aug 2007 09:39:39 +0200
parents
children 3bb7ccffb0c0
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/leim/quail/punct.el	Mon Aug 13 09:39:39 2007 +0200
@@ -0,0 +1,109 @@
+;; Quail package `punct' generated by the command `titdic-convert'
+;;	Date: Fri Aug 23 21:58:56 1996
+;;	Original TIT dictionary file: Punct.tit
+
+;;; Comment:
+
+;; Do byte-compile this file again after any modification.
+
+;;; Start of the header of original TIT dictionary.
+
+;; # $Id: punct.el,v 1.2 1997/06/06 00:57:09 steve Exp $
+;; # HANZI input table for cxterm
+;; # To be used by cxterm, convert me to .cit format first
+;; # .cit version 1
+;; ENCODE:	GB
+;; MULTICHOICE:	YES
+;; PROMPT:	$A::WVJdHk!K1j5c7{:E!K(B# 
+;; #
+;; COMMENT	Copyright 1991 by Yongguang Zhang.
+;; COMMENT Permission to use/modify/copy for any purpose is hereby granted.
+;; COMMENT Absolutely no fee and no warranties.
+;; COMMENT
+;; COMMENT	use <CTRL-f> to move to the right
+;; COMMENT	use <CTRL-b> to move to the left
+;; # define keys
+;; VALIDINPUTKEY:	"\043$%&'()*+,-./0123456789:;<=>?@[\134]^_`abcdefghijklm
+;; VALIDINPUTKEY:	nopqrstuvwxyz|~
+;; SELECTKEY:	1\040
+;; SELECTKEY:	2
+;; SELECTKEY:	3
+;; SELECTKEY:	4
+;; SELECTKEY:	5
+;; SELECTKEY:	6
+;; SELECTKEY:	7
+;; SELECTKEY:	8
+;; SELECTKEY:	9
+;; SELECTKEY:	0
+;; BACKSPACE:	\010\177
+;; DELETEALL:	\015\025
+;; MOVERIGHT:	\006
+;; MOVELEFT:	\002
+;; REPEATKEY:	\020\022
+;; # the following line must not be removed
+;; BEGINDICTIONARY
+
+;;; End of the header of original TIT dictionary.
+
+;;; Code:
+
+(require 'quail)
+
+(quail-define-package "quail-punct" "Chinese-GB" "$A1j5c7{:E(B"
+ nil
+"$A::WVJdHk!K1j5c7{:E!K(B# 
+	Copyright 1991 by Yongguang Zhang.
+ Permission to use/modify/copy for any purpose is hereby granted.
+ Absolutely no fee and no warranties.
+
+	use <CTRL-f> to move to the right
+	use <CTRL-b> to move to the left
+"
+ '(("\C-?" . quail-delete-last-char)
+   ("\C-M" . quail-abort-translation)
+   ("\C-U" . quail-abort-translation)
+  )  nil nil nil nil)
+
+(quail-define-rules
+;; #
+("\""	"$A#"!0!1!e(B")
+("\\043"	"$A##(B")
+("$"	"$A#$!g!i!j(B")
+("%"	"$A#%!k(B")
+("'"	"$A#'!.!/!d(B")
+("("	"$A#(!8!:(B")
+(")"	"$A#)!9!;(B")
+("*"	"$A#*!A!G!D!I(B")
+("+"	"$A#+!@!F!E!H(B")
+(","	"$A#,!"(B")
+("-"	"$A#-!%!*!+(B")
+("."	"$A#.!#!$!'!-!_!`!c!Q(B")
+("/"	"$A#/!B!L#\(B")
+("0"	"$A#0":"D"N"X"b"n"z(B")
+("1"	"$A#1"1";"E"O"Y"e"q(B")
+("2"	"$A#2"2"<"F"P"Z"f"r(B")
+("3"	"$A#3"3"="G"Q"["g"s(B")
+("4"	"$A#4"4">"H"R"\"h"t(B")
+("5"	"$A#5"5"?"I"S"]"i"u(B")
+("6"	"$A#6"6"@"J"T"^"j"v(B")
+("7"	"$A#7"7"A"K"U"_"k"w(B")
+("8"	"$A#8"8"B"L"V"`"l"x(B")
+("9"	"$A#9"9"C"M"W"a"m"y(B")
+(":"	"$A#:!K(B")
+("<"	"$A#<!4!6!Z!\(B")
+("="	"$A#=!Y!V!T!U(B")
+(">"	"$A#>!5!7![!](B")
+("@"	"$A#@!Q(B")
+("["	"$A#[!2!<!>#{(B")
+("\\134"	"$A#\#/(B")
+("]"	"$A#]!3!=!?#}(B")
+("^"	"$A#^!&!P(B")
+("_"	"$A#_!M(B")
+("`"	"$A#`!.!/(B")
+("logo"	"$A!n!o!p!q!r!s!t!u!v!w!x!y!z!{!|!}!~(B")
+("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")
+("punct"	"$A!!!"!#!$!%!&!'!(!)!*!+!,!-!.!/!0!1!2!3!4!5!6!7!8!9!:!;!<!=!>!?(B")
+("symbol"	"$A!a!b!c!d!e!f!g!h!i!j!k!l!m(B")
+("|"	"$A#|!,!N(B")
+("~"	"$A#~!+!W!X!^(B")
+)