etc/ms-kermit

   1 ;;; The code here is forced by the interface, and is not subject to
   2 ;;; copyright, constituting the only possible expression of the algorithm
   3 ;;; in this format.
   4
   5 ;;; This file is designed for an 8-bit connection.
   6 ;;; Use the file ms-7bkermit if you have a 7-bit connection.
   7
   8 ;; Meta key mappings for EMACS
   9 ;; By Robert Earl (rearl@watnxt3.ucr.edu)
  10 ;; May 13, 1990
  11 ;;
  12 ;; WARNING:
  13 ;;  requires an 8-bit path to host.  many dialups and lans won't pass the
  14 ;;  eighth bit by default and may require a special command to turn this
  15 ;;  off.  `screen' is known to mask the eighth bit of input as well.
  16
  17 set term controls 8-bit
  18 set translation key off
  19
  20 ;; control keys
  21 set key \3449 \128      ;; m-c-@
  22 set key \3358 \129      ;; m-c-a
  23 set key \3376 \130      ;; m-c-b
  24 set key \3374 \131      ;; m-c-c
  25 set key \3360 \132      ;; m-c-d
  26 set key \3346 \133      ;; m-c-e
  27 set key \3361 \134      ;; m-c-f
  28 set key \3362 \135      ;; m-c-g
  29 set key \3342 \136      ;; m-bs
  30 set key \3363 \136      ;; m-c-h (sends same code as above)
  31 set key \2469 \137      ;; m-tab
  32 set key \3351 \137      ;; m-c-i (same as above)
  33 set key \3364 \138      ;; m-c-j
  34 set key \3365 \139      ;; m-c-k
  35 set key \3366 \140      ;; m-c-l
  36 ;set key \3378 \141     ;; m-c-m
  37 set key \2332 \141      ;; m-ret (sends same code as above)
  38 set key \3377 \142      ;; m-c-n
  39 set key \3352 \143      ;; m-c-o
  40 set key \3353 \144      ;; m-c-p
  41 set key \3344 \145      ;; m-c-q
  42 set key \3347 \146      ;; m-c-r
  43 set key \3359 \147      ;; m-c-s
  44 set key \3348 \148      ;; m-c-t
  45 set key \3350 \149      ;; m-c-u
  46 set key \3375 \150      ;; m-c-v
  47 set key \3345 \151      ;; m-c-w
  48 set key \3373 \152      ;; m-c-x
  49 set key \3349 \153      ;; m-c-y
  50 set key \3372 \154      ;; m-c-z
  51
  52 ;; misc keys
  53 ;set key \3354 \155     ;; m-c-[
  54 set key \2305 \155      ;; m-esc (sends same as above)
  55 set key \3371 \156      ;; m-c-\
  56 set key \3355 \157      ;; m-c-]
  57 set key \3453 \158      ;; m-c-^
  58 set key \3458 \159      ;; m-c-_
  59
  60 ;; \160 is conspicuously missing here--
  61 ;; alt-spc doesn't generate a distinct scan code...
  62 ;; neither do shift-spc and ctrl-spc.
  63 ;; no idea why.
  64
  65 set key \2936 \161      ;; m-!
  66 set key \2856 \162      ;; m-"
  67 set key \2938 \163      ;; m-#
  68 set key \2939 \164      ;; m-$
  69 set key \2940 \165      ;; m-%
  70 set key \2942 \166      ;; m-&
  71 set key \2344 \167      ;; m-'
  72 set key \2944 \168      ;; m-(
  73 set key \2945 \169      ;; m-)
  74 set key \2943 \170      ;; m-*
  75 set key \2947 \171      ;; m-+
  76 set key \2355 \172      ;; m-,
  77 set key \2434 \173      ;; m--
  78 set key \2356 \174      ;; m-.
  79 set key \2357 \175      ;; m-/
  80
  81 ;; number keys
  82 set key \2433 \176      ;; m-0
  83 set key \2424 \177      ;; m-1
  84 set key \2425 \178
  85 set key \2426 \179
  86 set key \2427 \180
  87 set key \2428 \181
  88 set key \2429 \182
  89 set key \2430 \183
  90 set key \2431 \184
  91 set key \2432 \185      ;; m-9
  92
  93 set key \2855 \186      ;; m-:
  94 set key \2343 \187      ;; m-;
  95 set key \2867 \188      ;; m-<
  96 set key \2435 \189      ;; m-=
  97 set key \2868 \190      ;; m->
  98 set key \2869 \191      ;; m-?
  99 set key \2937 \192      ;; m-@
 100
 101 ;; shifted A-Z
 102 set key \2846 \193      ;; m-A
 103 set key \2864 \194
 104 set key \2862 \195
 105 set key \2848 \196
 106 set key \2834 \197
 107 set key \2849 \198
 108 set key \2850 \199
 109 set key \2851 \200
 110 set key \2839 \201
 111 set key \2852 \202
 112 set key \2853 \203
 113 set key \2854 \204
 114 set key \2866 \205
 115 set key \2865 \206
 116 set key \2840 \207
 117 set key \2841 \208
 118 set key \2832 \209
 119 set key \2835 \210
 120 set key \2847 \211
 121 set key \2836 \212
 122 set key \2838 \213
 123 set key \2863 \214
 124 set key \2833 \215
 125 set key \2861 \216
 126 set key \2837 \217
 127 set key \2860 \218      ;; m-Z
 128
 129 set key \2330 \219      ;; m-[
 130 set key \2347 \220      ;; m-\
 131 set key \2331 \221      ;; m-]
 132 set key \2941 \222      ;; m-^
 133 set key \2946 \223      ;; m-_
 134 set key \2345 \224      ;; m-`
 135
 136 ;; lowercase a-z
 137 set key \2334 \225      ;; m-a
 138 set key \2352 \226
 139 set key \2350 \227
 140 set key \2336 \228
 141 set key \2322 \229
 142 set key \2337 \230
 143 set key \2338 \231
 144 set key \2339 \232
 145 set key \2327 \233
 146 set key \2340 \234
 147 set key \2341 \235
 148 set key \2342 \236
 149 set key \2354 \237
 150 set key \2353 \238
 151 set key \2328 \239
 152 set key \2329 \240
 153 set key \2320 \241
 154 set key \2323 \242
 155 set key \2335 \243
 156 set key \2324 \244
 157 set key \2326 \245
 158 set key \2351 \246
 159 set key \2321 \247
 160 set key \2349 \248
 161 set key \2325 \249
 162 set key \2348 \250      ;; m-z
 163
 164 ;; more shifted misc. keys
 165 set key \2842 \251      ;; m-{
 166 set key \2859 \252      ;; m-|
 167 set key \2843 \253      ;; m-}
 168 set key \2857 \254      ;; m-~
 169 set key \2318 \255      ;; m-del
 170
 171
 172 ;;; arch-tag: 93cefb0a-2b07-4d09-ae78-4d807b15645d