 \newcount\cpflag\cpflag=0
 \newcount\edflag\edflag=0
 \def\icp{\cpflag=1}
 \def\ied{\edflag=1}
 \def\mystrut{\vrule height2.4ex width0pt}

% Raw control-panel key box

 \def\kbox#1{%\thinspace$\null$\mystrut
\setbox0=\hbox{\vrule\thinspace\tt#1\thinspace\vrule}\relax
               \ifdim\wd0<1em\dimen0=1em\else\dimen0=\wd0\fi
               \lower.7ex\vbox{\hrule\hbox to\dimen0{\vrule height1.9ex depth.7ex
                                                     \hfill\thinspace\tt#1\thinspace\hfill
                                                     \vrule height1.9ex depth.7ex
                                                    }%         		      
                               \hrule
                              }%
             %\thinspace
            }


 \def\key#1#2{#1\ifodd\cpflag\cpflag=0\idag
                   \indexbare{Control-panel keys/#2{\string\ent#2}}\fi
%                  \indexbare{Control-panel keys, *ent*#2 [as] #2}\fi
                \ifodd\edflag\edflag=0\idag
                   \indexbare{Editor keys/#2{\string\ent#2}}\fi}
%                  \indexbare{Editor keys, *ent*#2 [as] #2}\fi}


 \def\keya{\key{\kbox{a}}{A}}
 \def\keyA{\key{\kbox{A}}{A}}	            \def\entA{\kbox{a}\,\kbox{A}}
 \def\keyb{\key{\kbox{b}}{B}}
 \def\keyB{\key{\kbox{B}}{B}}	            \def\entB{\kbox{b}\,\kbox{B}}
 \def\keyc{\key{\kbox{c}}{C}}
 \def\keyC{\key{\kbox{C}}{C}}	            \def\entC{\kbox{c}\,\kbox{C}}
 \def\keyd{\key{\kbox{d}}{D}}
 \def\keyD{\key{\kbox{D}}{D}}	            \def\entD{\kbox{d}\,\kbox{D}}
 \def\keye{\key{\kbox{e}}{E}}
 \def\keyE{\key{\kbox{E}}{E}}	            \def\entE{\kbox{e}\,\kbox{E}}
 \def\keyf{\key{\kbox{f}}{F}}
 \def\keyF{\key{\kbox{F}}{F}}	            \def\entF{\kbox{f}\,\kbox{F}}
 \def\keyg{\key{\kbox{g}}{G}}
 \def\keyG{\key{\kbox{G}}{G}}	            \def\entG{\kbox{g}\,\kbox{G}}
 \def\keyh{\key{\kbox{h}}{H}}
 \def\keyH{\key{\kbox{H}}{H}}	            \def\entH{\kbox{h}\,\kbox{H}}
 \def\keyi{\key{\kbox{i}}{I}}
 \def\keyI{\key{\kbox{I}}{I}}	            \def\entI{\kbox{i}\,\kbox{I}}
 \def\keyj{\key{\kbox{j}}{J}}
 \def\keyJ{\key{\kbox{J}}{J}}	            \def\entJ{\kbox{j}\,\kbox{J}}
 \def\keyk{\key{\kbox{k}}{K}}
 \def\keyK{\key{\kbox{K}}{K}}	            \def\entK{\kbox{k}\,\kbox{K}}
 \def\keyl{\key{\kbox{l}}{L}}
 \def\keyL{\key{\kbox{L}}{L}}	            \def\entL{\kbox{l}\,\kbox{L}}
 \def\keym{\key{\kbox{m}}{M}}
 \def\keyM{\key{\kbox{M}}{M}}	            \def\entM{\kbox{m}\,\kbox{M}}
 \def\keyn{\key{\kbox{n}}{N}}
 \def\keyN{\key{\kbox{N}}{N}}	            \def\entN{\kbox{n}\,\kbox{N}}
 \def\keyo{\key{\kbox{o}}{O}}
 \def\keyO{\key{\kbox{O}}{O}}	            \def\entO{\kbox{o}\,\kbox{O}}
 \def\keyp{\key{\kbox{p}}{P}}
 \def\keyP{\key{\kbox{P}}{P}}	            \def\entP{\kbox{p}\,\kbox{P}}
 \def\keyq{\key{\kbox{q}}{Q}}
 \def\keyQ{\key{\kbox{Q}}{Q}}	            \def\entQ{\kbox{q}\,\kbox{Q}}
 \def\keyr{\key{\kbox{r}}{R}}
 \def\keyR{\key{\kbox{R}}{R}}	            \def\entR{\kbox{r}\,\kbox{R}}
 \def\keys{\key{\kbox{s}}{S}}
 \def\keyS{\key{\kbox{S}}{S}}	            \def\entS{\kbox{s}\,\kbox{S}}
 \def\keyt{\key{\kbox{t}}{T}}
 \def\keyT{\key{\kbox{T}}{T}}	            \def\entT{\kbox{t}\,\kbox{T}}
 \def\keyu{\key{\kbox{u}}{U}}
 \def\keyU{\key{\kbox{U}}{U}}	            \def\entU{\kbox{u}\,\kbox{U}}
 \def\keyv{\key{\kbox{v}}{V}}
 \def\keyV{\key{\kbox{V}}{V}}	            \def\entV{\kbox{v}\,\kbox{V}}
 \def\keyw{\key{\kbox{w}}{W}}
 \def\keyW{\key{\kbox{W}}{W}}	            \def\entW{\kbox{w}\,\kbox{W}}
 \def\keyx{\key{\kbox{x}}{X}}
 \def\keyX{\key{\kbox{X}}{X}}	            \def\entX{\kbox{x}\,\kbox{X}}
 \def\keyy{\key{\kbox{y}}{Y}}
 \def\keyY{\key{\kbox{Y}}{Y}}	            \def\entY{\kbox{y}\,\kbox{Y}}
 \def\keyz{\key{\kbox{z}}{Z}}
 \def\keyZ{\key{\kbox{Z}}{Z}}	            \def\entZ{\kbox{z}\,\kbox{Z}}

 \def\ctrla{\key{\kbox{Ctrl-A}}{Ac}}	    \def\entAc{\kbox{Ctrl-A}}
 \def\ctrlb{\key{\kbox{Ctrl-B}}{Bc}}	    \def\entBc{\kbox{Ctrl-B}}
 \def\ctrlc{\key{\kbox{Ctrl-C}}{Cc}}	    \def\entCc{\kbox{Ctrl-C}}
 \def\ctrld{\key{\kbox{Ctrl-D}}{Dc}}	    \def\entDc{\kbox{Ctrl-D}}
 \def\ctrle{\key{\kbox{Ctrl-E}}{Ec}}	    \def\entEc{\kbox{Ctrl-E}}
 \def\ctrlf{\key{\kbox{Ctrl-F}}{Fc}}	    \def\entFc{\kbox{Ctrl-F}}
 \def\ctrlg{\key{\kbox{Ctrl-G}}{Gc}}	    \def\entGc{\kbox{Ctrl-G}}
 \def\ctrlh{\key{\kbox{Ctrl-H}}{Hc}}	    \def\entHc{\kbox{Ctrl-H}}
 \def\ctrli{\key{\kbox{Ctrl-I}}{Ic}}	    \def\entIc{\kbox{Ctrl-I}}
 \def\ctrlj{\key{\kbox{Ctrl-J}}{Jc}}	    \def\entJc{\kbox{Ctrl-J}}
 \def\ctrlk{\key{\kbox{Ctrl-K}}{Kc}}	    \def\entKc{\kbox{Ctrl-K}}
 \def\ctrll{\key{\kbox{Ctrl-L}}{Lc}}	    \def\entLc{\kbox{Ctrl-L}}
 \def\ctrlm{\key{\kbox{Ctrl-M}}{Mc}}	    \def\entMc{\kbox{Ctrl-M}}
 \def\ctrln{\key{\kbox{Ctrl-N}}{Nc}}	    \def\entNc{\kbox{Ctrl-N}}
 \def\ctrlo{\key{\kbox{Ctrl-O}}{Oc}}	    \def\entOc{\kbox{Ctrl-O}}
 \def\ctrlp{\key{\kbox{Ctrl-P}}{Pc}}	    \def\entPc{\kbox{Ctrl-P}}
 \def\ctrlq{\key{\kbox{Ctrl-Q}}{Qc}}	    \def\entQc{\kbox{Ctrl-Q}}
 \def\ctrlr{\key{\kbox{Ctrl-R}}{Rc}}	    \def\entRc{\kbox{Ctrl-R}}
 \def\ctrls{\key{\kbox{Ctrl-S}}{Sc}}	    \def\entSc{\kbox{Ctrl-S}}
 \def\ctrlt{\key{\kbox{Ctrl-T}}{Tc}}	    \def\entTc{\kbox{Ctrl-T}}
 \def\ctrlu{\key{\kbox{Ctrl-U}}{Uc}}	    \def\entUc{\kbox{Ctrl-U}}
 \def\ctrlv{\key{\kbox{Ctrl-V}}{Vc}}	    \def\entVc{\kbox{Ctrl-V}}
 \def\ctrlw{\key{\kbox{Ctrl-W}}{Wc}}	    \def\entWc{\kbox{Ctrl-W}}
 \def\ctrlx{\key{\kbox{Ctrl-X}}{Xc}}	    \def\entXc{\kbox{Ctrl-X}}
 \def\ctrly{\key{\kbox{Ctrl-Y}}{Yc}}	    \def\entYc{\kbox{Ctrl-Y}}
 \def\ctrlz{\key{\kbox{Ctrl-Z}}{Zc}}	    \def\entZc{\kbox{Ctrl-Z}}

 \def\alta{\key{\kbox{Alt-A}}{zzza}}	    \def\entzzza{\kbox{Alt-A}}
 \def\altb{\key{\kbox{Alt-B}}{zzzb}}	    \def\entzzzb{\kbox{Alt-B}}
 \def\altc{\key{\kbox{Alt-C}}{zzzc}}	    \def\entzzzc{\kbox{Alt-C}}
 \def\altd{\key{\kbox{Alt-D}}{zzzd}}	    \def\entzzzd{\kbox{Alt-D}}
 \def\alte{\key{\kbox{Alt-E}}{zzze}}	    \def\entzzze{\kbox{Alt-E}}
 \def\altf{\key{\kbox{Alt-F}}{zzzf}}	    \def\entzzzf{\kbox{Alt-F}}
 \def\altg{\key{\kbox{Alt-G}}{zzzg}}	    \def\entzzzg{\kbox{Alt-G}}
 \def\alth{\key{\kbox{Alt-H}}{zzzh}}	    \def\entzzzh{\kbox{Alt-H}}
 \def\alti{\key{\kbox{Alt-I}}{zzzi}}	    \def\entzzzi{\kbox{Alt-I}}
 \def\altj{\key{\kbox{Alt-J}}{zzzj}}	    \def\entzzzj{\kbox{Alt-J}}
 \def\altk{\key{\kbox{Alt-K}}{zzzk}}	    \def\entzzzk{\kbox{Alt-K}}
 \def\altl{\key{\kbox{Alt-L}}{zzzl}}	    \def\entzzzl{\kbox{Alt-L}}
 \def\altm{\key{\kbox{Alt-M}}{zzzm}}	    \def\entzzzm{\kbox{Alt-M}}
 \def\altn{\key{\kbox{Alt-N}}{zzzn}}	    \def\entzzzn{\kbox{Alt-N}}
 \def\alto{\key{\kbox{Alt-O}}{zzzo}}	    \def\entzzzo{\kbox{Alt-O}}
 \def\altp{\key{\kbox{Alt-P}}{zzzp}}	    \def\entzzzp{\kbox{Alt-P}}
 \def\altq{\key{\kbox{Alt-Q}}{zzzq}}	    \def\entzzzq{\kbox{Alt-Q}}
 \def\altr{\key{\kbox{Alt-R}}{zzzr}}	    \def\entzzzr{\kbox{Alt-R}}
 \def\alts{\key{\kbox{Alt-S}}{zzzs}}	    \def\entzzzs{\kbox{Alt-S}}
 \def\altt{\key{\kbox{Alt-T}}{zzzt}}	    \def\entzzzt{\kbox{Alt-T}}
 \def\altu{\key{\kbox{Alt-U}}{zzzu}}        \def\entzzzu{\kbox{Alt-U}}
 \def\altv{\key{\kbox{Alt-V}}{zzzv}}	    \def\entzzzv{\kbox{Alt-V}}
 \def\altw{\key{\kbox{Alt-W}}{zzzw}}	    \def\entzzzw{\kbox{Alt-W}}
 \def\alty{\key{\kbox{Alt-X}}{zzzx}}	    \def\entzzzx{\kbox{Alt-X}}
 \def\alty{\key{\kbox{Alt-Y}}{zzzy}}	    \def\entzzzy{\kbox{Alt-Y}}
 \def\altz{\key{\kbox{Alt-Z}}{zzzz}}	    \def\entzzzz{\kbox{Alt-Z}}

 \def\altfn#1{\key{\kbox{Alt-F#1}}{custom}}    \def\entcustom{custom keys}


 \def\keynum#1{\key{\kbox{#1}}{digits}}	    \def\entdigits{digits}
 \def\keyfn#1{\key{\kbox{f#1}}{function}}	   
 \def\keyFn#1{\key{\kbox{F#1}}{function}}	    \def\entfunction{function keys}
 
 \def\keyup{\key\entzc{zc}}		    \def\entzc{\kbox{{$\uparrow$}}}
 \def\keydown{\key\entzd{zd}}		    \def\entzd{\kbox{{$\downarrow$}}}
 \def\keyleft{\key\entze{ze}}		    \def\entze{\kbox{{$\leftarrow$}}}
 \def\keyright{\key\entzf{zf}}		    \def\entzf{\kbox{{$\rightarrow$}}}
 \def\keyesc{\key\entzg{zg}}		    \def\entzg{\kbox{{\sc Esc}}}
 \def\keyhome{\key\entzh{zh}}		    \def\entzh{\kbox{{\sc Home}}}
 \def\keyend{\key\entzi{zi}}		    \def\entzi{\kbox{{\sc End}}}
 \def\keypgup{\key\entzj{zj}}		    \def\entzj{\kbox{{\sc PgUp}}}
 \def\keypgdn{\key\entzk{zk}}		    \def\entzk{\kbox{{\sc PgDn}}}
 \def\keyins{\key\entzl{zl}}		    \def\entzl{\kbox{{\sc Ins}}}
 \def\keydel{\key\entzm{zm}}		    \def\entzm{\kbox{{\sc Del}}}
 \def\keybacktab{\key\entzn{zn}}	    \def\entzn{\kbox{{\sc Backtab}}}
 \def\keytab{\key\entzo{zo}}		    \def\entzo{\kbox{{\sc Tab}}}
 \def\keyspace{\key\entzoa{zoa}}	    \def\entzoa{\kbox{{\sc Space}}}
 \def\keyrubout{\key\entzob{zob}}           \def\entzob{\kbox{{\sc Rubout}}}
 \def\keyreturn{\key\entzpa{zpa}}	    \def\entzpa{\kbox{$\hookleftarrow$}}
 \def\keybreak{\key\entzpb{zpb}}	    \def\entzpb{\kbox{{\sc Break}}}
 \def\keycapslock{\key\entzpba{zpba}}	    \def\entzpba{\kbox{{\sc CapsLock}}}
 \def\keyscrolllock{\key\entzpbb{zpbb}}	    \def\entzpbb{\kbox{{\sc ScrollLock}}}


 \def\keyexclamation{\key\entzq{zq}}	    \def\entzq{\kbox{!}}
 \def\keyquote{\key\entzr{zr}}		    \def\entzr{\kbox{"}}
 \def\keynumber{\key\entzs{zs}}		    \def\entzs{\kbox{\#}}
 \def\keydollar{\key\entzt{zt}}		    \def\entzt{\kbox{\$}}
 \def\keypercent{\key\entzu{zu}}	    \def\entzu{\kbox{\%}}
 \def\keyampersand{\key\entzv{zv}}	    \def\entzv{\kbox{\&}}
 \def\keyrtquote{\key\entzw{zw}}	    \def\entzw{\kbox{'}}
 \def\keyltparen{\key\entzx{zx}}	    \def\entzx{\kbox{(}}
 \def\keyrtparen{\key\entzy{zy}}	    \def\entzy{\kbox{)}}
 \def\keyasterisk{\key\entzz{zz}}	    \def\entzz{\kbox{*}}
 \def\keyplus{\key\entzza{zza}}		    \def\entzza{\kbox{+}}
 \def\keycomma{\key\entzzb{zzb}}	    \def\entzzb{\kbox{,}}
 \def\keyminus{\key\entzzc{zzc}}	    \def\entzzc{\kbox{-}}
 \def\keyperiod{\key\entzzd{zzd}}	    \def\entzzd{\kbox{.}}
 \def\keyslash{\key\entzze{zze}}	    \def\entzze{\kbox{/}}
 \def\keycolon{\key\entzzf{zzf}}	    \def\entzzf{\kbox{:}}
 \def\keysemicolon{\key\entzzg{zzg}}	    \def\entzzg{\kbox{;}}
 \def\keyless{\key\entzzh{zzh}}		    \def\entzzh{\kbox{<}}
 \def\keyequal{\key\entzzi{zzi}}	    \def\entzzi{\kbox{=}}
 \def\keygreater{\key\entzzj{zzj}}	    \def\entzzj{\kbox{>}}
 \def\keyquestion{\key\entzzk{zzk}}	    \def\entzzk{\kbox{?}}
 \def\keyltsquare{\key\entzzl{zzl}}	    \def\entzzl{\kbox{[}}
 \def\keybackslash{\key\entzzm{zzm}}	    \def\entzzm{\kbox{\char"5C}}
 \def\keyrtsquare{\key\entzzn{zzn}}	    \def\entzzn{\kbox{]}}
 \def\keyhat{\key\entzzo{zzo}}		    \def\entzzo{\kbox{\char"5E}}
 \def\keyunder{\key\entzzp{zzp}}	    \def\entzzp{\kbox{\_}}
 \def\keyltquote{\key\entzzq{zzq}}	    \def\entzzq{\kbox{`}}
 \def\keyltcurly{\key\entzzr{zzr}}	    \def\entzzr{\kbox{\{}}
 \def\keybar{\key\entzzs{zzs}}		    \def\entzzs{\kbox{|}}
 \def\keyrtcurly{\key\entzzt{zzt}}	    \def\entzzt{\kbox{\}}}
 \def\keytilde{\key\entzzu{zzu}}	    \def\entzzu{\kbox{\char"7E}}

