home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / VSCPPv7.zip / VACPP / IBMCPP / macros / LPEX.LX < prev    next >
Text File  |  1995-05-11  |  7KB  |  181 lines
  1. /* LPEX default key behaviour */
  2.  
  3. /* default funtion keys   */
  4. 'SET ACTION.F2 OPENCLOSE'
  5. 'SET ACCELERATOR.LP_CLOSEVIEW F3'
  6. 'SET ACTION.F4 BLOCK COPY CLEAR'
  7. 'SET ACTION.F5 BLOCK MOVE CLEAR'
  8. 'SET ACTION.F6 ='                         /* repeat last command */
  9. 'SET ACTION.F7 SCROLL SCREEN UP'          /* same as PgUp */
  10. 'SET ACTION.F8 SCROLL SCREEN DOWN'        /* same as PgDn */
  11. /* F9=OS/2 shell window defined below */
  12. 'SET ACTION.F11' /* set to null */
  13. 'SET ACTION.F12 FOCUS'
  14.  
  15. /* default control + function keys */
  16. 'SET ACTION.C-F1' /* set to null */
  17. 'SET ACTION.C-F2' /* set to null */
  18. 'SET ACTION.C-F3' /* set to null */
  19. 'SET ACTION.C-F4' /* set to null */
  20. 'SET ACTION.C-F5' /* set to null */
  21. 'SET ACTION.C-F6' /* set to null */
  22. 'SET ACTION.C-F7' /* set to null */
  23. 'SET ACTION.C-F8' /* set to null */
  24.  
  25. /* default shift + function keys */
  26. 'SET ACTION.S-F1' /* set to null */
  27. 'SET ACTION.S-F2' /* set to null */
  28. 'SET ACTION.S-F3' /* set to null */
  29. 'SET ACTION.S-F4' /* set to null */
  30. 'SET ACTION.S-F5' /* set to null */
  31. 'SET ACTION.S-F7   SCROLL SCREEN LEFT'
  32. 'SET ACTION.S-F8   SCROLL SCREEN RIGHT'
  33. 'SET ACCELERATOR.LP_ISSUECMD S-F9'
  34.  
  35. /* reset mouse behaviour  */
  36. 'SET ACTION.BUTTON1DOUBLE PRIMITIVE SELECTWORD'
  37. 'SET ACTION.BUTTON1DOWN ;PRIMITIVE SETCURSOR; PRIMITIVE SETPOINTER'
  38. 'SET ACTION.BUTTON1DRAG PRIMITIVE SELECTDRAG'
  39. 'SET ACTION.BUTTON2DOUBLE ;PRIMITIVE SETCURSOR; BLOCK CLEAR; BLOCK SET RECTANGLE'
  40. 'SET ACTION.BUTTON2DOWN ;BLOCK CLEAR;PRIMITIVE SETCURSOR; PRIMITIVE SETPOINTER'
  41. 'SET ACTION.BUTTON2DRAG PRIMITIVE SELECTDRAG'
  42. 'SET ACTION.S-BUTTON1DOWN PRIMITIVE SELECTDRAG'
  43. 'SET ACTION.S-BUTTON1DRAG PRIMITIVE SELECTDRAG'
  44. 'SET ACTION.S-BUTTON2DOWN PRIMITIVE SELECTDRAG'
  45. 'SET ACTION.S-BUTTON2DRAG PRIMITIVE SELECTDRAG'
  46. 'SET ACTION.C-BUTTON1DOWN ;PRIMITIVE SETCURSOR;PRIMITIVE SETPOINTER'
  47. 'SET ACTION.C-BUTTON1DRAG PRIMITIVE SELECTDRAG'
  48. 'SET ACTION.C-BUTTON1DOUBLE ;PRIMITIVE SETCURSOR;BLOCK CLEAR;BLOCK SET ELEMENT'
  49.  
  50. /* alt + key sequence  */
  51. 'SET ACTION.A-A' /* set to null */
  52. 'SET ACCELERATOR.LP_MARKCHAR A-B'
  53. 'SET ACCELERATOR.LP_COPY A-C'
  54. 'SET ACCELERATOR.LP_DELETE A-D'
  55. 'SET ACTION.A-E' /* set to null */
  56. 'SET ACTION.A-F' /* set to null */
  57. 'SET ACTION.A-G' /* set to null */
  58. 'SET ACTION.A-H' /* set to null */
  59. 'SET ACCELERATOR.LP_LOWER A-I'
  60. 'SET ACTION.A-J SPLITJOIN JOIN'
  61. 'SET ACCELERATOR.LP_UPPER A-K'
  62. 'SET ACCELERATOR.LP_MARKLINE A-L'
  63. 'SET ACCELERATOR.LP_MOVE A-M'
  64. 'SET ACCELERATOR.LP_NEXTFILE A-N'
  65. 'SET ACTION.A-O' /* set to null */
  66. 'SET ACCELERATOR.LP_PREVFILE A-P'
  67. 'SET ACCELERATOR.LP_QUICKMARK A-Q'
  68. 'SET ACCELERATOR.LP_MARKRECT A-R'
  69. 'SET ACTION.A-S SPLITJOIN SPLIT'
  70. 'SET ACTION.A-T PRIMITIVE TOPLINE'
  71. 'SET ACCELERATOR.LP_UNMARK A-U'
  72. 'SET ACTION.A-V' /* set to null */
  73. 'SET ACTION.A-W' /* set to null */
  74. 'SET ACTION.A-X PRIMITIVE ESCAPEKEY'
  75. 'SET ACTION.A-Y BLOCK FIND'
  76. 'SET ACCELERATOR.LP_OVERLAY A-Z'
  77. 'SET ACTION.A-1' /* set to null */
  78. 'SET ACCELERATOR.LP_UNDO A-BACKSPACE'
  79. 'SET ACCELERATOR.LP_END A-END'
  80. 'SET ACCELERATOR.LP_START A-HOME'
  81. 'SET ACTION.A-INS SET INSERTING AFTER'
  82. 'SET ACTION.A-LEFT  PREV VISIBLE WORD'
  83. 'SET ACTION.A-RIGHT NEXT VISIBLE WORD'
  84.  
  85. /* control + key sequences  */
  86. 'SET ACCELERATOR.LP_INCLUDEALL C-A'
  87. 'SET ACTION.C-B' /* set to null  */
  88. 'SET ACTION.C-D' /* set to null  */
  89. 'SET ACTION.C-E' /* set to null  */
  90. 'SET ACCELERATOR.LP_FINDCHANGE C-F'
  91. 'SET ACTION.C-G' /* set to null  */
  92. 'SET ACTION.C-H' /* set to null  */
  93. 'SET ACCELERATOR.LP_INCLUDE C-I'
  94. 'SET ACCELERATOR.LP_JUMP C-J'
  95. 'SET ACCELERATOR.LP_CHECK C-K'
  96. 'SET ACCELERATOR.LP_LINE C-L'
  97. 'SET ACTION.C-M MATCH'
  98. 'SET ACCELERATOR.LP_FINDNEXT C-N'
  99. 'SET ACCELERATOR.LP_OPENEDIT C-O'
  100. 'SET ACCELERATOR.LP_FINDPREV C-P'
  101. 'SET ACCELERATOR.LP_SETQUICK C-Q'
  102. 'SET ACCELERATOR.LP_SAVE C-S'
  103. 'SET ACTION.C-T PRIMITIVE SELECTWORD'
  104. 'SET ACTION.C-U' /* set to null  */
  105. 'SET ACTION.C-V' /* set to null  */
  106. 'SET ACTION.C-W' /* set to null  */
  107. 'SET ACTION.C-X' /* set to null  */
  108. 'SET ACTION.C-Y DUP'
  109. 'SET ACTION.C-Z' /* set to null  */
  110. 'SET ACTION.C-6'    /* set to null */
  111. 'SET ACTION.C-9'  /* set to null */
  112. 'SET ACTION.C-0'  /* set to null */
  113. 'SET ACTION.C-TAB'  /* set to null */
  114.  
  115. 'SET ACTION.C-END BOTTOM'
  116. 'SET ACTION.C-HOME TOP'
  117. 'SET ACCELERATOR.LP_CLIPCOPY C-INS'
  118. 'SET ACTION.C-LEFT  PRIMITIVE WORDLEFT'
  119. 'SET ACTION.C-PGDN SCROLL SCREEN RIGHT'
  120. 'SET ACTION.C-PGUP SCROLL SCREEN LEFT'
  121. 'SET ACTION.C-RIGHT PRIMITIVE WORDRIGHT'
  122.  
  123. /* enter key mappings */
  124. 'SET ACTION.ENTER SPLITLINE'               /* move cursor to start of next line if exists, else this line     */
  125. 'SET ACTION.A-ENTER ;PREFIXPROCESS ;PRIMITIVE PREVIOUSTAB'
  126. 'SET ACTION.C-ENTER OPENLINE'              /* insert a new line and set cursor to it                          */
  127.  
  128. /* backspace & delete key mappings    */
  129. 'SET ACTION.C-BACKSPACE DELETE'
  130. 'SET ACTION.C-DEL PRIMITIVE TRUNCATE'
  131. 'SET ACTION.DEL DELETE2'                   /* delete characters continuously from end of file to cursor       */
  132. 'SET ACTION.BACKSPACE BACK2'               /* delete characters continuously from cursor to beginning of file */
  133.  
  134. /* escape key mapping */
  135. 'SET ACTION.ESC    PRIMITIVE TOGGLECOMMAND'
  136.  
  137. /* shift + keyboard assignments  */
  138. 'SET ACCELERATOR.LP_CLIPCUT S-DEL'
  139. 'SET ACTION.S-DOWN        PRIMITIVE SELECTDOWN'
  140. 'SET ACTION.S-END         PRIMITIVE SELECTEND'
  141. 'SET ACTION.S-HOME        PRIMITIVE SELECTHOME'
  142. 'SET ACCELERATOR.LP_CLIPPASTE S-INS'
  143. 'SET ACTION.S-LEFT        PRIMITIVE SELECTLEFT'
  144. 'SET ACTION.S-PGDN        PRIMITIVE SELECTPAGEDOWN'
  145. 'SET ACTION.S-PGUP        PRIMITIVE SELECTPAGEUP'
  146. 'SET ACTION.S-RIGHT       PRIMITIVE SELECTRIGHT'
  147. 'SET ACTION.S-UP          PRIMITIVE SELECTUP'
  148.  
  149. /* control + shift + keyboard assignments */
  150. 'SET ACTION.C-S-BACKSPACE PRIMITIVE DELETEWORD'
  151. 'SET ACTION.C-S-DOWN      PRIMITIVE SELECTWORDDOWN'
  152. 'SET ACTION.C-S-END       PRIMITIVE SELECTFILEEND'
  153. 'SET ACTION.C-S-HOME      PRIMITIVE SELECTFILEHOME'
  154. 'SET ACTION.C-S-LEFT      PRIMITIVE SELECTWORDLEFT'
  155. 'SET ACTION.C-S-PGDN      PRIMITIVE SELECTPAGERIGHT'
  156. 'SET ACTION.C-S-PGUP      PRIMITIVE SELECTPAGELEFT'
  157. 'SET ACTION.C-S-RIGHT     PRIMITIVE SELECTWORDRIGHT'
  158. 'SET ACTION.C-S-UP        PRIMITIVE SELECTWORDUP'
  159.  
  160. /* Set up window pull-down for os/2 shell */
  161. 'SET ACTIONBAR.~Windows.OS/2_command_shell\tF9 LX "OS/2 command shell" /dt SHL'
  162.  
  163. 'EXTRACT VIEWNUM'
  164. 'EXTRACT VIEWLIST'
  165. do while(viewlist \= '')
  166.    'GOVIEW NOACT VIEWNUM 'subword(viewlist,1,1)
  167.  
  168.    'SET MENUCHECK.LP_LPEXKEYS  ON'
  169.    'SET MENUCHECK.LP_EPMKEYS   OFF'
  170.    'SET MENUCHECK.LP_SEUKEYS   OFF'
  171.    'SET MENUCHECK.LP_XEDITKEYS OFF'
  172.    'SET MENUCHECK.LP_ISPFKEYS  OFF'
  173.    'SET MENUCHECK.LP_CUSTOMIZE OFF'
  174.    'SET PREFIXSHOW OFF'
  175.    viewlist = delword(viewlist,1,1)
  176. end
  177. 'GOVIEW NOACT VIEWNUM 'VIEWNUM
  178.  
  179. 'EXTRACT DOCNUM INTO DOCNUM'
  180. "SET GLOBAL.DOC" || DOCNUM || " 'MACRO LPEX'"
  181.