::  Modified key event
::
::::  /hoon/kyev/sur
  ::
=-  ,[p=(set ?(%ctrl %shift %alt %meta)) q=$|(cord [%act speck])]
^=  speck
$?  %ctrl  %shift  %alt   %meta   %entr  %esc  %caps  %uncap
    %pgup  %pgdn   %home  %end    %baxp  %del  %ins
    %up    %down   %left  %right
==