home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_100 / 198_01 / ebind.h < prev    next >
Text File  |  1990-01-23  |  16KB  |  524 lines
  1. /*    EBIND:        Initial default key to function bindings for
  2.             MicroEMACS 3.7
  3. */
  4.  
  5. /*
  6.  * Command table.
  7.  * This table  is *roughly* in ASCII order, left to right across the
  8.  * characters of the command. This explains the funny location of the
  9.  * control-X commands.
  10.  */
  11. KEYTAB  keytab[NBINDS] = {
  12.     {CTRL|'A',        gobol},
  13.     {CTRL|'B',        backchar},
  14.     {CTRL|'C',        insspace},
  15.     {CTRL|'D',        forwdel},
  16.     {CTRL|'E',        goeol},
  17.     {CTRL|'F',        forwchar},
  18.     {CTRL|'G',        ctrlg},
  19.     {CTRL|'H',        backdel},
  20.     {CTRL|'I',        tab},
  21.     {CTRL|'J',        indent},
  22.     {CTRL|'K',        killtext},
  23.     {CTRL|'L',        refresh},
  24.     {CTRL|'M',        newline},
  25.     {CTRL|'N',        forwline},
  26.     {CTRL|'O',        openline},
  27.     {CTRL|'P',        backline},
  28.     {CTRL|'Q',        quote},
  29.     {CTRL|'R',        backsearch},
  30.     {CTRL|'S',        forwsearch},
  31.     {CTRL|'T',        twiddle},
  32.     {CTRL|'U',        unarg},
  33.     {CTRL|'V',        forwpage},
  34.     {CTRL|'W',        killregion},
  35.     {CTRL|'X',        cex},
  36.     {CTRL|'Y',        yank},
  37.     {CTRL|'Z',        backpage},
  38.     {CTRL|']',        meta},
  39.     {CTLX|CTRL|'B',        listbuffers},
  40.     {CTLX|CTRL|'C',        quit},          /* Hard quit.           */
  41. #if    AEDIT
  42.     {CTLX|CTRL|'D',        detab},
  43.     {CTLX|CTRL|'E',        entab},
  44. #endif
  45.     {CTLX|CTRL|'F',        filefind},
  46.     {CTLX|CTRL|'I',        insfile},
  47.     {CTLX|CTRL|'L',        lowerregion},
  48.     {CTLX|CTRL|'M',        delmode},
  49.     {CTLX|CTRL|'N',        mvdnwind},
  50.     {CTLX|CTRL|'O',        deblank},
  51.     {CTLX|CTRL|'P',        mvupwind},
  52.     {CTLX|CTRL|'R',        fileread},
  53.     {CTLX|CTRL|'S',        filesave},
  54. #if    AEDIT
  55.     {CTLX|CTRL|'T',        trim},
  56. #endif
  57.     {CTLX|CTRL|'U',        upperregion},
  58.     {CTLX|CTRL|'V',        viewfile},
  59.     {CTLX|CTRL|'W',        filewrite},
  60.     {CTLX|CTRL|'X',        swapmark},
  61.     {CTLX|CTRL|'Z',        shrinkwind},
  62.     {CTLX|' ',        remmark},
  63.     {CTLX|'?',        deskey},
  64.     {CTLX|'!',        spawn},
  65.     {CTLX|'@',        pipecmd},
  66.     {CTLX|'#',        filter},
  67.     {CTLX|'$',        spawn},
  68.     {CTLX|'=',        showcpos},
  69.     {CTLX|'(',        ctlxlp},
  70.     {CTLX|')',        ctlxrp},
  71.     {CTLX|'<',        narrow},
  72.     {CTLX|'>',        widen},
  73.     {CTLX|'^',        enlargewind},
  74.     {CTLX|' ',        remmark},
  75.     {CTLX|'0',        delwind},
  76.     {CTLX|'1',        onlywind},
  77.     {CTLX|'2',        splitwind},
  78.     {CTLX|'A',        setvar},
  79.     {CTLX|'B',        usebuffer},
  80.     {CTLX|'C',        spawncli},
  81. #if    BSD
  82.     {CTLX|'D',        bktoshell},
  83. #endif
  84.     {CTLX|'E',        ctlxe},
  85.     {CTLX|'F',        setfillcol},
  86. #if    DEBUGM
  87.     {CTLX|'G',        dispvar},
  88. #endif
  89.     {CTLX|'K',        killbuffer},
  90.     {CTLX|'M',        setmode},
  91.     {CTLX|'N',        filename},
  92.     {CTLX|'O',        nextwind},
  93.     {CTLX|'P',        prevwind},
  94. #if    ISRCH
  95.     {CTLX|'R',        risearch},
  96.     {CTLX|'S',        fisearch},
  97. #endif
  98.     {CTLX|'W',        resize},
  99.     {CTLX|'X',        nextbuffer},
  100.     {CTLX|'Z',        enlargewind},
  101. #if    WORDPRO
  102.     {META|CTRL|'C',        wordcount},
  103. #endif
  104. #if    PROC
  105.     {META|CTRL|'E',        execproc},
  106. #endif
  107. #if    CFENCE
  108.     {META|CTRL|'F',        getfence},
  109. #endif
  110.     {META|CTRL|'H',        delbword},
  111.     {META|CTRL|'K',        unbindkey},
  112.     {META|CTRL|'L',        reposition},
  113.     {META|CTRL|'M',        delgmode},
  114.     {META|CTRL|'N',        namebuffer},
  115.     {META|CTRL|'R',        qreplace},
  116.     {META|CTRL|'S',        newsize},
  117.     {META|CTRL|'T',        newwidth},
  118.     {META|CTRL|'V',        scrdwnxt},
  119. #if    WORDPRO
  120.     {META|CTRL|'W',        killpara},
  121. #endif
  122.     {META|CTRL|'X',        execcmd},
  123.     {META|CTRL|'Z',        scrupnxt},
  124.     {META|' ',        setmark},
  125.     {META|'?',        help},
  126.     {META|'!',        reposition},
  127.     {META|'.',        setmark},
  128.     {META|'>',        goeob},
  129.     {META|'<',        gobob},
  130.     {META|'\\',        delfword},
  131.     {META|'~',        unmark},
  132. #if    APROP
  133.     {META|'A',        apro},
  134. #endif
  135.     {META|'B',        backword},
  136.     {META|'C',        capword},
  137.     {META|'D',        delfword},
  138. #if    CRYPT
  139.     {META|'E',        setkey},
  140. #endif
  141.     {META|'F',        forwword},
  142.     {META|'G',        gotoline},
  143.     {META|'K',        bindtokey},
  144.     {META|'L',        lowerword},
  145.     {META|'M',        setgmode},
  146. #if    WORDPRO
  147.     {META|'N',        goeop},
  148.     {META|'P',        gobop},
  149.     {META|'Q',        fillpara},
  150. #endif
  151.     {META|'R',        sreplace},
  152. #if    BSD | VMS
  153.     {META|'S',        bktoshell},
  154. #endif
  155.     {META|'U',        upperword},
  156.     {META|'V',        backpage},
  157.     {META|'W',        copyregion},
  158.     {META|'X',        namedcmd},
  159.     {META|'Z',        quickexit},
  160.     {META|0x7F,              delbword},
  161.  
  162. #if    MSDOS & (HP150 == 0) & (WANGPC == 0) & (HP110 == 0)
  163.     {SPEC|CTRL|'_',        forwhunt},
  164.     {SPEC|CTRL|'S',        backhunt},
  165.     {SPEC|71,        gobol},
  166. #if    DECEDT
  167.     {SPEC|72,        scupwind},
  168.     {SPEC|80,        scdnwind},
  169. #else
  170.     {SPEC|72,        backline},
  171.     {SPEC|80,        forwline},
  172. #endif
  173.     {SPEC|73,        backpage},
  174.     {SPEC|75,        backchar},
  175.     {SPEC|77,        forwchar},
  176.     {SPEC|79,        goeol},
  177.     {SPEC|81,        forwpage},
  178.     {SPEC|82,        insspace},
  179.     {SPEC|83,        forwdel},
  180.     {SPEC|115,        backword},
  181.     {SPEC|116,        forwword},
  182. #if    WORDPRO
  183.     {SPEC|132,        gobop},
  184.     {SPEC|118,        goeop},
  185. #endif
  186.     {SPEC|84,        cbuf1},
  187.     {SPEC|85,        cbuf2},
  188.     {SPEC|86,        cbuf3},
  189.     {SPEC|87,        cbuf4},
  190.     {SPEC|88,        cbuf5},
  191.     {SPEC|89,        cbuf6},
  192.     {SPEC|90,        cbuf7},
  193.     {SPEC|91,        cbuf8},
  194.     {SPEC|92,        cbuf9},
  195.     {SPEC|93,        cbuf10},
  196. #endif
  197.  
  198. #if    HP150
  199.     {SPEC|32,        backline},
  200.     {SPEC|33,        forwline},
  201.     {SPEC|35,        backchar},
  202.     {SPEC|34,        forwchar},
  203.     {SPEC|44,        gobob},
  204.     {SPEC|46,        forwpage},
  205.     {SPEC|47,        backpage},
  206.     {SPEC|82,        nextwind},
  207.     {SPEC|68,        openline},
  208.     {SPEC|69,        killtext},
  209.     {SPEC|65,        forwdel},
  210.     {SPEC|64,        ctlxe},
  211.     {SPEC|67,        refresh},
  212.     {SPEC|66,        reposition},
  213.     {SPEC|83,        help},
  214.     {SPEC|81,        deskey},
  215. #endif
  216.  
  217. #if    HP110
  218.     {SPEC|0x4b,        backchar},
  219.     {SPEC|0x4d,        forwchar},
  220.     {SPEC|0x48,        backline},
  221.     {SPEC|0x50,        forwline},
  222.     {SPEC|0x43,        help},
  223.     {SPEC|0x73,        backword},
  224.     {SPEC|0x74,        forwword},
  225.     {SPEC|0x49,        backpage},
  226.     {SPEC|0x51,        forwpage},
  227.     {SPEC|84,        cbuf1},
  228.     {SPEC|85,        cbuf2},
  229.     {SPEC|86,        cbuf3},
  230.     {SPEC|87,        cbuf4},
  231.     {SPEC|88,        cbuf5},
  232.     {SPEC|89,        cbuf6},
  233.     {SPEC|90,        cbuf7},
  234.     {SPEC|91,        cbuf8},
  235. #endif
  236.  
  237. #if    AMIGA
  238.     {SPEC|'?',        help},
  239.     {SPEC|'A',        backline},
  240.     {SPEC|'B',        forwline},
  241.     {SPEC|'C',        forwchar},
  242.     {SPEC|'D',        backchar},
  243.     {SPEC|'T',        backpage},
  244.     {SPEC|'S',        forwpage},
  245.     {SPEC|'a',        backword},
  246.     {SPEC|'`',        forwword},
  247.     {SPEC|'P',        cbuf1},
  248.     {SPEC|'Q',        cbuf2},
  249.     {SPEC|'R',        cbuf3},
  250.     {SPEC|'S',        cbuf4},
  251.     {SPEC|'T',        cbuf5},
  252.     {SPEC|'U',        cbuf6},
  253.     {SPEC|'V',        cbuf7},
  254.     {SPEC|'W',        cbuf8},
  255.     {SPEC|'X',        cbuf9},
  256.     {SPEC|'Y',        cbuf10},
  257.     {127,            forwdel},
  258.  
  259. #endif
  260.  
  261. #if    ST520
  262.     {SPEC|'b',        help},
  263.     {SPEC|'H',        backline},
  264.     {SPEC|'P',        forwline},
  265.     {SPEC|'M',        forwchar},
  266.     {SPEC|'K',        backchar},
  267.     {SPEC|'t',        setmark},
  268.     {SPEC|'a',        yank},
  269.     {SPEC|'R',        insspace},
  270.     {SPEC|'G',        gobob},
  271.     {127,            forwdel},
  272.     {SPEC|84,        cbuf1},
  273.     {SPEC|85,        cbuf2},
  274.     {SPEC|86,        cbuf3},
  275.     {SPEC|87,        cbuf4},
  276.     {SPEC|88,        cbuf5},
  277.     {SPEC|89,        cbuf6},
  278.     {SPEC|90,        cbuf7},
  279.     {SPEC|91,        cbuf8},
  280.     {SPEC|92,        cbuf9},
  281.     {SPEC|93,        cbuf10},
  282.  
  283. #endif
  284.  
  285. #if  WANGPC
  286.     SPEC|0xE0,              quit,           /* Cancel */
  287.     SPEC|0xE1,              help,           /* Help */
  288.     SPEC|0xF1,              help,           /* ^Help */
  289.     SPEC|0xE3,              ctrlg,          /* Print */
  290.     SPEC|0xF3,              ctrlg,          /* ^Print */
  291.     SPEC|0xC0,              backline,       /* North */
  292.     SPEC|0xD0,              gobob,        /* ^North */
  293.     SPEC|0xC1,              forwchar,       /* East */
  294.     SPEC|0xD1,              goeol,        /* ^East */
  295.     SPEC|0xC2,              forwline,       /* South */
  296.     SPEC|0xD2,              gobop,        /* ^South */
  297.     SPEC|0xC3,              backchar,       /* West */
  298.     SPEC|0xD3,              gobol,        /* ^West */
  299.     SPEC|0xC4,              ctrlg,          /* Home */
  300.     SPEC|0xD4,              gobob,        /* ^Home */
  301.     SPEC|0xC5,              filesave,       /* Execute */
  302.     SPEC|0xD5,              ctrlg,          /* ^Execute */
  303.     SPEC|0xC6,              insfile,        /* Insert */
  304.     SPEC|0xD6,              ctrlg,          /* ^Insert */
  305.     SPEC|0xC7,              forwdel,        /* Delete */
  306.     SPEC|0xD7,              killregion,     /* ^Delete */
  307.     SPEC|0xC8,              backpage,       /* Previous */
  308.     SPEC|0xD8,              prevwind,       /* ^Previous */
  309.     SPEC|0xC9,              forwpage,       /* Next */
  310.     SPEC|0xD9,              nextwind,       /* ^Next */
  311.     SPEC|0xCB,              ctrlg,          /* Erase */
  312.     SPEC|0xDB,              ctrlg,          /* ^Erase */
  313.     SPEC|0xDC,              ctrlg,          /* ^Tab */
  314.     SPEC|0xCD,              ctrlg,          /* BackTab */
  315.     SPEC|0xDD,              ctrlg,          /* ^BackTab */
  316.     SPEC|0x80,              ctrlg,          /* Indent */
  317.     SPEC|0x90,              ctrlg,          /* ^Indent */
  318.     SPEC|0x81,              ctrlg,          /* Page */
  319.     SPEC|0x91,              ctrlg,          /* ^Page */
  320.     SPEC|0x82,              ctrlg,          /* Center */
  321.     SPEC|0x92,              ctrlg,          /* ^Center */
  322.     SPEC|0x83,              ctrlg,          /* DecTab */
  323.     SPEC|0x93,              ctrlg,          /* ^DecTab */
  324.     SPEC|0x84,              ctrlg,          /* Format */
  325.     SPEC|0x94,              ctrlg,          /* ^Format */
  326.     SPEC|0x85,              ctrlg,          /* Merge */
  327.     SPEC|0x95,              ctrlg,          /* ^Merge */
  328.     SPEC|0x86,              setmark,        /* Note */
  329.     SPEC|0x96,              ctrlg,          /* ^Note */
  330.     SPEC|0x87,              ctrlg,          /* Stop */
  331.     SPEC|0x97,              ctrlg,          /* ^Stop */
  332.     SPEC|0x88,              forwsearch,     /* Srch */
  333.     SPEC|0x98,              backsearch,     /* ^Srch */
  334.     SPEC|0x89,              sreplace,       /* Replac */
  335.     SPEC|0x99,              qreplace,       /* ^Replac */
  336.     SPEC|0x8A,              ctrlg,          /* Copy */
  337.     SPEC|0x9A,              ctrlg,          /* ^Copy */
  338.     SPEC|0x8B,              ctrlg,          /* Move */
  339.     SPEC|0x9B,              ctrlg,          /* ^Move */
  340.     SPEC|0x8C,              namedcmd,       /* Command */
  341.     SPEC|0x9C,              spawn,          /* ^Command */
  342.     SPEC|0x8D,              ctrlg,          /* ^ */
  343.     SPEC|0x9D,              ctrlg,          /* ^^ */
  344.     SPEC|0x8E,              ctrlg,          /* Blank */
  345.     SPEC|0x9E,              ctrlg,          /* ^Blank */
  346.     SPEC|0x8F,              gotoline,       /* GoTo */
  347.     SPEC|0x9F,              usebuffer,      /* ^GoTo */
  348. #endif
  349.  
  350. #if    DECEDT
  351.     {SPEC|'A',        scupwind},    /* up arrow */
  352.     {SPEC|'B',        scdnwind},    /* down arrow */
  353.     {SPEC|'C',        forwchar},    /* right arrow */
  354.     {SPEC|'D',        backchar},    /* left arrow */
  355.  
  356.     {META|SPEC|'A',        gobob},        /* gold up arrow */
  357.     {META|SPEC|'B',        goeob},        /* gold down arrow */
  358.     {META|SPEC|'C',        forwword},    /* gold right arrow */
  359.     {META|SPEC|'D',        backword},    /* gold left arrow */
  360.  
  361.     {SPEC|'P',        meta},        /* gold */
  362.     {SPEC|'Q',        deskey},    /* help */
  363.     {SPEC|'R',        advhunt},    /* find next */
  364.     {SPEC|'S',        delfline},    /* del line */
  365.     {SPEC|'w',        advbot},    /* page */
  366.     {SPEC|'x',        advpage},    /* section */
  367.     {SPEC|'y',        apkillregion},    /* append */
  368.     {SPEC|'m',        delfword},    /* delete word */
  369.     {SPEC|'t',        advadv},    /* advance */
  370.     {SPEC|'u',        advback},    /* backup */
  371.     {SPEC|'v',        cutregion},    /* cut */
  372.     {SPEC|'l',        forwdel},    /* del char */
  373.     {SPEC|'q',        advword},    /* adv word */
  374.     {SPEC|'r',        adveol},    /* adv end of line */
  375.     {SPEC|'s',        advchar},    /* adv char */
  376.     {SPEC|'p',        advline},    /* line */
  377.     {SPEC|'n',        setmark},    /* select */
  378.     {SPEC|'M',        nullcmd},    /* enter */
  379.  
  380.     {META|SPEC|'P',        meta},        /* gold gold */
  381. #if    APROP
  382.     {META|SPEC|'Q',        apro},        /* gold help */
  383. #endif
  384.     {META|SPEC|'R',        advsearch},    /* gold find */
  385.     {META|SPEC|'S',        yank},        /* undel line */
  386.     {META|SPEC|'w',        namedcmd},    /* command */
  387. #if    WORDPRO
  388.     {META|SPEC|'x',        fillpara},    /* fill */
  389. #endif
  390.     {META|SPEC|'y',        sreplace},    /* change */
  391.     {META|SPEC|'m',        yank},        /* undel word */
  392.     {META|SPEC|'t',        goeob},        /* bottom */
  393.     {META|SPEC|'u',        gobob},        /* top */
  394.     {META|SPEC|'v',        yank},        /* paste */
  395.     {META|SPEC|'l',        yankchar},    /* undel char */
  396.     {META|SPEC|'q',        caseregion},    /* change case */
  397.     {META|SPEC|'r',        killtext},    /* del line */
  398.     {META|SPEC|'s',        specins},    /* special insertion */
  399.     {META|SPEC|'p',        openline},    /* open line */
  400.     {META|SPEC|'n',        remmark},    /* unselect */
  401.     {META|SPEC|'M',        qreplace},    /* substitute */
  402.  
  403.     /* xenix console */
  404.     {SPEC|'H',        gobol},        /* home */
  405.     {SPEC|'I',        backpage},    /* page up */
  406.     {SPEC|'F',        goeol},        /* end */
  407.     {SPEC|'G',        forwpage},    /* page down */
  408.     {SPEC|'L',        setovrwrt},    /* insert */
  409.  
  410.     {META|SPEC|'H',        gobol},        /* gold home */
  411.     {META|SPEC|'I',        gobob},        /* gold page up */
  412.     {META|SPEC|'F',        goeol},        /* gold end */
  413.     {META|SPEC|'G',        goeob},        /* gold page down */
  414.  
  415.     /* vt200 key pad */
  416.     {SPEC|CTRL|'A',        advsearch},    /* search */
  417.     {SPEC|CTRL|'B',        setovrwrt},    /* insert */
  418.     {SPEC|CTRL|'C',        forwdel},    /* delete */
  419.     {SPEC|CTRL|'D',        setmark},    /* select */
  420.     {SPEC|CTRL|'E',        scprpage},    /* previous screen */
  421.     {SPEC|CTRL|'F',        scnxpage},    /* next screen */
  422.  
  423.     /* vt200 function keys */
  424.     {SPEC|CTRL|'W',        meta},        /* escape */
  425.     {SPEC|CTRL|'X',        backchar},    /* back space */
  426.     {SPEC|CTRL|'Y',        indent},    /* newline */
  427. #if    APROP
  428.     {SPEC|CTRL|'\\',    apro},        /* help */
  429. #endif
  430.     {SPEC|CTRL|']',        nullcmd},    /* do */
  431.  
  432.     /* extras */
  433. #if    CFENCE
  434.     {META|CTRL|'B',        getfence},    /* backward/forward paren */
  435. #endif
  436. #if    WORDPRO
  437.     {META|'J',        fillpara},    /* justify paragraph */
  438. #endif
  439. #if    BSD
  440. #else
  441.     {CTLX|'D',        delwind},    /* delete current window */
  442. #endif
  443.     {CTRL|'@',        setmark},    /* set mark */
  444.     {CTLX|'4',        filewfind},    /* find file to other window */
  445. #endif
  446.  
  447.     {0x7F,            backdel},
  448.  
  449.     /* special internal bindings */
  450.     {FUNC|'W',        wrapword},    /* called on word wrap */
  451.  
  452.     {FUNC|'C',        nullproc},    /* every command input */
  453. #if    ACMODE
  454.     {FUNC|'R',        acmode},    /* on file read */
  455. #else
  456.     {FUNC|'R',        nullproc},    /* on file read */
  457. #endif
  458.  
  459.     {0,            NULL}
  460. };
  461.  
  462. #if RAINBOW
  463.  
  464. #include "rainbow.h"
  465.  
  466. /*
  467.  * Mapping table from the LK201 function keys to the internal EMACS character.
  468.  */
  469.  
  470. short lk_map[][2] = {
  471.     Up_Key,                         CTRL+'P',
  472.     Down_Key,                       CTRL+'N',
  473.     Left_Key,                       CTRL+'B',
  474.     Right_Key,                      CTRL+'F',
  475.     Shift+Left_Key,                 META+'B',
  476.     Shift+Right_Key,                META+'F',
  477.     Control+Left_Key,               CTRL+'A',
  478.     Control+Right_Key,              CTRL+'E',
  479.     Prev_Scr_Key,                   META+'V',
  480.     Next_Scr_Key,                   CTRL+'V',
  481.     Shift+Up_Key,                   META+'<',
  482.     Shift+Down_Key,                 META+'>',
  483.     Cancel_Key,                     CTRL+'G',
  484.     Find_Key,                       CTRL+'S',
  485.     Shift+Find_Key,                 CTRL+'R',
  486.     Insert_Key,                     CTRL+'Y',
  487.     Options_Key,                    CTRL+'D',
  488.     Shift+Options_Key,              META+'D',
  489.     Remove_Key,                     CTRL+'W',
  490.     Shift+Remove_Key,               META+'W',
  491.     Select_Key,                     CTRL+'@',
  492.     Shift+Select_Key,               CTLX+CTRL+'X',
  493.     Interrupt_Key,                  CTRL+'U',
  494.     Keypad_PF2,                     META+'L',
  495.     Keypad_PF3,                     META+'C',
  496.     Keypad_PF4,                     META+'U',
  497.     Shift+Keypad_PF2,               CTLX+CTRL+'L',
  498.     Shift+Keypad_PF4,               CTLX+CTRL+'U',
  499.     Keypad_1,                       CTLX+'1',
  500.     Keypad_2,                       CTLX+'2',
  501.     Do_Key,                         CTLX+'E',
  502.     Keypad_4,                       CTLX+CTRL+'B',
  503.     Keypad_5,                       CTLX+'B',
  504.     Keypad_6,                       CTLX+'K',
  505.     Resume_Key,                     META+'!',
  506.     Control+Next_Scr_Key,           CTLX+'N',
  507.     Control+Prev_Scr_Key,           CTLX+'P',
  508.     Control+Up_Key,                 CTLX+CTRL+'P',
  509.     Control+Down_Key,               CTLX+CTRL+'N',
  510.     Help_Key,                       CTLX+'=',
  511.     Shift+Do_Key,                   CTLX+'(',
  512.     Control+Do_Key,                 CTLX+')',
  513.     Keypad_0,                       CTLX+'Z',
  514.     Shift+Keypad_0,                 CTLX+CTRL+'Z',
  515.     Main_Scr_Key,                   CTRL+'C',
  516.     Keypad_Enter,                   CTLX+'!',
  517.     Exit_Key,                       CTLX+CTRL+'C',
  518.     Shift+Exit_Key,                 CTRL+'Z'
  519. };
  520.  
  521. #define lk_map_size     (sizeof(lk_map)/2)
  522. #endif
  523.  
  524.