;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(defvar wyse50-terminal-map (byte-code "\300 \301\211\203\211@\302@A@#\210
A\266\202\202\210\207" [make-sparse-keymap (("" [up]) ("\n" [down]) ("\f" [right]) ("" [left]) ("
@
" [f1]) ("
A
" [f2]) ("
B
" [f3]) ("
C
" [f4]) ("
D
" [f5]) ("
E
" [f6]) ("
F
" [f7]) ("
G
" [f8]) ("
H
" [f9]) ("K" [next]) ("T" [clearline]) ("" [home]) ("" [end]) ("Q" [insert]) ("E" [insertline]) ("R" [deleteline]) ("P" [print]) ("r" [replace]) ("
I
" [f10]) ("
J
" [f11]) ("
K
" [f12]) ("
L
" [f13]) ("
M
" [f14]) ("
N
" [f15]) ("
O
" [f16]) ("
`
" [f17]) ("
a
" [f18]) ("
b
" [f19]) ("
c
" [f20]) ("
d
" [f21]) ("
e
" [f22]) ("
f
" [f23]) ("
g
" [f24]) ("
h
" [f25]) ("
i
" [f26]) ("
j
" [f27]) ("
k
" [f28]) ("
l
" [f29]) ("
m
" [f30]) ("
n
" [f31]) ("
o
" [f32]) ("I" [key-stab]) ("J" [key-snext]) ("Y" [key-clear]) ("W" [127]) ("

" [funct-up]) ("
\n
" [funct-down]) ("
\f
" [funct-right]) ("

" [funct-left]) ("


" [funct-return]) ("
	
" [funct-tab])) define-key] 7))
#@46 Terminal initialization function for wyse50.
(defalias 'terminal-init-wyse50 #[0 "\302!\303
\304	!\"\210\303	\"\266\305\306\307\"\207" [wyse50-terminal-map input-decode-map copy-keymap set-keymap-parent keymap-parent add-hook kill-emacs-hook #[0 "\300\301\302 T\303Q!\207" [send-string-to-terminal "a23R" frame-width "CG0"] 4 nil nil]] 5 (#$ . 1063)])
#@293 To be called by `tty-setup-hook'.  Overrides 6 Emacs standard keys
whose functions are then typed as follows:
C-a	Funct Left-arrow
C-h	M-?
LFD	Funct Return, some modes override down-arrow via LFD
C-k	CLR Line
C-l	Scrn CLR
M-r	M-x move-to-window-line, Funct up-arrow or down-arrow are similar
(defalias 'enable-arrow-keys #[0 "\300\301M\207" [enable-arrow-keys nil] 2 (#$ . 1427) nil])
(provide 'term/wyse50)