annotate leim/quail/slovak.el @ 22420:cb77a5a6a629

(readevalloop): New arg READFUN. Callers changed. (Feval_region): New arg READ_FUNCTION.
author Richard M. Stallman <rms@gnu.org>
date Wed, 10 Jun 1998 04:13:57 +0000
parents b49e191032c7
children 78826b8a6b21
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
21196
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1 ;;; quail/slovak.el -- Quail package for inputting Slovak
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
2
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
3 ;; Copyright (C) 1998 Free Software Foundation.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
4
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
5 ;; Authors: Tibor ,B)(Bimko <tibor.simko@fmph.uniba.sk>,
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
6 ;; Milan Zamazal <pdm@fi.muni.cz>
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
7 ;; Maintainer: Milan Zamazal <pdm@fi.muni.cz>
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
8 ;; Keywords: multilingual, input method, Slovak
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
9
21422
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
10 ;; This file is part of GNU Emacs.
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
11
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
12 ;; GNU Emacs is free software; you can redistribute it and/or modify
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
13 ;; it under the terms of the GNU General Public License as published by
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
14 ;; the Free Software Foundation; either version 2, or (at your option)
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
15 ;; any later version.
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
16
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
17 ;; GNU Emacs is distributed in the hope that it will be useful,
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
18 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
20 ;; GNU General Public License for more details.
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
21
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
22 ;; You should have received a copy of the GNU General Public License
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
23 ;; along with GNU Emacs; see the file COPYING. If not, write to the
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
24 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
25 ;; Boston, MA 02111-1307, USA.
21196
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
26
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
27 ;;; Commentary:
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
28
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
29 ;; This setups some Slovak keyboards:
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
30 ;; - standard Slovak keyboard
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
31 ;; - three Slovak keyboards for programmers
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
32
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
33 ;; Current Quail version has some limitations, which create annoying problems
21422
b49e191032c7 Correct starting commentary.
Karl Heuer <kwzh@gnu.org>
parents: 21196
diff changeset
34 ;; when using Slovak keyboards. You may want to install the file
21196
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
35 ;; `hack-quail.el' from the package
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
36 ;; ftp://ftp.fi.muni.cz/pub/localization/emacs/emacs-20/emacs-cs-utils*
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
37 ;; which tries to remove some of these limitations.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
38
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
39 ;;; Code:
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
40
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
41 (require 'quail)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
42
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
43
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
44 (quail-define-package
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
45 "slovak" "Slovak" "SK" nil
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
46 "Standard Slovak keyboard."
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
47 nil t nil nil nil nil nil nil nil nil t)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
48
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
49 (quail-define-rules
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
50 ("1" ?+)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
51 ("2" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
52 ("3" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
53 ("4" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
54 ("5" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
55 ("6" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
56 ("7" ?,B}(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
57 ("8" ?,Ba(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
58 ("9" ?,Bm(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
59 ("0" ?,Bi(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
60 ("!" ?1)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
61 ("@" ?2)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
62 ("#" ?3)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
63 ("$" ?4)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
64 ("%" ?5)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
65 ("^" ?6)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
66 ("&" ?7)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
67 ("*" ?8)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
68 ("(" ?9)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
69 (")" ?0)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
70 ("q" ?`)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
71 ("Q" ?`)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
72 ("-" ?=)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
73 ("_" ?%)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
74 ("=" ?')
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
75 ("[" ?,Bz(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
76 ("{" ?/)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
77 ("]" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
78 ("}" ?\()
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
79 ("\\" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
80 ("|" ?\))
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
81 (";" ?,Bt(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
82 (":" ?\")
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
83 ("'" ?,B'(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
84 ("\"" ?!)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
85 ("<" ??)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
86 (">" ?:)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
87 ("/" ?-)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
88 ("?" ?_)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
89 ("`" ?\;)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
90 ("~" ?^)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
91 ("y" ?z)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
92 ("z" ?y)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
93 ("Y" ?Z)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
94 ("Z" ?Y)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
95 ("=a" ?,Ba(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
96 ("+a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
97 ("+=a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
98 ("+c" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
99 ("+d" ?,Bo(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
100 ("=e" ?,Bi(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
101 ("+e" ?,Bl(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
102 ("=i" ?,Bm(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
103 ("=l" ?,Be(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
104 ("+l" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
105 ("+n" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
106 ("=o" ?,Bs(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
107 ("+o" ?,Bt(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
108 ("~o" ?,Bt(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
109 ("+=o" ?,Bv(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
110 ("=r" ?,B`(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
111 ("+r" ?,Bx(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
112 ("=s" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
113 ("+s" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
114 ("+t" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
115 ("=u" ?,Bz(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
116 ("+u" ?,By(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
117 ("+=u" ?,B|(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
118 ("=z" ?,B}(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
119 ("+y" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
120 ("=A" ?,BA(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
121 ("+A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
122 ("+=A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
123 ("+C" ?,BH(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
124 ("+D" ?,BO(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
125 ("=E" ?,BI(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
126 ("+E" ?,BL(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
127 ("=I" ?,BM(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
128 ("=L" ?,BE(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
129 ("+L" ?,B%(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
130 ("+N" ?,BR(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
131 ("=O" ?,BS(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
132 ("+O" ?,BT(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
133 ("~O" ?,BT(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
134 ("+=O" ?,BV(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
135 ("=R" ?,B@(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
136 ("+R" ?,BX(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
137 ("=S" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
138 ("+S" ?,B)(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
139 ("+T" ?,B+(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
140 ("=U" ?,BZ(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
141 ("+U" ?,BY(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
142 ("+=U" ?,B\(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
143 ("=Z" ?,B](B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
144 ("+Y" ?,B.(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
145 ("=q" ?q)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
146 ("+q" ?q)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
147 ("=Q" ?Q)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
148 ("+Q" ?Q)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
149 ("=2" ?@)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
150 ("=3" ?#)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
151 ("=4" ?$)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
152 ("=5" ?%)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
153 ("=6" ?^)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
154 ("=7" ?&)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
155 ("=8" ?*)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
156 ("=9" ?\()
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
157 ("=0" ?\))
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
158 ("+1" ?!)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
159 ("+2" ?@)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
160 ("+3" ?#)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
161 ("+4" ?$)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
162 ("+5" ?%)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
163 ("+6" ?^)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
164 ("+7" ?&)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
165 ("+8" ?*)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
166 ("+9" ?\()
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
167 ("+0" ?\))
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
168 ([kp-1] ?1)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
169 ([kp-2] ?2)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
170 ([kp-3] ?3)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
171 ([kp-4] ?4)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
172 ([kp-5] ?5)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
173 ([kp-6] ?6)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
174 ([kp-7] ?7)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
175 ([kp-8] ?8)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
176 ([kp-9] ?9)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
177 ([kp-0] ?0)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
178 ([kp-add] ?+))
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
179
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
180
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
181 (quail-define-package
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
182 "slovak-prog-1" "Slovak" "SK" nil
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
183 "Slovak (non-standard) keyboard for programmers #1.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
184
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
185 All digits except of `1' are replaced by Slovak characters as on the standard
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
186 Slovak keyboard.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
187 Dead keys are on `[', `[[', and `[[['.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
188 All other keys are the same as on standard US keyboard."
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
189 nil t nil nil nil nil nil nil nil nil t)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
190
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
191 (quail-define-rules
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
192 ("[[[[" ?\[)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
193 ("2" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
194 ("3" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
195 ("4" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
196 ("5" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
197 ("6" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
198 ("7" ?,B}(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
199 ("8" ?,Ba(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
200 ("9" ?,Bm(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
201 ("0" ?,Bi(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
202 ("[a" ?,Ba(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
203 ("[[a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
204 ("[[[a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
205 ("[c" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
206 ("[[c" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
207 ("[d" ?,Bo(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
208 ("[[d" ?,Bo(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
209 ("[e" ?,Bi(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
210 ("[[e" ?,Bl(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
211 ("[i" ?,Bm(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
212 ("[l" ?,Be(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
213 ("[[l" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
214 ("[n" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
215 ("[[n" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
216 ("[o" ?,Bs(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
217 ("[[o" ?,Bt(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
218 ("[[[o" ?,Bv(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
219 ("[r" ?,B`(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
220 ("[[r" ?,Bx(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
221 ("[s" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
222 ("[[s" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
223 ("[[[s" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
224 ("[t" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
225 ("[[t" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
226 ("[u" ?,Bz(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
227 ("[[u" ?,By(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
228 ("[[[u" ?,B|(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
229 ("[y" ?,B}(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
230 ("[z" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
231 ("[[z" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
232 ("[A" ?,BA(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
233 ("[[A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
234 ("[[[A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
235 ("[C" ?,BH(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
236 ("[[C" ?,BH(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
237 ("[D" ?,BO(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
238 ("[[D" ?,BO(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
239 ("[E" ?,BI(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
240 ("[[E" ?,BL(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
241 ("[I" ?,BM(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
242 ("[L" ?,BE(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
243 ("[[L" ?,B%(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
244 ("[N" ?,BR(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
245 ("[[N" ?,BR(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
246 ("[O" ?,BS(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
247 ("[[O" ?,BT(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
248 ("[[[O" ?,BV(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
249 ("[R" ?,B@(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
250 ("[[R" ?,BX(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
251 ("[S" ?,B)(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
252 ("[[S" ?,B)(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
253 ("[[[S" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
254 ("[T" ?,B+(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
255 ("[[T" ?,B+(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
256 ("[U" ?,BZ(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
257 ("[[U" ?,BY(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
258 ("[[[U" ?,B\(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
259 ("[Y" ?,B](B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
260 ("[Z" ?,B.(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
261 ("[[Z" ?,B.(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
262 ([kp-1] ?1)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
263 ([kp-2] ?2)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
264 ([kp-3] ?3)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
265 ([kp-4] ?4)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
266 ([kp-5] ?5)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
267 ([kp-6] ?6)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
268 ([kp-7] ?7)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
269 ([kp-8] ?8)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
270 ([kp-9] ?9)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
271 ([kp-0] ?0)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
272 ([kp-add] ?+))
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
273
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
274
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
275 (quail-define-package
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
276 "slovak-prog-2" "Slovak" "SK" nil
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
277 "Slovak (non-standard) keyboard for programmers #2.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
278
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
279 All digits except of `1' are replaced by Slovak characters as on the standard
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
280 Slovak keyboard.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
281 Dead keys are on `=' and `+'.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
282 All other keys are the same as on standard US keyboard."
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
283 nil t nil nil nil nil nil nil nil nil t)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
284
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
285 (quail-define-rules
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
286 ("2" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
287 ("3" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
288 ("4" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
289 ("5" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
290 ("6" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
291 ("7" ?,B}(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
292 ("8" ?,Ba(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
293 ("9" ?,Bm(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
294 ("0" ?,Bi(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
295 ("==" ?=)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
296 ("++" ?+)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
297 ("=+" ?+)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
298 ("=2" ?2)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
299 ("=3" ?3)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
300 ("=4" ?4)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
301 ("=5" ?5)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
302 ("=6" ?6)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
303 ("=7" ?7)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
304 ("=8" ?8)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
305 ("=9" ?9)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
306 ("=0" ?0)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
307 ("+2" ?2)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
308 ("+3" ?3)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
309 ("+4" ?4)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
310 ("+5" ?5)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
311 ("+6" ?6)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
312 ("+7" ?7)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
313 ("+8" ?8)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
314 ("+9" ?9)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
315 ("+0" ?0)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
316 ("=a" ?,Ba(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
317 ("+a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
318 ("+=a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
319 ("+c" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
320 ("+d" ?,Bo(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
321 ("=e" ?,Bi(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
322 ("+e" ?,Bl(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
323 ("=i" ?,Bm(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
324 ("=l" ?,Be(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
325 ("+l" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
326 ("+n" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
327 ("=o" ?,Bs(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
328 ("+o" ?,Bt(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
329 ("+=o" ?,Bv(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
330 ("=r" ?,B`(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
331 ("+r" ?,Bx(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
332 ("=s" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
333 ("+s" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
334 ("+t" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
335 ("=u" ?,Bz(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
336 ("+u" ?,By(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
337 ("+=u" ?,B|(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
338 ("=y" ?,B}(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
339 ("+z" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
340 ("=A" ?,BA(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
341 ("+A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
342 ("+=A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
343 ("+C" ?,BH(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
344 ("+D" ?,BO(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
345 ("=E" ?,BI(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
346 ("+E" ?,BL(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
347 ("=I" ?,BM(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
348 ("=L" ?,BE(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
349 ("+L" ?,B%(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
350 ("+N" ?,BR(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
351 ("=O" ?,BS(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
352 ("+O" ?,BT(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
353 ("+=O" ?,BV(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
354 ("=R" ?,B@(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
355 ("+R" ?,BX(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
356 ("=S" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
357 ("+S" ?,B)(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
358 ("+T" ?,B+(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
359 ("=U" ?,BZ(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
360 ("+U" ?,BY(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
361 ("+=U" ?,B\(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
362 ("=Y" ?,B](B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
363 ("+Z" ?,B.(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
364 ([kp-1] ?1)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
365 ([kp-2] ?2)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
366 ([kp-3] ?3)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
367 ([kp-4] ?4)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
368 ([kp-5] ?5)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
369 ([kp-6] ?6)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
370 ([kp-7] ?7)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
371 ([kp-8] ?8)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
372 ([kp-9] ?9)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
373 ([kp-0] ?0)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
374 ([kp-add] ?+))
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
375
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
376
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
377 (quail-define-package
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
378 "slovak-prog-3" "Slovak" "SK" nil
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
379 "Slovak (non-standard) keyboard for programmers #3.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
380
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
381 Dead keys are on `[', `[[', `[[[', and `]'.
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
382 All other keys are the same as on standard US keyboard."
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
383 nil t nil nil nil nil nil nil nil nil t)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
384
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
385 (quail-define-rules
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
386 ("[[[[" ?\[)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
387 ("[]" ?\])
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
388 ("][" ?\[)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
389 ("]]" ?\])
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
390 ("[a" ?,Ba(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
391 ("[[a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
392 ("[[[a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
393 ("]a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
394 ("][a" ?,Bd(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
395 ("[c" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
396 ("[[c" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
397 ("]c" ?,Bh(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
398 ("[d" ?,Bo(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
399 ("[[d" ?,Bo(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
400 ("]d" ?,Bo(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
401 ("[e" ?,Bi(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
402 ("[[e" ?,Bl(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
403 ("]e" ?,Bl(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
404 ("[i" ?,Bm(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
405 ("[l" ?,Be(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
406 ("[[l" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
407 ("]l" ?,B5(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
408 ("[n" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
409 ("[[n" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
410 ("]n" ?,Br(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
411 ("[[o" ?,Bt(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
412 ("[[[o" ?,Bv(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
413 ("[o" ?,Bs(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
414 ("]o" ?,Bt(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
415 ("][o" ?,Bv(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
416 ("[r" ?,B`(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
417 ("[[r" ?,Bx(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
418 ("]r" ?,Bx(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
419 ("[s" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
420 ("[[s" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
421 ("[[[s" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
422 ("]s" ?,B9(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
423 ("[t" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
424 ("[[t" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
425 ("]t" ?,B;(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
426 ("[u" ?,Bz(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
427 ("[[u" ?,By(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
428 ("[[[u" ?,B|(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
429 ("]u" ?,By(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
430 ("][u" ?,B|(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
431 ("[y" ?,B}(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
432 ("[z" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
433 ("[[z" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
434 ("]z" ?,B>(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
435 ("[A" ?,BA(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
436 ("[[A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
437 ("[[[A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
438 ("]A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
439 ("][A" ?,BD(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
440 ("[C" ?,BH(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
441 ("[[C" ?,BH(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
442 ("]C" ?,BH(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
443 ("[D" ?,BO(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
444 ("[[D" ?,BO(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
445 ("]D" ?,BO(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
446 ("[E" ?,BI(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
447 ("[[E" ?,BL(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
448 ("]E" ?,BL(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
449 ("[I" ?,BM(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
450 ("[L" ?,BE(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
451 ("[[L" ?,B%(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
452 ("]L" ?,B%(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
453 ("[N" ?,BR(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
454 ("[[N" ?,BR(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
455 ("]N" ?,BR(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
456 ("[O" ?,BS(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
457 ("[[O" ?,BT(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
458 ("[[[O" ?,BV(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
459 ("]O" ?,BT(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
460 ("][O" ?,BV(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
461 ("[R" ?,B@(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
462 ("[[R" ?,BX(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
463 ("]R" ?,BX(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
464 ("[S" ?,B)(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
465 ("[[S" ?,B)(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
466 ("[[[S" ?,B_(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
467 ("]S" ?,B)(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
468 ("[T" ?,B+(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
469 ("[[T" ?,B+(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
470 ("]T" ?,B+(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
471 ("[U" ?,BZ(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
472 ("[[U" ?,BY(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
473 ("[[[U" ?,B\(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
474 ("]U" ?,BY(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
475 ("][U" ?,B\(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
476 ("[Y" ?,B](B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
477 ("[Z" ?,B.(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
478 ("[[Z" ?,B.(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
479 ("]Z" ?,B.(B)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
480 ([kp-1] ?1)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
481 ([kp-2] ?2)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
482 ([kp-3] ?3)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
483 ([kp-4] ?4)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
484 ([kp-5] ?5)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
485 ([kp-6] ?6)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
486 ([kp-7] ?7)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
487 ([kp-8] ?8)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
488 ([kp-9] ?9)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
489 ([kp-0] ?0)
0ad514a44245 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
490 ([kp-add] ?+))